asymptote-2.38/0000755000000000000000000000000012715037723012200 5ustar rootrootasymptote-2.38/application.h0000644000000000000000000002160612715037471014661 0ustar rootroot/***** * 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.38/entry.h0000644000000000000000000003471312715037471013522 0ustar rootroot/***** * 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.38/getopt.h0000644000000000000000000001477212715037472013667 0ustar rootroot/* 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.38/runsystem.in0000644000000000000000000001175212715037472014610 0ustar rootroot/***** * 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.38/runpath.in0000644000000000000000000002026012715037472014212 0ustar rootroot/***** * 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.38/revision.cc0000644000000000000000000000003512715037564014346 0ustar rootrootconst char *REVISION="2.38"; asymptote-2.38/GUI/0000755000000000000000000000000012715037723012624 5ustar rootrootasymptote-2.38/GUI/xasyActions.py0000755000000000000000000003370512715037471015516 0ustar rootroot#!/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.38/GUI/xasyExample.asy0000644000000000000000000000324612715037471015647 0ustar rootrootinitXasyMode(); // 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.38/GUI/xasyOptions.py0000755000000000000000000000624312715037471015546 0ustar rootroot#!/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.38/GUI/xasyOptionsDialog.py0000755000000000000000000002145012715037471016663 0ustar rootroot#!/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.38/GUI/CubicBezier.py0000755000000000000000000000725012715037471015373 0ustar rootroot#!/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.38/GUI/xasyColorPicker.py0000755000000000000000000001615712715037471016334 0ustar rootroot#!/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.38/GUI/xasyFile.py0000755000000000000000000002266012715037471014773 0ustar rootroot#!/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.38/GUI/xasyGUIIcons.py0000755000000000000000000001146412715037471015534 0ustar rootroot#!/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.38/GUI/xasyMainWin.py0000755000000000000000000021062512715037471015456 0ustar rootroot#!/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.38/GUI/xasy.py0000755000000000000000000000162212715037471014166 0ustar rootroot#!/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.38/GUI/xasy2asy.py0000755000000000000000000006222112715037471014767 0ustar rootroot#!/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.38/GUI/UndoRedoStack.py0000755000000000000000000000567412715037471015722 0ustar rootroot#!/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.38/GUI/xasyBezierEditor.py0000755000000000000000000002020212715037471016471 0ustar rootroot#!/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.38/GUI/xasyCodeEditor.py0000755000000000000000000000230512715037471016127 0ustar rootroot#!/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.38/runhistory.cc0000644000000000000000000001773512715037516014752 0ustar rootroot/***** 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.38/runpicture.in0000644000000000000000000004652512715037472014745 0ustar rootroot/***** * 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, triple normal, penarray *colors, Int interaction, bool prc=true) { f->append(new drawSurface(*P,center,straight,*p,opacity,shininess, PRCshininess,normal,*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.38/dec.h0000644000000000000000000003674512715037471013123 0ustar rootroot/***** * 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.38/runpair.h0000644000000000000000000000045312715037516014033 0ustar rootroot/***** 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.38/runpath.h0000644000000000000000000000026112715037516014031 0ustar rootroot/***** 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.38/program.h0000644000000000000000000000500212715037472014016 0ustar rootroot/***** * 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.38/errortest.asy0000644000000000000000000001537712715037471014764 0ustar rootroot/***** * 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.38/TODO0000644000000000000000000000232112715037471012666 0ustar rootrootAndy: 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.38/doc/0000755000000000000000000000000012715037723012745 5ustar rootrootasymptote-2.38/doc/latexmkrc0000644000000000000000000000021612715037471014661 0ustar rootrootsub 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.38/doc/png/0000755000000000000000000000000012715037723013531 5ustar rootrootasymptote-2.38/doc/png/Makefile.in0000644000000000000000000000267512715037471015610 0ustar rootrootASYFILES = $(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.38/doc/legend.asy0000644000000000000000000000063212715037471014722 0ustar rootrootimport 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.38/doc/asymptote.texi0000644000000000000000000134770312715037471015704 0ustar rootroot\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 @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 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.30 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.38/doc/bezier2.asy0000644000000000000000000000064012715037471015025 0ustar rootrootimport 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.38/doc/grid3xyz.asy0000644000000000000000000000065212715037471015251 0ustar rootrootimport 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.38/doc/monthaxis.asy0000644000000000000000000000056612715037471015504 0ustar rootrootimport 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.38/doc/flow.asy0000644000000000000000000000113412715037471014431 0ustar rootrootimport 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.38/doc/histogram.asy0000644000000000000000000000067112715037471015464 0ustar rootrootimport 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.38/doc/helix.asy0000644000000000000000000000064712715037471014603 0ustar rootrootimport 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.38/doc/penfunctionimage.asy0000644000000000000000000000076212715037471017023 0ustar rootrootimport 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.38/doc/filegraph.dat0000644000000000000000000000003212715037471015373 0ustar rootroot# x y 50 0 100 0.5 125 2 asymptote-2.38/doc/colo-asy.tex0000644000000000000000000001037412715037471015222 0ustar rootroot%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.38/doc/asymptote.sty0000644000000000000000000002316312715037573015543 0ustar rootroot%% %% 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-2015 John Bowman %% (C) 2010 Will Robertson %% %% Adapted from comment.sty %% %% Licence: GPL2+ %% \ProvidesPackage{asymptote} [2016/02/09 v1.30 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.38/doc/CAD.tex0000644000000000000000000002372412715037471014066 0ustar rootroot\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.38/doc/ocg.sty0000644000000000000000000000665112715037471014266 0ustar rootroot%% 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.38/doc/logimage.asy0000644000000000000000000000074012715037471015250 0ustar rootrootimport 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.38/doc/vectorfield.asy0000644000000000000000000000022312715037471015766 0ustar rootrootimport 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.38/doc/parametricgraph.asy0000644000000000000000000000036012715037471016633 0ustar rootrootimport 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.38/doc/colons.asy0000644000000000000000000000006112715037471014755 0ustar rootrootdraw((0,0){up}::(100,25){right}::(200,0){down}); asymptote-2.38/doc/generalaxis3.asy0000644000000000000000000000057012715037471016052 0ustar rootrootimport 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.38/doc/westnile.csv0000644000000000000000000001116712715037471015322 0ustar rootrootsm0,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.38/doc/latexmkrc_asydir0000644000000000000000000000022612715037471016235 0ustar rootrootsub 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.38/doc/hatch.asy0000644000000000000000000000042712715037471014555 0ustar rootrootsize(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.38/doc/shadedtiling.asy0000644000000000000000000000040012715037471016114 0ustar rootrootsize(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.38/doc/flowchartdemo.asy0000644000000000000000000000153612715037471016326 0ustar rootrootsize(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.38/doc/asyRefCard.tex0000644000000000000000000004712312715037471015521 0ustar rootroot% 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.38/doc/join.asy0000644000000000000000000000040512715037471014421 0ustar rootrootsize(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.38/doc/subpictures.asy0000644000000000000000000000052512715037471016035 0ustar rootrootpicture 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.38/doc/asycolors.sty0000644000000000000000000000536012715037471015530 0ustar rootroot\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.38/doc/FAQ/0000755000000000000000000000000012715037723013354 5ustar rootrootasymptote-2.38/doc/FAQ/m-info.pl0000644000000000000000000001277312715037471015110 0ustar rootroot## 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.38/doc/FAQ/m-post.pl0000644000000000000000000001074212715037471015134 0ustar rootroot## 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.38/doc/FAQ/m-html.pl0000644000000000000000000002277512715037471015124 0ustar rootroot## 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.38/doc/FAQ/asy-faq.bfnn0000644000000000000000000011747412715037471015600 0ustar rootroot\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.38/doc/FAQ/m-ascii.pl0000644000000000000000000001115612715037471015237 0ustar rootroot## 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.38/doc/FAQ/Makefile0000644000000000000000000000175012715037471015017 0ustar rootrootBFNNCONV = 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.38/doc/FAQ/m-lout.pl0000644000000000000000000001373012715037471015132 0ustar rootroot## 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.38/doc/FAQ/install-sh0000755000000000000000000003253712715037471015372 0ustar rootroot#!/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.38/doc/FAQ/bfnnconv.pl0000755000000000000000000002176012715037471015533 0ustar rootroot#!/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.38/doc/scaledgraph.asy0000644000000000000000000000054312715037471015742 0ustar rootrootimport 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.38/doc/Makefile.in0000644000000000000000000000617212715037471015020 0ustar rootrootMANFILES = 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@ export docdir infodir INSTALL 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.38/doc/secondaryaxis.csv0000644000000000000000000013731712715037471016352 0ustar rootroot,"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.38/doc/loggraph.asy0000644000000000000000000000040612715037471015266 0ustar rootrootimport 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.38/doc/binarytreetest.asy0000644000000000000000000000046212715037471016531 0ustar rootrootimport 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.38/doc/latexusage.tex0000644000000000000000000000604212715037471015633 0ustar rootroot\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.38/doc/external-proposal.html0000644000000000000000000004621512715037471017322 0ustar rootroot 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.38/doc/logo.asy0000644000000000000000000000115312715037471014423 0ustar rootrootsize(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.38/doc/cylinderskeleton.asy0000644000000000000000000000012612715037471017040 0ustar rootrootimport solids; size(0,100); revolution r=cylinder(O,1,1.5,Y+Z); draw(r,heavygreen); asymptote-2.38/doc/secondaryaxis.asy0000644000000000000000000000146512715037471016345 0ustar rootrootimport 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.38/doc/onecontour.asy0000644000000000000000000000016312715037471015656 0ustar rootrootimport 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.38/doc/bigdiagonal.asy0000644000000000000000000000005112715037471015717 0ustar rootrootsize(0,100.5); draw((0,0)--(2,1),Arrow); asymptote-2.38/doc/imagecontour.asy0000644000000000000000000000155012715037471016160 0ustar rootrootimport 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.38/doc/slopefield1.asy0000644000000000000000000000023212715037471015667 0ustar rootrootimport 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.38/doc/TeXShopAndAsymptote.tex0000644000000000000000000000513512715037471017356 0ustar rootroot\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.38/doc/loggrid.asy0000644000000000000000000000057612715037471015122 0ustar rootrootimport 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.38/doc/irregularcontour.asy0000644000000000000000000000054512715037471017075 0ustar rootrootimport 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.38/doc/lineargraph.asy0000644000000000000000000000056512715037471015765 0ustar rootrootimport 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.38/doc/generalaxis.asy0000644000000000000000000000042512715037471015766 0ustar rootrootimport 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.38/doc/asy-latex.dtx0000644000000000000000000004332512715037471015404 0ustar rootroot% \iffalse % %<*internal> \begingroup % %<*batchfile> \input docstrip.tex \keepsilent \preamble ____________________________ The ASYMPTOTE package (C) 2003 Tom Prince (C) 2003-2015 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/02/09 v1.30 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.38/doc/Bode.asy0000644000000000000000000000124512715037471014336 0ustar rootrootimport 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.38/doc/Hobbycontrol.asy0000644000000000000000000000101112715037471016120 0ustar rootrootsize(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.38/doc/knots.asy0000644000000000000000000000064112715037471014622 0ustar rootrootimport 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.38/doc/reloadpdf.tex0000644000000000000000000000054212715037471015430 0ustar rootroot% 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.38/doc/join3.asy0000644000000000000000000000067212715037471014512 0ustar rootrootimport 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.38/doc/extra/0000755000000000000000000000000012715037471014070 5ustar rootrootasymptote-2.38/doc/extra/intro.asy0000644000000000000000000006106112715037471015745 0ustar rootrootorientation=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.38/doc/errorbars.asy0000644000000000000000000000162012715037471015463 0ustar rootrootimport 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.38/doc/axis3.asy0000644000000000000000000000036612715037471014517 0ustar rootrootimport 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.38/doc/diatom.asy0000644000000000000000000000550212715037471014742 0ustar rootrootimport 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.38/doc/Hobbydir.asy0000644000000000000000000000076412715037471015234 0ustar rootrootsize(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.38/doc/triangulate.asy0000644000000000000000000000061412715037471016003 0ustar rootrootsize(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.38/doc/exp.asy0000644000000000000000000000031212715037471014253 0ustar rootrootimport 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.38/doc/leastsquares.dat0000644000000000000000000001425612715037471016163 0ustar rootroot1 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.38/doc/log2graph.asy0000644000000000000000000000064712715037471015357 0ustar rootrootimport 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.38/doc/markers1.asy0000644000000000000000000000513512715037471015214 0ustar rootrootsize(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.38/doc/markers2.asy0000644000000000000000000000155512715037471015217 0ustar rootrootsize(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.38/doc/bezier.asy0000644000000000000000000000012112715037471014735 0ustar rootrootlabel("$(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.38/doc/filegraph.asy0000644000000000000000000000035612715037471015430 0ustar rootrootimport 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.38/doc/image.asy0000644000000000000000000000062112715037471014544 0ustar rootrootsize(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.38/doc/HermiteSpline.asy0000644000000000000000000000051212715037471016231 0ustar rootrootimport 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.38/doc/colors.asy0000644000000000000000000000312412715037471014764 0ustar rootrootint 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.38/doc/externalprc.tex0000644000000000000000000000052712715037471016022 0ustar rootroot% 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.38/doc/beziercurve.asy0000644000000000000000000000035212715037471016010 0ustar rootrootsize(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.38/doc/square.asy0000644000000000000000000000006412715037471014763 0ustar rootrootsize(3cm); draw((0,0)--(1,0)--(1,1)--(0,1)--cycle); asymptote-2.38/doc/elliptic.asy0000644000000000000000000000376712715037471015305 0ustar rootrootstruct 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.38/doc/CAD1.asy0000644000000000000000000000255712715037471014144 0ustar rootrootimport 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.38/doc/mexicanhat.asy0000644000000000000000000000044012715037471015602 0ustar rootrootsize(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.38/doc/graphmarkers.asy0000644000000000000000000000136212715037471016153 0ustar rootrootimport 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.38/doc/westnile.asy0000644000000000000000000000332212715037471015315 0ustar rootrootimport 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.38/doc/GaussianSurface.asy0000644000000000000000000000072012715037471016545 0ustar rootrootimport 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.38/doc/quartercircle.asy0000644000000000000000000000006112715037471016325 0ustar rootrootsize(100,0); draw((1,0){up}..{left}(0,1),Arrow); asymptote-2.38/doc/saddle.asy0000644000000000000000000000023512715037471014717 0ustar rootrootimport 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.38/doc/diagonal.asy0000644000000000000000000000003012715037471015232 0ustar rootrootdraw((0,0)--(100,100)); asymptote-2.38/doc/leastsquares.asy0000644000000000000000000000200112715037471016170 0ustar rootrootsize(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.38/doc/tile.asy0000644000000000000000000000060612715037471014422 0ustar rootrootsize(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.38/doc/cube.asy0000644000000000000000000000036312715037471014403 0ustar rootrootimport 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.38/doc/dots.asy0000644000000000000000000000006112715037471014431 0ustar rootrootdraw((0,0){up}..(100,25){right}..(200,0){down}); asymptote-2.38/doc/multicontour.asy0000644000000000000000000000071212715037471016227 0ustar rootrootimport 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.38/doc/asy.1.begin0000644000000000000000000000175512715037471014716 0ustar rootroot.\" 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.38/doc/labelsquare.asy0000644000000000000000000000017112715037471015762 0ustar rootrootsize(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.38/doc/lineargraph0.asy0000644000000000000000000000055612715037471016045 0ustar rootrootimport 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.38/doc/penimage.asy0000644000000000000000000000033312715037471015247 0ustar rootrootsize(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.38/doc/diatom.csv0000644000000000000000000000774312715037471014752 0ustar rootroot"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.38/doc/brokenaxis.asy0000644000000000000000000000101412715037471015624 0ustar rootrootimport 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.38/doc/icon.asy0000644000000000000000000000057412715037471014421 0ustar rootrootimport 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.38/doc/datagraph.asy0000644000000000000000000000033212715037471015414 0ustar rootrootimport 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.38/doc/CDlabel.asy0000644000000000000000000000077212715037471014757 0ustar rootrootsize(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.38/doc/makepen.asy0000644000000000000000000000044512715037471015106 0ustar rootrootsize(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.38/doc/superpath.asy0000644000000000000000000000017312715037471015477 0ustar rootrootsize(0,100); path unitcircle=E..N..W..S..cycle; path g=scale(2)*unitcircle; filldraw(unitcircle^^g,evenodd+yellow,black); asymptote-2.38/doc/install-sh0000755000000000000000000003253712715037471014763 0ustar rootroot#!/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.38/doc/xasy.1x0000644000000000000000000000156012715037471014205 0ustar rootroot.\" 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.38/doc/planes.asy0000644000000000000000000000054312715037471014747 0ustar rootrootsize(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.38/doc/eetomumu.asy0000644000000000000000000000203312715037471015321 0ustar rootrootimport 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.38/doc/logticks.asy0000644000000000000000000000047212715037471015305 0ustar rootrootimport 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.38/doc/asy.1.end0000644000000000000000000000051512715037471014371 0ustar rootroot .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.38/doc/unitcircle3.asy0000644000000000000000000000027212715037471015710 0ustar rootrootimport 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.38/doc/pixel.pdf0000644000000000000000000000532312715037471014564 0ustar rootroot%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.38/doc/linetype.asy0000644000000000000000000000064012715037471015314 0ustar rootrootvoid 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.38/memory.h0000644000000000000000000001167612715037472013675 0ustar rootroot/**** * 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.38/profile.py0000644000000000000000000000444312715037472014220 0ustar rootrootimport 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.38/camp.y0000644000000000000000000004707512715037471013327 0ustar rootroot%{ /***** * 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.38/drawpath.cc0000644000000000000000000000667612715037471014340 0ustar rootroot/***** * 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.38/drawgsave.h0000644000000000000000000000072212715037471014335 0ustar rootroot/***** * 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.38/builtin.symbols.h0000644000000000000000000000340112715037527015506 0ustar rootroot/***** * 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(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.38/quaternion.cc0000644000000000000000000001351312715037472014700 0ustar rootroot/*********************************************************************** 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.38/record.cc0000644000000000000000000000325012715037472013766 0ustar rootroot/***** * 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.38/runtime.h0000644000000000000000000000221312715037516014032 0ustar rootroot/***** 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.38/parser.h0000644000000000000000000000152412715037472013650 0ustar rootroot/***** * 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.38/base/0000755000000000000000000000000012715037723013112 5ustar rootrootasymptote-2.38/base/interpolate.asy0000644000000000000000000000755012715037471016165 0ustar rootroot// 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.38/base/graph_settings.asy0000644000000000000000000000047212715037471016654 0ustar rootroot// 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.38/base/plain.asy0000644000000000000000000001457212715037471014744 0ustar rootroot/***** * 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(); asymptote-2.38/base/palette.asy0000644000000000000000000003447312715037471015301 0ustar rootrootprivate 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; int m=n > 0 ? f[0].length : 0; pen[][] p=new pen[n][m]; 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)];},m); } 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(); 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.38/base/math.asy0000644000000000000000000002542612715037471014572 0ustar rootroot// 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.38/base/pstoedit.asy0000644000000000000000000000054612715037471015470 0ustar rootrootpen 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.38/base/asy-kate.sh0000644000000000000000000002006312715037471015165 0ustar rootroot#!/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.38/base/graph3.asy0000644000000000000000000017135712715037471015032 0ustar rootroot// Three-dimensional graphing routines private import math; import graph; import three; triple zero3(real) {return O;} 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.38/base/reload.js0000644000000000000000000000122112715037471014712 0ustar rootroot// 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.38/base/smoothcontour3.asy0000644000000000000000000015531712715037471016652 0ustar rootroot// 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)); patches[i] = shift(center) * scale3(1.01) * shift(-center) * patches[i]; } } return surface(...patches); } asymptote-2.38/base/labelpath.asy0000644000000000000000000000133112715037471015562 0ustar rootrootusepackage("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.38/base/plain_Label.asy0000644000000000000000000003761312715037471016044 0ustar rootrootreal 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.38/base/markers.asy0000644000000000000000000001620612715037471015301 0ustar rootroot// 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.38/base/latin1.asy0000644000000000000000000000007512715037471015022 0ustar rootrootusepackage("fontenc","T1"); usepackage("inputenc","latin1"); asymptote-2.38/base/texcolors.asy0000644000000000000000000000434512715037471015660 0ustar rootrootpen 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.38/base/asy.vim0000644000000000000000000002124612715037471014430 0ustar rootroot" 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.38/base/slopefield.asy0000644000000000000000000000402412715037471015756 0ustar rootrootimport 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.38/base/contour3.asy0000644000000000000000000003450412715037471015412 0ustar rootrootimport 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.38/base/plain_scaling.asy0000644000000000000000000001260212715037471016434 0ustar rootrootreal 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.38/base/babel.asy0000644000000000000000000000006312715037471014674 0ustar rootrootvoid babel(string s) { usepackage("babel",s); } asymptote-2.38/base/slide.asy0000644000000000000000000003712612715037471014741 0ustar rootrootimport 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.38/base/nopapersize.ps0000644000000000000000000000004712715037471016016 0ustar rootroot@ a4size 0in 0in @ letterSize 0in 0in asymptote-2.38/base/three_tube.asy0000644000000000000000000003035212715037471015761 0ustar rootrootvoid 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.38/base/unicode.asy0000644000000000000000000000006312715037471015255 0ustar rootrootusepackage("ucs"); usepackage("inputenc","utf8x"); asymptote-2.38/base/obj.asy0000644000000000000000000000631712715037471014411 0ustar rootroot// 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.38/base/asy_filetype.vim0000644000000000000000000000014312715037471016322 0ustar rootroot" Vim filetype detection file " Language: Asymptote au BufNewFile,BufRead *.asy setfiletype asy asymptote-2.38/base/feynman.asy0000644000000000000000000005172312715037471015275 0ustar rootroot/***************************************************************************** * 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.38/base/three_arrows.asy0000644000000000000000000005644612715037471016353 0ustar rootroot// 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.38/base/grid3.asy0000644000000000000000000003224412715037471014645 0ustar rootroot// 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.38/base/drawtree.asy0000644000000000000000000000407512715037471015453 0ustar rootroot// 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.38/base/graph.asy0000644000000000000000000017457012715037471014747 0ustar rootrootprivate 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 == 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.38/base/plain_boxes.asy0000644000000000000000000000773112715037471016143 0ustar rootroot// 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.38/base/metapost.asy0000644000000000000000000000037512715037471015471 0ustar rootroot// 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.38/base/plain_markers.asy0000644000000000000000000002570712715037471016472 0ustar rootrootreal 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.38/base/plain_debugger.asy0000644000000000000000000000421312715037471016577 0ustar rootrootint 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.38/base/asy-init.el0000644000000000000000000000041412715037471015170 0ustar rootroot(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.38/base/asymptote.py0000755000000000000000000000233112715037471015513 0ustar rootroot# Python module to feed Asymptote with commands # (modified from gnuplot.py) from subprocess import * class asy: def __init__(self): self.session = Popen(['asy','-quiet','-interactive'],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.38/base/plain_paths.asy0000644000000000000000000002213512715037471016135 0ustar rootrootpath 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.38/base/plain_arcs.asy0000644000000000000000000000235312715037471015746 0ustar rootrootbool 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.38/base/patterns.asy0000644000000000000000000000506712715037471015500 0ustar rootroot// 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.38/base/plain_xasy.asy0000644000000000000000000000503112715037471015776 0ustar rootrootrestricted 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.38/base/flowchart.asy0000644000000000000000000003374712715037471015637 0ustar rootroot// 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.38/base/contour.asy0000644000000000000000000004721112715037471015326 0ustar rootroot// 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.38/base/geometry.asy0000644000000000000000000116367412715037471015505 0ustar rootroot// 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 + 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)); if (margin == NoMargin) margin = TrueMargin(linewidth(currentpen)/2, linewidth(currentpen)/2); 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.38/base/three.asy0000644000000000000000000025161512715037471014751 0ustar rootrootprivate 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.005; 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.38/base/plain_strings.asy0000644000000000000000000001354012715037471016507 0ustar rootrootstring 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.38/base/plain_margins.asy0000644000000000000000000000477012715037471016463 0ustar rootrootstruct 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.38/base/size10.asy0000644000000000000000000000114012715037471014737 0ustar rootroottexpreamble("\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.38/base/tube.asy0000644000000000000000000001031112715037471014563 0ustar rootroot// 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.38/base/bezulate.asy0000644000000000000000000002253612715037471015453 0ustar rootroot// 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.38/base/embed.asy0000644000000000000000000000223712715037471014710 0ustar rootrootif(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.38/base/simplex.asy0000644000000000000000000001535112715037471015316 0ustar rootroot/***** * 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.38/base/three_surface.asy0000644000000000000000000021570712715037471016463 0ustar rootrootimport 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 an intersection times of path p and surface s. real[] intersect(path3 p, patch s, real fuzz=-1) { return intersect(p,s.P,fuzz); } // return an array containing an intersection times 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); if(s.triangular) drawbeziertriangle(f,s.P,center,s.straight && s.planar,m.p, m.opacity,m.shininess,PRCshininess,s.colors, interaction.type); else draw(f,s.P,center,s.straight && s.planar,m.p,m.opacity,m.shininess, PRCshininess,s.planar ? s.normal(0.5,0.5) : O,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.38/base/labelpath3.asy0000644000000000000000000000464112715037471015654 0ustar rootroot// 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.38/base/lmfit.asy0000644000000000000000000006012312715037471014745 0ustar rootroot/* 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.38/base/ode.asy0000644000000000000000000003553612715037471014413 0ustar rootrootreal 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.38/base/x11colors.asy0000644000000000000000000001131412715037471015463 0ustar rootrootpen 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.38/base/plain_pens.asy0000644000000000000000000002050512715037471015762 0ustar rootrootreal 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 olive=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 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.38/base/plain_arrows.asy0000644000000000000000000004521512715037471016337 0ustar rootrootreal 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.38/base/bsp.asy0000644000000000000000000001242712715037471014422 0ustar rootrootprivate 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.38/base/three_light.asy0000644000000000000000000000671112715037471016133 0ustar rootrootstruct 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.38/base/stats.asy0000644000000000000000000001621312715037471014771 0ustar rootrootprivate 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.38/base/asy-mode.el0000644000000000000000000021306712715037471015163 0ustar rootroot;;; 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.38/base/annotate.asy0000644000000000000000000000110212715037471015433 0ustar rootrootvoid 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.38/base/plain_filldraw.asy0000644000000000000000000001422412715037471016622 0ustar rootroot// 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.38/base/trembling.asy0000644000000000000000000001324512715037471015620 0ustar rootroot// 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.38/base/plain_bounds.asy0000644000000000000000000005101512715037471016307 0ustar rootrootinclude 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.38/base/tree.asy0000644000000000000000000000253712715037471014576 0ustar rootroot/***** * 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.38/base/external.asy0000644000000000000000000000214212715037471015451 0ustar rootrootusepackage("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.38/base/solids.asy0000644000000000000000000002773612715037471015144 0ustar rootrootimport 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,0,0,0,Y,n),Z); } asymptote-2.38/base/plain_prethree.asy0000644000000000000000000001530612715037471016636 0ustar rootroot// 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.38/base/plain_shipout.asy0000644000000000000000000000654512715037471016520 0ustar rootroot// 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.38/base/plain_constants.asy0000644000000000000000000000706212715037471017034 0ustar rootrootrestricted 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.38/base/roundedpath.asy0000644000000000000000000000654612715037471016160 0ustar rootroot// 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.38/base/size11.asy0000644000000000000000000000113012715037471014737 0ustar rootroottexpreamble("\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.38/base/binarytree.asy0000644000000000000000000002633212715037471016002 0ustar rootroot/* ********************************************************************** * 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.38/base/animation.asy0000644000000000000000000001223712715037471015614 0ustar rootroot/***** * 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.38/base/graph_splinetype.asy0000644000000000000000000001637612715037471017222 0ustar rootrootprivate 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.38/base/animate.asy0000644000000000000000000000005212715037471015243 0ustar rootrootusepackage("animate"); import animation; asymptote-2.38/base/fontsize.asy0000644000000000000000000000004312715037471015466 0ustar rootrootif(latex()) usepackage("type1cm"); asymptote-2.38/base/three_margins.asy0000644000000000000000000000531412715037471016462 0ustar rootrootstruct 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.38/base/CAD.asy0000644000000000000000000002511612715037471014224 0ustar rootrootstruct 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.38/base/plain_picture.asy0000644000000000000000000013177412715037471016503 0ustar rootroot// 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 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.38/base/syzygy.asy0000644000000000000000000005467312715037471015225 0ustar rootroot/***** 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.38/wce0000755000000000000000000000033312715037472012704 0ustar rootroot#!/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.38/triple.h0000644000000000000000000001460212715037472013654 0ustar rootroot/***** * 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); } //namespace camp GC_DECLARE_PTRFREE(camp::triple); #endif asymptote-2.38/builtin.cc0000644000000000000000000007461412715037471014171 0ustar rootroot/***** * 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); 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.38/locate.h0000644000000000000000000000106012715037472013616 0ustar rootroot/***** * 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.38/runpath.symbols.h0000644000000000000000000000277612715037527015537 0ustar rootroot/***** * 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.38/item.h0000644000000000000000000001334112715037472013312 0ustar rootroot/***** * inst.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.38/runtime.cc0000644000000000000000000016421112715037516014177 0ustar rootroot/***** 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.38/runmath.cc0000644000000000000000000004140612715037516014172 0ustar rootroot/***** 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" 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 75 "runmath.in" // real ^(real x, Int y); void gen_runmath0(stack *Stack) { Int y=vm::pop(Stack); real x=vm::pop(Stack); #line 76 "runmath.in" {Stack->push(pow(x,y)); return;} } #line 80 "runmath.in" // pair ^(pair z, Int y); void gen_runmath1(stack *Stack) { Int y=vm::pop(Stack); pair z=vm::pop(Stack); #line 81 "runmath.in" {Stack->push(pow(z,y)); return;} } #line 85 "runmath.in" // Int quotient(Int x, Int y); void gen_runmath2(stack *Stack) { Int y=vm::pop(Stack); Int x=vm::pop(Stack); #line 86 "runmath.in" {Stack->push(quotient()(x,y)); return;} } #line 90 "runmath.in" // Int abs(Int x); void gen_runmath3(stack *Stack) { Int x=vm::pop(Stack); #line 91 "runmath.in" {Stack->push(Abs(x)); return;} } #line 95 "runmath.in" // Int sgn(real x); void gen_runmath4(stack *Stack) { real x=vm::pop(Stack); #line 96 "runmath.in" {Stack->push(sgn(x)); return;} } #line 100 "runmath.in" // Int rand(); void gen_runmath5(stack *Stack) { #line 101 "runmath.in" if(initializeRandom) Srand(1); {Stack->push(random()); return;} } #line 107 "runmath.in" // void srand(Int seed); void gen_runmath6(stack *Stack) { Int seed=vm::pop(Stack); #line 108 "runmath.in" Srand(seed); } // a random number uniformly distributed in the interval [0,1] #line 113 "runmath.in" // real unitrand(); void gen_runmath7(stack *Stack) { #line 114 "runmath.in" {Stack->push(((real) random())/RANDOM_MAX); return;} } #line 118 "runmath.in" // Int ceil(real x); void gen_runmath8(stack *Stack) { real x=vm::pop(Stack); #line 119 "runmath.in" {Stack->push(Intcast(ceil(x))); return;} } #line 123 "runmath.in" // Int floor(real x); void gen_runmath9(stack *Stack) { real x=vm::pop(Stack); #line 124 "runmath.in" {Stack->push(Intcast(floor(x))); return;} } #line 128 "runmath.in" // Int round(real x); void gen_runmath10(stack *Stack) { real x=vm::pop(Stack); #line 129 "runmath.in" if(validInt(x)) {Stack->push(Round(x)); return;} integeroverflow(0); } #line 134 "runmath.in" // Int Ceil(real x); void gen_runmath11(stack *Stack) { real x=vm::pop(Stack); #line 135 "runmath.in" {Stack->push(Ceil(x)); return;} } #line 139 "runmath.in" // Int Floor(real x); void gen_runmath12(stack *Stack) { real x=vm::pop(Stack); #line 140 "runmath.in" {Stack->push(Floor(x)); return;} } #line 144 "runmath.in" // Int Round(real x); void gen_runmath13(stack *Stack) { real x=vm::pop(Stack); #line 145 "runmath.in" {Stack->push(Round(Intcap(x))); return;} } #line 149 "runmath.in" // real fmod(real x, real y); void gen_runmath14(stack *Stack) { real y=vm::pop(Stack); real x=vm::pop(Stack); #line 150 "runmath.in" if (y == 0.0) dividebyzero(); {Stack->push(fmod(x,y)); return;} } #line 155 "runmath.in" // real atan2(real y, real x); void gen_runmath15(stack *Stack) { real x=vm::pop(Stack); real y=vm::pop(Stack); #line 156 "runmath.in" {Stack->push(atan2(y,x)); return;} } #line 160 "runmath.in" // real hypot(real x, real y); void gen_runmath16(stack *Stack) { real y=vm::pop(Stack); real x=vm::pop(Stack); #line 161 "runmath.in" {Stack->push(hypot(x,y)); return;} } #line 165 "runmath.in" // real remainder(real x, real y); void gen_runmath17(stack *Stack) { real y=vm::pop(Stack); real x=vm::pop(Stack); #line 166 "runmath.in" {Stack->push(remainder(x,y)); return;} } #line 170 "runmath.in" // real Jn(Int n, real x); void gen_runmath18(stack *Stack) { real x=vm::pop(Stack); Int n=vm::pop(Stack); #line 171 "runmath.in" {Stack->push(jn(n,x)); return;} } #line 175 "runmath.in" // real Yn(Int n, real x); void gen_runmath19(stack *Stack) { real x=vm::pop(Stack); Int n=vm::pop(Stack); #line 176 "runmath.in" {Stack->push(yn(n,x)); return;} } #line 180 "runmath.in" // real erf(real x); void gen_runmath20(stack *Stack) { real x=vm::pop(Stack); #line 181 "runmath.in" {Stack->push(erf(x)); return;} } #line 185 "runmath.in" // real erfc(real x); void gen_runmath21(stack *Stack) { real x=vm::pop(Stack); #line 186 "runmath.in" {Stack->push(erfc(x)); return;} } #line 190 "runmath.in" // Int factorial(Int n); void gen_runmath22(stack *Stack) { Int n=vm::pop(Stack); #line 191 "runmath.in" if(n < 0) error(invalidargument); {Stack->push(factorial(n)); return;} } #line 195 "runmath.in" // Int choose(Int n, Int k); void gen_runmath23(stack *Stack) { Int k=vm::pop(Stack); Int n=vm::pop(Stack); #line 196 "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 206 "runmath.in" // real gamma(real x); void gen_runmath24(stack *Stack) { real x=vm::pop(Stack); #line 207 "runmath.in" #ifdef HAVE_TGAMMA {Stack->push(tgamma(x)); return;} #else real lg = lgamma(x); {Stack->push(signgam*exp(lg)); return;} #endif } #line 216 "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 217 "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 225 "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 226 "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 234 "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 235 "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 246 "runmath.in" // bool !(bool b); void gen_runmath28(stack *Stack) { bool b=vm::pop(Stack); #line 247 "runmath.in" {Stack->push(!b); return;} } #line 252 "runmath.in" void boolMemEq(stack *Stack) { frame * b=vm::pop(Stack); frame * a=vm::pop(Stack); #line 253 "runmath.in" {Stack->push(a == b); return;} } #line 257 "runmath.in" void boolMemNeq(stack *Stack) { frame * b=vm::pop(Stack); frame * a=vm::pop(Stack); #line 258 "runmath.in" {Stack->push(a != b); return;} } #line 262 "runmath.in" void boolFuncEq(stack *Stack) { callable * b=vm::pop(Stack); callable * a=vm::pop(Stack); #line 263 "runmath.in" {Stack->push(a->compare(b)); return;} } #line 267 "runmath.in" void boolFuncNeq(stack *Stack) { callable * b=vm::pop(Stack); callable * a=vm::pop(Stack); #line 268 "runmath.in" {Stack->push(!(a->compare(b))); return;} } // Bit operations #line 274 "runmath.in" // Int AND(Int a, Int b); void gen_runmath33(stack *Stack) { Int b=vm::pop(Stack); Int a=vm::pop(Stack); #line 275 "runmath.in" {Stack->push(a & b); return;} } #line 280 "runmath.in" // Int OR(Int a, Int b); void gen_runmath34(stack *Stack) { Int b=vm::pop(Stack); Int a=vm::pop(Stack); #line 281 "runmath.in" {Stack->push(a | b); return;} } #line 285 "runmath.in" // Int XOR(Int a, Int b); void gen_runmath35(stack *Stack) { Int b=vm::pop(Stack); Int a=vm::pop(Stack); #line 286 "runmath.in" {Stack->push(a ^ b); return;} } #line 290 "runmath.in" // Int NOT(Int a); void gen_runmath36(stack *Stack) { Int a=vm::pop(Stack); #line 291 "runmath.in" {Stack->push(~a); return;} } #line 295 "runmath.in" // Int CLZ(Int a); void gen_runmath37(stack *Stack) { Int a=vm::pop(Stack); #line 296 "runmath.in" if((uint32_t) a > 0xFFFFFFFF) {Stack->push(-1); return;} {Stack->push(CLZ((uint32_t) a)); return;} } #line 301 "runmath.in" // Int CTZ(Int a); void gen_runmath38(stack *Stack) { Int a=vm::pop(Stack); #line 302 "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 75 "runmath.in" addFunc(ve, run::gen_runmath0, primReal(), SYM_CARET, formal(primReal(), SYM(x), false, false), formal(primInt(), SYM(y), false, false)); #line 80 "runmath.in" addFunc(ve, run::gen_runmath1, primPair(), SYM_CARET, formal(primPair(), SYM(z), false, false), formal(primInt(), SYM(y), false, false)); #line 85 "runmath.in" addFunc(ve, run::gen_runmath2, primInt(), SYM(quotient), formal(primInt(), SYM(x), false, false), formal(primInt(), SYM(y), false, false)); #line 90 "runmath.in" addFunc(ve, run::gen_runmath3, primInt(), SYM(abs), formal(primInt(), SYM(x), false, false)); #line 95 "runmath.in" addFunc(ve, run::gen_runmath4, primInt(), SYM(sgn), formal(primReal(), SYM(x), false, false)); #line 100 "runmath.in" addFunc(ve, run::gen_runmath5, primInt(), SYM(rand)); #line 107 "runmath.in" addFunc(ve, run::gen_runmath6, primVoid(), SYM(srand), formal(primInt(), SYM(seed), false, false)); #line 112 "runmath.in" addFunc(ve, run::gen_runmath7, primReal(), SYM(unitrand)); #line 118 "runmath.in" addFunc(ve, run::gen_runmath8, primInt(), SYM(ceil), formal(primReal(), SYM(x), false, false)); #line 123 "runmath.in" addFunc(ve, run::gen_runmath9, primInt(), SYM(floor), formal(primReal(), SYM(x), false, false)); #line 128 "runmath.in" addFunc(ve, run::gen_runmath10, primInt(), SYM(round), formal(primReal(), SYM(x), false, false)); #line 134 "runmath.in" addFunc(ve, run::gen_runmath11, primInt(), SYM(Ceil), formal(primReal(), SYM(x), false, false)); #line 139 "runmath.in" addFunc(ve, run::gen_runmath12, primInt(), SYM(Floor), formal(primReal(), SYM(x), false, false)); #line 144 "runmath.in" addFunc(ve, run::gen_runmath13, primInt(), SYM(Round), formal(primReal(), SYM(x), false, false)); #line 149 "runmath.in" addFunc(ve, run::gen_runmath14, primReal(), SYM(fmod), formal(primReal(), SYM(x), false, false), formal(primReal(), SYM(y), false, false)); #line 155 "runmath.in" addFunc(ve, run::gen_runmath15, primReal(), SYM(atan2), formal(primReal(), SYM(y), false, false), formal(primReal(), SYM(x), false, false)); #line 160 "runmath.in" addFunc(ve, run::gen_runmath16, primReal(), SYM(hypot), formal(primReal(), SYM(x), false, false), formal(primReal(), SYM(y), false, false)); #line 165 "runmath.in" addFunc(ve, run::gen_runmath17, primReal(), SYM(remainder), formal(primReal(), SYM(x), false, false), formal(primReal(), SYM(y), false, false)); #line 170 "runmath.in" addFunc(ve, run::gen_runmath18, primReal(), SYM(Jn), formal(primInt(), SYM(n), false, false), formal(primReal(), SYM(x), false, false)); #line 175 "runmath.in" addFunc(ve, run::gen_runmath19, primReal(), SYM(Yn), formal(primInt(), SYM(n), false, false), formal(primReal(), SYM(x), false, false)); #line 180 "runmath.in" addFunc(ve, run::gen_runmath20, primReal(), SYM(erf), formal(primReal(), SYM(x), false, false)); #line 185 "runmath.in" addFunc(ve, run::gen_runmath21, primReal(), SYM(erfc), formal(primReal(), SYM(x), false, false)); #line 190 "runmath.in" addFunc(ve, run::gen_runmath22, primInt(), SYM(factorial), formal(primInt(), SYM(n), false, false)); #line 195 "runmath.in" addFunc(ve, run::gen_runmath23, primInt(), SYM(choose), formal(primInt(), SYM(n), false, false), formal(primInt(), SYM(k), false, false)); #line 206 "runmath.in" addFunc(ve, run::gen_runmath24, primReal(), SYM(gamma), formal(primReal(), SYM(x), false, false)); #line 216 "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 225 "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 234 "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 244 "runmath.in" addFunc(ve, run::gen_runmath28, primBoolean(), SYM_LOGNOT, formal(primBoolean(), SYM(b), false, false)); #line 252 "runmath.in" REGISTER_BLTIN(run::boolMemEq,"boolMemEq"); #line 257 "runmath.in" REGISTER_BLTIN(run::boolMemNeq,"boolMemNeq"); #line 262 "runmath.in" REGISTER_BLTIN(run::boolFuncEq,"boolFuncEq"); #line 267 "runmath.in" REGISTER_BLTIN(run::boolFuncNeq,"boolFuncNeq"); #line 272 "runmath.in" addFunc(ve, run::gen_runmath33, primInt(), SYM(AND), formal(primInt(), SYM(a), false, false), formal(primInt(), SYM(b), false, false)); #line 280 "runmath.in" addFunc(ve, run::gen_runmath34, primInt(), SYM(OR), formal(primInt(), SYM(a), false, false), formal(primInt(), SYM(b), false, false)); #line 285 "runmath.in" addFunc(ve, run::gen_runmath35, primInt(), SYM(XOR), formal(primInt(), SYM(a), false, false), formal(primInt(), SYM(b), false, false)); #line 290 "runmath.in" addFunc(ve, run::gen_runmath36, primInt(), SYM(NOT), formal(primInt(), SYM(a), false, false)); #line 295 "runmath.in" addFunc(ve, run::gen_runmath37, primInt(), SYM(CLZ), formal(primInt(), SYM(a), false, false)); #line 301 "runmath.in" addFunc(ve, run::gen_runmath38, primInt(), SYM(CTZ), formal(primInt(), SYM(a), false, false)); } } // namespace trans asymptote-2.38/array.h0000644000000000000000000000363712715037471013500 0ustar rootroot/***** * 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.38/quaternion.h0000644000000000000000000001154112715037472014541 0ustar rootroot/**************************************************************************** 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.38/drawclipend.h0000644000000000000000000000227512715037471014653 0ustar rootroot/***** * 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.38/camp.tab.h0000644000000000000000000000776312715037503014047 0ustar rootroot/* 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.38/runstring.in0000644000000000000000000002304412715037472014567 0ustar rootroot/***** * 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.38/impdatum.cc0000644000000000000000000003071012715037472014331 0ustar rootroot#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.38/fundec.cc0000644000000000000000000001737712715037472013773 0ustar rootroot/***** * 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.38/runfile.in0000644000000000000000000001344412715037472014203 0ustar rootroot/***** * 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.38/runtriple.h0000644000000000000000000000050012715037516014370 0ustar rootroot/***** 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.38/policy.h0000644000000000000000000000473612715037472013663 0ustar rootroot/***** * 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.38/drawfill.cc0000644000000000000000000001063212715037471014315 0ustar rootroot/***** * 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.38/drawgroup.h0000644000000000000000000000555412715037471014374 0ustar rootroot/***** * 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.38/arcball.cc0000644000000000000000000001303212715037471014106 0ustar rootroot/********************************************************************** 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.38/access.h0000644000000000000000000000564012715037471013617 0ustar rootroot/***** * 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.38/runmath.symbols.h0000644000000000000000000000216712715037527015526 0ustar rootroot/***** * 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.38/genv.h0000644000000000000000000000313212715037472013310 0ustar rootroot/***** * 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.38/predicates.h0000644000000000000000000000144312715037472014477 0ustar rootroot#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.38/runpath3d.in0000644000000000000000000001756312715037472014455 0ustar rootroot/***** * 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.38/psfile.cc0000644000000000000000000004474612715037472014011 0ustar rootroot/***** * 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.38/config.h.in0000644000000000000000000001436112715037476014235 0ustar rootroot/* 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.38/symbol.cc0000644000000000000000000002132012715037472014013 0ustar rootroot/***** * 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.38/asy-list.pl0000755000000000000000000000311412715037471014304 0ustar rootroot#!/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.38/util.cc0000644000000000000000000002274412715037472013476 0ustar rootroot/***** * 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.38/Makefile.in0000644000000000000000000002320012715037471014242 0ustar rootroot# @configure_input@ ARCH = unix POLL = poll GCVERSION = @GCVERSION@ GC = gc-$(GCVERSION) LIBATOMIC = libatomic_ops-$(GCVERSION) 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 \ beziertriangle 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 = @CXXFLAGS@ @CFLAGS@ OPTS = $(DEFS) @CPPFLAGS@ $(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, $(DEFS)) $(CFLAGS) -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 | 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.38/autogen.sh0000755000000000000000000000004212715037471014175 0ustar rootroot#!/bin/sh autoheader && autoconf asymptote-2.38/prc/0000755000000000000000000000000012715037472012765 5ustar rootrootasymptote-2.38/prc/PRCdouble.h0000644000000000000000000000726512715037472014767 0ustar rootroot#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.38/prc/oPRCFile.h0000644000000000000000000014435012715037472014550 0ustar rootroot/************ * * 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.38/prc/PRCTools/0000755000000000000000000000000012715037472014432 5ustar rootrootasymptote-2.38/prc/PRCTools/iPRCFile.h0000644000000000000000000000444512715037472016207 0ustar rootroot/************ * * 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.38/prc/PRCTools/describePRC.cc0000644000000000000000000020503612715037472017074 0ustar rootroot/************ * * 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.38/prc/PRCTools/bitData.cc0000644000000000000000000001360512715037472016316 0ustar rootroot/************ * * 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.38/prc/PRCTools/makePRC.cc0000644000000000000000000001115412715037472016225 0ustar rootroot/************ * * 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.38/prc/PRCTools/bitSearchDouble.cc0000644000000000000000000000360712715037472020006 0ustar rootroot/************ * * 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.38/prc/PRCTools/iPRCFile.cc0000644000000000000000000002113012715037472016333 0ustar rootroot/************ * * 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.38/prc/PRCTools/inflation.cc0000644000000000000000000000434412715037472016731 0ustar rootroot/************ * * 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.38/prc/PRCTools/describePRC.h0000644000000000000000000001035712715037472016736 0ustar rootroot/************ * * 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.38/prc/PRCTools/bitSearchUI.cc0000644000000000000000000000350712715037472017110 0ustar rootroot/************ * * 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.38/prc/PRCTools/extractSections.cc0000644000000000000000000000243612715037472020130 0ustar rootroot/************ * * 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.38/prc/PRCTools/inflation.h0000644000000000000000000000203312715037472016564 0ustar rootroot/************ * * 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.38/prc/PRCTools/bitData.h0000644000000000000000000000350412715037472016155 0ustar rootroot/************ * * 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.38/prc/PRCTools/inflationMain.cc0000644000000000000000000000270712715037472017537 0ustar rootroot/************ * * 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.38/prc/PRCTools/Makefile0000644000000000000000000000317212715037472016075 0ustar rootrootCFLAGS = -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.38/prc/PRCTools/describeMain.cc0000644000000000000000000000233512715037472017331 0ustar rootroot/************ * * 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.38/prc/test.cc0000644000000000000000000010660312715037472014261 0ustar rootroot/************ * * 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.38/prc/oPRCFile.cc0000644000000000000000000021213712715037472014705 0ustar rootroot/************ * * 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.38/prc/test.asy0000644000000000000000000000013712715037472014463 0ustar rootrootsettings.outformat="pdf"; import embed; label(embed("test.prc","poster,3Droo=25",1500,500)); asymptote-2.38/prc/PRCbitStream.h0000644000000000000000000000472612715037472015446 0ustar rootroot/************ * * 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.38/prc/PRCdouble.cc0000644000000000000000000053213612715037472015125 0ustar rootroot#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.38/prc/PRC.h0000644000000000000000000007300012715037472013562 0ustar rootroot#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.38/prc/Makefile0000644000000000000000000000171612715037472014432 0ustar rootroot# 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.38/prc/PRCbitStream.cc0000644000000000000000000002026312715037472015576 0ustar rootroot/************ * * 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.38/runstring.symbols.h0000644000000000000000000000160012715037527016072 0ustar rootroot/***** * 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.38/beziertriangle.cc0000644000000000000000000003250312715037471015520 0ustar rootroot /***** * drawbeziertriangle.cc * Authors: Jesse Frohlich and John C. Bowman * * Render a Bezier triangle. *****/ #include "drawsurface.h" namespace camp { #ifdef HAVE_GL static const double pixel=0.25; // Adaptive rendering constant. extern const double Fuzz; extern const double Fuzz2; inline triple maxabs(triple u, triple v) { return triple(max(fabs(u.getx()),fabs(v.getx())), max(fabs(u.gety()),fabs(v.gety())), max(fabs(u.getz()),fabs(v.getz()))); } inline triple displacement1(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 maxabs(Z0-dot(Z0,Q)*Q,Z1-dot(Z1,Q)*Q); } // return the perpendicular displacement of a point z from the plane // through u with unit normal n. inline triple displacement2(const triple& z, const triple& u, const triple& n) { triple Z=z-u; return n != triple(0,0,0) ? dot(Z,n)*n : Z; } inline triple displacement(const triple *controls) { triple z0=controls[0]; triple z1=controls[6]; triple z2=controls[9]; // The last three lines compute how straight the edges are. This should be a // sufficient test for the boundry points, so only the internal point is // tested for deviance from the triangle formed by the vertices. // We assume that the Jacobian is nonzero so that we only need to calculate // the perpendicular displacement of the internal point from this triangle. triple d=displacement2(controls[4],z0,unit(cross(z1-z0,z2-z0))); d=maxabs(d,displacement1(z0,controls[1],controls[3],z1)); d=maxabs(d,displacement1(z0,controls[2],controls[5],z2)); d=maxabs(d,displacement1(z1,controls[7],controls[8],z2)); return d; } // Returns one-third of the first derivative of the Bezier curve defined by // a,b,c,d at 0. inline triple bezierP(triple a, triple b) { return b-a; } // Returns 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; } // Returns 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); } struct Render { std::vector buffer; std::vector indices; triple u,v,w; GLuint nvertices; double cx,cy,cz; double epsilon; double res; bool billboard; void init(bool havebillboard, const triple& center) { const size_t nbuffer=10000; buffer.reserve(nbuffer); indices.reserve(nbuffer); nvertices=0; billboard=havebillboard; if(billboard) { 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); } } void clear() { buffer.clear(); indices.clear(); } // Store the vertex v and its normal vector n in the buffer. GLuint vertex(const triple& V, const triple& n) { if(billboard) { double x=V.getx()-cx; double y=V.gety()-cy; double z=V.getz()-cz; buffer.push_back(cx+u.getx()*x+v.getx()*y+w.getx()*z); buffer.push_back(cy+u.gety()*x+v.gety()*y+w.gety()*z); buffer.push_back(cz+u.getz()*x+v.getz()*y+w.getz()*z); } else { 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++; } // Store the vertex v and its normal vector n and colour in the buffer. GLuint vertex(const triple& V, const triple& n, GLfloat *c) { int rc=vertex(V,n); buffer.push_back(c[0]); buffer.push_back(c[1]); buffer.push_back(c[2]); buffer.push_back(c[3]); return rc; } triple normal0(triple left3, triple left2, triple left1, triple middle, triple right1, triple right2, triple right3) { //cout << "normal0 called." << endl; // Lots of repetition here. // TODO: Check if lp,rp,lpp,rpp should be manually inlined (i.e., is the // third order normal usually computed when normal0() is called?). triple lp=bezierP(middle,left1); triple rp=bezierP(middle,right1); triple lpp=bezierPP(middle,left1,left2); triple rpp=bezierPP(middle,right1,right2); triple n1=cross(rpp,lp)+cross(rp,lpp); if(abs2(n1) > epsilon) { return unit(n1); } else { triple lppp=bezierPPP(middle,left1,left2,left3); triple rppp=bezierPPP(middle,right1,right2,right3); triple n2= 9.0*cross(rpp,lpp)+ 3.0*(cross(rp,lppp)+cross(rppp,lp)+ cross(rppp,lpp)+cross(rpp,lppp))+ cross(rppp,lppp); return unit(n2); } } triple normal(triple left3, triple left2, triple left1, triple middle, triple right1, triple right2, triple right3) { triple bu=right1-middle; triple bv=left1-middle; triple n=triple(bu.gety()*bv.getz()-bu.getz()*bv.gety(), bu.getz()*bv.getx()-bu.getx()*bv.getz(), bu.getx()*bv.gety()-bu.gety()*bv.getx()); return abs2(n) > epsilon ? unit(n) : normal0(left3,left2,left1,middle,right1,right2,right3); } void mesh(const triple *p, const GLuint *I) { // Draw the frame of the control points of a cubic Bezier mesh indices.push_back(I[0]); indices.push_back(I[1]); indices.push_back(I[2]); } // Pi is the full precision value indexed by Ii. // The 'flati' are flatness flags for each boundary. void render(const triple *p, int n, GLuint I0, GLuint I1, GLuint I2, triple P0, triple P1, triple P2, bool flat1, bool flat2, bool flat3, GLfloat *C0=NULL, GLfloat *C1=NULL, GLfloat *C2=NULL) { // Uses a uniform partition // p points to an array of 10 triples. // Draw a Bezier triangle. // p is the set of control points for the Bezier triangle // n is the maximum number of iterations to compute triple d=displacement(p); // This involves fewer triangle computations at the end (since if the // surface is sufficiently flat, it just draws the sufficiently flat // triangle, rather than trying to properly utilize the already // computed values. if(n == 0 || length(d) < res) { // If triangle is flat... GLuint I[]={I0,I1,I2}; mesh(p,I); } else { // Triangle is not flat /* Naming Convention: * * 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); // For each edge of the triangle // * Check for flatness // * Store points in the GLU array accordingly // A kludge to remove subdivision cracks, only applied the first time // an edge is found to be flat before the rest of the sub-patch is. #ifdef __MSDOS__ const double epsilon=1.0*res; #else const double epsilon=0.1*res; #endif triple p2,p1,p0; if(flat1) p2=0.5*(P1+P0); else { if((flat1=length(displacement1(l003,p102,p201,r300)) < res)) p2=0.5*(P1+P0)+epsilon*unit(l300-u030); else p2=l300; } if(flat2) p1=0.5*(P2+P0); else { if((flat2=length(displacement1(l003,p012,p021,u030)) < res)) p1=0.5*(P2+P0)+epsilon*unit(l030-r300); else p1=l030; } if(flat3) p0=0.5*(P2+P1); else { if((flat3=length(displacement1(r300,p210,p120,u030)) < res)) p0=0.5*(P2+P1)+epsilon*unit(r030-l003); else p0=r030; } 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 --n; 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=vertex(p0,normal(l300,r012,r021,r030,u201,u102,l030),c0); GLuint i1=vertex(p1,normal(r030,u201,u102,l030,l120,l210,l300),c1); GLuint i2=vertex(p2,normal(l030,l120,l210,l300,r012,r021,r030),c2); render(l,n,I0,i2,i1,P0,p2,p1,flat1,flat2,false,C0,c2,c1); render(r,n,i2,I1,i0,p2,P1,p0,flat1,false,flat3,c2,C1,c0); render(u,n,i1,i0,I2,p1,p0,P2,false,flat2,flat3,c1,c0,C2); render(c,n,i0,i1,i2,p0,p1,p2,false,false,false,c0,c1,c2); } else { GLuint i0=vertex(p0,normal(l300,r012,r021,r030,u201,u102,l030)); GLuint i1=vertex(p1,normal(r030,u201,u102,l030,l120,l210,l300)); GLuint i2=vertex(p2,normal(l030,l120,l210,l300,r012,r021,r030)); render(l,n,I0,i2,i1,P0,p2,p1,flat1,flat2,false); render(r,n,i2,I1,i0,p2,P1,p0,flat1,false,flat3); render(u,n,i1,i0,I2,p1,p0,P2,false,flat2,flat3); render(c,n,i0,i1,i2,p0,p1,p2,false,false,false); } } } // n is the maximum depth void render(const triple *p, double res, GLfloat *c0, int n) { this->res=res; 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]; if(c0) { GLfloat *c1=c0+4; GLfloat *c2=c0+8; i0=vertex(p0,normal(p9,p[5],p[2],p0,p[1],p[3],p6),c0); i1=vertex(p6,normal(p0,p[1],p[3],p6,p[7],p[8],p9),c1); i2=vertex(p9,normal(p6,p[7],p[8],p9,p[5],p[2],p0),c2); if(n > 0) render(p,n,i0,i1,i2,p0,p6,p9,false,false,false,c0,c1,c2); } else { i0=vertex(p0,normal(p9,p[5],p[2],p0,p[1],p[3],p6)); i1=vertex(p6,normal(p0,p[1],p[3],p6,p[7],p[8],p9)); i2=vertex(p9,normal(p6,p[7],p[8],p9,p[5],p[2],p0)); if(n > 0) render(p,n,i0,i1,i2,p0,p6,p9,false,false,false); } if(n == 0) { GLuint I[]={i0,i1,i2}; mesh(p,I); } size_t stride=(c0 ? 10 : 6)*sizeof(GL_FLOAT); glEnableClientState(GL_NORMAL_ARRAY); glEnableClientState(GL_VERTEX_ARRAY); if(c0) glEnableClientState(GL_COLOR_ARRAY); glVertexPointer(3,GL_FLOAT,stride,&buffer[0]); glNormalPointer(GL_FLOAT,stride,&buffer[3]); if(c0) glColorPointer(4,GL_FLOAT,stride,&buffer[6]); glDrawElements(GL_TRIANGLES,indices.size(),GL_UNSIGNED_INT,&indices[0]); if(c0) glDisableClientState(GL_COLOR_ARRAY); glDisableClientState(GL_VERTEX_ARRAY); glDisableClientState(GL_NORMAL_ARRAY); } }; Render R; void bezierTriangle(const triple *g, bool straight, double ratio, bool havebillboard, triple center, GLfloat *colors) { R.init(havebillboard,center); R.render(g,pixel*ratio,colors,straight ? 0 : 8); R.clear(); } #endif } //namespace camp asymptote-2.38/program.cc0000644000000000000000000000631312715037472014162 0ustar rootroot/***** * 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.38/array.cc0000644000000000000000000001102012715037471013617 0ustar rootroot/***** * 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.38/keywords.pl0000755000000000000000000000234512715037472014414 0ustar rootroot#!/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.38/drawpath.h0000644000000000000000000000116612715037471014167 0ustar rootroot/***** * 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.38/examples/0000755000000000000000000000000012715037472014017 5ustar rootrootasymptote-2.38/examples/clockarray.asy0000644000000000000000000000137212715037471016671 0ustar rootrootint 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.38/examples/transparency.asy0000644000000000000000000000036612715037472017253 0ustar rootrootsize(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.38/examples/Sierpinski.asy0000644000000000000000000000063012715037471016653 0ustar rootrootsize(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.38/examples/shellmethod.asy0000644000000000000000000000205212715037472017044 0ustar rootrootimport 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.38/examples/sphereskeleton.asy0000644000000000000000000000024512715037472017571 0ustar rootrootsize(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.38/examples/jump.asy0000644000000000000000000000044312715037471015510 0ustar rootrootimport 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.38/examples/exp3.asy0000644000000000000000000000110312715037471015406 0ustar rootrootimport 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.38/examples/dragon.asy0000644000000000000000000000230012715037471016001 0ustar rootrootpair 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.38/examples/cyclohexane.asy0000644000000000000000000000345312715037471017043 0ustar rootrootimport 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.38/examples/sin3.asy0000644000000000000000000000110312715037472015404 0ustar rootrootimport 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.38/examples/markregular.asy0000644000000000000000000000150112715037471017045 0ustar rootrootimport 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.38/examples/sphericalharmonic.asy0000644000000000000000000000057012715037472020232 0ustar rootrootimport 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.38/examples/strokepath.asy0000644000000000000000000000047312715037472016725 0ustar rootrootpath 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.38/examples/pipes.asy0000644000000000000000000000743412715037472015665 0ustar rootrootimport 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.38/examples/conicurv.asy0000644000000000000000000000336412715037471016372 0ustar rootroot// 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.38/examples/star.asy0000644000000000000000000000022112715037472015501 0ustar rootrootsize(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.38/examples/twistedtubes.asy0000644000000000000000000000156512715037472017272 0ustar rootrootimport 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.38/examples/sinxlex.asy0000644000000000000000000000060112715037472016224 0ustar rootrootimport 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.38/examples/BezierTriangle.asy0000644000000000000000000000030712715037471017442 0ustar rootrootimport 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.38/examples/tensor.asy0000644000000000000000000000045712715037472016055 0ustar rootrootsize(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.38/examples/unitoctant.asy0000644000000000000000000000131112715037472016721 0ustar rootrootimport 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.38/examples/Gouraud.asy0000644000000000000000000000060012715037471016136 0ustar rootrootsize(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.38/examples/triceratops.asy0000644000000000000000000000037312715037472017077 0ustar rootrootimport 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.38/examples/near_earth.asy0000644000000000000000000000304112715037471016642 0ustar rootrootimport 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.38/examples/interpolate1.asy0000644000000000000000000001133112715037471017142 0ustar rootroot// 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.38/examples/label3zoom.asy0000644000000000000000000000107012715037471016601 0ustar rootrootimport 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.38/examples/bars3.asy0000644000000000000000000000076112715037471015552 0ustar rootrootimport 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.38/examples/venn.asy0000644000000000000000000000122012715037472015476 0ustar rootrootsize(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.38/examples/orthocenter.asy0000644000000000000000000000142412715037471017071 0ustar rootrootimport 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.38/examples/fermi.asy0000644000000000000000000000132712715037471015641 0ustar rootrootimport 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.38/examples/threeviews.asy0000644000000000000000000000113512715037472016722 0ustar rootrootimport 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.38/examples/roll.asy0000644000000000000000000000026612715037472015511 0ustar rootrootimport 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.38/examples/treetest.asy0000644000000000000000000000113212715037472016371 0ustar rootrootimport 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.38/examples/slidedemo_.bbl0000644000000000000000000000052512715037472016606 0ustar rootroot\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.38/examples/splitpatch.asy0000644000000000000000000000420412715037472016710 0ustar rootrootimport 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.38/examples/arrows3.asy0000644000000000000000000000124412715037471016135 0ustar rootrootimport 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.38/examples/extrudedcontour.asy0000644000000000000000000000110512715037471017767 0ustar rootrootimport 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.38/examples/spheresilhouette.asy0000644000000000000000000000022612715037472020131 0ustar rootrootimport solids; settings.render=0; settings.prc=false; size(200); revolution r=sphere(O,1); draw(r,1,longitudinalpen=nullpen); draw(r.silhouette()); asymptote-2.38/examples/ring.asy0000644000000000000000000000021512715037472015472 0ustar rootrootsize(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.38/examples/log.asy0000644000000000000000000000031612715037471015315 0ustar rootrootimport 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.38/examples/cards.asy0000644000000000000000000000074512715037471015636 0ustar rootrootpicture 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.38/examples/projectrevolution.asy0000644000000000000000000000066612715037472020342 0ustar rootrootimport 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.38/examples/BezierSurface.asy0000644000000000000000000000276612715037471017300 0ustar rootrootimport 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.38/examples/lines.asy0000644000000000000000000000025012715037471015643 0ustar rootrootimport 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.38/examples/mosquito.asy0000644000000000000000000000472012715037471016417 0ustar rootrootsize(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.38/examples/hyperboloidsilhouette.asy0000644000000000000000000000041312715037471021160 0ustar rootrootsize(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.38/examples/RiemannSurface.asy0000644000000000000000000000056112715037471017440 0ustar rootrootimport 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.38/examples/washer.asy0000644000000000000000000000055012715037472016026 0ustar rootrootimport 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.38/examples/labelbox.asy0000644000000000000000000000041012715037471016317 0ustar rootrootsize(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.38/examples/cones.asy0000644000000000000000000000067512715037471015653 0ustar rootrootimport 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.38/examples/mosaic.asy0000644000000000000000000001221212715037471016005 0ustar rootroot// 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.38/examples/RiemannSphere.asy0000644000000000000000000000174112715037471017277 0ustar rootrootimport 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.38/examples/Coons.asy0000644000000000000000000000017312715037471015616 0ustar rootrootsize(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.38/examples/lmfit1.asy0000644000000000000000000000172412715037471015734 0ustar rootrootimport 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.38/examples/oneoverx.asy0000644000000000000000000000046512715037471016406 0ustar rootrootimport 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.38/examples/integraltest.asy0000644000000000000000000000113512715037471017241 0ustar rootrootimport 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.38/examples/parametricsurface.asy0000644000000000000000000000062712715037471020241 0ustar rootrootimport 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.38/examples/partialsurface.asy0000644000000000000000000000130712715037471017542 0ustar rootrootimport 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.38/examples/hierarchy.asy0000644000000000000000000000071312715037471016513 0ustar rootroottexpreamble("\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.38/examples/genustwo.asy0000644000000000000000000000216012715037471016406 0ustar rootrootsize(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.38/examples/slidedemo.asy0000644000000000000000000000641412715037472016507 0ustar rootroot// 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.38/examples/spring2.asy0000644000000000000000000000005312715037472016117 0ustar rootrootimport spring; drawspring(40.0,"$L+x$"); asymptote-2.38/examples/unitcircle.asy0000644000000000000000000000050212715037472016673 0ustar rootrootsize(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.38/examples/buildcycle.asy0000644000000000000000000000100112715037471016643 0ustar rootrootsize(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.38/examples/logdown.asy0000644000000000000000000000053512715037471016210 0ustar rootrootimport 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.38/examples/equilateral.asy0000644000000000000000000000036212715037471017045 0ustar rootrootsize(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.38/examples/grid.asy0000644000000000000000000000011412715037471015455 0ustar rootrootimport math; size(100,0); add(shift(-5,-5)*grid(10,10)); dot((0,0),red); asymptote-2.38/examples/magnetic.asy0000644000000000000000000000073712715037471016332 0ustar rootrootimport 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.38/examples/alignedaxis.asy0000644000000000000000000000542012715037471017025 0ustar rootrootimport 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.38/examples/parametricelevation.asy0000644000000000000000000000037612715037471020600 0ustar rootrootimport 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.38/examples/coag.asy0000644000000000000000000000041012715037471015440 0ustar rootrootsize(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.38/examples/contextfonts.asy0000644000000000000000000000037712715037471017301 0ustar rootrootsettings.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.38/examples/vertexshading.asy0000644000000000000000000000103312715037472017405 0ustar rootrootimport 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.38/examples/logo3.asy0000644000000000000000000000221712715037471015561 0ustar rootrootimport 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.38/examples/functionshading.asy0000644000000000000000000000224112715037471017716 0ustar rootrootsize(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.38/examples/alignbox.asy0000644000000000000000000000036512715037471016343 0ustar rootrootreal 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.38/examples/partitionExample.asy0000644000000000000000000000203712715037471020063 0ustar rootrootsize(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.38/examples/sin1x.asy0000644000000000000000000000050712715037472015601 0ustar rootrootimport 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.38/examples/washermethod.asy0000644000000000000000000000175412715037472017236 0ustar rootrootimport graph3; import solids; size(0,150); currentprojection=perspective(0,0,11,up=Y); pen color1=green+opacity(0.25); pen color2=red; real alpha=250; 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.38/examples/polarcircle.asy0000644000000000000000000000116412715037472017036 0ustar rootrootimport 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.38/examples/spline.asy0000644000000000000000000000115212715037472016026 0ustar rootrootimport 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.38/examples/galleon.asy0000644000000000000000000000076312715037471016163 0ustar rootrootimport 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.38/examples/cosaddition.asy0000644000000000000000000000071512715037471017037 0ustar rootrootsize(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.38/examples/circumcircle.asy0000644000000000000000000000034412715037471017201 0ustar rootrootunitsize(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.38/examples/triads.asy0000644000000000000000000000167712715037472016036 0ustar rootrootimport 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.38/examples/dimension.asy0000644000000000000000000000101112715037471016512 0ustar rootrootsize(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.38/examples/roundpath.asy0000644000000000000000000000243612715037472016546 0ustar rootroot// 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.38/examples/electromagnetic.asy0000644000000000000000000000245612715037471017710 0ustar rootrootimport 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.38/examples/NURBSsurface.asy0000644000000000000000000000266512715037471017007 0ustar rootrootimport 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.38/examples/Klein.asy0000644000000000000000000000246012715037471015600 0ustar rootrootimport 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.38/examples/vectorfieldsphere.asy0000644000000000000000000000053712715037472020257 0ustar rootrootimport 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.38/examples/cpkcolors.asy0000644000000000000000000001315412715037471016537 0ustar rootroot/* * 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.38/examples/sqrtx01.asy0000644000000000000000000000124212715037472016056 0ustar rootrootimport 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.38/examples/impact.asy0000644000000000000000000000114212715037471016007 0ustar rootroot// 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.38/examples/epix.asy0000644000000000000000000000061612715037471015504 0ustar rootrootimport 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.38/examples/filesurface.dat0000644000000000000000000001264712715037471017012 0ustar rootroot1 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.38/examples/floatingdisk.asy0000644000000000000000000000104412715037471017211 0ustar rootrootimport 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.38/examples/Pythagoras.asy0000644000000000000000000000105512715037471016656 0ustar rootrootsize(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.38/examples/quilt.asy0000644000000000000000000000133612715037472015676 0ustar rootrootimport 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.38/examples/strokeshade.asy0000644000000000000000000000025012715037472017046 0ustar rootrootsize(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.38/examples/advection.asy0000644000000000000000000001007612715037471016514 0ustar rootrootsize(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.38/examples/SierpinskiSponge.asy0000644000000000000000000000456612715037471020043 0ustar rootrootsize(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.38/examples/venn3.asy0000644000000000000000000000150712715037472015571 0ustar rootrootsize(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.38/examples/teapot.asy0000644000000000000000000003256512715037472016044 0ustar rootrootimport 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.38/examples/gamma.asy0000644000000000000000000000067012715037471015621 0ustar rootrootimport 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.38/examples/cheese.asy0000644000000000000000000000050212715037471015765 0ustar rootrootimport 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.38/examples/sacylinder.asy0000644000000000000000000000062012715037472016670 0ustar rootrootimport 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.38/examples/worksheet.asy0000644000000000000000000000166712715037472016562 0ustar rootrootimport 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.38/examples/NURBSsphere.asy0000644000000000000000000000177412715037471016645 0ustar rootrootimport 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.38/examples/equilchord.asy0000644000000000000000000000104512715037471016673 0ustar rootrootimport 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.38/examples/spiral.asy0000644000000000000000000000032212715037472016024 0ustar rootrootsize(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.38/examples/fillcontour.asy0000644000000000000000000000107612715037471017100 0ustar rootrootimport 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.38/examples/xxsq01.asy0000644000000000000000000000134712715037472015706 0ustar rootrootimport 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.38/examples/curvedlabel3.asy0000644000000000000000000000107512715037471017112 0ustar rootrootsize(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.38/examples/progrid.asy0000644000000000000000000000007212715037472016202 0ustar rootrootlabel("$\displaystyle X_i = \sum_{j=1}^{N} a_{ij} f_j$"); asymptote-2.38/examples/lever.asy0000644000000000000000000000071412715037471015653 0ustar rootrootsize(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.38/examples/animations/0000755000000000000000000000000012715037471016160 5ustar rootrootasymptote-2.38/examples/animations/dice.u3d0000644000000000000000000047164012715037471017515 0ustar rootrootU3DRx 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.38/examples/animations/embeddedmovie.asy0000644000000000000000000000076712715037471021501 0ustar rootroot// 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.38/examples/animations/torusanimation.asy0000644000000000000000000000143612715037471021756 0ustar rootrootimport 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.38/examples/animations/earthmoon.asy0000644000000000000000000000361512715037471020677 0ustar rootrootimport 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.38/examples/animations/inlinemovie3.tex0000644000000000000000000000201512715037471021301 0ustar rootroot\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.38/examples/animations/inlinemovie.tex0000644000000000000000000000232312715037471021220 0ustar rootroot\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.38/examples/animations/heatequation.asy0000644000000000000000000000334012715037471021365 0ustar rootrootimport 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.38/examples/animations/externalmovie.asy0000644000000000000000000000063312715037471021562 0ustar rootroot// 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.38/examples/animations/wavepacket.asy0000644000000000000000000000273212715037471021034 0ustar rootroot// 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.38/examples/animations/wheel.asy0000644000000000000000000000214012715037471017777 0ustar rootrootimport 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.38/examples/animations/glmovie.asy0000644000000000000000000000063612715037471020345 0ustar rootrootsettings.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.38/examples/animations/sphere.asy0000644000000000000000000000150012715037471020160 0ustar rootrootimport 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.38/examples/animations/cube.asy0000644000000000000000000000166212715037471017621 0ustar rootrootimport 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.38/examples/animations/embeddedu3d.asy0000644000000000000000000000030412715037471021040 0ustar rootroot// An embedded U3D object; // import embed; settings.tex="pdflatex"; label(embedplayer("dice.u3d","dice","activate=pagevisible,3Droo=27", settings.paperwidth,settings.paperheight)); asymptote-2.38/examples/animations/pdfmovie.asy0000644000000000000000000000050612715037471020510 0ustar rootrootimport 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.38/examples/animations/slidemovies.asy0000644000000000000000000000232612715037471021224 0ustar rootroot// 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.38/examples/mergeExample.asy0000644000000000000000000000363612715037471017157 0ustar rootrootsize(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.38/examples/condor.asy0000644000000000000000000000134312715037471016021 0ustar rootroot// 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.38/examples/phase.asy0000644000000000000000000000055112715037471015635 0ustar rootrootimport 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.38/examples/tanh.asy0000644000000000000000000000030612715037472015466 0ustar rootrootimport 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.38/examples/BezierPatch.asy0000644000000000000000000000061312715037471016734 0ustar rootrootimport 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.38/examples/cardioid.asy0000644000000000000000000000035112715037471016311 0ustar rootrootimport 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.38/examples/lowint.asy0000644000000000000000000000030412715037471016045 0ustar rootrootsize(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.38/examples/layers.asy0000644000000000000000000000126012715037471016032 0ustar rootrootusepackage("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.38/examples/hyperboloid.asy0000644000000000000000000000046412715037471017060 0ustar rootrootsize(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.38/examples/sphere.asy0000644000000000000000000000017612715037472016027 0ustar rootrootimport three; size(200); currentprojection=orthographic(5,4,3); draw(unitsphere,green,render(compression=Zero,merge=true)); asymptote-2.38/examples/spring0.asy0000644000000000000000000000004612715037472016117 0ustar rootrootimport spring; drawspring(0,"$L$"); asymptote-2.38/examples/rainbow.asy0000644000000000000000000000050512715037472016176 0ustar rootrootsize(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.38/examples/tvgen.asy0000644000000000000000000011660612715037472015672 0ustar rootroot/* 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.38/examples/wedge.asy0000644000000000000000000000116412715037472015632 0ustar rootrootimport 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.38/examples/spring.asy0000644000000000000000000000123712715037472016042 0ustar rootrootpair 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.38/examples/colorplanes.asy0000644000000000000000000000072112715037471017055 0ustar rootrootsize(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.38/examples/thermodynamics.asy0000644000000000000000000002374212715037472017573 0ustar rootroot// 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.38/examples/SierpinskiGasket.asy0000644000000000000000000000152112715037471020012 0ustar rootrootsize(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.38/examples/polararea.asy0000644000000000000000000000164212715037472016506 0ustar rootrootimport 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.38/examples/upint.asy0000644000000000000000000000030712715037472015674 0ustar rootrootimport 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.38/examples/planeproject.asy0000644000000000000000000000064212715037472017225 0ustar rootrootimport 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.38/examples/sacylinder3D.asy0000644000000000000000000000052512715037472017063 0ustar rootrootimport 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.38/examples/NURBScurve.asy0000644000000000000000000000121112715037471016465 0ustar rootrootimport 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.38/examples/poster.asy0000644000000000000000000000167412715037472016061 0ustar rootrootorientation=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.38/examples/truncatedIcosahedron.asy0000644000000000000000000000404412715037472020707 0ustar rootrootimport 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.38/examples/lowupint.asy0000644000000000000000000000122312715037471016413 0ustar rootrootimport 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.38/examples/genusthree.asy0000644000000000000000000000124712715037471016711 0ustar rootrootsize(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.38/examples/tetra.asy0000644000000000000000000000104312715037472015652 0ustar rootrootimport 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.38/examples/filesurface.asy0000644000000000000000000000171312715037471017026 0ustar rootrootimport 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.38/examples/shellsqrtx01.asy0000644000000000000000000000147512715037472017116 0ustar rootrootimport 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.38/examples/limit.asy0000644000000000000000000000121612715037471015652 0ustar rootrootsize(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.38/examples/shade.asy0000644000000000000000000000010212715037472015612 0ustar rootrootsize(100,0); radialshade(unitsquare,yellow,(0,0),0,red,(0,0),1); asymptote-2.38/examples/latticeshading.asy0000644000000000000000000000021012715037471017510 0ustar rootrootsize(200); pen[][] p={{white,grey,black}, {red,green,blue}, {cyan,magenta,yellow}}; latticeshade(unitsquare,p); asymptote-2.38/examples/randompath3.asy0000644000000000000000000000010312715037472016747 0ustar rootrootimport three; size(300); draw(randompath3(100),red,currentlight); asymptote-2.38/examples/p-orbital.asy0000644000000000000000000000116612715037471016431 0ustar rootrootimport 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.38/examples/centroidfg.asy0000644000000000000000000000126312715037471016662 0ustar rootrootimport 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.38/examples/label3ribbon.asy0000644000000000000000000000030412715037471017067 0ustar rootrootimport 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.38/examples/refs.bib0000644000000000000000000000300112715037472015426 0ustar rootroot@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.38/examples/imagehistogram.asy0000644000000000000000000000216412715037471017537 0ustar rootrootimport 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.38/examples/basealign.asy0000644000000000000000000000201112715037471016453 0ustar rootrootimport 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.38/examples/projectelevation.asy0000644000000000000000000000056512715037472020120 0ustar rootrootimport 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.38/examples/PythagoreanTree.asy0000644000000000000000000000064412715037471017641 0ustar rootrootsize(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.38/examples/cos3.asy0000644000000000000000000000110612715037471015401 0ustar rootrootimport 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.38/examples/fin.asy0000644000000000000000000001015312715037471015310 0ustar rootrootimport 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.38/examples/trumpet.asy0000644000000000000000000000044312715037472016236 0ustar rootrootimport 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.38/examples/sqrtx01y1.asy0000644000000000000000000000110312715037472016324 0ustar rootrootimport 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.38/examples/Gouraudcontour.asy0000644000000000000000000000115012715037471017551 0ustar rootrootimport 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.38/examples/soccerball.asy0000644000000000000000000000504612715037472016653 0ustar rootrootimport 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.38/examples/xstitch.asy0000644000000000000000000000724212715037472016230 0ustar rootrootpair 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.38/examples/yingyang.asy0000644000000000000000000000033712715037472016365 0ustar rootrootsize(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.38/examples/xsin1x.asy0000644000000000000000000000110412715037472015763 0ustar rootrootimport 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.38/examples/vectorfield3.asy0000644000000000000000000000101512715037472017123 0ustar rootrootimport 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.38/examples/triangle.asy0000644000000000000000000000032112715037472016336 0ustar rootrootsize(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.38/examples/pathintersectsurface.asy0000644000000000000000000000065212715037471020765 0ustar rootrootsize(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.38/examples/piicon.eps0000644000000000000000000024264212715037472016023 0ustar rootroot%!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.38/examples/laserlattice.asy0000644000000000000000000000213212715037471017206 0ustar rootrootimport 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.38/examples/cylinder.asy0000644000000000000000000000022212715037471016341 0ustar rootrootimport 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.38/examples/delu.asy0000644000000000000000000000077212715037471015473 0ustar rootrootsize(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.38/examples/fractaltree.asy0000644000000000000000000000125312715037471017031 0ustar rootrootsize(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.38/examples/pdb.asy0000644000000000000000000000641212715037471015304 0ustar rootrootimport 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.38/examples/smoothelevation.asy0000644000000000000000000000101012715037472017745 0ustar rootrootimport 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.38/examples/fjortoft.asy0000644000000000000000000000130612715037471016371 0ustar rootrootsize(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.38/examples/circles.asy0000644000000000000000000000110012715037471016150 0ustar rootrootsize(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.38/examples/pseudosphere.asy0000644000000000000000000000135312715037472017245 0ustar rootroot// 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.38/examples/textpath.asy0000644000000000000000000000047012715037472016377 0ustar rootrootsize(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.38/examples/100d.views0000644000000000000000000000122112715037471015535 0ustar rootrootVIEW={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.38/examples/sinc.asy0000644000000000000000000000111712715037472015471 0ustar rootrootimport 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.38/examples/trefoilknot.asy0000644000000000000000000000111512715037472017073 0ustar rootrootimport 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.38/examples/shadestroke.asy0000644000000000000000000000015012715037472017045 0ustar rootrootsize(100); radialshade(W..N..E--(0,0),stroke=true, red+linewidth(30),(0,0),0.25,yellow,(0,0),1); asymptote-2.38/examples/spectrum.asy0000644000000000000000000000447212715037472016406 0ustar rootrootimport 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.38/examples/billboard.asy0000644000000000000000000000023212715037471016463 0ustar rootrootimport three; size(100); currentprojection=perspective(1,-2,1); draw(unitbox); label("Billboard",X,red,Billboard); label("Embedded",Y,blue,Embedded); asymptote-2.38/examples/controlsystem.asy0000644000000000000000000000141212715037471017457 0ustar rootrootsize(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.38/examples/stereoscopic.asy0000644000000000000000000000025212715037472017236 0ustar rootrootimport three; currentprojection=perspective(50*dir(70,15)); picture pic; unitsize(pic,1cm); draw(pic,xscale3(10)*unitcube,yellow,blue); addStereoViews(pic); asymptote-2.38/examples/gamma3.asy0000644000000000000000000000131212715037471015676 0ustar rootrootimport 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.38/examples/xxsq01x-1.asy0000644000000000000000000000154412715037472016233 0ustar rootrootimport 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.38/examples/annotation.asy0000644000000000000000000000035412715037471016710 0ustar rootrootimport 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.38/examples/xxsq01y.asy0000644000000000000000000000147312715037472016077 0ustar rootrootimport 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.38/examples/sacone3D.asy0000644000000000000000000000044012715037472016172 0ustar rootrootimport 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.38/examples/odetest.asy0000644000000000000000000000234312715037471016205 0ustar rootrootimport 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.38/examples/fequlogo.asy0000644000000000000000000000212512715037471016355 0ustar rootroot// 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.38/examples/triangles.asy0000644000000000000000000000070712715037472016531 0ustar rootrootimport 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.38/examples/label3.asy0000644000000000000000000000026612715037471015702 0ustar rootrootimport 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.38/examples/pipeintersection.asy0000644000000000000000000000055212715037472020123 0ustar rootrootimport 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.38/examples/sacone.asy0000644000000000000000000000067512715037472016015 0ustar rootrootsize(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.38/examples/curvedlabel.asy0000644000000000000000000000026112715037471017023 0ustar rootrootsize(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.38/examples/cos2theta.asy0000644000000000000000000000035312715037471016431 0ustar rootrootimport 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.38/examples/1overx.asy0000644000000000000000000000046512715037471015765 0ustar rootrootimport 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.38/examples/elevation.asy0000644000000000000000000000050312715037471016520 0ustar rootrootimport 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.38/examples/fano.asy0000644000000000000000000000076212715037471015464 0ustar rootrootimport 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.38/examples/stroke3.asy0000644000000000000000000000007312715037472016127 0ustar rootrootimport three; size(5cm); draw(O--X,red+1cm,currentlight); asymptote-2.38/examples/RiemannSurfaceRoot.asy0000644000000000000000000000060212715037471020300 0ustar rootroot// 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.38/examples/workcone.asy0000644000000000000000000000167412715037472016374 0ustar rootrootimport 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.38/examples/floor.asy0000644000000000000000000000076612715037471015666 0ustar rootrootimport 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.38/examples/label3solid.asy0000644000000000000000000000027312715037471016733 0ustar rootrootimport 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.38/examples/polardatagraph.asy0000644000000000000000000000050612715037472017527 0ustar rootrootimport 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.38/examples/torus.asy0000644000000000000000000000063512715037472015715 0ustar rootrootsize(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.38/examples/spiral3.asy0000644000000000000000000000065212715037472016115 0ustar rootrootimport 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.38/pen.cc0000644000000000000000000000317312715037472013276 0ustar rootroot/***** * 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.38/runfile.h0000644000000000000000000000171112715037516014015 0ustar rootroot/***** 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.38/process.cc0000644000000000000000000006011712715037472014173 0ustar rootroot/***** * 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.38/mod.h0000644000000000000000000000132012715037472013125 0ustar rootroot/***** * 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.38/runtriple.cc0000644000000000000000000003260412715037516014540 0ustar rootroot/***** 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.38/lnkX64IconFix.nsh0000644000000000000000000000531612715037472015266 0ustar rootroot/****************************************************************************** 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.38/stack.h0000644000000000000000000000640012715037472013457 0ustar rootroot/***** * 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.38/runsystem.cc0000644000000000000000000003035212715037516014563 0ustar rootroot/***** 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.38/knot.h0000644000000000000000000003001412715037472013323 0ustar rootroot/***** * 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.38/virtualfieldaccess.cc0000644000000000000000000000160512715037472016366 0ustar rootroot/***** * 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.38/guide.h0000644000000000000000000001517712715037472013462 0ustar rootroot/***** * 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.38/texfile.h0000644000000000000000000002456512715037472014026 0ustar rootroot/***** * 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.38/transform.h0000644000000000000000000001405112715037472014366 0ustar rootroot/***** * 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.38/angle.h0000644000000000000000000000144412715037471013442 0ustar rootroot/***** * 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) { if(deg < 0) deg += 360; return deg; } } //namespace camp #endif asymptote-2.38/path3.h0000644000000000000000000002451612715037472013401 0ustar rootroot/***** * 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.38/path.cc0000644000000000000000000010222212715037472013443 0ustar rootroot/***** * 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.38/application.cc0000644000000000000000000004414612715037471015023 0ustar rootroot/***** * 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.38/lex.yy.cc0000644000000000000000000024176712715037503013754 0ustar rootroot#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 5 #define YY_FLEX_SUBMINOR_VERSION 39 #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 #define YY_BUF_SIZE 16384 #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. */ \ int 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; #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 ); 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 flex_int32_t 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 flex_int32_t 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_int16_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_int16_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 1002 "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 */ static void yyunput (int c,char *buf_ptr ); /* %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 #define YY_READ_BUF_SIZE 8192 #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 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 { register yy_state_type yy_current_state; register char *yy_cp, *yy_bp; register 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 1287 "lex.yy.cc" while ( 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 { register 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 2114 "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; YY_CURRENT_BUFFER_LVALUE->yy_input_file = yyin; 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 */ { register char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf; register char *source = (yytext_ptr); register int 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 = (int) ((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 { yy_size_t 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 */ { register yy_state_type yy_current_state; register 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 */ register 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 */ { register int yy_is_jam; /* %% [17.0] code to find the next state, and perhaps do backing up, goes here */ register char *yy_cp = (yy_c_buf_p); register 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; } /* %if-c-only */ static void yyunput (int c, register char * yy_bp ) /* %endif */ /* %if-c++-only */ /* %endif */ { register 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. */ register yy_size_t number_to_move = (yy_n_chars) + 2; register char *dest = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[ YY_CURRENT_BUFFER_LVALUE->yy_buf_size + 2]; register 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 */ /* %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( ); } /** 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; yyin = YY_CURRENT_BUFFER_LVALUE->yy_input_file; (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 = 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; } /** 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 ); b->yy_input_file = file; 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; (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. */ int 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. */ \ int 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 * */ 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 ) { register 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 ) { register 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.38/rounding.h0000644000000000000000000000674112715037472014207 0ustar rootroot/* 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.38/configure0000755000000000000000000101144012715037476014115 0ustar rootroot#! /bin/sh # Guess values for system-dependent variables and create Makefiles. # Generated by GNU Autoconf 2.69 for Asymptote 2.38. # # 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.38' PACKAGE_STRING='Asymptote 2.38' 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 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.38 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.38:";; 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.38 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.38, 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 "$CFLAGS" || CFLAGS="-g -O3 -ansi" 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.4.2 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.38, 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.38 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-$GCVERSION.tar.gz echo exit 1 fi fi asymptote-2.38/mathop.h0000644000000000000000000001445212715037472013650 0ustar rootroot/***** * 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.38/LICENSE0000644000000000000000000010451312715037471013211 0ustar rootroot 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.38/runpair.in0000644000000000000000000001022612715037472014212 0ustar rootroot/***** * 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.38/table.h0000644000000000000000000000521112715037472013440 0ustar rootroot/***** * 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.38/gsl.symbols.h0000644000000000000000000002102112715037527014623 0ustar rootroot/***** * 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.38/errors0000644000000000000000000002204312715037471013440 0ustar rootrooterrortest.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.38/main.cc0000644000000000000000000001104712715037472013437 0ustar rootroot/************ * * 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.38/runtime.pl0000755000000000000000000001607612715037472014236 0ustar rootroot#!/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.38/EnvVarUpdate.nsh0000755000000000000000000002461012715037471015264 0ustar rootroot/** * 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.38/virtualfieldaccess.h0000644000000000000000000000443012715037472016227 0ustar rootroot/***** * 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.38/libatomic_ops-7.4.2.tar.gz0000644000000000000000000161545612715037476016650 0ustar rootroot‹ýÀcSì:ûo7“ùÕú+øÙÆ9,YK–ë/íùR§5. ÛAØþ’}PÒÆûêrW’‹þñ7’»«GÜ4=>àl@’3Ãápf8³»aà:yÞÇ$U­ãöQ»wøâoþëÀßññÛîñ SmÍß‹n¯ßïuúÃãn·?켃ÿFf#¦ý7ù ל¿—Äã`ÒV…û7žÿ`Ãùw;ƒ£nÏž?ôàüû=@/þÿüÿ×ÿvþ!Ý >TÓÆŽxM_dN$±˜9aà3¦%EÄR(/ Ò¼ ØðÓ§,˜LsÑ=9éµzppâM&¥¸IÆùÜɤx“1ó8±×n4ò ’*w¢ôÕâ·ºV§»×~·Ó@‰qJ-²QšÍ©xJ á9±È¤¨< Ü"´\8±˜d"Jü`üÀ”™È§Rä2‹”HÆÔùéÝ{ñ“Œeæ„âªpÃÀoOÆJ G‰GÔTúÂ}H°i#§B0Ÿ‰™Ì*§o–ÐüD’—NŽbg"I‘ld}¡“—” D³í4K&™áÎË ú"ˆ‰ñ4Ia7S`[ža(\) %ÇEx ¸üzqûóåû[qöîƒøõìúúìÝí‡SÀͧpnBÎ$s ¢4 €1ì)sâü Dâ_ί_ÿ gÿuñöâöÈ/Þ\ܾ;¿¹o.¯Å™¸:»¾½xýþíÙµ¸z}uysÞâFJ£Yà±A·c:P /s'ïù§ÉB_L™„cõd0¹áM=fÀà “xB;ÜR…§"‹8É„ùþ9Íóô»ÃÃù|ÞžÄE;É&‡!³P‡ß³0g –U©ôXF.¨úsÇ›š¥QRpž4‰Uà†,]&Ó$ ƒ€4 •N»n#¸*œ©Ÿ€,Ÿx³YNGÑ<3!¶î cÐ:3p-ºŸ1†Zd4¥éapÍbtj0¥w‚-‡š6«_ŠI–cÝ,9©UêÌÉ‚¤PÔòn8¬M jÇÀ'ýPvÀþá±`  ÆV’`eŽƒòк¶àÔ>Þ~¸:oýröîý›³×·ï¯Ï¯[—Wç×g·ï~úxóáæöü 0’ª$B»WxÊÈ&–sÐß®ÛÅÜ/³ýïóëwço×q¿ ogxµ€ìÒ›&to'tã³_ë;=FòÕ'BÝÞíl‹?špKŠ=uÐnì}j4 ôñWÛ÷÷|'v;âîòêöâòÝZlë—7¸[£!ø¯Špööâì¦Ñxý¥`ƒ£€(—©ÔIõ°kMD«5•a*ÌŸ‰°W'Æs?G|ÌÓZ”¨Y|Šš°ýÐhA)—VÁý éM4©¬g†â"reV%j\“ÿ@.3aG5áÎàŸëý÷ííFCsD½¢Ç–!F¼Üµ‰æ>hî/$ª™V3Q¥³¶æ±ócÊ‚®Ëó%©Ø©3ò¤w— “m’ãS2†t%í‚M㉽ÚnÜÂ5xÿiü€w¯Ìµ‚ퟭs›nV'ƒ‹ÕK¢•‚§6 NaˆÁÀ¿»#Z“\tÄ)D'8@ô+±Û6dŒ5[øCw›åbߘ«6«ôm`FwØé©fbNèf+tzr•ŠÌÒŠÓJr¬íe2±O8pwçIª3pLq<„pT†‡šãüT¸™t-±ØßÚï1É}5ÞÞi÷¹&ªc7W$ŠÀ½õ}oVÞíîâF¶-& ÛE4Ò ðê¦e´#ÞLê(LÞ y™L¹|@<lé^k×VßíÖ–° ”BV¤—Êñ~ÆÐà#ß¡#ïìWwB©·Ikx#âûÿè5Ê »î>qmÖ¨óïÜ«Mô$ &[8š9Þй¹'X&Ð}‚Ñòõå/WXé 5_Þ ã˜~#^BV+îãµý3ú äJQÚ\MøŒJRp¨…ù~k7 ÑvåÇDéØÁ‘}Oþëþe»y¿ßºy÷¯ÖC³E¿÷û»‡÷½Cˆö¬MCÏ~¢·~‹hÅàÅ¢q¬ìÀF²$ðË?y¸ž€úˆpÜx ¶–$…‡ØGhýˆ^ôƒš«ü¦@ž±Ì«cK]BB4VIY€ªM¨NË›:‰Â¡DõZ2¢ÍfyôØŠ“™£ÍôÙ²ª¡×Q÷QõW)»‹ÊFdÎZ‡-Úi¹XMÁ­"~Œ“y\.¬wö[æ³{h„;½»5*ñWHò@ót=®5¿v³uØ2ldÆh§»™´3í숷2ßSÓÇ;“^OatÃ;É•èã 'qæ yB\röE˜Q`l²zÓúÒƒˆ>Óêw;1O²G¸ÿ~E7Óäåò”·A@(ÆŽ—C"›='$ñ x0±Ášbø,ðñqÂØ)Â|È® “y[û {ßVKqLs¿±±ý*Ã+“ÄPéæ*1i†JÓqÒ#Èõ°µÚÝjÁžé:Š‚”ì½¥äo°$XÆ\¦ޠßc„IÀm‚å:ÍVËÉ™à¸ßéÐ7€/ÃÜáð,p8&.â»^ÿèÁ0( L"š \nc¹È颤[3P¼ª“âV svQ¤‡S„‹wb½Ló˜+‡Eïx] Lƒí`âr×íõI&f¸0²ÒHæ¯$‚œš÷6Á_8»Ì¡"Œ8SH“Âö“0kãµ&ÓÎ+Ä΄ê#dëF$)aGpM‚R£V¨Ö%íuÁÜã ;Æyâcó²Ä ß%Y8üÖÝ.R}ÖnXH|cP[^ühæT@bx¬O»| °™Kš v!%|~  .ò}Ó›gÊ,5[ 7©/BhÈ ¥M›¤ÓÏÒd¾[§/MƒbaÁÎ\ö*òÍÀƒÙp…ÑR£êèp4lA¿©‡Ñ¬ä6¨pë·{³Á7ò;Zâwôü€Gûî¨uò`4¢ÉU£×˜º1o\wV®»#~Lâ=*vñQŽI°óЉvŠÉUÇío=“Ùðÿ`ÕæÒÉõ¾…_á?¿¿ÌüÜÈ`¯ýMÒ@J¶X# §p©µ Ù…Øœ9é´²ú·‰>AÚ=™=`?Q0PCÔ§µÉúœ™JóÅWK¦¯ÌŠx/ýd®à6ú¢WY4„j Òj LU)_„(ðÇù]ÇøO]Úh8z„+R[Í‘™©M~”ô0V?EäÚ_fø(¿V•ÔËNDêiæ$;âÚ¦EXŒFùôÒ¾»Á› +(~Àd7˜Cá3‹$ r|E@O\éQ¬žø¥Šy¥¡ŸÚÌh _¾âÝ;uðÂüC8½“G 9™7 }t¥ž‰¨•…Few0,ááÝq9•zÎànxüPaÂìZb„%+ìÕ˜ –ØEýþÇ^Ûì"Ã[~¥k"ˆîÜðA2(ïB÷ÁÙ]O/pàÊÜñüšef™ ß~\ 6°ƒ ä-`ÆuhöÚ—yÊïvf0æ÷¹ ÑWiw¸X0‚LØ$5õÆ9Å8ëw¨™ñðtI¢ÀvÀmš:ºé¶ï:ÝÝAµXè.ž›q#òT.œI¢¥úLjŒ†Ôœpcqƒ´÷ˆ¿õ:­ìÇ.¤Ê…¬ŒÐ*#ŒŒžÀ#&Ó %fài’]›ÑH›_ä,~Ãl’VëP"a†­Lé7w&š$ä‚Wj@º5Ê»;,a²L·2œx¹¤GWÕîJT1°WGÈ'¼é²WG +3àòÔQ·BÌÝ”~¥¿Š2èÔP°»‚rRGY3P·…W&³Út¶Œ`uLðÊd•{+ÊíŠzw%;î>Šå*Zu—+[ÌýQ‚v*îvzLPß8B”,cN¹nU Êg8öé‹Z²~‚LTºÜ°é™–ì•!½t VŠŠR{ >ˆi0£Ý&6<¥~ÚE9±Ee¥ŸéG3KHËRôK щX˜dÔ=ã'éSæDPS' Gø\G-E®È YjŠåàу½£§„hg÷)ˆzP7.O„²ÂJwú2´ ‘ÌØØ¡”Ã?µ<Ë[‚3Ž† †2·`W™ÍFfbvRBn Î rÁ@îL”4ø€v`†ºáå™ À…‹•¼9ÀÄvÁ4m×=(;2ë3Ý\ZûXŒð]x]ZpAÏ瞺4–ËX9Œõ;ÅßßGÕt¨ž±Ø‡^œPáÆVIxÃ+¨ƒ ¨ƒÔázÌá2"ÜdØÐN=u{vÄBªÛÃíÇ3HPѬAÉÀ5ýŠÝb"ã#r½òVÖWW‡¬sø »ýô²}º=£‹ݬóá€ýhªüHuפ y}£-…&2áD&Ÿt1.”ç„r•°–ô´˜8¹üë›å…¤»v)é.˪ÑÃõèá2ú>"ÄŒõSêí‰Ìá7¬ÿˆOs‘L^û²»O!÷”}391¾æ C|½ ð0R¼ìíSB=O2_lk^ÛÌÞWæÃäèÊ Ôø¤ß0@¦¾4ÙkFÃC|d°üLwIq©‡(¨©qé~–^ŽU0½£}€&kÙ;IË4[ðZ¢òæ"^÷þþþÓn÷~ï;û®úµÅï÷è©©}²ê‹.¾RžôBEŸàŸ©1– ¨ ZͲ.°0×­f­6°³˜žó\¥>¨ †Õ¥õ5búVÔ‡ª,lmPcbʃ*^},óL Ü´u€œøÓ– -D˜\4-Í,ãA¬ Ì Ö4Š•„Ú€¦Ïf¸|jêõ;4ç}ÎN†Ä"b-ÁƒúÉÁ™óÏ|ò3Ç`c‘A£Xf0ZV2\¨ÀtÆý– „3>îðºXt0i© ðàvQÚÕ 4JUˆ†ò‚Gm1b»P„Ta,Hl¿Ô•.JLý‘°°0aàÄ*,Ox𷪆±D1phN&¬œ *ÆR…°J±@h œkžÀÐßѱߌô‡%øCÏ€Ö{øÞàáш¥Åb‡L¡ÂJÆÒØš‡ç*%P‰’*=‰µÅrÑcÁÊn¨ð©ö´û™â§>ÅõNÁ@KhXôT±¸ª#Qº]AÒéwI;WY -OcýSCá‚h­¿ŒÖ_‡6è,¡qa´‚v²Œ¶":Õ<GH+ÙJ¶ŠT9](­ Ô¹p±´‚õQ‹ ¦U4¬–¹hª¢Ö5°fûX/Ùy.žìtØ8yN³Z*™•FD¯Ë¥.¯¬ŒxK¤Ò6¯ '‹ Èã)+‚j) õ{ÖA©ž²mÈe5ETO1ôY7ì\)[=UM–ŒK¨r‹«zOïÏ[–”Ë-ÓÅ‚‹3¸¨PCc±™UªšÒ€)šLë®*¬Õ¤«0S¦;(uŽY»íbQ¦A½=®Ê,ej®\]„Ua·Ú™•¨ÏÊTh5fX¦Õf£yvR…ÝjGóŸñ ªÅ† Õm¶˜ë˜Ê8 *àÀ‚C •wc„Òf ˜½Ø”x¦¥‘S WBÝT%Ø«€³¾åáØã§ÚÏtúÞäL–A,‚Ø_Þ’¶4ä9*­üOdp¦T$Œßq«û_‘_.?Ã>à¬s&.\¹7…œS/û•Uèòêæ#U“3ãjµï~õǹ*ו}WlÅeL++}5ÀŒŸ´ñG{Ó_Þ€¸ýÑÐUþª´L,•S€§¥íÓƒ«c~H‡ ¾ÿÇ 2Ï[z4õ4 œ1ì¿Û‰ƒEê­}YÑa–ûí±M”H˜ÏOƒñš }'òµÐ… ×ñ µ†€Æ—ÎÃñH|¹Æ]‚(!”ïó +WçCoh0Ë\%§ÜS#Y’œžœQÛï G›^è༡‰`›6¯ËÞú‘F¨\"Ð^…å_‰ÖjnDÔ¯±ê¯€Ê¯ø#£Ãò=ðs¦kÊh¬ÌxÎèðIÍ,M0¡×3ض6½ÞZ:/Äe-"ä'êY2\U“U™ ™2›ÅŸb‚ômÊæ¤é5Ödkq•²r¨Ùº}’ëÒ‰Ò³rÅb#ÿ446XßuB'öÖ©M·ã'Ž\ê‘Ó„2ÅkØöÓ®äÃ:Ãëì°Ä±­ŠU2Shƒ§Ü8ðǶD2„BhÎmKiÝmÕ X¯ ³º^ëwV×3kûuUåÉôw½(»¬éW…½ë¨Ù…ðFq-|©Úóœ:üy”ú>såøÓ jXØ|„BÅu‰xÂ6`ñÖGUÑ3¾%St(ìé22V–MæÀ´a›6®…ÖÀP³,Á±$N¢hö(]Ž©-Иµ[ÑïÑEÐÈŽD5û#*hoÏ">ÈíîÕÿX ²©MÃÜϬ NÕ§h½-}”» ¡jýFaÚñŽ·áÁ|ZÚ¦0A¡{˜šOZ®;Cb@ÕXçEbóp¼éPô¥‰(+äÔ¢•F{ r×Õ´ñÜUDX]¦€sQ¬Ë4p¶8«'éÁ[k$éážßÞ¢OH&¡OGKü<6¡/ÅR šã¯m I޳͂Ís”H¤þa· RÕ~Ù°×*~’¼îX¶ròI`Ä"©¢ø: Fñ%q²Éœˆ¥Ü”"“îÛÛÛÂu2ZÝPþ.–3XXu¶i)ŠP jhkÀ`$:â?@•~oIÅåäxÛn®`Ú­¨§ždÁl.Bb™S´VŸÐŸCÚˆ–ÀØ¡Üz~w›¦×¨>¬ ñÙÁ+ÆSÒýóÅ}kÇ`Ô¢%„¼î”—¡ù¼ûȺ,¼vxdãˆú™È6‘ab°9’ÃJþƒ¯'?Ðçæ•-­]G´¯l- ¹1I]ó&¬–uÿ覭&4O®Ð²Ì¤qeû¡E¶i[y JÊnQ©?Íùo‰À$B”ö–3ò'¿9_•¶aQð=Ôe´¹¤¶á©ØìñšÙ!U°¥ïPø½¡Ö^Hµ="ë§ü«Z7‰wý ÆjáC4$sFKŸ«tTl¡$¡<ùmòºÃcÞÚ•2KZª²€,ðç1 ˆ¬”ñòá„Ý'JÂYôíëë7y("¡Ï¡²‚¾\ü±ž$¢álI®¼{BFvÝë‘ =¯B/%ø²~i"x“Ž­ãµVvù`ßþšÚ„»:ýȆ{;ƺ¿Õ·y j1€#âãý\„uÔZm(BÍ,IÛ¦š™QZ>¬EùškOÅòñíáñÆ·‰öÇ6È…§´&^da"ŒòDEß±p| t#6W–=1f™­¥Y¶ÞÏ¢S/uV„›¼È¼Âf®I<·,µ(>´—!›3£Ÿ¡m¢#ÀS—¯|wjå(4À`Uy’úf4Ý Zï±h½­[×ÚdK[ݺ¶&[ZêY[b¢¾©žµ)+–Ù–ýœd­z‚o†c?µzûÊP=Ð3U'1ý|’û‚d³8¶)Éx…(±ç–M÷ëìºòU‰"[=¸ö¬[]]›>\º,Ö6WØìΊ-vgäðDO\±QÕ±ìžØ×cr»©.ì|S¾±?0:ûuöMËÉÔfßT _ƒ+ñÑÝN†´­„·ïŸÔDª6 Ø!c¢Sn¤U®[g⽚éµ/R²óã}VµúxeQ\ÂSCsixGϽ¥å€=2›¢sn3©BÏõv7OÓÖ—ùþ³}ÃîÞ~{8û¹šr3ª×üÕí[ò®Öüú¼úá©C\Ø<Ú‹ÀBåÅ1º ׫ dŒ=›¢n9H–O;"[Rðö±°Äì73†Î­b:­xɳ÷ {Àc¸¡'ž«àÞÉØ»°Ë–Ûç*²Ö¡WNÝBCn:ÄGoâ}Þ´Ã#··o¯‡Ê¢ÌB¯;C±X¨”—m²çŽŠæiFÅHãFt-íØ‘!ÚCŒ:_F§Z’xºªTñCÅSèöü¥ŒN‡pQ‚±•“t» ËSì1L«R3àážÿ@”M”X"»cºTRpKUYLÖZR–õÍmFˆåbD2%.ülåSP€1J–€ŽQþF“³¾º8G¢b$–0¨BQ³‡¬IÐèKißnö^ÓÃŽM :S†š©D•!7H›ôÒˆE^pæa‰÷-×äÏaz«é„©¶C´ŸÖ!RMàý½ƒúØ‚ëPŽ‡pé‚ÜÒý6\=àôBcÈhi-†RR™H-EUž[WÞDÈ)-Èr¨L3᫶™ž%¨øõ©P¼ÿ”8*þŸZ¹*YcÔeF¬D8®Øjá$Þé“7 ‰ç¶vá[)· \Á£( 0þðS«Ô˜P©?0ö åí¹Ñ|Ƕʈa¸£Ùm4(øõrçY’ï`ÐëåΎ󱯫›U$|ž´ÞI]t>—oeˆêˆr<`XRä%`gSžf:Š¤¨¡%9’Þ«ÔK#½sÑÉ¡\ 3<Ë’Lz‡± ßëà¥\÷>G}ækwkdË/ ì Ëu_ŒH¨\Ò´ pí|žõÊH©†dÌÁWTKÝÎl¡ @ÀØ%Qc{ß4Ø-—”ýSÃäùH Ãxƒä˜pS}P‚²¦N¬‚€(ÛŽ7-D†Q4ç¹úåöι¸~å\^;gN륱X¬e‘ã /ÙR;S%ìÉÞ™2Úkù9Ì Ös´«Y9ÚÕ$Š-Ó9/3Bõ9jQ &U` ­ õËËÏ"{ðÞòË ¼L•ãìký¥/]M‘$Ÿ„… Ú/kO9´…ÏÚšQÍò!æøš[ê‡ì3׋5’'9×?—¤Þ4R*g(áæáFÌÖ‡‹måJ ,…Æ#ú‚3ȹ„ùZÄF#êµãå!ÿq*žÄÙ¯ §«5LV²c/œðÉ‚’ б\â'29„ ¿MŒV Î|%¶mplo¼kÿCÆâ®c-©ÃÊt€ãhÕ™ÇEòŒôönm•´¦i<ØÎ&À‰e²/œ'}Ú*‹øR¦d Ó#5÷ø{žgUÚËÈßrþ.i9ÌFr1&6‡‹Nª—©Êlò|ýå-äN? eVHòL<íÐLŽ¿gÜäJZ@Ûi_¨ƒÕì>ÍŠªW=­Àno¢–#câà~“`ÛÙYÇ>|ö¡ÂîØrñQoÇ·”MC …[ `Ø»á û%»Jw%ÖøaàѽQli¸ý¼4Ùåc[ç‡eù2ÒECTæùVSl5"Sk0Úü@”AcÖšó µ¸y…M×gO’çêj•Ó¥yÇYw^ê”…å«Ãµf×ßg"Ù\ÆÍ©,1”à™Ý—¾\ºz`& Ðìrå›7É[JŠ´¨RÛßÖ©¾ëþmÜÒ­ȸ[‚®cU‡#Ó‘R¶0Ÿ¢ì“tÐ.Å,še§Ì¹¨GZ.s–’¥òª%gQQCµíÞmå.Ñ®ºK¬ùD0;ÝÜ ^Òþ<¡ èFÏ~bÒ›wn2£7–|©áÕªÌõ\8f·ãd¿o?wd®¶2¦*”Á4qíÓæy¾[9)~„GJ’p›äWÚ`r¬tΛ¤dŽf ØÊʃJX)LaMb,ôv&Œœ­:aÝ\À6•9þ,ËD\LW˜f0Í „E 'P( "ÌŒì©ð<¥|½œntá­^n(¬$WI°]‹ªrº^'…ÊNù©Ÿg˜ã5䌦2y2s;•´¨;,)¿È¡Y¨f7¦LÓ‰Ù£)«Ö!dþ0$ÚâÎ,Å“@£]Púõ$U‰vÍf@,Çô1Þ¦^ÈuÌÇœjcÌ1Ù7%=ÏÃæŸÖ™“¡£œ§ëáð°€Ú (Á0žC}±˜cfAÌ‚œÈâ@¦ÂmÔ*ìrŽÔÙÜ4•Ig¶Ç-ØK’,Ök7ÉrûnG‡"ŠZìÒ´ØSi.¢°ÜŠtÄ,#4 ´³f?%ÃÆnöIÇXÝ,Rî,Õ©Àwö¢C{ÉÆz:CŽŽ,œjù9›·+OÊ:*§Ì2ìbsópëaðT9+ezšÈÑáqKÆ‚Ò«I³¦_'LõfŦÂÝ3+¶$M›±ÕOÀ,ã‰ÔFhÊWEZ/´`a ûseR¾Fÿ c6S¦?Ÿdp&u\‹„NΙõº]Ù8ËPŽ- ½öÝ}Ýê@o9ƒ’Cj1®Sˆá. ‘¦žÞ[|¸¥7<É–ëÒ…Ð tåà·µ–ym½4™„5%ã´¹Πe:B(G5yT`â–Œæ×Bk¾—êZf —–á'iaõZ˜Ø®i³s}¤çïÈèœÌ•gcu8¶ÏvfÌ<Îì¾´´öÌbOת½±L¶R—–~DÅ¢ì†2ÒŸblt?ÖGãCN%O3Ï+=¨sÊo±m·•‚úlk“ÕnÉ+¶’|¤Çu¹ås64µ±‹-yp“¾*º¶4ÓP1¶å­&Ð2-;^šÉn|Æ-r­t²Ö,Õ z“ÿ¬[´¬¤Ä+ ÃN‰vÃÅXàá·ç¼™âµ: é €Aæ žgSqRÐ4ô'„2MF!g36@Ì;}¯N^ëOÎŒSĪ[à·JeJ Žoe…´ÓRrH · Ã'³Õò_HI_âSt 5ëÕPˆK]NZûJ9…Ðå¬øÛ £Þ”åÚHVm¾Œ )¦!èh ŒÌr:C¨”+gz ˜¸ÒiäKåã6²• €:•S®mħa” YW‡ý(A©+˜l¯¤1½uj©3ìr\¢üÁa)uKþúølÔ÷4 °¬GºÉ—ï¼1­µÝoUÃ÷èÃá|W~m»Ï¸ÎÝ¿›gÂTÔ(¢4†KÊ[ÊZŽbêCòïà‘áé;ç…íq’Lœç‹ ­«‡áTЃÜy^&o¢¡ïðoV|çìè\óß?ß©B 1-‚üù»UûÏ{ÿk@ð"A¨pÙøæßòß4xEÁÀËÝ>roÞE›  ׋þ6€{Þ;ìõðSš¿ô¯·×ýf¿Óíîuz‡ßìíw»ÝÞ7ο!å»èß‘·¿üøêòæÖùÞÉA$¤û¼È³ó·ïÎÏÞÞŸ]ýôöì5´/¨×h¤“kh‚0ƒ§Ï^À‚Ëæ®.(Aî_Ý~°[N67õ1ÈÛy± pÄ›NE€ X¹‹{€ `áSˆçïÞÿvyýÚ¹¹8{uuáFA£qñ×»›³ûW—·wPîÍŠ6/7Ãr„øSáÅí)®Kÿ®þ–ïÿì—»7ïnnÿÐOcË÷ß9êšßÿÁ7˜[åàè?ßÿ?ãß»,…1…oÃ-¸±3X9o¼8w~LÄ8’&Pdy•N½·Öv €Á På‡JºF¡E0 Caˆ·'Ôö+œ²¼ý«s‘9¯Ï_J!",œ…‡V?q‘… /ˆ 1X±m)ëºs­;EM Z‘Aõt9÷bçÊ èà$ta™ŠƒL@ew °™sê¹]õs¼ág7ÉF?0ÔÂ9Å €Àßÿ`G~oÜX?4~Ì<xVÎm„/|:€Û>þiçøÀõw6A¨™/œ«°ðÇÀãfÜH=è ÃS€Ž~hœ{Ù¤’wÏ_aœ©sêÓƒþÀ›Y軳EâúÞW^Š©ó:óVy;§ðr}à_Æî,œù®f’ÌFÎ[áAá´ïçn’/Ä(á² ¨Õ9Ãû ¸¼‡Ž,à½` îÈE„B4q[xéÐ9Å»¼/ÂáPÈ®¾a*zÓ0wNGtçxg¾Ðë ÍVÎO^†¡µNG|ïé¾#“\¶úÆýÙuÞÎœÓñ§)ŒJ2­ÔUN1 !þô=?âÑ¢ö{G/×á4'šŒÓþÈ÷ÝQ]ä,Óß3åH|ÐÇmÈ7PQàHþ’MDbÀéŒ/úñ tø¢ÞC´JvþæEøJ`”ÒÏpÙC˜Ôù/ž$ÎßÂyò)Næ¡ïœfø¤Ÿ§a 2øxù¾=>ƒŽ'¨Õ?Íð:Žw&QoÈ)Ìç6‹0Ð\=‚ï]x>ðýwÞÄËÇ¡ó[¡cß»+ºw?êÃ""ù»q(¢ˆ<bBßëÜ9ŒÆÜ…k˜™!ˆ³¢üâ’,Ç%÷õÔÃ%ò´õ1€ž0•ïXa¨ ZÚЬnåõgƒ­¿áܾIfKçt—0â³eeŒ¾zÿWp øÿÿûÿ~·›ýÿ"ÁöÿÂ?4H|‘ç|†bïøÈ3ãDÀ³±4KÜö<}6+œÜÏ´pAN¸¿¼¾¼{ñ¡2“>¾ü@séãËA°€m6’v-dVSžÞM”1îßß\Ü\üÏ‹Ž{¸ßÄûó³ëw×—(xÜݼ¾€z?òów×?]¾¾¿½9qåÈ*¦$á› Wgç7ïîêCÔCä+êà=pµï®Îþrñâž„£ØAI =ø¦'†]+cŸá¯Î.¯ïàÿ‹›û«w¯.Fío@ĸ¸¹}ñ»ÀÔpÇ€ÕønÁþ„-ß`£ÌCCw¨íýÍ»×÷çPÃý;}{vÛx{' Ý@½Hv”Lu g±ÏÛ vã§_®ÏﯮÎÞ³%>¬¬*jÞ_ž;é7r±Á½—Gß=<û†”ß¾GÜ«[èÇ›‹ó¿€¬ô«F,T_‡¸¾ zíòQtvž½>?ßÙi%òÿ¦#à†ÃŠàg¸Åï ²•ìÈÐmLeâÙR¶š ¶µ‚w¡RR_aчö¢ÛÙ=ì}q“TÅØe§=ü?öþ½¯+ÉÇ÷_÷ëû zdM„ˆ.†87ˆ2ƒA¶™ÁÀáÄYãÈBj@kÝ¢– ¬ãßcÿÕ»ªÎ­Õì\f6“ìŽiuŸSçV§NUºPojZI;{Ôl=ß;^)|Mõ·rs3R ¶¼Ò È|2Ãç—aq;Ä”òu;ñÒ‹˜MÅӸݦí6,ú#6_rƒú~<}C”v%Rg“;ÜÝ#̦mÅ÷ûgÄœŸ™îÓ ¹/§Ú~ý3­ûª¿ìtÛݷ퉨í¦ã-vÞëÑøU9Û#×ëBî23@ìbµÚ»W^*’e )¡¯*ZAþ{iV²PÝÑ5Öb3/…WnˆVËt0Ÿ±E1n—Ĥú¥˜ö¼ÍÀËÿ}r5ƒOÖÒU1¯´¤¿ 9‹á&³Ûm_rpŽÝkã%ó›;·¶2*æÍ«-àÍë÷¬±(„ï A'ªßcâŠòÙ •j–S½ñÈÝÉŸþw!»5ñ.ƒ\Ÿ¬ÇÕá,‹ífßSÆaa ø'aÔ ÀËLCÕƒl–|Φód±]c’ùQ„ç~¼EüÜ@8²{Ññ³È§ #!ÇZœõéH¨Ý‰àå’G{£Geé m7÷·RvRâ3ù4qÛë%yÚÜ;l·Ž°^V«$WáDr¥%[æWÜÅéD{éUù•bH­¶«Å®]þB-í4ÓÁºòr§ùèù‚»F w”6Žc= ãÎBc5jKÔzþ¨u¼¢S\vov lÅÓöqóÙáÞÖ1µÓ><~ ½` CØ%ú×íÌÔ_þ@ã³x2»€·a¯ì'³G­2Z l´Ÿ·ší}bNZ{Íæ¡Gœ^>Oá‘H Ä I&+åêJÇf”É éÎèÝ »&ÓL Óbì’hŠâGæàa› çðLêafs»pÐní>ÙßÚkù}Ø‘ƒôt0&™L̤p*¨4¥%õÚéegò+väûÝýÏÖ½É 'äûþè³õ¸õ›O Ñ¥í&ñk{{ÛXàãi‡øTú€´ðãnž4D¨4LäIºšŸ³£xY­c’’9Sn ¸LìMÞd~: Ž]PÏ“iºÐô“&ñ‡[{»ÿÝ$nîYûÑÁÁq¯ÁL<O»Éâ"8~ã³dÖ½hgKå –xåÇÄ’º†wüƧɛ³h"ÅaÖ5”ÊÞš"G=¶Öðtp]%©— Á™{ÉëêbÏãjÊŠä,Æ“Æ—’K3½u«‚ŽÕùˆýýµÕ}i™˜,ôóú⋇í­ï¶v÷@¿üN쎠f4qçm‡í­³¾Û®K ³r.àÖógÍöw»­ã-&‘¸ù±~P—@—°þàÁg•ø»>bÿ±ç`<ëLa4å7vCK´[v¾o}ýUNkÄö÷`×dÎFUFÃúÓrÎx€}¡7‰„CwìÉö³ÃÛOŸ¬}ñ(>µ7 M}'‰ ‰·žíÄ3ã¾!"Ëg÷ñÁmJ PëûÃÅý€&h.–— ÃT©ÄtÎö)ÆÞÎQóEΦæ àÒ‰Ît¿ýâÓ¼^€Rnm·¿ûZO¯Åá‰!ÜÛ¯?Upü;ØÁÞ?ì5If;nµùgs‡Y½­£f»I»µÿ$o:;£nŠòg­ø»–’E¥(nÅt•Vïùþ. ŽÛÍVëàÈNJ‡jÎ1àÁ ƒ…ñGAÏtî·v·[ù[zÜÞ…6*ŒÉ´?ìÃk)õP²ƒóf6¥uëwÓÅu’A.ëÍasÿx÷ù³‡ÔZç…ÃäPãÒ>ŒKódÔMJ®Xt\¾õÃ> ­ö£ç»{Ç»û9T’Ûé¼?˜Umd«å†ÞœuÞŽÙ1¢Ÿ!: %KX1K¶È÷Í­¶wžÓäž5Ÿ=§o»ûyd¶7žƒ»ì÷fÜ9PÙ õäÓ¾# ÍhìhŠ×Át>Á=MØQêŸØ˜Ë)Ë{/…XóéX6â7iŽ¶ö…i;J~šÓ‰Ò3’-åsàc|xÐÚ}+WU“sv¯:%Ž²0qØT‰6¾éå¿À Œ®Ëµ–æmש&:Èkí½ÝG+ú­b¦hÉଇõÀÂ;þôª|%‰è ,o*gÝÎo5ª-wƒœ£þ¿N'p#wé©6Ì|橼(gxÎÃøi½ƒáä¥ïÔ Kª†w}Ï€ 5ê.º ©±* 6øïpz§xÐ?µ“žŽ±ž¸ÒA( ”¤]ñÆ‚éœw°?ãþ¬–×½Åne5FŽƒ4‹Þ € —ë›ß[oè”’cF”„ÙEÈï¬ð¤R®'²È¡âÉØûc'@ ɽ“š¥iû„–~w­Q ‚GWËbä+Ìø_°ŸA¹³ "±µ·òtë;ÇŸ=­Üˆâålåý&‘}b®l5#õºžÊóñî^³µòÒcd_ôˆÑ^x ýèÂK^ÂÅ×ËÌCnúž1 ‰_}¦“ùÙÖþu[Ý|^U^¾|…¬F´P|§ï Ñö6~ooÓ#˜]üÀ_úùJôÏÏŸÿñlEòîÔœæw²ÿxøÙÚÚƒÌýýøüÏûŸßã?q²ÿ$¦dw;¦ÿ5÷[M›%þN½D×+ñ?ætܯ}ýõZÅÛãÉõ”Ãî¬l—éåW_WøSü¢wk|Æ~Ùñc¨Ê™¿¨Ð9ÙUBüù×ñq2œÿx8 Á½·æ}bx*ñ£1nä+ñ³­8~°¾¶¶V]# ‰ãç­­(n’\v‰ßbôº›ŒR0XÝ9<ØÄz½{Ñ3Keå(.‰ÎD0¢eõLàÜ cv¤ÑŸà®—š‘ã½R°ôp†ˆW:ÃàS7p²÷`6CüЗ§Îs`(S‹ãG×b)ÓIg©ñb‰”²Ž"ÚÓp`¼ls¸©óygÚ¡ß 7ßÔ¾E¦ÏÕ*»ÚÈ\Ô¨. ±²(´Ã}:“‰Õ™"4¼½¢°k±éì)Àþ2æG}G,‰–”RoG<kd®×âË ¤ÂíÌg¸G‡øLx@%#aCyöVZ°\’jË02\ll™ÉÞÓc}ÉÈTV­•ãø‡ñö:–ÎðÔ› A„v×€5ßëò¾XIç fƒgÕô¤‚Oè‹'SuÞÔ¬'#ú \& |~ÏÒÜó×´3VDâÔy‘øØáíÙ2 ý‹Ww¦çŒ ï'¸”SÓêw_öÓ ö•¦à¯› ØEJ3Âz±»¼bÂX&ŸE¦"!-ýôª¢Œbj€T|6õ±+½2gIͼoª§Š‚c·çOhi |?„=Í—Þ3¨Ëxý˜Â¥¼*|[iærš`¦ºªbxšŒÓ~/"d«F;ñV×F:”NßÈ'C°xëA³taJÕ"QO†­Ð–NY.¹ÓkTbBû§ý‰æJ‡Yf4Ê]Q&+è‘NÿpÜëŸ]3ûNSñ˜>$WPéŠ)‘ .sÀr6öö‹Î¡ä3͈ÏÄíÀ+ñ¼¯øGØÑŸ@W’2]q³Àóäšì2®›AgªrͬbQÍC/8$y˜Gp¶%l?Ò qkd S4ˆ¡Z§§þ42K‰;Ó"–¨Wö%­é,™¤ñÊZ™Ï%9&ÃY'´ŒVÖË4PCšx'ÓåEŸ&õœ•-ø8HÎi›ó‰—òi¬G^Å_a‚Yçcˆ—Ño{½5Hi†°††Ég)5CTl <ïFƒðŠpOxbNá97E,úÔ.…Óѯ8…®Eˆ»ÐÄ6éz¶pÆpçûbô ãS¿7Hå0˜@ÿÍ5ú)µH} ¢îê’QgŒcþµ´z¦³ ›Z¿B¤•!á™ W'@ Ä–/Ü ±MWt ?p†» VÁz°"=JT`2ŸuÔv;I m+܈Ož$0-±ˆ¢Ä0—°~åÑëá8ÁçY*nt ­LAÞŽûâ‚×uœÊˆé3耓‘6gG&ÝžœÜ Þö{s¶þŸ2!‘F,?ÃtÂÍ.ï6q·w`è/CÉŒNÇšM   -sEÜßâz¥'‘÷IG{HS ²ÎÉÚfOPSQ«¤ìkS¦±è´\‡³šáÁ&X»sù|zzýÁñ(i£Ð*Ž|)®G‚m]áÎà*~Y‹þ¿èVæˆæѳVL²fl%ìVüøàÈ8%Tb8!í>zŽO\ðÙÁÎîãÝmÖ÷¡ójâ'ŸÃ*):òdC)q!ÆÓ7JÀBÙu058{'`¤_ÙuÓ’‹ñ‡‹ÆLèc9¯1ëŽnô¢¹=d ŸœÏ^ÔdÚ ‡Ò¿qÏ M\%bžÅvŸo è½8ŽvâÅÜCqËZ4L`!œôyÈÞÀ\êjÿ­DÏb(Òy7àAçrCötŸû‚°Ô$—ÕiSt stJ 3•H;`e»ÃG™Ô\{6ã‘ÇÏ+ hoÎ;瘲8Ø!8ã𓦂ê]û£î`n{ ^Ȫvý<ŠÌÊÄ¿õ8O™©;ƒI\§×#¦€·Ièì(ÀZžÈû[aÆ:¯`¬–í‹`ÌL‚ñt²`‡¢Ã¦XæÊæ³´Ï[žNP‚nP¥jy! Dvê•(N'é9ßâ±ØðXç­y̺¹KFƒX[>˜Œög|"Æ ˆ™–W·Õø3ТÅBçNâÏ™pÑ8sz\®Eß«á˜E²éì6`!^¬ cš‚b•ÉÕZM˜˜Îõ]Vë)˜Rêó1X^Ÿ¹ÛÌÖv×ñN91b6\Œeú15“~w>ž§i½3ZN¸Koøê›óÚI¿TävšRDwÐé%Œ”9ù7ã7I2Á–(wIµÔœXàLK EòÃà;§)®~ø,£±YÐÊ0éäC§Ž-Xi(†°i;Qg€°6šŽ–¦¥²«$’3¯ÊÇ©½¸NÙ…]ðZ6³פ%að®JGùÄñD)ÌGùQöÈã¿pè^ÉÜ0ÍŒ9ës”¿cˆ2ªi>Š©”-ʆˆeAžo¡9ÁP ¤-E<)U“~œ.ôƒq`ÁzóÅñxg©h«·I—t8óWfÀ¦3{¬ó»TŽ:ß¿*\X†Áõ˜íŸqIŸ£ê ¼µ´ÒÁ,|ÆÅ»±?íY(@ eœ€9úeøݲaÝíÔ›ƒ~lð•rÝ KÌ´ƒcˆèŒž-XO&4¡š+ò‘¾ ¶¡ÂØ@=®îd&±?r!³ÆÓü!®5’ØSøØ蟣„|Æs¢.ÆJaÞÅ‹s)^‡è‹å²Ï xÚâZùQ«0bÝÒ[¡ì¬]ãï±õ‚ñf¶y¹BvÃè1 Ç=¿.faw¿í'—šÈP‡·Ò41Ï7pÀGö —®FçhÖ€úÉ¥^"ZLÉ-Á(˜òŠ±€™Ñ,rzël—3¬V&ÎÝèM¸ìP” ¬“ÓÓÄâ+·é¶ £Q¼}— å‰*^x‚ Nra†–nÍ ŸKÐ=œ¢t ãHVå‚5š2‡èøNäLž ;›*¿7¤9~ 9Œ£°ù{PVoÑŠ±¦÷Ɖȃ¶û—&Œ[ˆCCŒ>lJçùÌVˆ2H—v†Þ¬Pm&=,c ‰Ñ„Cê»%²‡ VŸáÔCK`¡Pk*…3 `§9O˜Ã “ q•¸.}„¥j3†Éœói!êzÁ§ kšœw¦ðäõ§J‘5KD9vL+Þ5zÊú÷™%˜:O|1òǫ̂¦³ÈWQ1‘îÔW:+Š*·OutZñ›bñ&J®’©ˆ¿Fq&º!¨0¹“í Pã)±sh3Œ8•æ²4æÝD‹¾Üä 91Ì9ü@;¬^ˆq°Uj (Ëk1Ç£åœH¿;ñÛñ×é„ !©I°RšîÆ'¼¯£B§SCÿ¼Þ Ùdœ†”’{Ê}v3«žB¶÷!å05ìÏz™³þt*FN«×KRpd9çoÔ2;nû°.±—1QD  2Ó=%* šÇ?muÙÜpÄ×v5ðnðY72„&AsŽiË ”B*ºçÍ®õ” 7p‚rÖ„ÃáÖÅë´ñ°3íþÏbÈ) qè7¶ISX±ÙâÈ:v?1Ë]Ñ| ÌYßèßd\×IgÊ5N¬`‰ ÂuErå F¸ÎôH.ô˜1Ò.#!àôK¦†×Ö‰óñµÂ§°Ì=CÈθwFg'Xfüä¾Û,ŸÉG¬AwvõG™ÛÀ“Y™?Õƒ™HÎþÌ=Ô’!ƒGaí™N]Ù½¶õÀ«GàDA)Il[Pw5=Ô·ýóy­Û7¯DL0 jÇbÄrš—©ÆmmÍOÍép*³O¬ 8—à‚ìÌшI_øZP–chONÂeœjjCÉŒæ“oD³ÐàwZ4rvëKë‘$ùá&Í}ÌB¿è=52‡¬ÔwR Ivƒ9[jE4wûF!F[æùžý;ËYZ^è0¼JSA5:ÕÌù%î2»RjúÓñ7"åSZø·œà…:qz"Zq›À§²0»ðN ÕÇá6/­ªÇ2µ~µˆí¢.TÈ4G§,DX§²¯÷˜F3wºb‚*ñø´„5IAÆË:Â(0W”L ¼áø!)ѬÎGqì•pÆÒT¤l{Gwh_ͽ٣Cþl[ð ƒÅòvû3ŠžŒáv‘(M­AsǽŠfl˜ˆ½sµ¦V vH3z™°€}†Ýff”ч9óùi”ÇVT—àççmïë¹(9‡“¶ey]Ȩ‹¼ÉÀ­A?t<°HA¢®!ù•è¿ú\KÀKD‚©ÀÞäjE. PzÔrî±*1û–uèNfÑØ„Q¶÷ƒ9Í/oô÷J,wEpå–ÃLÜŽ!0øÌkN·"»Íƒ…æK!K\EgÅ“a®ÙyyqBÍÓ Úû7c¹ÐŸ:óÛ1Þ:¼Lo@‹MHÄE¬ºç¡,ƒ~‡„Gf÷>—¥3â/mÚäV¾’"?‹Ž ÔQs &¶vø`ŠÅq‡y_Ô¶áU®ªôˆ„/YèƒfiöîClo ñvŒT6åKº‹þi&ªúAçÒÞÞ« ¸83å(Á˜ÀH‡8ž»Ï`g”÷+ª`\ªd/‹r§¯Ò‚5Ò~G•ºÁϘÅ554ŽÆÌèC.ö¤Ç¶ûQf3"Žš:|Q“{D Tå&Vÿ–F ™ ¤ÈÙìFCÒ"s‘¬_ÄRD6q¨Kô.øM¿hw3-šá:;YrjL(”Åò®%2–«j@©Ù›#¿YÜ î*·É|Ê,GçF+3×ó™É®÷¬ORgVE?¡êµjÏX]g õTW'Š8cÊmPÄÚl)¹6~ÑQ‰£ózhnùÔ’ƒ>Ÿ*Dc†éì`‰M £_Eà½S9âÕaÙ`ÿ„Uò]NšýŒ×1ÃÔÚšäDì+ŒÔ&6Ÿ‘YœÄþ”ï aÝ·Ð¥¤lgÒ¥2 [#*=‡Ç(ˆ~Ê„“íZºžÌÖ!f‰+mª•3ˆÈu/QÕ{ã‘,@NŸ[–²©Uœ^0΀äã=Pؾšþ9b¤ók/¡dPOB!Äã>ó„Ç™]ã£)›Ä¡£hÚ}6pºT!ñ”¦!y+à4Y<­äTMg‹zG_ÕÌåZVOQW«× Å꧞ù®Œq( Fì{§Ò)pÅaÿéµ»Ùòåt¡ÑŽY°%UdÑ+ ú±(0Eïôz¢wô‘¥Å'|ƒ Ñ3z¡sMîâ"!Äv(1Íì̪;€¨sFÌ IˆÜD阧Ú@ÒÑ8’Ë)øûUBZÜGÚ¢¤pîc‚îuž¯gVÁ¨×§ãÞu®:ùë[Â,5EÇLë‹iò¶Ï··²ä0jÖT]i¤k¿Ä$]xp±ØNô—†×ÂØ|¼y€˜tÂ÷AÜ©ïé¤?íÏÌ&„à‰«5Ä==ìõÙt¾‚ ¡Ø€I¼qÖ‚R®9Ù’™k“mŒ&úU豄´Æs4èb&塵5²±&›fîy1wYxˆ2©ô êô¤-€x‹#¿B(T¼G 1ÆFÃ)Ï=jÈP#1sCh:%>à >ASf™Ð!ÊA‡…±» ™„ë¼)È\’][–±áóMN€”Û›<Ÿ 1]zP3Ì£±Aõvó ö'l 'ô×·BMõþ.ØÁ¦Z0ïˆ9D|x>DjCÏ1׬$­¬¡=ì}¤Oæn™ùLsËöë&»pŒ‡ £ø<°JÆÔZ<«›1žwÖa ÜÏœõ9Ú˜ŒŸ;ÞÝÉÐgÐNØ‚ù3NQ}§àWÆÃ'ð›HãáØÊìðüÛ†=Fl2¸v®Nûñ÷[Gpûþ×­?jno=o5ãã§Íá쎶žÅ»-c»?>j6ãƒÇñöSÄð« ÜQ%|X°‘õP©þÝ|qÜÜ?Ž›GÏv Ú£â­ÃCŽˆñÞÖ÷4›ÍÛÍÃãøû§Íýèà¿ß¥þ´Ž·Paw?þþh÷Á†¸G»OžÇOö¼F¸uj+Ƈ[GÇ»ÍVDýønw'Ta«EÝ.Äßï?=x~l;Ámíÿÿsw§7wPóÅáQ³Eãöî3êq“>îîoï=ßaCàGaÿà˜æ‰FFý<>à©1e tê Áž5UâxëÑîÞ.5 ËáÇ»ÇûÔÛoIÏ·ŸïmÑ ž´šÐß` MøÑnëŸñV+Ò‰ýÏ·, š]‚ñlk›*³nüÃÁsœ4LLT3Þi>nnï~GËK%c‰s¢óÝ:æ ÚÛ‹÷›Y±uôCÜj}·»yˆŽš‡[»4ý°‘>:”ƒ}¡-ë5,aIó;àÀóý=Œö¨ùÿžÓxr00¶ž¶a2½u¾ß¥Æ±BÙůpúàÿB£ƒøÙÖb˜ýƒ¢uÓZn‡XAHá°sëÑæàõg—»EÁ„`‰v¶žm=i¶*‘EnZÉ+që°¹½‹úN¨Gk½'³B»èÿ=Ç*Ò oÑrbhÀC]2ìAàÚ¾Áj;»/W\Ûü^ì´€l1ÒçÓßGM ¦¿OóÅÛik{ûùm-”@ êMëy‹#dbQ"Œ—wóîÑŽÙO<Ïñã­Ý½çG 8F-Ð$ãš]ƒd­r…q Þ}LMm?ÕÕ‹ƒ]ûCü”–âQ“Šmí|· Ê#íD´Z»:' Aç‘ ;Ÿ"Ý2ÊçðÃöEžŠ™ÔK£¢a=æóŸ^þ‚»OÌŽžr)0XOÆòO't8+7äì(=ÿ6µÒÓÃòœý?ÒYD2ˆ¨Éæ©=D´S‰"” ¬“¾€ˆ!LعóÔŸEáY g uØaR Üô\Aíe±Q8£’Í:zåäX#kÌ;ö/KÁ¿°(„p"44ôØÖšÂlßÇwLø¢w,‰Ö8‹ŠŠØ rµk½³"æ=U6ͳ @1 MÐ)±,ô¶Ÿyø‚e ±Dua¡Ã?‹-²„«çÎåÒ½q®Ó$©ä7˜Ï†¯³Þlc«:Cú”d³˜ŽüŽu Ø*ü[†:SK„o©SŸ™žo¥]–K=¢`½7­wc°ÊÂý:ç0± œå›{æy;Ëì4à­µÞrFÉ9Rˆ¹idÏ]†1”•ÐJº¼È?×ò'À¿ŠU1 qËõÎvf™.ÚV´œg9ÜA„Ì¿i=0ôªÕ»¶4&c‰¤š=§irïpL·Æ“È:-äx©Ø‹rVªC‡bÝÇkgH؉,¬æÞ5¦›ËMȳ„ë7±À\?ëÓ_ùhþ(‚S"«|¨Ñ„³i¸Y‚[æ ‚Óñˆ$þ€ÄüÇãõž¹F`žZ1äÑx•t0SkÑ;è¿b±õ#•c┊KE`èJ;(Qsª'#â°ß koðû‹¯+™íŒÝÇá^^¨Ž4©êAºõ¨u°G¼ÇÞ>ß¼KCFι¿fßÕËRÍm‹,=pgÉ€Ó±ÎÆYòÀÔ“ÊjŒ@¶é7×-ù©‰áÊÅõbßr9›oÓ?­økünß’@Š\ê}vpÆ+zâÚã‹cŽêx õF—cĈ”ÆúÏõ)·kêÉ$zzÞÿ§I4Èj—z |†ÉhN– Ój”œEétÞ—{]ëñ¯>$:X6̓32ÁN_Sµã÷n‘µö0™–cñäžF)øÜtŒÄžWÍp£sª9ç€Sp~*†ÿèŸE#8ʧâ¯ùTíÔ;°¢ M»)6T\h*Þ?Œ¯Ç½ëQbö8ÎÄÓkÛX¹ð‡¢$X'@¯=‡Ë¼a¿Š{q‰\j- MÐ̪1´‹4Àñ0"íÕ|"Ž€.Ü1[K«Þ½3%YW»t(9ƒ,žˆˆ ‘Í-´pÕ]aW©\Gd@™'s~Š¾iø^†ƒ(kRf$H£ŠÏøèäJV>6÷‚0ÙèO$³ "@ÐÚ1¢ºß „·0ë‚8¢b¡VÕûã™ÊNr+¦¦žì­<,ø!~†Àðéï ÎGš‚žàŠˆ9¶sμ·(¶SÚä.±)wª&jƒËÎ5±²tf8¶ÅZðUÒxãn·“rÀdv.äK×Ûé«ù=ßJ_Â6 3?Æmd2í³1œP×°ã;†¬aù5ЪaÉøôíÀFç^WɬKÀ{<9êËÍ2Š¦Ti’xî¥Ê!zãn!"¶@ŒHP-Š¡§HŒŒ¨åÓóǘú² #¯Î«üš7–§Úѱë[M£›ÏSÚº›Ì>î#âáö¬E¶ Þb¶Óebï ä>%Úb·7I}KsÑâj.Ô&s{›„O=£¦’d*ú°ÜÕ)03Xbc´.¸. ßœ{X±³ª"Éå~«qµz‘ &àPš××zS„.[†öí IÀfY5Ϥ•CüÀ \«ûa$웩'=Þé!¡ìvP‚àZ^ÐÞV™Ô8bRd`ä@¦† û ¬ÞÀ«¨ÇÕ†XHÙ7;‹ >3)Ò‰1ü&@”ú)>»ûOj³«YmaˆíóÉ ÖqÎÌÜ— ¢ 7ÐÒÆîjÀ*gÈ è’Mœ 6õpOãI¸P^Yã'‚;éØë}êrmZ–xûy¯%k@íB÷Ë¡NwÜ’ç.Å4Š8|ký‹‡A˜ÓÚ0=ó|·;B+S¶Ò±QSy#1â²üȹ5›ø¶=ûYôƒ_×vØSÿÈvf@6Žˆµ£e‘7zzX}þ¢~¸U=ÚmmoÄíí¸ºk³Qiæ  .1”±qVM%Š)ÎFÙhØJ¾·ÛÕ9t:OâïUuE¹Ä}üS”ø—óÿ.gF® þŠüÿKøÿµõ/¾\¨üÿÃÖ ÿßÚg_üÉÿÿ>ü¿;ÂCu°Œ‚ñZmíam-®®Vcs´ã'ªË„ýú‹ê:­ßmÑ_9óŠÉ7¸xyqÓMU•xxó‘±Í^Œ‡g®9åf…ª2—§®ÆPï>r|î§æÜ•ÚcpØû¿øîáþÒ›‡ŠÑ·³×úÌ3g'{3A0nº›¸õ^‚êçÜLDÑða[È­¼ÌIªÈi”¨}ŸV^¶%²øb‘WeWh˜ÜÊ+Å¿—9¯TØdoDÙöwÍ£–É“€Ž`µ‘é±}¸µýÏ­'MW έG {£@_‘>Žò[ ôåz틯_U*Ðr+/½L™„'nÿ°Ù¨)ró¨^ñÖ4ìÌ•KRˆ/∠ÌPöÏð7S‹ôv™;gße“NÓ%¹.6^ì^ cP‹Ü}®Qÿ±¸ØÇlâ!;žK™þ n”>”ÐâÖi¥Ú+M§’ƒu"çw"÷ÿ¯ÓÂd“_ÔàÏŠþ-Óçê ÿ¡¶ Nñ‹Úˆ"%µ&O$‡¦q˜Sw2³}9b”E>·¾T@CGl°“~;4éê8=a32M‚eä.Ž™`ïNL@7‹ùµ²&y¾O›gqð´=_v†ívgÒo+Ê7J8FJí¾˜ƒ2K\Öå@19—ä¾Ný Ùìa¨kž‘pFýá|hoˆãø×ø™à¥¦Þ”ýÿ²¸:!ç[uáñÖñÖÞŠI®Öå\ˆd¿,&•%Håš¡.²Ú:,ŸªÜ+€æøÍÅž7 ËžÈövü¾ ;™ÅEðiðçìδü;K(lPKUÙºy|N²»«sŒP {.L‚ÅùHÂpx*ãÏÍó*PålX$Û8tÇ´šÇííçGGÍýã…å¿mzx‚¶±$Ëp'ï½ ç«qyxb{vÂLº-Ì-¿š1 Ì®w-Dÿ›F‚­G Ö¹ãè7;ìrñæ³OéùcQ¡€2êMûhâ–ºÜGÐM\ÂƲçÌAí%m†Ê‡Ï÷Púòúj jZSMÕùn{{«õišÌÞ#5,±ýüsŒwâövPˆ³£æ•”ªš>Õ¤ýnëhåå6§AT:jñÄuZ/êã"«4··Ë’i%ÃÀ9]î"$¬N3@¸<åw·y¯ÆUl«ÛG"\e?wš‡0sÜßÞEŠîx@Âyã¼cÚn¾8„‘à]ÿûÿþ?–”èðLN5G˜“ t~‘–} žÛNá$ä2î̯ڽ>£{©˜N»ô\§â%ñÚ±î{Ü€ È%Ù €©Qª¸ÊµZ‰x/ðNæÚ³+±G6ºo4 õmg*áá`'Ä(ý™&íàEn,ËQ÷ûƒ~‡/NŒŠßĬf.^€“¨¨Ýáô r‹3~0 4Ý—É`P6ǘZÖuNÓñ@]ÉÇgÏ,¢ >¾ˆ=•SÃel>ª9]2­Û ©&G£±xÔ³î€ôgjªáwä'¶îšDåÌ÷Tن‘…gã Á°qt4º„ÌA†nŽ_Ó‡© Ë@Yp<³fdð`»`™'UÅw§÷?sÎÝzÖŸ¦3YJ¯·uFúÑ9½¥ÿÎøª†¼”ÇÕ%þ= Lmüñ²‡4Ø4ª¶¢Ï-í,Â1‹Uù îàºñ»Ã­ã§Jõ±/€¦ËuÓ㵧ÄÄ!4÷ƒ_o¡iÅAA7,æ£@r¿—e„ ê_‰„¨X+»‘Í䪺ÖÒMc}2O9Ö<¹èL‡|%xšH°OƒøTª„½ ÐëOÑLÇo’ð¾ ‡Ó¡~‘iö‚éÏAkŒÓTìºPЙ„8¤[– Ö?;ãc™ˆåD¦2éð3£àÅó*óãБâÓ½Á‹F’~o”NŠ+®Ýr½ôa_$‘»–)Äô[;V_=Y©­ž” ¯±&" p:iAûâ³Ý”눉ƒõg£pR|×zÚÜÛ{OfGX0ÇÛ”¡7 UCác«¥+³¬i{ÎÙ|$¥ƒQ² ‹jIgdRX`Êõ¢Mªr`qÑ¡(í%RÏöšÛÛF@á2g0ãR}^¯ÄkoÎi+!Œ¨À(]–Ž1gKÕ7ŒU|2s€RQ»{½«¦uËì „u2H ”Õ 7í\žvºoìö“ãÑ•KmZ…Ž?}!~Ãñ[/l¼¨eìun-ÊJë>KŽõw¿æ†!¢óI¼½Ã»L<ä¡=bž²I,æÊËõÚç„eº¿tðáx"ñ_wÃâŸ|O.{¯ûåå-Œ?à¿;骿ü?‚ì[Ïš•˜÷Õ¾/ß.p[±{G¨KÇ™wØkåß]Ö]â@s|ô¼ ¡ÁS¼lØ𶩚—&W«?ÞÚk5U ¾Cuî€MµI0ÚÜþâkk¥hþÐÞ?86J¯^þw@F7‚9"Igïy³-c(êÄ€[X·yiµ†<2¸Fé~Éä'5ŸñÊ+¡©D3é0± +ÑK“·ú¿òÉw´ùÂ÷ ë}Áö… >k=i7Žˆaé­?UX+°>\¸a(áßs9óU{e#Š> åÕKÿíøMÒó1ŠÈ rožõóuË´}¿þOؾºéù‡<—` gÈeKtN¹â ˆ}ÇùQrB Öë÷ý¥‚M@ŒZO²è±¤£1קÊÑ8³ŒH¢ÅÞ°kDÂ.ø«t®Útz¬JIZ.ä$’^%0!ÛÖàE#œ²(´¥_îÂÌ`JG"g¥$ê°¡0ÖÛÛlweÄ c[QÑXuêN玛صšLè‚ä’¸œ‚sL’Ø8*X„µ»Hc«\€›}¹ÁÁ.´°½]¨Ð¿/^àÏÁ£l›¿òæù!^P— Oèj~íäµ.ø,é^Œú?Í5%ÁÜÄ(Ѻ£iài!©qË êëm8•PN YožÄÚÃ.™{´ÓÙá»uq··Ë›Ž ÕìÑ»‡xk+‰b–]$þƒ š/‘镯„a^Wãn‰ÊÑ(¿‡ôâ©ò+®ïþ!”íœCN+&Z[*Bœ%üþgIùë€ü`ÉhnqVm3·"B»µýOù^Alo³Æì%MQ·Û( aDB0ØÖ†]_ÃÝOhµ/øдÕŸîP ˜‡¿¦cäbµÒy·û2Å—òpÓ4þ@ëƒÎcÜ¡óO¶ÿT£ßyÕrÚ ÿ³pr嵫¥·¶Ÿ6%õ<²IÛ}žÎ®lk[d8‹à¬û–Îö¶¯ztÀ™ XœÆ[ÏMž7½ãø ‚à`PÙǼ»Y=ež|¬®œ)'OL8ÇÞ z)?Ÿ0|:>Ÿ§&y ‹«†vp.½Î)14 Gü4Ð!Æ™ †­ÕT '»¬šÐä´SÙöLŒÚº]ìÅ®tâÞ|8¼–3¾H½¸´S"úl¥ê3z!ÇDa2Ÿy Ú™x§3Éé0®NÏXlB‹5è1âxø³•y)Ýô‚£¡pÿCÃ+ÈÔ1„`Q!hêà^v‡ÛG˜³{yE‚û’‚Û¬y$æ5”ÕQü²”Ö¼¿z²ò²Sýß­ê?¨~ýjõ¤\.ÖOÖê“Ò«ø›¸VWtyM°ˆ¹ghíù¨kßΠqÖy·„ÄÏùç 7þ’¹¼‚R«˜M®ï¯H¿VOâ*ÜNü§r¦În¶¹)5’´c(žœA¿Ue,‡8šN†l<Šfz“È×£6›#î‚ê%UŸ¤ t+iõSb<`}†8ÃC¢3Q÷og°}½D¶̇£ø«ñ 7sR–pµä2ñM)Lì%K[x,^`¢Ñ+”4§žxòÞWPß'žmO—ÃDhx¡Õ6•+±kàA˦±PÁŽZ¼OxÜ¢ Ã?SŸZNÓ.tÂæ¦f¾¦S"L]ÙHF©ËŸ`£aoí¾ðn(¥ÒFü-¶VÝ’µ.¿FÇûXѵx=þ,~a×’€f-.Ý× ìðr¥Úé¬Tì—j…Rüm.PtQ, A³é¬Ø§j±L ÊÞ×µÚ…èÓ Ö˜Öž†ºö ®ŸöGõô¢t¬¾ª‡Ôj½´Ø&A‰«<× ™è®ãyËÏŸæ$÷¼r8ö?8> Ï"‡,eȤ—ª]ñ_.UÇ%ëô›‚-PM¡×I/†é¬GT¹ 0†Æå&žÍ§peb:©œxk>:$ñ|ûÓO9ŸXÕ* ñIÂySûêä0VÏ‚%¹‡ûvG³d 0lHº‹´šã9߬1&Ê9bï‚ 1;DÉÁ´ßÚ|q\¿·…†ýÑ<墅ê˜)~È$0µ*:ÂÂ/‰3)[8ó)À#ÕD<%0A×,“YÕêîXpgSjÜ¢ÃS€º—hy¥{£1ŽG9]O¶Îf&¨â¬sŽÌ;ˆÖÒO‡6d=ç ¦šU©Z1Æ.¥ÁÀBaœ3Ôžl{Ž‘cRCÂœAë åíÑvUL½*qÇáu¶3`Õ0¢«ë$Õsî^fP¬¥ºwJ{î¾á³Ëï0}Ûý2þYþÓëTžûÐu'ý‚™u±Ë ŒØùtü{A°lD‡‘µMÀ‚±Œæ¢“Z8˜š¤Ëëdf=öt¹e^9Ïz2â ¢Ê@œ7ê=³3¸Vê¼±Û@jJÄwKE]8ét½I6˜¼‹³xœÅ–QRŽy~Í+œ›‘®Ÿ¦a±üÄH)r@†¨«ÜQÃìWœêã°idèT<Nr?Ó7[¹ÈÊfÇ« .CÏ„8þ–*¿­‡gý[[$™âÊÀ”:'‰#KÒ³þ6ö}²vCõ/>¢º¹¨X|ÝA‚Üû¸šBÞz¿PÉg&ÁÏÓŸ:`ÞpÀÝùÒÚHÃçˆ9s¬4áà屚2»À&Â⯰U9ßê÷4¿ãi._|u*34ëaÚMÈô!âIœ'”¸Œâ*¬c:ÁÒ X öLo•ÜF c ItBÕg‡Þ—µ|¢|Y[“@ñÞ†E¾a+Æ(ºA›ãVÌ7¤]¶~¾ÐAUÚĵ#1vlål“bŠ‹ÍΞ=¹C•çNÿbÌ™8Â_ ϯU 1<+PÅšGÛÓúFmµX¯—^+ømÑ,hòcº‡»Tc ëü¬S»0u5§ŸÐ~t"Íia4¸ö_¨BßúÍ÷G"±EFžB¨IV1Mx<ÐSmbÀ&Õ%¼THàS…wBØ^JµÃ’ z¯Î¹Wî‹–œSÔôÔ›k<žO×™„÷ž×¢f—tyêàåd¥›ù«E3@– xw«aõ¯Bû°ö…4Õ·2qê3k+7BHN> „•‚ŠÃ÷ã±5d²[~£öË }¿øÏ0ôõöƒM$(sTö1‡¼bEÞPoDÃÍH¯a¦úgD"–j/®m"‹?†F\SƪGÂt´Ô‰Oû焲0ŽÄ \ý<ë2X*aF<[2-ÓÞnŽÄžc%òÝV[ãËL}g?ºi«ßl%VGWr÷ª´“v÷›¯Êy5^Š aëÕ-¤3$Jœèe‰µyfZ¬¯²•mäŒÇ×ã"û£êÊdšX«ü*ìíË^˜°Ó„#Ò]HÒ9.2´u ±ÎÏæâ’Cî2‹N‰!kFq$¥ÎàÜ[pfFßØ}°]—徧ö"’ˆњ͈¯±ð(¹š9¡bšpÄ;ÏÿFJš`-1d$3_P¹vŒ#™sA=!œŸ‘ØtTÈ$´lg¦ã‰sé¼ 'C`ƒ/´ñ¹h €ó¶÷—œâWòÒIøG‚ã³KÞÍçê’,2IeXv]ñn˜°5æ¨Í…W^þHà^nUÿûÕ§ìóZÌ59¼Ñ/}±‚î¨ÝýÖñÖÞž5F5{j¨“ziðQxÍžQâUw‹+ÆÍG²_buÜ;ªXs9ܘOó-½ks#Ëà,a¥PÝ­ÄÝSõ 8ÔV%¿õÒ«òÝO\[`¬/â,ƒÆnCèkÏéÆ3ù!fÍøcÉ÷š$hòä¡Ð`>ë™~“ï# Œ÷8&`«=*¨  ±Ì¿‘´Dÿi·°~©É»×çìgXnÿðN<íïÝRáBËiÓKøÌý}öFeA5J¶ú%”‹V¸s%À>Ú»õ²ôü—ƒ‚c!L·—S¢ï—)á9/¤ôªbŒ)¶‰—ú‹½q5Ò +𯭻³»õdÿ Ex0†_R2K²Ö›ì<2»W•²Ð©_ ”PzïNt†Ö8Y3!‹¤©ÏL€#lÁÀ 5(+Íf?µ…¯^œx‰`!ðÖŠ­&óÄ·W‰79†Ì›8§æµšßMh1%럙˜&âä tcüæUy#·„×WbøøÍ=WL‹³Î ³dº¤'“‹7Ã}4<VÀ„M²kpó –¼îo±ŒTºiNK‹Ý/™rC ð"V›˜{h?ßÿÏŽ›;AG EýQÀ¯}UÍéÈ°“óê{+õ×ÿn!Ù¡…¤}½/üÜÏSw¶²—tmápØ¢¹ÿA,›s\¹h>&ýþ¬­îŸü…ö¶áâ¿TG‘ª\yqÞËõ[¦¢ášzd.+'g®”Ãp> ‰§Í­æ‘©,‘0óÊ¢‰ÝýÇÜŒš@j¹Òð'Ì?ÛÞÅò2ÇG»‡ËÏYÐó$Lm5ä0ÞØ1­¼¬g¨¾ìí}g›eã¯7õÎV_Ò=°òÝ:xÓüé÷Û:yó, 7Áw¡w²›jw"ÌÑó½fË19ÇÆÉ…Ãô¦°± "!zn+ÍÍæ‹c–8py2@”p’È·’ï| ÖX|tŸRÛGZ† ™ˆlš) Ã]\ŒUçHM·YëVN:ÓÁµ„+g·ÍÚ2] ³¬yØM,§7b[gÚb¾«^zð¢¼+¸iFЃÖî ±Ãe{œÍ9­Žá¸X>3×&Øõœ”‡t&T¢ =ø禱þ5ée–åTù‰(‡Î4Å8 ªÏùÔÞÓ°xÞíO$ÊøØFó8?Gü¾†½Lä¾×”žï Ä¤×ÜŠ)‡ÏS˜5”Š jÃI#îLh‚.Òõªÿ µÃ¡'àïiÎ+ß¿¿öà«õ¯ØÎFGÓ71¦ãsi8ìº\yp¼A4nÇLˆÝÇM›‰òÕa§4–¼ÔB<ÆÂO¯R‘8Š#;&)×ÇÙ€ó$è›a9aê?µ!¡U<¿¨A ä„ÏSó4=3fb¼Œ*È‘dûÉzüÍ7%Ú¯¥è`¦aW §‡Ð}šÅ†k”™rAŒ¤HÎe’w÷¢ñÈOÛÅ—œ i+ ˜ŽêYÉØÑmçhæÅ+ÂÅ"£Gãñ4!¸ÏÙÏ$u$ Φ›÷Ä„aÇŒ1ç›3žœr ¼‘íÁw¨ÄŒmX&‡–R(±Q´6Jfu$©M.&ë÷Ÿ?\ÿÖ¦p˜%ì¶u^5øôw厔2±¾U˜•ŠÞ½™[b¾òB g.Sä|ßI¸Ç–™±æ µwy§â}­Îöl˜iHpÞ_„)0B&Ò’˜½n1ÝØá#WûþŽ§êÀÍÀ6R.oû¸y´{pÔ>zf„6/\'©ïì$×FÛAV qÈÂõ:gµ¿¾ì\›èò6®-‡íºHJÀ;ÐòÖ](.ÂîE¦®ü°ª‰,Noa;š³`¨%@Å‹ÀÊÉSX¦¼*)˜hîÖ?Ž/Gƒq§çgàüZˆÝ?Ÿqê>ÉG…y'…Aü#&lŒÍIj=."aŽa²ÍEÝ®+yýD_l<›hLàÜaª×¢ÉX†¸dÐÒGÜ=³ZDz íeK™ÑÛþt—=^"Ÿ‘Ðl€¨2­­ÌPD~®à”åpxšISø'Õ 58ò¯Ñ$ñžM¥’Bâ)@SµHmÈû^lm#Ó¡Ùn/¬f©%ì*šöH£+ë…Âóa†\àqÑ´Ÿü) “‘‰\blÀ`<žh.àpr̯—d¤¢VY ¦÷‚i¼×yñÊÌä–ôJânÓîåpfk%Le/¹bGHéN[Û®EmDVšž7ŠküÈ-¶»$íÏk¤e¼Õ„ ‹õa"Îf bÞ”åYTøñÏöqc56öŠ{íˆD6+f^ÇŸÆk¯=86$û˜Ëêܧ¶áBümÆÂ|xU~]W||ù*ÛÎ’0åÿah+÷RÓ)ä‹zvµáü¸®ÖS†-Žg¢Œ·IÄO¼s ß‹­ý–tÂŒ}%!ÖÏôçÞª —ƒáµ+ùQí´H5½(YûËêæW-¼ .1„¥ñï?ûÏ@¬¬Ñ¨š8ì<UUuœÊb2R¦Ñ¦E±7že"ÄÏZÕƒ–…rÜ|•¡¢úŸÔf„kÞV$^þ ¯íEY¿ùFö¾?C£æ9±Ú@Œé0xxIéÕ2H³E\†uRvúœ?*™VÙaO¥É­¬Òrã—û„&ãaüþ0~–\'ð)úO6ˆá°<»ûÇô?:Ná;‡•Ç[Ï÷Ž«ìIt7£žA4Çàãìò¤&)ZÒAžYMûäìáÞ¨•ùéÙ8þiI–½Ä}“ŒAIÆÿL/Òëá0™ÁÌ¡¤0J†ÅÔ*ʧ›xJlC2òÕ‰‹,nLÆ òÕ­+KœÒÇn–ægæò•äEáp€¬‰<¡äP4ÒÒŠË Ã -m 7©mŽ°T÷Bý™ww ùõï^ÉÞkÞ—•—é5fµû|dƒSYB¶ùû'³¿gçÈÄŒT¨áÛ6x½´ÄrlÜîŒ[Ü?‘*bQJ>)õe)®‰ …ïZ•h{dÜž^V«¯rfðe5¿:Ó˅¢G›ÎIN  Ëz67Î눈-{ÁjÄ "oe“ÞƒÐfÂ&åâÔ®üËç­fvYêÓô¶3¸©Ô+¹ Ïé}ÅÇæÑÿ^caÊ.JâQ³Et†¶Cd^Á¬æva{©ú6@܈¯øK£˜)À–—‰ P {Tv§¶½ ¼˜Å#®löhb+ÖîýØþ†óÅ…}[É=Nò&Z”á™iÎ[/žœ¤ÓA­†ï-±2K8ƒQ7þæ›XtZ`4zãþl#º÷w¢ŒG£×z]ÕŸìÿ°aß³æ>²ÆÛø_’Èydºª<âË‹W9t¸œBUã5YåäA~³aÓ ,÷¦¨$œö=( ÷ ‘sy`±––€Hœ8 óž=–ýO¬´¡j*Fšöt²¼¨*4VÉf%Ý›>´ÔHÏÕ³šã(ÖÊxŽ°€òÚt:tÛ_÷üö_k¤Uš—;Ç':ù,ŠøÃÕ¿‘ï牭æQFþå‘ûñ>ÂRÒèµvrG¨rn%˜fÖékEËZ bí`–JnšLÄ”4ËÇñ•©¹±n.…“‚ú"x³@£¼8‹²™9pNµpÝ™l µƒOå¢Äl-ÍŠc¬RÙƒ#‰Ø^3°öJÑ)‡ý3,u–xúV8—ZµÅåñ1Í@ÊÑE˜ÏO‰‘9z¾OËX\k ÄqU¼Ö5ô}{:½/®Þ;„)®•­-yÊ-º)ÿŒ¹Õ+B?xÖ‘@¼/é³8HašŽÔ/±&˜¿T$ÊkÐK,’øVU\TB¾¨@¤zvSÍ3wS׸"ü^ªÄ"J/:Ú†& úHNNŽ‚“BN–" 6玹 <#‘ ±UfÝÙØF¯çê(Ø, Õj?­°S/ü[ðõÞÚ4\•‚§0ðK8.ñû­#Z¡’~,i¾uÇl—Ó-3åÉ’Á$q†ÄÞ^•ÆW¨ögf¢[hP›­ý'{Mcus(è¬g{P›JüÝùgÒÃé„X¼ùi:#BBüüËm€Çö+¶á2J Œ­ðMÝ`û„™Yl”„χܳŸ5G[\ktTq¢åx¤H™¥Vsðw›HrˆpH®*߫ȼ8UlqŒô‰ùch­èß›h9Ò-I)ÉW˜N:ݤš&“Ž8#Þ‡«µrÔ°FË{ÝÒnã"¼Ó½h_j ®§æÕ‹¶Ù®HÙ3”“?„÷«TÐÃþÁq•í?Ì5(‚“sÒ2 4œ_Wq3 Ý‘÷ì˜mçtÄý3ªzÃ:Áþ=†iút@ýûY_³ÅÅ£7{ˆêlQN¼íM4(“ìW=¿ÇM§ÄÖtµ8XÆßMÜ©8Æg¸š^K¿ätÖ°C¶ÄÞ¸¢ç­§+/·íK?¦5lÈŒ.ªˆ8ù6n@Šm8«Èzžˆ’,²‘­Áð¶»Ýv·=VS4m·˜ÇMc: \ÝÊKƽÐ)ñÉƈ<Æ.d¼Æè[’ᇸ‹ÇÝn+>Ã* Z/ËÃ⪠}qB‡êˆëÛh¯´`gl«5ö£"0ö•8™ÄµqlƒÐT4ì0doy¶gÑ€¬$ŒÖlt+ofט„ÑeØ6ÑN­8í|Z]âÈÚ{0DÇÀ«]7 βp“«Ží»u~‰@}W$¦ø!ò¼xáy…ƒ0 0óÊÆcXìûheã~¹p_qlD$½Gƒ«ôz>R~µïG7*.€gÑ…Žd—ô½q*6s²H|n•×Va-LRMª°Ûõ"™"gÕ€#åÊ‚"+ƒÓjßÓiwAá°±ˆ‰;J§ÍYqaçÂ1î˜+”-&1É´:#²E“qeszYkMÅÖ‹$nÒšö5ƒ˜àŠ@ \†Î•äÓùˆéõöv™Åa”ò9\S©T–­wpÈ[_E×ñRïKÚûÛž7ƒ¡IñËeYEÿã/ÕÍþU+Þ%ü½="ÉM j[T0‹Õ¦„³.·å‡XJ ÆçÔa—¯ÛdþŽ;½ÎÄfý6}I,\´Gšî:“­[?rð%š¸“¶‡ÉFqow¿¹€[‹Büí'ˆ"ÑlµàEåÛYç‘8ïbÁäV°ãiÿ¹`È™OŠ‹œ L /oŸ§Ë,oÆï_…úì¡qC „%p¾o³V«3’ÛÔ?£ø컆å°Gáí»ïF&ŒKþE×Ò`þùH‚ïÑÙÈ\Äe!NiØ)©7®ºûØdr`Ø`ÀØ“!¢Fgˆ%Ýb«n'„ÔvNMª)/¹M ºåÁY£•T£ gfUM¼|yrrR8¹R<ùä¤tÂzÏÁÙ«Wªq͵ãËûÆ={U6Š[Q‡˜¬—7´wŸÜ»¹MÂÖÂ.Ý­kKl”è|)Ù bo(Æjr vãÓSµÞ0‰¸'n²ž—4¹Ïæªq¯îi`-d•Â€‚Ô²Öi Óëá ?z³)îWb ¢±Ø.“>Fˆ«œº#ž7æ@‰tk]tc%9çÝm÷4‘ÐåÙâÌ!H•’˜ˆwXŽ¼”eVŒ³†fnD‹Ò!Œr<Ê­Í$çªÏ¯Å›4¢â¨·ÁÊ& Æ\.0ÇŽ „ˆøñë1Ö{3—ÌÓNZ!¬ªÔ£0&wñåê+Öâ¿0j¨{÷±½~‹ ô«E÷¼ïР¶a"tgÚ‚¯ÿ‹xF¢€I.4ªW1ÚbWtÆîY<Ò¤Æìôô*–UÒ¬RœvRoæ휔úgÉ. D•X-+%5[§b 쥦8ÔêZÐqgÐï¤.š˜GºL«ŸMÑu¥l¯Úš#!©qCìú1ÀiÐ0Š…áj°@+îlY0ëLÙxYz±óüPRS<ÎÌîs$vÜ^—QCÎê®3&… ôóÏò¹¨û šü¯"„ ؽÿcîȆ¶¢-‘Lâ5{¯ãv›ÈF6M ýÁçrä䄃7 |ÃèW3”q”\BÖžJ¸s9Æ$±#ïðÔ8g‰„{ðÜ1@»oDéš¹*’»w{I*{ŽÇY‘ÌÀ šº0yb¢‘JÖß”Xò}» |ÎÆýìÎ8HÏ¥XÜP{Òï5@Ä$"´’¡Ñ¸”YÈeÁúV̺Äåø‘\Üâ_nJ )¢~xÊ3£•×î¶LºÝì‚‹Öên$Ò¡m>Hšs?~ʲŸ†,W¯™iÂ÷Ƈ»;&€Úe§/ØjÁVxI3+ Üc ÆÝ÷9¤["Ø|ýŸÃzŽ—Ötî}'Ô›bÐÄVG$¼Ÿ"…°lî³éŽyc¯Än?ãX[ÀAϾ"ÝÈT‰ £qÃK†“Ùµ–Ðå¬i¨ï8ºH:…ê¬ÊºKé°<>å Q­Vh-ÇÊå»ÆZ¡|[øèEèwü àÜf…©ÔpÍ®-VD‘ÿþ׿Ç++h”¦¶,¡¸yºóâÑA‹ØøƹO—|_3öýK¾I ¯eV¼’KÃŽÚXIœÜRmŽBÿ'¤!¨×*ñþxÔBlÕƒÖûÉÕ¬5K&e q»Mªg/q¾HÖ©'•à1 N_½þƒÏõϾdòºhf“Mhõ¥Æš5gú öTaŠ¢m-Ú–’ílI([íæöÓƒ•—/KK¯¸òh머ò]¹ÑÃMõEkœ0+"ä ,~Š+¨V^0ì)½zU†ë†5ß Qwéñp‡óñDõ¿¹8ñÖg¾J°x‡Jq¨!Ä2Jr§Rñ»’LÇi Tž$wv_° &vvß5ä»ü²h‹·yh\¶é•¹n1¯LT~¡À&Àl$•…hèö›_ÞB¼¡^¶Ln}Ó# ' TºKìöl¡?k"¿,;%qç9JL*tàmB$}—Ôxµ¤IXžì?/‹Õ^‡ý„!ä”àl/æÁRÛxEšˆÛ)‡?íh %©ç+p-–T }Ù9¬útœ¦UÑã•'4¤u|³*4’¨¹qùÇœ¿IÄ›R±3Ü8E¤uÛ Q<Ïæ#â Ycüjä åb<‚Àó¬a-ýTw:txp‰œ2lóâª÷M¬4û}SSMòÐÿ¢¾ƒmy‰(¬ þîÎŽ0$§×ÖŽ¾|£ûÇùY¼´Ë DBƒš(÷ì1£<×Lé<„IÒSÜÿ.9§x5ëwqâ±ӊ?_r†VSuÈ;R…OM€|;9XK¢Ä58D—ÞÛ\Ç›œà²‚ì²Ï“QÊ÷Ö«6°$²Ÿy5¸›ÜËàh`O?îNÛá%?¬´ ŒELÄõ)Ì2T›©Íj/Žtæíッ½•—º„ñKž2zØ`±/Xas‹É·3Î÷«Œ»jZðhhnµ¥÷$_üç\»‡ÇÈw[G»`Äo±Ÿ@ ’)¢.”•2Âó]­EHòwóüwà´º1M"9;§lá2v%~‡­!àÇ £˜ŸúÝ8…Ñ(G¨Xh!+¾­«• ñâßËþå'©›KéÌmO;ìôKB(’>ü³ AЬÇG϶Žo0úqÎ}ˆ-Bg·âcŸ¼ˆ‡¸jûúöËR%.qø/z30é\•dF[0 ëÏæ ÝÓ"üRÚT¾lýå;&š &dÚ—°` zœº[[¯š:Õx™žj© ýF—98=ÿj¸ËŒO>ñÛÿ6³éýºµÇó‘ë³æV"ù©{CÞÎâ¢Ê&§ÎËÖetÂ7a«9æ4´ˆâ?¿%܃‰GýŒ>ð³4ÐÞ gÎcn¸«è~ìÅŠ7ª+l÷£k)>«#¦æ$û©ÆÅiU«Õ>›{‡wÅwôˆUy_Ò@ I‰Úä¸8/Å1³ú Ið÷Ò,¾Åiöu—‘Šmj$$‡ƒl”ÎGs Dt†Ž3ëq치/îNúcN.YŠ¢ ÂÛ/­ Ö¾á÷I!SŠŠ>…Rl×+,yEåJI‚º”Õ⌥ÝÒ¸òF[¢ñ¬}ýÕWfŸ˜íÕO­u5“³þUÒ«¦ÄøÑc2è¥5?µŸU›wN9jùúña$ºKjSðùîŽ1шŸìî U.mgÂÕŠ—é0‘]#ê BÖÊ%òø ýœ–ŽàÔ©>ÊŒöá«Ï~faY-ÄgŸõU¹æ»Í]µçý^cýÁ×_®}¾FEפW>Ý”9‡ÖÖ•rÍ`Šè‰“­MæXHÞ·íe›†Œ¯Wñ:T%ø6‚Æ÷VÖÊfhššLdã}”úHOˆÀ Ç>Ó蹜Þ"sª”m1Ûp»©q‚묅³¢TˆûÛq¿gòRNõNüyľ¦RÕ9®6øO3e¾v…ÎM¡óe…–ÞncŠ9îÀ#ÆͶ:Fìã«¢«õ.õõ s´:Hbo ÃË–ŵqÿËq-äìlö££#“œÚËÉ»txOÌðÎ?jxç™áüðnÝ’Á)á°™B_åÑPÄÏ5kª?I>¿0%Ù㾸æS`©t?~BHŒè)ÑL Ï.ŒÁHž6úwWœbDÚýˆs)&‹f?jl,©î"ì—”kpKqKn«×"rØåÅØâQÁvq­Z´ŸßGj¯hÞ° †ýl¯Â]”-$ù³ù1KbÁt8à þè)tNÿxYrâÐ ÒÔ±QÉéX"–ÃO?Ús+l΢‚WO1ÔGkÜÔÉ8í_™@Û$¼]ð™UòN­nûÎ+g¢'b!LîlÎd—±‡-/Ò7ý û—ѧ õ²ÙÙ2ÜvÔ|eÆY M¶­a¹äÆÝÌ•`ú’Êæd%²jêØ—OiPjéüp)æ23Ó¹*g›ÛRÝ£‰ÄŽ¬^ÞØøbÙå]à²ÓLÀ-ô€Y@×l\Liý⟅›ªÒÿ?åöö;¤U?¨¦öOŠôM‘^)'Cx¦§rƒéCö¥€÷ßú Æ5×î™GÐUˆ⸵!’*d½„ŠÎ‹Õ¥ GŽ²­‚ÒÕ¼¤h¸ ^¤Yï Ž&(úPIXå„Ñ r·4ئ‰<©œ2 äå-æ07fá5sHì÷,ñ-~`Øb­~|º¦b”_C`?³¢YˆØ¥7g~üÆŽÙ;ô4ök‡k@YÝ“ÓLXÞå ƒ²%Ùî@¿P*^,7"ÏŽLõs|åöµ מcºg_6ìiô*/Ã">âCß`™‹ðÝ\£ˆˆz¨!ÙH¼ŒWˆ›¨ú§h¾6|¨é üo3ã»”ÿ5Ÿw¦K¾)^òõÿgÒXÈ÷ÿú€ÿ¨Ã’IúÝöx’V¿¬=¬­;›¬ÿúuþC¤ø/¿ü×¾üüÿ÷ÁÚÃ/¿øâ˵ÿZ[ÿì³_>|ðà³õÿz°öÙúúúÅÿõé¿òŸýûä¿û‰ë§ýQ=…úåÉœ­w)vP6@üÌ—‰p* ÄO§¼±™‘<«$¸•Féä÷ù¯d[,êÃm?¸‚­Èès=iü†pFLÛq[=ëT ·>¤Oë 5fÄÞ›>é´á.žæ ØYžë3öNuqÊ— ÿ›^ÔÂìZ¶Ü¾(z{¤ zØ$r1ùâµðöUˆW±Ãk±å6? åÜÔ[v=%÷¾=r_Fü)ÀÊ=hø,þkú‹š€“Q^³øb-gìMì‹×+Œóîif"$ôÿ¦Íp÷H¼Ï¾-¨iïtÜ»n”˜k^€\(®y·¨(çõ1[6ÈX–›ÕÒä¬â ú{‚LÁ''å,`¯Š‘ž8ï¦Is-/¦ç.( è ÚÍÕrtÏ´Äqmý¶´Ìft0_gËÕV¥€íÚëMÓ*ˆ‰}^)gS„½4½á2@Gz¼qfç”öCµkK ™¥HYý (dÑ*$!yîŽUÌ·\r™Ãç¾ãÿŽ3ʵš‡[G[ÇG.‰†$,Ã§Ï Þz¹ÜÄ?¥Íø1¿âˆû›±to#WòŽ'ă°ñA~þY—(Ó­Ò&æ$e?ny©Ø©©ÂMšñN“'ôË=éöÓĆ@^a:ÿß|̤Œcˆë‘½UOzýtö|ßÆâõVPl­%&5Ç>ˆ»¸¶nµ%{ßÖÞ?ãKŒí%n£ÞŠpE|»q;fâJâ0g&sœ—H%ùõ`.Ïf½Ì…ÖʽlâBážAÐH“™_^ð]E‡ã¡îIÈwMH}…«^p"U‰»ºÔàã)ŠÃkš­³†šÎ>=ÊGóË““ú«Õ¸»Rô]cÎà%ü7Ûè_‘þÙŒù)\GŽ¹M%ÅÇK28D¬óäÂŒ(ÈÿÎ5˜³’dž¯ ™ÚõâSÈtÐ~ðn–´Z ùF¯^_|TXEÁ|‹‹PΤœ|e†,+XsX ÿôš°[ýJrE*¹iyFe…¨d?9¿ì/•·ƒ¯Šv$œSÂ?€ì `O˜‘„é®–­aˆ‰ÿuC’flàšÎŽR>mÆÓÄä,á¤0ÆuðÜ+˜<p>]Sªôœ=ÝPd²{«a²$*c\• ™³-÷¹Z7Ce~›°úYíAüüûÝ}°/eM°¬0¼J4iÌ€¬×WpKÅ*`SÍ'0fHY:»Ž ­äÜTÇlf_0IA4=‘ú••’8'0Låβƒö˜šôÀO}NòÙÚÚAæ·¢ËgŽ§¹ÿ]Œÿ=ÛÚÝãÃ5¦G†:)¾+J5¦È±Ä…b¾\ìÙñ[Ë”c;¦\‚FÙ ‰ØZk”Štt¶Ö¥oùáa£ô)= HÞ^+͉ºS÷¶Û[{{mÃ^ËïþòÏ·ž4½ú†Mbv0¸Z¤ý•Ÿ7ôQ DdÊZŸ$|è2 9urÁ;IQËQ 8 £\›²@ŨáÇó”Ó×WŽ-â’ÙÁµ0•Ë»6Mm‚6I²TXƒu‘´Ž{WEß_N¾{ŒXX¿³:°ð˦ªe¿OÌž»N4ÿf¤—t­“©¹{–;2œMœ¯‚}GGÉœä:#õª²™õ¨™Z†ç}S¯í™QH!Ht‘g=4Ux§jŸd¹ '—p~3ÿÞì¾DVšR¯ªo%Ê•¹ Ÿ&tRvÙkAàÖ"³+Îó(ü¥ØcÊÝ€?þÓã©ÊÇœ8ø„z»zÅÁÓ®èIÎ)XÓFõí•S™×úö*xkÊzïì¡€5ŒTà‡BÙu9‡3ÒÙžô†Zlâm8wGã~Ï$ý‘P8‰š¶èÊœvúΘAˆ‚lá[E¯ˆ’¾FwJµÈ£í6<ÏJ‹û‰‰"à0è7Õ<µ™¼¬þ¹aOåìãÍ&ér.$b7vlçœsœŒ% <§5]Nb­Jðß»ìžØÔUÌlˆ÷þiö/sà²Æ¦í46‚§‰9Aœ»¬.æä_¡Œ9ÁÚ£;?ù2ÔR£¤wÒËœä*fN~ÍLA–fš>O“^£ ø$ŽèñJ™Ð@¢Sœ×–Bñ-w9Áª)дx})ñ/âÔ‰ €)É|_¾ò‰‘ªPL”'K !ýÐÉë“B|3È’·(Q| 1.¾ó•‚†@QÁÅïwÓÆþnJ_;²“"þ,û÷®å¼Ò¬O©‹rà±÷òžœ‘¿8aù¤ðâÄS{*P³Ð/ôw!>1aÔLØWQµK«–³õ¤¸²¯£âr™ ¯‡»ÄFËzGIžæ• *–Ø9¾Óeö{Xú¼~1[¤… Ÿ`{á6e~7¼ï ô ¯­¶#¡ê±LsW‘yýË´%¶.ö°íð÷â:4¯&Ø ñ[q‚">‡¥l¹IøœmÔîcZbe8ˆ/E°ÔÀ¡—SI`ùé[äÖ ¦UÑwTq mQ¿Ó‚½³ÁûdIP¼`ñ1x]#V²@(œä[~—Qx,0…ÛHj¢ÖèøÍf>ú¬jÃVÈÇNîèNòN„핤œ[8ý#O%tV.–J.B²¾ h^ ã‘YeɃÙçwÁÔÖÿ—̽´t׉,wÖÏú`eµ|kÜD{ „˜úe¢À[èOiþOiþßDš·r<´±>’çŸ{Æû“ñŽVÕ°ê½Q& 15·’6Þ^¨ûÁXôÃHb+h¯ͧ2j8dS¢ñ€hÙöÞîöÁÞÁQûñÁÑv³?9jšèHuÐA™ H´Ìr(08jñT<6Yn²8’z*@KóßmåF×>‡£ëØ«E~½•r„‹Õwj»fµiŵÍ÷ þü»áUŠlÛ)„w «Õ:Þ:~Þº!œ¿„Ò/þ 3/…+.q½„p4]óÀjÿT³R\‹ÞÇ‹»1¶,ï ǃïÏ‘•7Ý„m,й9‰pð£k­$‚ß,¹šÕ|ݦöE>U¾=@qÍ qÐy¼qÝf£çö$Ûe\…ˆáŸã½Ï7µvyì‰X!xgAI OéL¯M_µén>›ïä²åëëúÑ%ñˆmâN׈[bQÚ&ÀäÛz“6øÇå®÷6«k;‰Éôªü¬ªÙ^\ªÿèu÷¤~âu˜ž‹õw‰§ÔüZ]žŸ÷ø‡+£’t¾¶zçâw\¾ dZ§µúfüSÉx.âl`o]›²Bnê» . >N¼wòJf;èîæã”h]AYeµßu¦¦I Ž(2à‘3°ecl#ëÀôõX“¡ [ïÀÏ zFFÇçÀWRæÄ°µ‚ tÅ¿æªÚþrLÎNúßÞóåÝ»+e%‰ÀG²ä:FHÀG£Þ«aÔÎ$éIù#âG$8J§÷¶CŸÎÙÇ,Ðw8 URvQ<^;Cäûü_N|2Jà&7_"°Á[‰ù’L$¢¥ .ê.÷ùz‚<Ä¡wzSäœ0&’ýuúoÑ·LÄ5 ˆ+¸%·ëPdëÅ}¡?UK­WïĨ®­/U[‰7˜ÿødÖcýÓÆI6ïKž‚é¦ T¾¸¦uˆíŠÃvJ\yëè \î—dé:$.k<Æ\iE»ÜÊ\¤Ò±pˆ"µŽCI‚¨ Œ¾ãS=m¨¾,}¸ð)Uý•EAÄ–m6¸2ÂU ©}Õ);îp$›¸¸²R.sW@ÏýÕÊ×:Þmix¢¼‰–A4¬HBd9ou–ÔQëD’]ðØ¿qÜØµ× ‘GR˜4 Çs ×ø¥ÜÄøýÕ¤ØA|- ¯¡cヱø൵ÿá ƒÞÕàƦÍa‚5ž=q.lŸÃª s¡€0BÓî4A‘ò•˜‘À–ø'‚‰pZ‚-*džzZ¿´Ç,5äV” B³£¡ô×6{µyÇsý@õ ZlÍ·Ä->ÌXÓÊüÍsµPü¬ðÞ»š!8Ý7ìïbæEVHÔØþ\½Þyo¡¸!¾øЈT µÃ‚ëÿ4ü¿¢OýQ!âÌm@ÅøŽ“•ØŽE½Œ 8üB0—Ý‘P¥¶JìF­FÕØùŃk)4nào[ð;Uw÷¹+óˆ%«ç*†LëAIþªfÐõB` ÅæÁkß~ û`8D;¬¿öš¶<²^^ Òò— ýë5m¾¸–yù„-õ‡V€µbÀ’ÖùÏxýdÅ1uå ú`)ƒùàxKi-à+i¥Ã†ïÆOÖ?€E¬“>„q¼q˜OèDÚ6Yâ#$¡J™Dt§íA‚\i£Ô9íWr~ÑÿŸ7ƒáh<ùišÎæo/¯®ÿ·¤E÷šÇÇÍ£V£´õh{§ùøÉÓÝüsïÙþÁáÿ;j?ÿîû?ü·-ªP‹A#ÅŽíõÏû3jÿÁÚúg?ÿâ˯¾6@:ƒÑ|h@ì ¤+¨ý›ë¢!Äþ tþôbÑu¿¨w,¦¥öÞ×ÜèJlú«àº×}s÷Ç…+!¹@pæʆ]¨d¤Ïûñ£6Ã^’ÄÍZü¬û¬sA˺²öõgkÕµ¯¿úº,zð„£,rÂùZoTË‘`lu¤¦ùþ·þ²øJ[‡8[Š¿qJ\ÏUèH]yµOªu#ŒÄÒe“êÉdˆ ÞîÛ·ãñd 6Q©è-y©M¢ÖɈv< Êõ“õ“µ“u¯ILõdD=’Dª…þפ}Y…î<|zeýX0ôï–¡¬T­~5À^¼Ñ‰³é8b>£.ï|³¡!rnÐR#|iš¨E§õ|g(&ød=>õùÊ$kû9Û)‰ Ò9‡-;Ï$tÁ 4HM ˜´â!@$¤ßM$$ÈÝì8¹­¿G|—€D&#1¨èöÊì:ÀÙE¦3ÍŒLŒì04l‹œ|,ÐGT3y Ø&—0u”æAB<²©6(@O‰rÀª†ùrbÉFHøbÜLƒH§´F0‘[(¨Œ9&P-.ˆ.ÉaCnú‰˜”aWÉjÐÑ<çÔhM•ga¬ÚÛ 6fhïëßcõ'xm¼’®ÔøŒïzª#Îæâ•(]]ŸtK&ïLwµlÀ”î•67ïÝןw‡&–sS—$ý¹º.‹Eu¦DÀŒŸ‚)vÞ¤_}ÅÆÝDv¶Ù¿¨­½Ž½,#æªÏo^UmôÀÝÖ–ª£’Í/ãbç‹ú¥æ‘c!XãÅžy Õ—a1|5“ÄTUf#[&òã2È« ä¿8 ¬ðÈ¿õàå;¹QÑÁÈÄQÐ’fHyåå(µéØãz%µu&Α½ÅËγËq|>žÑr¥Zh­Œâg­ˆûç´‡¯¥mn”•}Àm¼to8ˆÖ_/Ç;ÿxrxo€‡¼Ù‰VšD9› ¯¤dÚÙË)ˆÀÔS¾`»#é2­ø׶&:?=¾îNâêä¨$•–ÍTv ,¯ùoé€ÖñÉN¢Âç['Y‹^ˆÁ(ãÑ—…Lá×ð#}º‹3X ÷tx Q«“A \DÍÖ(Ù¢V…gp³juúLS+ÍâW#àÅQ©}Õ(©ÊLs==Y#GuÆ÷"¢iH¬ÿú°3Á嘸Ù·÷ħn&râ-noÚîN&³_Ì€\ÿu5d"ÿz²‘ÝLÿúòǶÏ@¼úkû¯ç¥Â‡öÄ:RøÝI/2½ùô¯“ÉMmÞ|EÎ~ç;»G¢•Å‰øå7Ÿ<ˆ¿qKÏ/¿ YŠP:.?"dC5…¿rŽÂÌX+­ïŽ>«­W8ø“ýçõ½þh~U¶I¯:´gÏé˜òrÂ9EÄ:À;Of©\tŽÇ4ݶi©ñzÅ6JÝ–ÒÕQ9œxªÖ~‚,«ý°°£D¥mZ™³þUƒÍ¸ãng€ÝAB쇅hðo®@ÜñéøôÔJko÷ÑÁ£´è° c5ÃŽ-ŸÊ=ͳÇ{[O¨ ¢Ýê#z„p¹Èó‰0®îÜG‡[ÛÿDÂ@äÅ&ÒìÇš(ÙÇ[G7~×ÛôF‰£S¸÷’·#S-Îzô÷¬Gt~.½w¥Ÿí5J¥s4õš'Þ!$âvóÁh»9}æ•”ŸÅ1ñCý®Âš÷\çYóÙÁљֆÉp<½Zó»‚ÕZ6mÜ…ì\se3½»œ³>ýÑìÆå9Þ¡zÙfzTkI…çû»T'¬@¸Iu\…c¬ _λœSÝãzʈa»Ý|Ñl¾8n?ÞÚk5#ï”D{ÇJ !ˆö›ÍöVë™V°?¹8wíðøé­Nû©ɼä‚òkg ¶¢ÃÝmPˆŽ¨è±Þ¿x(©ÑÃhÿYsg÷8ÚiýðìùñîQ™ýÝÇÍÖ1‡…Ž¶ö “¯Y{ë(¢ÿ'°ü‰ú»óüÙa´·ß¦~?Ó2xõhw?2÷v¢Ç Q“ÿåZÍ ˜¡`JÎ:ÐBO¶··ZÞDùoyTxÚi>;Ø‘g¦…ü–σa ˜úø8Ó§hë½³©<ä§Bg®‰ò?Ídz„Ÿ'"úL‡f‚–4’•ÕyØÞÆ„K÷v´«¦Ç4É„ò/ý¯yÔF§´Õì[nßO7åæYñ_âÇw‘ Ü™@sq™ÑÙ­Z»7žÑr·q¶D[ßÿ32wÏþ‰dë‡ùñÿ#Éîá2ðÙ´»ÿø Úz~| Ôƒ.=€‘ˆ¶¶÷¶·ö"=\Ì mÿðD¼éev‰ðÛvw¶Ž·\'¶©ÙcûÓô††F‡}{œš'É&b~u's}Œpî£ÿÕRüŒ2xˆ8Ŋȃ–‘(ÄO2{k y”ròÌ›OÄHù³¯¢2¡ÍãV1š$8f~êã¼&)ÿÛ;ßÞÛ>þ\̆üíÎÆüzŒÔ‘1FŠ‰òÑ>2Pœ<ü+%)9鹟×)X†Ó™uÌßéx<Ón€gã’Äïá¯þÑx1ÄOvF)nÛ¬æ‡=e„ü“}‘'È°YŽ#Ë¡ìL”1´g¾´äè®p[%~ƒ`bÿIÒƒ$“ðsí.‚ÖÃÌ.'O˜y7äÀ£tòMÛ0£3¯M °î5¦!„ÂÓláR¹A%֞Ѓ¾Aj뾑ç£y›0ŠŸii° ¦°ÆÒk# £y×IiX̃F6&Ï{·?ž§zðøhèag€µ P!yb„µD‹éªGfK‰Ãæ”vÝðiÂãO8°þŒŽÈÁ¤a©K¥JhÌóQçÇç#\úËz-¼M !P\s6–p þ}ÄÉs;’ W» †lHz+Á¡DOÇZH¶v„â‹úÉ;…ç åÃ×ïì7£Ñ¸-ª„©ssGä2[$ï]:?[xn¥FZ¹¢ÿ‹ô­IžØF¤©ðÑ•elØeÊitä…Ë°#WùμŮ Of*Ú™Ar6“ðãD’V(JÌqÜÔ vbVêgãq!Ò¸¥jùœ ÁÙ;ŽW33&ð,IØ$ا÷7†¡çt:6s²¬YMcœ"]IêÛ|°u]jãE§ÄœTâdÖ­É…uG2a#tºæ§1÷9ÇLNR‡D,Æ B÷mùî©5C¬÷i/­••6JÅwÞÞsÌC0>¦üÕQÖ…ú©äSb²@[J†^ã‹Wð}É£é~-š‚R†úûŸIÚ,…G…ÿ•–²ä)þ'}[  /e?Ê!•ík^ר( òïKæl[(÷%sòW†K5äp ^ɱ¾J³oä Í[ƒ’;Žú!_Jzn/|¦×"Â"¤S0ü¯!þ_]=}ÄŸËÆ FqPnÝš1…MÄŒE 2·¤ýóH̦Œ•æ|›µûÔ~œ]»î¨x+¶Ÿ^ôjqPÓOSC•ñ¿Á`“_†!¸L9¾~ùcãÕjCîºJ¯Õ£Q–6µjìTòÞ[8ã9sVž›-»ca£3 Ñ,Þ¾¦£ÒQi©¼xÚt9©qç|„|¡$ Ž‰Ìùƒ2ë‘`µZ6sc—Lû„¯²¥ãŸ©\öÑ>™ý[æZkñDcÕƒçÿðžÝ£}j¬ d­W´shûÊYR¹pðdôo¦ŽY0ÄÓjæÙ=Ú'Û-(§o|ÊV%³6U[ö3øÅ!r¼Þ³{´OæAÿÊŸp¬î¨×¡ºnèp–¿Èü¦Ÿ™ÞüÞ³{´OæÁL£ÇŽ,ÎbUÐß|{¡’¦Õ–ZMnhñÙ=†³eJÊT™ÃgÕ‡üò˜Ñ˜r‹Cñȧ­–ÿ;üü²k /¼g÷¸8*ÓŽ™9tW³}Yx“}á!‚y ~ù?ü92­åÌ“&GÖŠæ—x5ªaóU†0_UWMCõÖë(ùb •s¶ün¡å&A,uƒûøⵤ­k0Æ—?V?­…7 …8¸ s—^=v$mj(nl#öÈ ·;ð†W`a:|{¯Ÿ¢Ø/¥õ—ÔÕWõvý\'ÄVp4=«2*¨ô©@‡™u^crQœ‘ö³¯‹9BŽ[Þbf¤…è^œ'!ešŸ”À²‹½mŒÆ¥˜|Ê<š'ý›Ù:RXwðw«ÿ‡{¶Oߥpª3G'¥3öÉ<èßL¥–vPøÃUžÿÃ{vöÉöUê-öU¢Kyóã6¥VÝPãÕŸÛòß{[êbý»ò$µH,©ŠX"ØåÄû»šûÛžDöUðËÿá=»Ç ¾yпáNóû$ÛÍë•î"_[°šíùÂïµ/3…ŸÁ/ÿG’ûdŸÌîö{¸¸çÄ£¼û+ʺS4éÄ&§®V¡mBaÙ¢Ý뤾0UÃðô/þ\ØIvš3s.SÌ¿§«‚÷ìõébºšLõVobêAtÏîQŸ.Ò<ˆélÜÌøpË•¼ýâSKšžÐ ]ŸðÑ>™EsUsÖLReáÙ=Ú'ó 3½TÚEUB¬úЃ_þïÙ=z¨y1³RH‹£qÚ®²ìgðËÿa“ßîÑ>™‡pÜ^C2tOͳšéJöEæwøÓ¿¼ñ?{ÏîÑL’×`Þ<±òHëdŸÝ£}2ÙaKU3fÑH­ú`ƒ_þïÙ=ºÎKåÅž‹2ŠËgíSØI-&}T]ÖªÀÿá=›®h¡Üž¨zÒÔÉýüòØ…•ßîÑ>-ŒÃ4`Çbô£«™.d_d~‡?=“7þgïÙ›ÓLά… TËýåÿðž3õUu´VÓ¸‚Îü¿ìlÕ%ý7ú]Wwé›ì 7•ö]ø3øåÿðžsfÂvÀ› «†^]ìhλÅWþÊÛ·Ùb™ßáÏàW0¿¶#‹s,*a®˜}´OæAÿÊŸp^´®Lˆª™W=¨þïÙ=Ú'ó` õ{>:.Äý½‰·ÏgÕ³‰ÇÝœM<¡r4®ª‹CÊýåÿðžíªñOû„‡QYsø™Û7›¢2öÎTZú"óÛoR^¿üÞ³{´O¶îJÐëbpCÂun~“}a»éÞ…?ƒ_þï9bŸÌƒþ•?!J†Ì /}V•ónñ•·UÝÛl±Ìïðgð+ Îûèí“y0û#ìþâ6ñd­ì£}2úWþ„³ˆK´øÃ{vöÉ<˜,aô¢9ìöͯÞØ™õ^f~‡?³£öïÄíèýNØqÝöÒ[fÿýbÑ…7Ùnæ‚ûå3(×÷e¯Þ,tš^f~‡?ógPÛ gPÍ Vsz–÷2gñ~±è›ì‹ì j›ËgÐ;TÅôÚ–ù”íaðyé—›ª-y¿¼JîÛeÅsÞå]xëL‘ðg>^„V$ü§6³ˆ oœù*ß\uiÅ›ª-©´¼Jn…eÅs g‹âåB±ì‹ì.ÈXôäì6Q ™GûdôofÕ¥–®²<¬zðüÞ³{´O¶ïR/§¯©í_ðdôo¦©×½ÔëPæÙ=Ú'Û¡4¿??¡ÜOó~"Œdødô¯ü1+*&Uü.ûhŸÌƒôA°<^.õîÿŸÝ£}2ú7œ¦4° H[€¼_þïÙCÚôÔ23™.µ키Ú-¯\KÞÛì‹Ìïðçÿ‡÷ìí“_Uÿf&4ì½Îkhý´š3μ—þ¬zï‹.¼É¾È ~ù?¼çˆý`9OÎZ÷ͺx™Ùó¾WðhÛÃÛœV¦V[”}´OæAÿfú0õ´Ajö¸êÁóxÏîÑ>ÙžN—¨uœÁœÔXò3øåÿpëÁ¿Ý£}2ú73RמŽÖð­fz”}‘ùþô1…ßøŸ½g÷hŸìœ¹–çMLˆ¹FöÑ>™ý+Âñû–È:òJ{³øÃ{vöÉ<˜1øðsFñ¥Õž–+.>»Gû$ ®w0¨I³)˜yvö ß…w)Æ,zÃåË$–<~ÀÝ2Wø¿q³¬^‹ÿŽ7ˬâúmï•y¡~ñ­r¶£ywÊFç0Š} R¡Îÿ+¢?‘ õëã•SöV¯n¼¿ò”ÄW>©¼2B`—ý ~ù?ìévån/ùÑ>™‡ðÀq>zܸ–õìXþ"ó;üé¸WþÍå•Ü]Úg÷hÎ(Ïcq»^U­O‡Ö[ö;üéuFÞø?¼g÷hŸÌCvâ\Ãf朻Éj¶s o²/‚ù’wa‘à—ÿÃ{vn2]gS"¤ÂßjI¾Ÿ¼vd¯!× ½y ¦%u1Ÿ&|;²sPigµáèi2z‹¢ËÈ©=œ¿!µ4G ¢6—J4U/T¿~Å©^þ%¤««qùZ4h¦H*â\ºáJø'‘ŸRÛë¬N!'w_Žß$#›Ùc#~]mCòô¹ºŠ^ ÜÌ‹ gOµ+„kgdŠã±žâÜëÐV¯¥bÖºQ\ð†n¯è›Áz)¤ Lnh¯Œ×|˜Ü–V4ïgع>MLä¯Üú§ÓköhȆÅN}«Ûf/r½áôB7ùc@Ìä° ÷¹ªŸ EÑŠc4šCOã;y±¾Ø ò²×xMÿ¸P»ö¬¹ìq\Qz ¶Wãõ …K\{­¯©„ùÔí•bW”£§eÑøRÒ•x˜«¡/O«~–L‡ˆdSˆlì_íƒÄ.úmò[ ïDî’Tó31/cÂ8.´^`ùǸ‘Ðh>í&ÎaëϘ²âeGrÐƳ>r¢Ú#©D‹œÐòÊ6Òh&AŸÆ—4s ¡ùѵ™KòT‘pèì‚Ê J\š4a”€¹Ù5L¢¬ÅæˇäØë,I³±Xè0wL¶a‡òGÍ·á)ÁMàG¦þ‚ìžÅêÅ0—OcJ­FÌAEÉÁù (}ÉçíCÁ 2Õj…œ½ª{Ÿ§ÊÞKã•Lûe™f¡×ôy˜ž7 ¦B‡¥=S¤Âq-O@—ôMÉ‘ìÿÐ ê6ÏJt©˜¶áèáT"°†Ó‘—ª¤(}*D÷ˆú”_Iù;—á‚%bl…p˜ergU1ì;CTíôÛj4–ךl¢¾+>›Ž‡Z ‡ñÎx!Ñ|íkÜN‘fé×ø”¥[ 晜ÎÏÏ¥ïgÈhˆ$fñ|?«^Åç½S”o;]ŽÍöF/†ˆGZ­—M_-?g¦6ŸŸË~?gšûµs\ ÍŠdxRXÛÅwRþ=rIøξàäuKKsŽGp´æW²ûöA/TX„®\¯%ŸR ôêvbRÆÑçI¬O£ÜN~܆³Vˆó³!ú0r²©öÏÈ?›òfá ¬-¼øSÎ$Æg”—¸Ž£ Ç1{¹Hˆײ¯)HêÏ_È¿F"Š°Í³ø›oÚ[Û̓ÇíE äB¤qNxB@ïô:“™ôqtÓqÝK9=‰„œ¬EÑsô‰¸ÛñKÉ÷ Ñl_~·uÔà,8øEÇc”Ö¡?†A–Íx%©×*ñö6ýÃçP­rEÏw>Ÿ‡ ²PkqÜJ;2à){‰œÒ<¥èàØÎ$ùl>ðszF;B+EfôàHÃU`>@åM‚øˆÑ¶Îó ìßR1(ü×ë§D`®…{àÏ’ƒ¥?S¹È¸±'P¦’é‰ö¢k¢P}¹'í"® `sãÈ#¤áf¬•¬ Tý®â]Ã-ŽÂ|ñtxþxª?UŒeIÅ‹Àg•‰¼$Ä&¬3:ZÙ’ÁåÔÆ‹"ÀYŸÔA_6›¤ÏaªÈ_ªÓoïÚß®d½üEˆå«R¶A{À÷ÝýKl] ̯íøeúV“¸03j{­„ug÷ÈT: ™Wî3>¿tQ8ô >yMñ*ŠrõŽûlí\š$eÙ®ÙŒ•ÓîEF5n•ZÖX[ÚM´-Ãt¼Á/‹ aYyVÏæm?·åœv›·7,%hÙPFš?|RIbÙF‹M+‘èVÃÞs`¡Jœû k$ÎQüÃxÎP”ÄDß[ Õ Œ“[R¸æA,i" ˜¾©ð!É°âÖ}¡ãæéÁ³f‰(Éc*qÊqYؘŽÖ¹ú”ˆiÊöíÎ∴þ(£LRâ?ÜHy¼Óø¥.æKV<Í­)¤ž’ó¤‚çäQK¿üÊZE{à,)¼úHHP•êɾJœÎfJ9ƒGˆÝ¤@Bã4÷ˆšJv¬e»&€×uP3‹é—ï¦^Ñ¡c§&gU”ÉëŽ{8ü͵‘?9RÛ3¶÷ lk,_ݦM-,5CK}S9S;ªçÝnüÒJ%0üp®y·,˜ÐÚâLr¸Ó)^nq.Bp7¬\Su39â+Âc§ÅÞ¸;·ùꂪ&Ë[àìܪºµzCëáJ€¨ÇPf}á¿tCè³Nɸ›S;¬)ÓéWGd°€o`Æ;6„Æ®»Ù¾lÛYÔ¸ Ù.¼íßTI a3•`ˆ{S¥4§NL\ç’:ʹZNöļ8TÂÂ2“9/ˆÌ¹)Ž¬\Õ/œ=™©)˜"^NMõ[ÏgÀiÞAýpGh#rÊŠ=0±>ż–‹ZB—9Š³~Öá>z¾»·k¸2e9°¿­øK@¥ÌËó9±aÊE‰ùÓƒÖ±ŽŒU¤UQ‘²z^"di/XnAw WzÉ0”*Š QŸ4—wDak(r-ýÐìšç]~9©+séå³6$Âÿ;F¹,éM ;£5GÚ(È ‚^dðï€j’ëK´]’FNòªå|c’p\ƒ™Pu11ÇèqsëøùQ3äKá‡ù¸Â‰åµÁ7ôKcÄ>jÙ×/4á¯â8/é5”£¯ü:ÂÕW9à+h#DTc(x¡üñÊ|ÔohÌïk…r0’Î] <(wQf«ev9)D¶–ö ´Øp´}UB©p¸‚üóËAœœõ¡™.3ÏW6ù] ùæˤ&S¿».úmÕF¿]ÞŠ®ìTìRȶ±OAœ^ˆÖ±»0ŸOœ¾Š!Éì‹Í ÔËÆá?Ÿ´^i”:½íô™“#`4Q…ãøfkó˼ÚYLC¼ßªÎ¥¹a8šW ª†¼ñb+fÖ4R0Îþ7±fWÅ3öéŠÞÉ!¹2týXÕ $ Ñ…æÎl™Ÿ±—ìHÄ¡ ÜB"ØæKCzšÈšWiý½3MéŒç³mO´œrüX*»€X H#=¿ßÀÝn%àUùcx4‡`¨¤²÷Šèxnè´éçÐãv8ù¼ÃT&Q¬%ʼ³Á™D8:QŽ2 +¼½í€{ÃÔd`(ÀZ®…gƒÎ9¶·F˜F´?zc>Ub(ÊâêÞ70D#6ê[t–;|yî†ãŸÌ€iAS Ëë]vY@hu÷Q˲¿!Æ„VÍ;éŽéÈà)xú&6ê¯0ÞÐ[Ž·ëÛŸ~Êœ×t õø83šÝoÌ!¤#Êô܎Ϥ.Áè–ÇÅ+±Õòp/žêB+¯ôŒF†¹Í1"m(ïüš<‚L=.^–™ðÖß94¦ŒþiüyÌùº§ýžl bPúÐ i¼õì+m%0˜œ¨ÏªYÖ9¹õÂp,—Æ<…?SÌ=ÖÍM*Ôšªï>Ÿs?¾Yš€æÛšaËpé¤9…ÿðh9jqËxùºq‰å«ÉÎ4oOÅÜÓ˜×ý§h:ùMnäf#“ ­Üî 5D›»³kÒÔ^màÉ‹Ýûï»&ã½âÜ»8{û”½77?îfÊ´¿w°‚6©!rk$÷4®}bWkeœq û‚‰­†±R³þ[cz›T{!„zÆ[†ª6i?ÿxRc‹™Ÿæ[ÏûñV\¨Õ <Í Âú]¥—=´^y/to±A­àµ[ù#êü\¯Õ~>ߤÚËÆgÁ 7_(”?pJÄ(-ïk^+ugo› /½ ô‹6ô.Ð|˾ÇÝ¡‡ŽÿKì?ÐÚz§ýAv½eºöËD{_¸Ô‹cBZ°ïe-ÜlÖ ÆÙ[Jý ÐÞívvL13d¯( 9xzÔÈ*´·"Ü1VP’E-l_»ÎÌf^§äï²~øþn´²¸«§÷vI«9s™Û“Ûf'¬{ó$Õ½Núä• +fº"æI!i"¢äSÜMg©¿W+`±Œ¦A¨‡eš=1dZ¬}æ Ô])âÔ|ëMêlu9sÈ un¤ÄDxp[ÃÛèÒ-{zƒ%êhlç§3Ë^nõSÞ9[c„©ø9Xˆ`­Øä*g­XŒ…â;f—KôbÖkoMUOÓW̸¼yj_ª/œÎ…ÑyB23»;NÛf¿]¯}ñ5.7'×S–{V¶Ëñúƒµõøñ4IâÖølv "óxL‚9OP%Þuk_J»fäþ“w†z©ÖãÎ.Óº‘8:‡ÎM`sf“6v©S\DΦýSð6¬y¿æèþ:rM­Ë6Â÷ -òÿ‹ïßÇg—õ7ÈPXÓÏ7ÕFîŽ.lMˆ6L¯ÛF7¦Ù×׭V#µ3þ‘'hPcËþ+d- ±IªF¤2Ö{'˜ŸÍ»]Úaä–×úJ9zç'9oßÙçj¡¸Vxï%;'¤ê¾id3/‚Ŷ“¯fb õNÐœúal‹¸3ekVØlˆ¾4%ÂI)N^ËŸñÚÂ0°AÅ4˜~ÂîsŸ˜œ“û½pR8Ñýí\sº¿.Ñ”>)¢C1_˜sûö“Ï©+ÜF0.¤º´“A|ºry„À’¹4ö zÄíœØ[xÒ–~ŒW?-¥bøšº¨Ìü"kÚ·8¾ VŸ2=£}Cüò'ç¤ø7b‘½)h;<÷šÊ<À‚!³´Äµ/Ùöª ‰ˆ9é{Ö-Íöÿ{ïXç4ÇdÒâ ™eÚ°F`,èÉ:Ò{ òËNº!ãPç‹ë?ÇõÒ–ã"Ñ=×ÄZÄS§VëážØŒ½ ”WŸn¼'Ò#2ûÅšÕÑ[3wEÛB½siH–´@Ⱦ•®8¢ÂÅ1Ea(¿39±ï¤ÓÉR ƒÎýáÈ êOÚò›Ó‡\A+…bÆÀXκvªWù*mý‹ Õýx'a[B°X»‡[õÝÃxeÖ†ñ!N=boñÖ¨3¸Nûiý@´åÌï”}–—a‰¡ó‡€wød×)»VL—ÚýI競íàx\Fº%bÆâKx2 6w<ƒv‡µO6Â(”J±ÂmS2õ¤ÿOÕÀŽœ}±ÍçDk§É\Ô­­Éd”RÛ­Z ¸§öq§Én×ÄÊDŒ÷¤E5—Р©‡Ý½ÖÏâ¥ãúÏÌð ‚É•2š±d ¿Û:Šw÷·÷žï4[72Ÿ7þ‡CùŸí ¡Ð‰£Æ[!0“:M̬÷ÔäÉ3'tY÷mظÚ.ƒØåYÏXt½Ó펧ÐZ ®Ý1”;ìßæHzwW2fïo!]×eÚºmâ2`ÿŠB_@è#ÒÍhëäÏ€'œÅÑ£> ž¦^Yª2b¨u/9KkqÕÚòz”] ET_EBi¯x Ž}Qñ¡—Æ»¸þ­œ¨wy"EA_ðú©‡Ög¸“*˜®Ù—£1;˜c~š„GÐM¿í;|$ôô&)Œ³??øKLE7t¯¥ábÉ™¢¯¿™ümò`çáî‚È8™ÜÆÖ9®Î]ü Ò"5üÛì£LÆgˆ~Á½¸ß³}°­·‹ëº§&ÜêŠ1ƒ:„˶i½æ§ñ°õŸÍã ÌT×ñYr‰;³áwE¢Æ]ô»,¦cýîLCQ€©á•ò¦q'BñÃirFíyý‡Ù3â-_»Ý:ÞÙn·q'êUàçÒ•»U¯ªê ’· Û‚ãîmo™ ’A±@xtß*Àè>c€÷ÉvŒ>Ü3‚3ŽÎâ1œ‚‡ê“ímçnk牗ŸmÔ%&öŠkšõbD£áÈÖ™L/Ì\t'ƒyŠÿE„ËÔ︰]0#õ#=¦îàêv[­½®umRaÖØ–h‡X¤ Rôgp%$!IlŸh*—ë”ÏAÚó­Zpª……£ƒËÚNw6ïó`b!6Òl }Á¾í³Î”‰ƒ!|ÑÙˆGP-$ÔG_Ò³ÃÓŽÝ`•â:íÜg^¶±QˆL¼IâabWŸ)‚¸H]¤8Æÿô݃ÍèýM³Á¿‹šãÄdŽÏ*¢ÿ ú Oêý­úÙÆçÎûœmÎôþvü)ïZãŒmÓ›wE íÜC•IDg÷H¨ŠšT—û=?<™g‘Ó‚O;šFð&©EÑîŒCÇxšîÐhB¦V,&*ºƒ¨Â-Æ„Ô»£·&6±(Åqeœwð/þ=2ØÈ1€>ÿÖ›"Âdã¦ßz¾¿õ¬Ø"¨mÂá 3ƒÎ~ÁVàÀÃû­¿^±?hWÍ%ͨÆuas¼µŸ^Gú}ÈÍLáŸÅ2g>z3_Žl©_gz·:©_'½[·~··Ô‰Øƒñ´?ªk… ×^x{ ¿¬ø|1ÿmÿåtØT=øϧE8ö¿Ån™a0Ìê^æSØ|x„ˆo“«:±/éuÊž“Þ§ۦÍt(È ûg>åt0ŒomÎüé§eS¸¼ãt@\Ë oþôÓÝæO¢ã¬$§æÓ’."Œ¥Q£´ó6iï>n5ŠôÏfÌO‡[ÇOÛ­æáÖÑÖñÁ‘ÄdIU4•Ð€\؃aäPÑÁ¥mkàÌl€PÚˆMAc¾¶4IZhþ'Ÿ;ZŸ5ÆR¢µcýHsL®˜¹úñ?“dBŽM6œ‡O`H§5›ö'ð ¢8 D&¿]Ê ×62Ž¡ù$ BX–ðŒ£‰Í ß½iŒ•ð[œæ›Î¦€¶p©ùÓ|<n”ØÁÔ'&i‰yêTÁÚkæ˜ê=ã0—âi!þÄsil:'į÷æbíilUËe¦óÉ„ŽsŒŽõnöìk£åÆâ«9ïÖøÝpNÒùšî6îj,±™p?ìþA¸µ¯ fé{‰QËo<ãm„VïËœ¤†ˆ˜cNçæ\uaM\ÑMbó‘ilâ…¬ž”V½Ð˜H¨1s§Wƾ½ÖKõÒ‰þW*ÕÏ ¯‚þÚ¹Ò™å—k& «ú/.‰È%mÎE^ã/«¼TÖ*æ2¢¸€D¿fÓ¹Êìlz‡ Äý=‘pËsâÆ`ãÌÞ¿f,zH÷²Øqƒ?óÌ¡[èÅ6þ1~zRÄýBì:¼RøŸw9˜ÛØ4²Ã§Í÷y5Ö–×X£&¦‹úÓù¬9kiú³R¯wIg4Ÿr'c”5ˆ$›3Œ!Ï cpü·˜’hüRœ0QØDË/5®÷T#mMD|)H¤š0q˜¢3ƒñøMg! é† "tù¾Ð~¦ÍÖd;Ì$l÷Z9‚Wëò*8§¶öï>i·v›~ð±ùçâÐÉubh*©9FeÀviC<`Â{ sSÕ^ßju¿°QÕådñÊå•*Çw€&¶M~â q0—ʇ s×¢Æ1å`Luo˜™’ë¶d2ëå¼(ôØÅH©wha±R¶1äÓ0Vëaêõ¨1Í2/Ö ¢dô"yØoσ³¹„!=ÌT:û_°a$ùð“w ßYˆŒ;läÀ»JŸ3 æËLwªøÅæ{—]Ášdr@©Ú—“È^/¼»û˜Ø4É·4Øíä²WÚX6Ž¥…I¼‹²1ùÕæ ¨4üåcÖÛÄ(‡öÁK"×KH–¤wq.—Ø„h™D]Xb¦h™¾/&êIÏ¡ÂO;é…Äfƒê¢&qÈ´ÂÁhˆE0¼é}k(åc܈}Io,J‡Î¬Ç;ÿxrx'Ãù Ã:#\¹š&çôFb¯Ö–#¯×}‡ºgKÆõˆ+?hæf„Í­`Uˆ¬ûæ$£¼€!µÌ0¼lž¹ÿÕ8÷Ãb ‘\z»¸áZ⃦áæ2ßzo%—PF­ªî!迧³Þ Z»(ÜRn>¢¿½ÛË¥×ië†(j‚‚0#Éik4Uƒw ·x=“6@ÆŶÞ$å:°¼%™\1ñøˆC­kxQtǼãAOS6,Iæà•%—®ìMTDÄ¥ 2`méü¢VÀÔîVŠ®;»ñº} ŽN¡šÈ ÉF)€J´G3jÊ`JfiL—n:ÝB ØuÝÌ’Î(³ÒFSë×4«²y:á0otÇ•-—¹ Ó$—2}&µ˜C#C‡ïÝ{ý3¸¾Ž4öÿ%"Y³RÏð¬$›ò9ˆÃ†£óÜsÛ— I y{í½æ"ÚT¦ˆ¾¥"A6 ¯`![ßvö­Þì¨.:£ó¤'†¡ ó¾q÷¼#0¬â½ü%ŒîÉ=㌠ŽGDÎ7$,/_¸Å’Þ¤Ž»á~~à@Ýtô‹9u±£{tàÜ»óðY7L¦BÛéwH"–éÕ¸£Ðî|:•š Q*ºÞÐ[«¹MÖ“NâÚ=ç8t÷^¢$ò¹³‚Gþ!†Ð?¡ 9,´6«æ‰j$a5`V-£™4Dä‹°ü6sÍ q1ï:×˱Ü/ËÝJ¼%Üì|“]ÜY£¬WŸÉ(åŒA.­@§{]ó2±ßý9^àà˜ƒ×pW™ým'ú_ É|x£ÞÎÆFöƒÄŠþp2ûšïƒ#ÌÝÒ³„(ÝÏŠbðÉÓ4+ˆ¬ÅÊÒnÆ뜕f:ôY[þ ·ÍˆP_œû,ßQFÔÏ`§}:îñ•¬È{7Úbó/1‡npä¼îdÒ(Mµh‚Ë–"— ߶ãj—¾J¤V[*×{‰«Âô[ëóì²AM4Þ˜EŽ˜k ƒåöùhÞP.4|E’í³3¿b“»(ŒhêÂŽÚôˆÇéýÀoe¦³qõP@ƒ_WÓ _2ôÔ‚æµ–o§âA©Å<84¹¢Ôç0vQ^@?¯BíWj¸vç†Ó „ñþe ›e(Û°Gšf­îe½!Ÿ¢›ÑJìYˆm>>1+}Rpϴ䙟üfa#JFa&¶çµ§0¹58gq·Ýó ¢í&½ â@¯§’©nÔEÍ©X”ô¦Ë‘D\VcGkü>Mˆv¤l„y ÃJ¦El“&S>Z­= ü/„0I”mÑ°ÌÐÓ¾Æs¶!``Ss¼ðxkG0Í9Ú¾o>iš6'´ Å•°‘þë±Î Ìp×Õ¶Sr/õ™ðá!ºì ÐèóaÑÄÝŠãYÞ )2f¢œ.û2áÙ-w©E~À̼ΦóÑÃØ3CÛ…Ÿ—#/¸e|<Œ>ÜÁP¸l&7ø.”ͺ²Od— ~œç¡‰Ó,‰œÃ”Øž,˜MU-™Ê¯oXAÅ×w€™¿2\_gS±ÉaÒaògÓ&Žanã/797ö×5Ó£%)¤oDŽ, u=Îà ¯òo2CÉsrò¿1rXÝ|áä¨ÕÕ*s¼‘e^ÝÈú#⩉ fùü Müx„Ë-ÃaùzhõX×<ê^;|˵hÅ_ª–"(,®‚NEéEÿl&Pˆù!6bM¼%º<¦#m]ŠlÆR’SÏ&ÃSDä—ÔxSBKÑmN1yâÕ»¸ ºkå‰z‹Ž9ËG2¤Úæ˜ÐU-þÝ t*MïU,ŶÒk]óÂÅþ®Çõjýùd…ñÿ‚ÁíïF/²E—‘ ”û8j±$Á½Ÿ»Þ5â…£7æóí[ÒµñÚ„™ÿÀ é änF0¿`?ú’íh>-ìF^¤_°pÎ^ô§Ïw݉\V¶Ï–îC~þ}·!7yã.Ônš*fêï_w J‚¯;nÂÅÂ˶¡”üÅQÀ,ߊšžÌ_í`/ê÷Ûw£ßÐÇîGÆo±#þ’=é>.ìJ]µ_°/ 𜮀üºëîÔÒ²ïtöt‡ê¯ßwj£7îR[ÆíSWÍìTû榽*ÖîŒ-z}'îöœ5^“]OÙ/lÐGÌv2Á‰o![áªkk— ‰èj^Púp1ª*Pc"˜Ÿ’»Àþ´ù Û趠˜#ÀpÿK+Wô8„Ø(¾ó_…¾dØnw&}ý¾QZ«­=,a*C²îÄçã±° <ñ瘨Ùçà‘h7+È–LËXÒt Ù‹\O[áš~Ä© ΣùL/÷Y¹6¿A¨‹©„¨ÐlgR°Âëô»˜Ía´[•˜}K‘)×¼B±ùè %_¼²¢y´û"ΖÞ»̫aÿ¼Û®!û ?I@g§Èl–rxŽÁx2¹†Þ¯›*ȇ±u{ÕJ§iπ铔ÇÓ7±º6ÑtVÏ9ý <ÖtÎÒËÔ‡b@øn4ÛÂ/Ósô õÝ‘v`Þ=ÍV™üS&7²à|:žOâU8;Ãe÷A«¾.ù»pÌd ]°á…ñü\Ûk:Ü;£Y¿K jÙhäS»Q2ž§TÑ‹À*Ô³éxè*ÖÒ‹Îà—ÁIµéTùÍ|µîS·Ä¶¤}\ˆžNü¨µSõÐQÁ߸gYµì í_»û­ã­½=£õòNoqatl)zÿ ü …»Ýñ|$dŒ¥¸¤É‡“2Ž §ƒÑ{ɨcÃD#ªÔ"ëòƒÝÖêDÄkuü[ÙÝ~U‡ ¨ ïtüpÁþ²ŸÂ×nk jI3N×ù¯I—˜1´9hÉg]2û™»a¶¬q4›ÎÇAëñ+[ÛñÁÎqüYíX…Hb®ñåHÏ›è|00“¹c5WŽ˜È!°z»ÙŸ9ò”Îèè½EÒ=…qjóÁ×|· ì"Lð¹Ù9iwŒGlÓ¹oh „Ù`==Õ*‰¶ [ˆɈI6×ĺ1è¶e&sêEíBÑì]¥û®´ÜÓ†ÝátÎݳ={éd˜žß6«¢sÍ0ÂÕ6ÓNX?ê6 #Øàj´”·ÈVq®¿Á—ȃ»öwr‰ØD¿¨¿6‰²Éèæ^f·hÑŸjkȇ­hvZnøcÌá·?àFï¢Ïõ§ê# ‚ŠrßÕ¼¨÷mF>߀Ô,BìŸÝ6+Õî ],pB¹º·`§>^  yi3ë†jFÞð`Ü­¬¿[J# ù”¾qãðeŠÖ•|ªÓ¦ ò¯õ@V§:ïÁˆ ËcO|"H€Bw¡Ÿwp‘¬ñ~ñz_I¨‘Xü‘—sŠö&øŒÑ’6žÎ*–wát¾Â\„*µ»»ŽBI L5îÀskb/J*ÖA™ 0ö†„ò\3O4ó¬·]ZÄD ž—æ/ÕúâÝãû©¾„Ý~õÅ€u!ëš?AîžMnÏ>Jz5|FVpõÞ3sBÜ'ÔÔƒÞL³Öi¾}þóaD$¹×»·i•†ôìÚ.lû£7©/835!y2Õ9PÿVßóÍHNwÔÖîÌndÞ5JÅwúê})Ê©ÛÚ>Ú=<ªÊ«[kîloõ𯅠O_<„ðôá\¦‰q)Êsßq‚;£›T@·Ö øMË?ÏGiç,ñîúxé4¿ž$õ;&ï D´å_#2~Æà𠺋ÝG¨ëœJ¢c5¨ t&ð5ˆšƒ³F)* [')?%¨-qO'…“û'Å“ONJ0AÑWÊ4eµ"Úñå}‹E0ÎQ,¦zÌoú$>¹wKó Dí£J ´”ÛlÖ-.Õ+Ém,0\ˆÕØÅÀ¡MqzšÈÄó+.U‚,gÂÒÀdèî¡Vºº§ÊÚtñÙ@KLpÁÄñë!Œ36%à€r)Z^SúÓ^|Î\§M*2$I3˜Ã¶Dê¢+ɹx ‘Ó…âL¥JÉÐÝwkT®Aºa/!šñ œ;B£GªŽkõtì§ì*N?ë '•˜ëA#ç)ø¼›‹«‹õ,~¿&θº7s–Þ-qP‰¸-ç6ð: mV‹«œ€÷…gJ«Ñë÷ŒDOÌ•×ÞšÓÌ‘´;Óñ„Sî.Æ«ª¸,G$†°{’>“Ò‰SŠeÌKµ]ï͈(Y ‰;¾`³4@èŸUœèBI%6Z¬©E*¸„€P°¨BMqlOÔµ cÕØB´ÉØd™V™-WG]éb©ÓñÔE¨UVt9‚”œf…„’^2eK@UXg6¸,Àu¦©1&Æ®³ö’]¹/†ÑfF bs¯ c¯‰—ð;*—,ó:*\«Ÿ6r„l†jòö‚çÕl i<÷ãÌMP BÚ$pHZƒpË]‹C¸a —öË‘i›DÙ7 zÃ((%‚R8Žø­¤Pï2‘#¬q¹'åsú—H¼*xþÌúA¿¶ µÿ`žçz1^絫“Q¤X60ÏV/$¶ì(¥µ˜g ¥cúÃNNY+P›À¹¨–â*͹¸i´]8wÒÌè‰È µ'ý^ô…Â’R´Ñ¸”A‡|A0ŽWÌêÆå˜|¸Å¿ð-G&I/h”«xf²¡n€ž9Ô;7 é'?~’©ùÉæ2-µ2’²9‡0ÁÉÇ*>¶Þfÿ­Z¶;&·õ»sRü$SõÆþìHOIîüNÌê#«aLJ׬L/ULì"P¬3´¢êuËÒF£”Ö‰‘(¾ªòIý|3­oŠ¾X¯—¢%=öí”—éöÕf¹h*¼Žø¶dúéÝzinËA†zc½×Ý°8`¿œOß lÏv[­Ýý'*¥Á[Ö—ÓTgaš|±$"¸§ì’iNŠï˜ä¿‡y«Vç ´£sÙùª±œz9µ .‹8ÛÇ2V±Ñ>6§N W·qÒ EW«ý´:@d%âxè_ϸpØÖľáªØ(Å™b¸lÃø”BÉ»™Ç|á7L3Ä[¢Ý L”±÷ýEvòãǯ±oë閫䯗3É,…ëœ_7¿jÁ[jPhù}VÔáë 6¿L…Ëu¥CÛ¤P+ñïÄ£‘½¼#(0º+é1 ¡`Nø§ãËä-N¦ªDáRÖÕã’´À¦T¯NpÌ"ÑaUl‘%ˆ—wö§á8Þ;ñ¿IÌMáÅx¤¢V Küf%bj öáÓù@ÍE\ä؇…l‹´¸£±]ÚlŒ Á|Ï·y…p 3OV¿D@Îñ™jt¼jïeÞØE·?3×9{ȶ¥6mzNÔÜpo>^Çù6¡Ck¸\þÈ\ ᶌ Zl™©FÀ(™¹Ï5Ã)d¬$\ S"v±$øšyl"ïs:œÙþ_qó1*ž†ÛtþX…<¿§õg*óãâä£Ë²£Ç7vÁ:þ‹žoݳR_ª*Eœt³˜íxt>|¸òNÑ%sJØ·ŒÌê°m€ÆYÀò†‚ 㟬­~0ØÓgºtÒ½Û(ÌG”Gúá ÿW "´\ZâOvXúOº²œ®³öoFL‚í“ßçèvù8Ë6‹;9†mÞ·ß–ÔdÄ]˾ÕaëòmüË"˜òD–ñó0Çfˆ®“t£}83/L&7Àì (ƒä\2¹ÃØ0 X5È3Ì°õƒÁC‚6Ç^í¹Ùñç/éáSŒ€ŒÓH{K‚·öš…X÷ÇÉ—q[M ÑGÛ×À­ªÓ«²f]®„«“[­kò*-·­yöÏÝ£¶·5²Ö5 âw¶­É©'³zzv {”_NVM‡ÌÍ9ÿkŒ³áp*¾»Ûp@…iCIÝ3óõmwûU5ø ¹ÊUwI†³‚L1ˆe8Ÿõi9.‰ñMXæ¶ïЂ™ïkk«e›(‹›:lké-¼†×ÈáöÆÝ)Y—~»¾½¸VwÓ@+<¢ËÞË¥·í‚Èùwíº ÜŽ·°ã~»ëvm÷ÿÄu{0GŽÊÑš~Á»¡?ÙsÀ{/wîY‹¬Îå›xˆFø‡þ'”áfY]|”t®uÿÍøé­ïÿù+ðÑ%—¦÷ ùú'¿¼œ_–Y2¸õoÃ*£[Å°›ÑòUÿð­Ëh‘Ù¶úî7–¶ãÌ €rã'!ù>ÞÒ¤øîÙÖ?›U(#ßãŒHcbéðª|S“啃-¬®%^aN†CÁíǺç“ñi}R'Ê“Ö_þèEþ¯·á¨á§>õVð$Â72ŸÕ%@eñ7ßœh¬W¹¾nˆ“@zÑ™°Ýû;¡ô÷¿ÿý¯ýkCç !?K&Lì}ÎjÇð8¹#lˆ÷–5Ñ/×^mÄMdÛÀ$Ól~GËîßü¢JènuÝÆ]*eh lÿ®QÂꔢ8À}¼ÍÛ TPçëóÊdAå¿ö¬ýhkûŸ­½­ÖSä|p7Ô6TPÛJ5R366õo*qó_Ý-®HᲘœòe¯{GkIMˆ¤J4G¥™'óÃP®Éx0`#$–‡¦ÉD,– ÕÝZA‰gŸ@6J~ƒ%†À½FTã„ePíygÍÔµ3Çì…1¥B<5òYîŒ%UVXÎi`“/¶O a豓‚«±|˜5CÜŽt†°S¿îõ9›‘Z´íž°„ó} G[ѲNqS·©}öiA5J¶úeÉWA¸šUC; ë‰Ñ™Œd³Ñ¬?»6¦§ª# ‰Icö7JA"bjB34JœŒ˜ðïîé\*/ Àíµ]¶„…, 5[t¾Æ@€-Î$bk{ï`{kŽ}ª˜Ž{Ö(ï;°‘ë ªüÁwç}_xO½Ûz~|#LÀÐÇ< xÊVQVÅ<.©‚ÎÞÔðÓæÖNóHáÈ%$Ú2WD{»ûôÀÅcN%4ÌivTxÍLÆö‹X9»Fcë(ññvðÏM¶µ¾LlŽ]¨Õ¨ˆŸ¡uÒt>œ°íµó[˜;³•(4¨ÝþÉÀˆRÅ’²1srÜ·’—‘ÁuÃès¤·-÷Ù‹Á¸$Øyˆra‘ `ìÙ§„{ÙK¨IELG¬ÙÈ´xíÁWë_q|< l9‰>ÌÙ¬oû)¼5+±Ñ+'ñBš{;!Ü™È÷5ÊâÒtX²jSêìœcȉë>Éót%W:›ÙúKNr‚ÅúCh^é=M"LöÏÏ/Xx!™uüô05OÓ3Ãó2úZŠOÖéˆ)5÷wJÑi‰¢Љ «DŸ†ˆégü‰2ÀæÄØYx_©ï(¼¼ó-o=°\ä^dêÊï¶>Äé-lG{ÁôWSiU"Z€–rÓ6ÆfÖßaû ®^^^Ú“;ŸÍ.%É®K]Ùe´±”Ø„ÌX>L½çb\ÓpŸHq÷Ìjék¾Ú\ëÑåë™å‘Í7Mª.æ%‡ÏW”[”HÉp ¶¦ÓëÚQããu&¼Ü<œa§ÏeÉÔ9½cLÊspÝE‰òP­ŠÜ0.Q—y ‡œBø&™+ÜFá;+Í2õ6ãç­fûÙÖîþ1ý¯yÔ~v°Ó4…Ç^÷\^)Ñv|Ô I¸íÆ’2f­B#§\F‘ùÚf…SÎûÇ[{-’þî[ÝEnE|_VW'„?6ŠyÕ5è´Æ´&mxÉÆÍ;èŒÀQˆ¬šU"}˜ó°í4‰{oˆ¸ã+mß÷ Yé°9ó̲l ó´¨Àdª+»}Ô%Ú ñõµr»AvöÖ*:,¨ë˜`Xg*6 N~¤ç¨ÑbÐ>¨Äÿ?5Mn8N·ý±‘zÒÙõ€Ó˜ aTˆ·ÜDßZ?Øý¬’‚Âýÿæ8þ –dw4 $p<­©zíºÛ nM!Ô"¬iYן²Ï0­ì,%ÒLkL=íôz}P©ÎÀ0ì6Ybm—½/²ÔÔÜÇ ÏBÿV5²Y¥%8±Ëy¢ëÌw?þpõ¯¾ÕADZ7leä¢LÜ÷Ç—³rênŽJ…«ŠŠÛ’çÚBƒ§b`¦ÂÐóú²Àzi"«¡ÎY–nDÄfÒ(Ñß0ù¸0x{ ɯ…ÃÇ+$GŽ_Nâœá7p@:ïv÷#‚óofì´½ý+Ø:moçš:mo7øÛŸ†NË xŽòÐíßÆæ‰zX :-]û?j€™#F^ý뜋²È<ÃQ¯n#I#þýH‚ô¯æL´„<ØÉõÊýI*nó!Â|ý[Ñ·GrúÝ‚ë5”C7ü¿»¿š …°N: å9 Taüð]„,)p”8`ÖÅ.`»Æ¥‰ïèrþ¡<߯ÄòýÉñýIÆoçøþdø~sûvÜRZr#qø8ZðçÖ¿aëÇÆõ¨=å0‘tPŒÆÿ9ÁSBÞ´‰qÁÆø&$ O¾… ÔkÌmWH?`[f¹þ=ˆN6„µNæ.† Œ¤øt|.$b‡7»¨Ø8_&±Þˆ#ìpàŽ@úyÔ-ÖÌ"ÞÍÐ}èݬÃ÷ˆ`:–Ðb6ë€Ñ;¹‚Ô±9r4$&”º†úQ‡d¯FŒSâA;Ôl4Ñ1ñ5ù©6f×Ø›|×qloãB‘/5¸¦‚Ú´~“œs‘m/œ·¡åâ¶Í.黵OKqé}ñïÎ ñ?HàâNœeƲ;¨Ñ†`„¿Ûý¥î”9 þ<ƒþd?6|>ÒýÉ‚þ¶,hŽÁùXêtÜD‰2ªÈ|šóé¯ý§¾òß]_ùïG`þó”–‡·k6ãæý§jóWVmjp#?σNû»»/2[Cnpnù×¼—.{¥ec\Z˜ûŸœ=öMà·=†w€‚MüÉkµ*ŒÏKL^Øú½—Ì:ýA&$œ‡Óñ[PCvìè³±µXŠõ³Z€s‹µècίÇj¾,Ó"ñ‹Î`À·À±¥Äql=\œêÛ¸ú]\ýI+]Äraõ§×ÆNÛ-:0ÔrAì  ++E)]0¡m Úöµü9AN.Àcnœhqu€¾¹OŒhÆ/Þ~/œNnœ²¢W¶C!2_ˆÀ½WŠº¢og9^w! ¡ä¬ÃFñoþÉêå&¢‚!áP k:'ø) # ĬGÅŒY/árp¬ÂíÁO¥hì÷eÍšzû/uh¬ É À×ÌX'´‰<52rs$Y††jgmÂ{%²¦gêÂWµN|Þ(Ôú%ª¯"oW¼FèQ¢þhÁ"7^!z º ¼‘<ÔTôÞ8ýaáŸÙf M>…D¹—™2ŠÞîEÜ©q¾Hü[ëµ~xFtǧxçÇÓkßËi;ÖÁúTljVà2:MÎá»%%s)V…^¿s>’Ä=œ§Áà`*Öã°óà^aóÎæl˜H}ÄĨöK,À/RÈîYw1ñΩZqŠaT[Ý~‚Ð$úÍOKS¶jðáåñ«Õz½ôÚäŽUßÄšbb¥6Є.¢,šÃê+—ÃCׯÓÆôÛ•teWÅöw:P†VJ^…£µ F›nX¿K k¾EÄ®vÕŸñÓ¬—òßÿ;éÊw NOõÏ9ÿv&ü—N©eÊåßÓÿ1i©Å˜‰¦é4Ϩþ°½+¸˜î¼… x%Y™¥ôþšýáÈ{08Ðt.¡ä¿ 1ô¤´ûì ü«®×Ö>ÓL*ê ¤"…Zúþ>¯Gãûë5¹I±6ƒ5>V$˜Ûe?U¯(‰rSw®ß|Ñl¾8Ž¾¼$N¢ë~Qó}DÁZÑ.èáK_R8ˆt© ‰=×Dã™w1žÎªÝþ´;ïÏÔ1ó‚Íeé[<‰óèl¹I©-Ý$ÐÉ&4þþ‹êA<Äù.îé6}Ù9}ÅÔ¦Œ\:V£©2Þîô¨Ä§ó™ôÉ®ðkCžwªÙM¦pF\K¨üZtÅC j«h`!j¡€ò͇c—ÆÈ/b‚ÚG÷I7]ÚJ¿Xãur5™ú³¾—^þX{µz²rR«­ž”‰b#7¢ŒíØÃ\8BNa†“Ä F¦‘#áG7Tfq3ì\Kv žÌ¢$$^²E5È×UBï{.³WE³qUÍ7´CsŒ¶Dªè#½³D¨¡vÐØSÙÞàXAœà`<~C½™ÎÏf×þG§÷¶3šÁ-w|Æm\M¢–]0,—{áHtîÚ`iXÝá/EäÝ+ž±Ýr)ÏÌOÎG{~]I{QCN'šb£]#J±aD>æ¬ÿ×K¹¦Ô°Ýÿˈ_~<žF“^+§ç6jú1òáǪ:n‰²õ!At–É’†yÌ•æú»Q]yCøQŠ$¡3‹z$óÞ°šº-‚­c²3U§Ë˜zßXßÑ)f³rB1G¶øXo*!Z½œºÍƒ*¯NVQœÇËý!y¸!ï¶{ŸŸ¿ö…KjöU‰è¼VþR¼r™ Äž{ô+W&~§Ë1B0Å$ùÍÜöõùeTᄇ®Žä{Ÿë4¯ôkI iµÎÄ 7„^æð‡ŽòqÉ>„à~üz:,-°]ù”›TSôï΋Å>“ô쌪Û=¹+ïà¶Ôýß@ËiŽ-"ÎÈY–K96b¯T f±³>æh㘇¾Š)Ÿ®~Üà1B9· þG óœQvÍ’?™óÁ;7äû¯¡¬ºoœ(¿Ig½þ¸vñmF}õxw¯¯žq9£mK/ .ø|V¨Ä…ËB™ÐKõ[g²²+gel¬3ÉñŒ_l´sgeØ¢¢+hÕº0ZYÎîD]zsä öð 5ä¼é|D£FzÓ11Ú’âÏüúˆ`Àš-ŽŠ>SÿKTW „Ö‡·é-Wy•_17ÉA~°0p꟧îo¡>fºÚR­žKUJº°ùÆ~g&ç½wW‘ÁyÉmo@oØ ÈÙ§‰ÉÞœ…cl6E¿ðït\"B‹•hz^à .3LLtŸzI×Õ*îO‰‰úˆãÓš¬~lLÔ…EÈÌJÎ÷›ÎÊ%R‘\ü.±oIWuýw–ŽüJËìhPæê3ÿ½n³2Ë3öOÿ'OÞS¤ü£ÞÊþˤ¾e’Q¸"*mþ „#'YH6C®,D"PídE!?O¾ðóGÓÞ(Kùt&+Lý*2T­è¯Ï¢@óqѳ=Kä)÷‘ÉæÁ£xr“|õW´)Ê÷_ÎûÄCããT‹wgæ—AXv „q4þ]Nƒûý³}ŽÛmÅv»m=\.H‚"&$ºO@úg7œ0iì‹…ªßâ›7Àl„?Œ{æ“13(:MB{”`°Ë06oÚÅLCÑ/AìÔ_,” üÈøå<ÙÞö§ ?ÕµÛé¥Q|'|÷Æùìa‘i>Êß_’è`{[ ÙÒ¸zy7¬p£}q·Û>ÿÈl}:Ìnû’ hûlÐ9—ößDz«”R¹ Ó;b·BULjOì7“ßwKÌ4ŽÕ¿çü¿°‚‹ Ý ÖåÞÿ¥eù¥”ì_]?¾û*ýjjçl ! ¾gtf!=ÌæK4„0$Œ„€öZÈa×α×Óp8¼Œ«ëívHJ\0†»BÌ÷á²{è÷AÔYmMgÆB9ÞmÄÛ_}}›ËÈ Uo#óݯ¾þhB‚a_f³–â³ók+Ò;ÓshÒs”ëél:'N²Û&@=‹a-»ƒñ%ó…Ô`Ê|b:h¨ìÃz´ÝŠ?¯}YrQDk©¶®`Oç³ar™P•÷ñÊê´›B{_ŽW¼’«•Øë~RÍòf„_ý.­zg¯&ñÊ„>hDy·:±Œ[êoñ³toò²ÿ ¤/€Ü ü@=9/›Ú^Å­À¸ÌÐäUŠfÞvÚHˆ¿Õy:‹WÞV&¸vˆ!ŸséÍ;¾lY‹c­VÞ–=Òœ¢˜ûƒÖãøaíA¼<?ÅÝ.”ÿlD§Vs›¦êÖ~k׋ ;¶¦Á$œÍG]¬y6ž]O`”Km¦3’¾ÄH ÂVéäêéÓR|‘\ñØ:]ØÑâêt–²ùôñE’šp©ˆ>~#»,ÞÍa ?›:³dp]á;WXÊ1ŠpJ¬ÁuzFò×Ü×­Ý< ¹Ë.‹ÙG"ÜÉ ƒivºÓq<¡å¤Þ%SÆZöª˜!Ÿ BÞ‚ ÍÐÜV®ÊX1îûÕ û…íûK|ì”ÑuL´ßy”ås`…÷a…pgóË+Þò±×âwø¸²zV–bòæ{÷yÝÿ¬Õ¥^O:ý) cR®j7j%º²²Z¾œð¿†²p¦çÝÍHAÑ·›FÊÜ$Æ+H@*ñ¾?Äó˯b¨¥‚Ïkî3&f)#¦š1P q¸«þ4èŒÎo ¢ìt4x/:´Ž²/N¢{Õ-bת[¸ºÓ~zøüE»uðüh»Y —/ºxÙn¾8nî#¥O«Ý.ˆÝ§ñ®Óƒ†Ùjº Ž|ÅâøR8È—ŸúŽ %¹ÖlåBŸ³%×ÓêJ¥c!ø~¼µÝÞÞÚ~Úl·µ§*ÝܦXmx%çÉGø$“MÒ[´ô >õ!ë#[›l†’lk™O®5 ¬îîqÎ |\_ò¦òFFWK˜ž±4ã@¸ˆ6ž-D,øÆý‘ƒÑþ¡÷Ëô5ó¢ÕÏ8„< §a6>ç"wÔáÜ dYbJ‹’íñ¿ÿ¥lìžÙÈ6l©6}“ŠÍs%¬Ë©×jʹDˆÑ¬qÅÇ–/#Ú‰dDLÛÛ탊„Í·~êñìMŒ-:x!®ï ͧ §&f žÂC±¯WŸóáĵ±X¹ £4®HÖBÎ=„V®ÅÅKM‡5@ÎÂj¨Ú‹Ña»#t-^ß4¡Tø†/Ä7Á1ëX@jo[¬{G•õ_ùÀŠeT4·nÙk·%}[vÍFìÅUß¿h+ƒž8?Gãœà~_‚pPÈÝä, b3>3¿¢?4×Vî¦]æsûUzM'\hE~IŽR¯K2’fJdU(‹e2†GÇ0×nÅ[öu°®;Œ›ì%Ñö' {d÷ųæä-¸MÇŽÇÔyÁñím-öhnB0‰üÄä‚~Av ½L{i*Ì-.ÃFFÀƒpÂ^H e+PÉ´J¼ú0ÆÝ™8%Ib3΂d32q´aŒ‡ºBÎ+bz*©#~3Üç1%å…“âÊl à Æ“é ŒÊ&9ñè|:圴„—ÞÉ’JÖ5:ô¬3žÚJâXœO ÀlHø4±Æd»K»ÛØAIÂpú6Žî& 6ÅF\òì;quÊ#1Z’ÿ1°ñ(~zX}þ‚ûvÞíj:ZœK‹]éhÔëºÑ‹K;$ÎUí!Yª>£0ƒJãÂDãøIGñN¡¦TuêÉ84KôVR®g^޷Ǩxž9á¯ÌªitìOâ¥Ë{ÓWâTšÊÁ-—¿šA9p\N_ô¨; ×3Ûno±cß'œnŽ,šrÝ/ÊÅ‹R:­9„µë2'3öòN%Éæ ýQg2ô»š…Ñn(ƒÒŒý?Ã`Îçx:ÿâa)…F ]Ø%:¢ÒRLËÂlŠ àuŽP¢Ã0X’œ¡ã3=.86…¨`O2ÖéºfÆ¨Ü áñ|Ê¡ÝpÅ£€û€šx…2u !XAšºÈ²F7îuIøÄ’Ì1 D\ t¯ayR±ñÉýÕ“•—êÿnUÿûAõëW«'år±~²VŸ”âoâšIsòÚDQ,£}ÄÉè 4ïºð”†Å—øæVqéOOü§r«ÜÔ&GLj”!$€œÝŒ`3ÃØtÁöZÄAO€‚’Êšü!’&úY 8]Çå*ŒAÿM"šÂÎ$ A˜œ;Ĥ;̇£ø«ñ 7sRæ ä2p&ú«Ñ#ukK¦¶‹~÷BsYž™P8è5|¤ >i5 _„…ž±*WH%¦'!ÂÎxP‰ÕÓÚ›;× È±î:œŽãíO?õ|lj‰“$ÞU è‚šðqH¬\©bÒŒU2ÏXÇ[ƒt\ìÛÍ’Â0ÉG XÏ2Ò‚‰BÆ GäPQ,Äì!mÓV|'ÖWÕñ{[hØÍS.Z F³¨õ ^à*GXø%1e‹Œê¦S Âx7%ÓN— ’%_2«ZÝK3f €$3©Ì8…¹Ô]4Å8äpr=Ù:c×pÐ9¯ßÑ¥‰ï§C¹Äúœ^ó¹V•ª&°ìui0°PçO5Ýoûä ‡o—;Óä§9u9é™Ü1IU#¾rRؽ̠İ݉›6±ï0}Ûý2þYþÓëTžûé¼3 ÁC¿àCf]¼X+àƒÎ§ã7Ø ‚…8Å;ŒlÀgÆ‚±ŒFoÕŽ1t¿6ÙÉÓÄ,·Ìë€=G¬ÆÐóûœ£öBÏÜüé;ÎUˆŽqsg2ä4õýá75v’ &/Åâ,g±e”¨ žyeã‘Ñúé`Ë­zAÈpu•9i˜}âŠk–ÇF†Nųá$÷Ó1}³•‹­§Í½=ÇCö"c0¸ =÷•!ßÚlz™ÐS$¥˜RçÄðgIz¶Ã^Z>èqÖn¨þÅGT·3÷ýl™aÁl¥@åCì4Í¡I.‘ã‘ ""f)‡žfF”FKÞr°Ãå¡# ,Mu Y\‘<ܬÇûžïpË’‘Êž!‰Ð%7¯×&×´Å» Å]mÇt‚…1 ÒÒCSØ ör£fk~‚$q+ªÏ+<¼/køDù²¶&yŒ;¼ q=¼a+Æ(º[vË­˜!nH»0JúBUiÓÏ`Ï„8ñžG^… t†í9G0ä}U{psË2‘^{‡¥pÈŽ¾®ðŒ–2}ÌD7ûùg/Û‰TÀ…ÅËáV1Hc£˜@w1 Ù°•r¹S ŠäX[&ók™»Š6<ñcõ7¶°DykÖÆloï49•±%¯w¨!ë£wGz{ÞG&^„š»t±æ3?geû¬ƒ;¡Š&sdøv!ƒdN%É$™WOâ[F÷ãGÖŒe\D\Ûˆô^l â E‡ÐIÓdˆö’‰×{y·½½Õ ‚ô«„wlGår&Å™’¡]q îÛjýßSømµþTùý©òûSå÷Ÿ¡ò»q·ÿ;*ýþÔÐý©¡ûSC÷§†îO ÝŸº?5tjèþÔÐý©¡ûSC÷+jèn–~KÝd‘_¬¥»±¥zº[k©¦n«µTWw#ˆ_M[wKGoÒ×QÕ\½¿Ygg*æhíl]ÑÛ1ƒõzrÙ{mBâÄ çÞêz4Øä:{ýS$ÉqÜh—˜Ñ?…d‘HES4QÆ쟼¾5eÏGC]ßtÎ ô;Tµ•›m”Ökkô¿µ¯Júeš_“ýü7˜Ál[|dÔvR^ÕÒ ÖƒZ¤ƒòm‚ôÎ:Ö9K5\ât zOo¡¨ÁúÈ_!îQU*zÆÁ 9Øz"h´éÈ"ùävÚ ¯‹''¯NÊõ“’×ÏKh»…ìmPyœ’ ),VoÌÓÅõ]ü|ŽˆJ ™QZÍma±ô Eú³¹ñ²í%ƒÎ5ØÔ§c¯Fb[Óng‚ÒX#Û0”Ev¤~›%;bê ¶M¯Oî¿bÝüýèŽQSÔ!î‚iRÞe§¢tR*ámš.oµóvÜïÁõ˜8ýÑŒ$ŽóÁøôT|#cÄp¢:.D‡2Nÿh4n£„7ÊUŒm•›hn?=h”N~ŸÿJÒ\ÿæýsËg)óŠô‹ñ%&n2…óžbý *ô¼âòœØÐ`) ygŒ:É°ZœôŠÍYŸãÚklâš38ñzEAT§PWG1âmÙ“û5ˆ÷ zK4Ÿ¹`SͯÄs²P«ð‚ß;-,³W±ä9ÿgñ_Óˆj'#{P@õ¢ù0¬c1(„ÞÁiÇD™­Õò‡{ÎIÍìæÞ:ß=~÷ÑMnä6¢ï}ÁoV/ \_~áà¡ÃYŽÏìy>#)¿ËÎA¬Oº%Îà , ÷Й]´[Í»8sÿÁm‡ýHi½sûõÓÛþ«k¶vq!Îj]ã/=½«×¸8ó3z?¸ß^Ǫ8cçÅ©|B¢¹§¾þú'Ï‹-5¢Ð;¯ÉMãdÞlª$¸U¤)©šyosÎk0 Ÿñ„ÊM¯gÍ)¥œØ]Ü\LBV¡Ó)O¶ý­gÍêÞnëÐÿuùUM ^LÝ9ýcéãò¯êÚš¹ ³³£­ ª©›±ÕA #ЛÀÖè "Ãy%¬D2àK:“ÝVL< ú~+*KdZv‰!è²”±J5Yº÷c#Sse6ˆÙŠôfÖxîÙkëŸ=üü‹/¿ú:þÖï0QrI·á³ã´ e~yfÉÌõðm¾³ÍÈMë°£A&n‰¯H d'Ñ“Òhß„Uü®âþ ÜÕ?{ ^ÿì,Î΀ÊèÀ‚ê‚hÄ–ÃíÔ,Büi¼fÒñð¢`tÄ‘‘]éêùLH±]Üaçªúà}FqöˆÓA²Qi8òÁ7®?c™æM’L8ù;N“Ôï–ÔÝŒ\‹; ½hØ^Fžîä~¼ö`ueýǵeOÁwÊýî<Ò$¦Ç’Ž¢‘ª¡]ªïpÔkR~/ä¢ô£©~ÅÞÚ‡íi¬úÉ…Íb›Š?óï¹nÌŽœ!àá ižoÌ# í¯ÆL&Ù Îgq*³^8>~n)ìú’0Þgfb‹(þ×ÅE¡…¦µñéýÓà×q5‰×Òú/êõÂ/çšX¯È,\è¥ìK*7¿âú~[†¢;@¸‘kzrÔ<üìf‘5ÀÛ'Þ S¤>O§õ«ÉùCÜ4ÿz|/É9þý9Lå¯À:ð:݉w@ÉgP{{ÆïÈ>˜usëÈA`t·r:™‰/–ø±º¢aš‡È¼T®–þ@|¯ùoÎXä¡]ÎVüƒðnýºÌExÜÆ]0Á\d/n%Ùwâ-—²A¢î!ci¦éFÁTå­åÔ0:5óyŠæ&S‘üÊüDóWb(šwç(š¿Œ¥hæòÍb*šòÞ ÙŠæ›¯hÞ‰±Ð9‘ÒÅ?Ñü}Xˆ|$ËÛ.¢ù[±Íã#’ß”‘e•c‰Y‰øãÓY-ŒñŽ¢²ÍEž¢ù˘Š³;0g·29SQꜮvKŽ³xlÞܱx0ob,ç3ÿ3‹³_™±xü+1ïÎX<þeŒÅã\Æâñ134ÿqÈX<þc3ïÄXèœÈjýq¸ŠÇ¿W‘ay›ïÂU<þ­¸ŠÇÆUœý¦\…,«œI¿"Wñø6®âqÈU<^ä*®"£åÇbpiÌK”óŸ!´&ªoµ Ëžêùh^¥)„U:››{vYÅw(8ŽíAÏ÷þöØ” -Ù(zE7¥>­Wƒ€h >3¼B~–"ÿµ¤ûŠô|j z¶?T"OŠç$-£¢Bð:®²•NU«p,¦ú<,˜]aújÑÚ¬2^‰ËòF¾,,0hÆÕ Y[Õ¸ºZRÍK5¾Ï#$éölÚáä©To:íwÎ]\Q—Éù„V$Bd¨¦îµ„Ü]œIfI ÝŒ° —N¬}^z„<¿# ­¤^66¥¤21:š-É Ó9MǤ2Ä:¨ëÚË““ú+˜AÿmC[Ó4›’ fRýåõWøßjý¤vR«—,ßîŒÆ£~·3@& 0€Œþßô<"ÌCQ‹4ÓÁ1´¸9,¥…Iæ_ë=·É&å<ÏV°,p¡hûWÈñK!à^¦UCÛ,¤u ¨å‚iØYyDrOn=÷vŒï÷T(´Ùeæ ©/ÓŠìÐ ¡J">ˆi×ñ]¢Ávco›Y€«!¼~jÝjš ¤ õ®d»O z¼S¢ý}ÏÐÉn;Ç@Þ3±Ac[ûôN5¬Û¥ó|kU3‹¸·ù>™Y±Þ…·AôÅ&YOtáË"Ô @YÆ¡:ÊìçáöM[öv>šh¸ (‹‰O|b°pÜÌâÜhôáDM÷ BˆÓ:¬P7ÊnÃÜ@ãn¬·¨¯ÒeCÀye6?ŠæÝ_ºc„É©äî^éSº°ee³—ì¯üeÑÙ Fs-ýÂâwÎ`ä­1`.`kn ^ÿ ^,öKM©µvªps}ÖªÂ؈SùÃÁC€£aù–ãòn@–âÈÁþ³_xŽ‚†ì?ó›iT-¤lûÏTÝ#y£a{6nó0¬µ€Ó]¿õ~4Ì6(xî3ˆ]SX¦ðÈL3ŒÞ‹x4,˜p3,µÌÚ³á„Jð‰–µgÿ]ù‡\"fI¼ÛM9ˆH28 ^Èy÷”cŒxJÌ\~ã.GË€k`ǘ‰ëÀ\‡|É°"òr‘¹—ÏWÐì™|ÇF\ÁØ9Qk¨´Õë™tá%Ȉk?•pΓèMU$Ædœög,µš°ZF؃/ù ÄÔÐFÆ¿=.<*×r”1qœ¨KÆ]\#ÄÒg×ôþˆ$ô~ÏÏ-Ý3솙•ê£¬Û¾ø1”hLï­ÚïBw,Çù"lPððÇe.$»CL[ÔòúªriDïI•…nMnëÒÙŽ1Œå O òÝkZ6h±j†ÊXP…÷D"X™èd$6ÿâcH ºÄÍ0L·Í$ƒ"‡ƒ¦R ˆ“{ ´b|Jýîñé¡3eù/«c´‚eÎ^ÒoYŠIÓûècµ^¤eÇ‘û¤ 1ŒiXÊ6ÌzðÉ1;ýž Û†€ ˜©ü#£ÂJ^ §5NˆàÔ²4wçù³ÃG»û~¿»Ñ}{Ãu ·ÃÉÜüho⸧¸ŠŸw±p?n^Á~æ¡ÕåxÚƒð‘mÂÊVÿ†¤ `»cá‡çC˜é©ø?Ï4ŽÓP›è)Úk×?6çðÿŸ½7ïkãH‡ÿ|>èUte…0’›@”¶Ùp}ÇÞµ1’˜µ4£h$±½¯ý©£»§{]àÄ»?{7Hê£úª®®®®CB˜_XKX®Ð=íöZÛ±e^=.5P#¡¹ÔŒo…Å2óÝ/~/ÄÕ°Þ MY}Ölå`£ýJ5sø>3¶*Æ—&ÙDóÆ>BH¢¦zZL÷¾09f'‡s„ÐHÿ¬WÉ‚!£1‡”z0bTŒf™c¨WYåOIÇ×&Ò°»­/JY3v´Ê‚—I±ì5JÖøJ½ò©WÆÌ}YD+±ýòº^˜cæ{Ë4)ã!ÓÊýì$-oˆ‰ØÇË_¢h]ܸ —~Ã199~ÛjÂH9B‡ZúˆC[ä«pëEåÂìÎ|øa†Rù—Ä£Ó“1GéÍp8ðû]o8ÑÏ<×7?ì!¡ðJ˦Ìù±g± žÇãÉ:WGƒ¨D·½v rå¹FvÂ…dÎÛGÏžéçÀ–†éؾSU7ì|9î±Â ¾v¤ö _9’C‰^aáðÆÔ›[ZFÂS¤`ËðÒ\¸íq‡jæÉÅ‚^S—™ïTJé;xãb¹ž\Ç„=O;‚ý¶º©ü¸Z|1N+º7አ§‘Š=l84!e]É12„[IJIX{’c <©ÅÃÑh4œŒ ì˜œÑ ¬YÜIöÊœ‚p4œ¿“ì…Ãè‹Ù2\{z¿.ÿå ·[]¶–¦”¨ïS[¨˜ZôƒSÅîi¢­v´|!‚ÙVŽ$!Y„pýq³»:Ÿ$Ÿv ©\NFsÒÊiÁO œÓ‚É£¢Ñm„š}Ív¯ÓóúºñIÝ”‚:Ÿ­úÖÓí‚Vª!!3”îñ{Q'Œ:ÿ¾ì÷µ®ÆQ vþñüøxEúEFD£›S7¼£>i‚ oEËítoa¯zì×+„Mߣ¸]¿Õ– –Pp&}¶i¿ ÞMÛóHp½¾ºº*Z·è6\{n..ÔEb¤ô~:#rã‰.×b×pè?u½šÊ÷oo€7@`HØ91c ûêö•zéß[©ú‘úëCéR¸%}Mg®J}m}ý»ï6¥²åú/$ö¦€ÿòj¨Sàó2é9}‰1ïéðÅhÐ1gÖgfJ9KÕ>Ï(‡ÐB˜×ôqÈ1;&☒0JŒä?è.Ÿ¨¬¡b¨z}壃uŒxemÓ]ûöòÚP8Ï gð¥í]¶Û&½òƒïoj»æx‹"D£J…¦|ÔFlˆøEuè¾óÔˆyR““é!…ÐÁJ†Œø|y0ôÝn÷V ûU8ˆ¼D½¶'¨ÚŸ7Œ¿âõúø(øÛñ‡n„›xEV¾ G2ÒˆÒp.á^àxD"_rç;¼"«*…‚aƒ_¨¨4`zŽaçô`ed)¯[¼œëŸ¼+«aìÀ…¹€/ÀT—"v5Üà £f‡i@‘@t4•–ò%ÞÔ¤ÏzíÝVô»î®È½hC|·öýºX qxV[ÿ¥öú¸hIa¤ä³b裧K˜YtŽ« êy=XcÚöÜž醑Ùä&ʅ輋®L”#¬‚ ÊhhÖõaùLTaÌzj©ÅÝš[c…°?³ô·åº^â鸹g:÷ø™î-þ¸x^+êà×ÀÊoaß ðkÙ@»˜ ¿~÷Xå4èâ¾ÿ±ûb4ÐqìcÁϨEyá6j»ZPÉ›åñŽüX¾*Ð(ÄꆱBÇ·×Y[HÔÉiE»sËóäñã‡O0¬Ž Sá­H{f)²µå·ðq§ÓA×tî…§Úêq+§ŸèT1“‰LѨ‰GçsW^Ï ¬!Zíßèõåqp%ÜÄÀÂñ»þd}íÑ#Â×+wÐiS´­ÐdŒG,Qè}yܹöý“'«ß=£uûî¨?Ðg¥øaûèðÙÞó&ÿ”Q‘>}ÒÝÞ»°î ®ôÏMž+>šox%Œ`—0c3Jæ•™Uš. *qG%e_ª,^¹Ý Å'ºmäYÅYßDbý’œ ЙªeîðûûúÜ Þ+¦™Sc™ž¾.hW­ä 9»º¶ý1÷cÁÀõµ¿3’ûøDµV[O7lß„¹”¾BN Ïï²ÄÈ—b˜LÖëBΛÑNñ‘£a¤ÞÉðä¨N±e¬ùpĆpªË[­RýŒC1{ã_þ… 6T¬Á…‹1íô…ÓŒJ¥X÷6j˜¸EèúÞí¡™ )©ï䣾˜Û¯žj3ö±8‹FzòÚªA±:/ÊÂgÒRQÞ§p½ðZ­ø8âwªw¢Iëç)*Ì6‰(iš‚šÞá¡+‡¡@¾ƒ'ì«®ÛBÙЬGæd–ájâ‚Ä8U±˜ pî¼$ œs4«?ä}>ò‡rööR»˜7† ’’ÅÝÈà¢ÄËpÐñwpkj{¬Pp9Wª…ì¦óÐäÏ ±“:2†ÆšÇBef1»­» ²(•SÅî‚ʤk¸¿£ =(úq7t-‹h’®â¤úyÈÚí4¹tî¢*bCª—*ƒÒ]lp9K‘.Dã3û‘YRn#±ÜA/Žp€Ý#ƒ>aÂq¬âŽFM™xÕK° P ÅË*Ö$*ûO¿ûf<ßõak$ŸñL³úoR3ؽBÜ!åT˾gÉW4À‰ð`€gÛÛÿ>Ûßz~ 4C§ë·Dñº‹1—rœÍ5iö0lþy*cŒñºÉI;=h”ôšçÑUÎõ…é.=ýê½ÝƒÖ²„”©¯,óêq©¯:Êù:Êñlåá㣭¬ºZLw¿0;f?4ê$Ž#ý3ë#'m'ÒƒNšQèùQ“2Ýà|™ôÅš†{³Gkì‰OÖøJw&ÙFè™ûâˆMbKåõ¼0 ÂÌk‘G„R¹Ÿ—eØ;è¶m{½œ´ñ¾ÚaÑHF”ƺ* t[>Î)×@Q˜T°4$Í"‚‚ov|•À`¯­V1Wá~2ºp/iâäë!ÕåwÏ֭蹬ÍÁ}‰³ ñ¬‹7oÞ¥wóö­]ÓôœJB©\Ló„æúø샣RÖƒN¤tc‹öš+(òI)èPëÀ(¨M Q{AŸW蹕ºUByêãbÜçý»b|…!…+ø]’ú¤*-j~c Içv™ƒò.“Nÿ µ¤ßé¯ñ5–T•`¡ª…ô=ÝõoÞ<ª|ÿÖðö“‰‘ªM~ë)´<©9C•¨ã¿yôxbKæºíî?oV¡{ôg¹Ò.òÍÁþÛÓ§b)ºrQ›™eB;·ÀLB €W.ånMzECå„Vö3KÆ[´]¼ª›W#é÷¨ åeâ~I ?®­kù~Tfå GYéÄ réðSÏÁo7ß=èÃ…£~7äGJÛÙßÏi²cò‘®`ËbxO)NÿyZ;ðƒç¯Tlx@¢÷Š™”X«4Á IJý7cìñûÏú®×À$¡6<©iÓ»#LOI'¥‚6 P= gpË+ìýÆíõQ%G*°§H>B+úЗ®1–XÚ]ù/À÷¶³¬‚æXÅ/ìqÅ'WðhäD!coƒ6œxT®D}Pu–ÞÓ<°ˆ_,õ=¹â?üîÉRu™F4„ífC`bù§}¯âz•kTüÅ0ÌÊ“GåqÃTL‚¨\””Im-ç[ÔêäãQ *N=O «…¹F(û_]fý­Ô0!³üSþÆIŒ‡+U®Ü~vng$}†úu¬–]6¢4›@éšMôÙŠlwEE»oUYÙöm=o÷GêeÃ_Ô,kU˜Cy†èD²àMýN`4…$ƒk ûÞó#TÄÛöÉ>@úœk…¬¨NŠ7£`èwQ#¿ë]%Ž&®áÒ3˜%èÅGÙ›;4UϺ·åšÿæ!ÐÔùÇiEù§ŽG¤¨ï^¢úòì.Y-'VØ:ò Æg+wP%ã,¨.ŸgšèêÍ=rèråúïF3bÕUt³¶Z]_E¼¢k„ £ÎBß}òÈR¼fQ|:ÓŸ€¬•øgYX§4ïÓŠØÛzò(‡ž‡¯šrÚÃuã–“~Õï»Ë÷Òã7¢b¤”—Ï(ÿ´$Þì«QþÉ,åŸÞ¬@µeq¼U9Ù;Ýf>¥Q¥é×w×W›OÉÑus4xç–ì–Ù«ræ6™¦—©ÞItG4”f´C%­?ÞÛl,‰Ö |L1ù=.(VoVˆ­zr}u+>6ª.1›}¿?M þ䬩ŽMì zÝ~°ÔA€å¢¢Þ>´I àø…ô¿áÒ CÀªå²Þ û;êáøáúÇeþ §ŒEsR¸Ž8!5K.$Ê>\—ž<Âü'¬ì'bFr€6qŽ9³Ó“i¸ÓCó¢–'.q­j€ÔÕ0C0Fð»e<}Ð{>þ@»ŸˆËTš2$œ¾UiFt/‡Ø¼ë,ÑúúTøÃk? )F8Mªï:ŒžÜ×-&–sNw…IÒñ)woÐâÌr0 ÉçáïÁ͌ˮlÆ ¶4:+'üwŸO‰ çÎçÀ€ôºÝ Æc™F‹0ºxHVuÑÅ#ùùxÆÉtf¾T«}*dâʘ…3j²×õo™0U”“ìŸAû¨ÓíâÏ{Ñ>’°¾4ÿ®ûûgGGû÷áß•!eûwå¼z\ê«Àÿ®z¶òðñËqð*»ZLw¿0;æpðªP'éà5Nÿë´2±¨—RurºÁù2é‹5 ÷ç™u ­±'>Yã+Ý™è™UÍÜGl[*¯ç…ifnǬ9D(•û§ké¶ÞVÕr~Õ>Ê÷¸j¢TŒG¦ö‘MOD?¡}¤W6¸ª'7SáÔà¶}wè¡·í;Š|€Ï …4 ”\|tù†bÍ‹AØÿÃs[YM‚j¨¥•A¦2ÙXÃëB({š*ñØej;lR½Ž×ÆãƒÃP Ö ÐÏÀm·ï¶`ë QÎpã¨W^z9AT*Ðj?Ž§R÷Šú_þÅm´‡¶”üaK®ÛKs« ‡GÓïá¥)Ï¡Ê\Àš°šÝ–Û~—%3Pú$²È†²â”°ÅީЭN³ÌÉóž„ ùÍäù[¶À¸®ObЇq-ɘ8A3]x1ÜÁ×H'ÙœêÖÉ=°§['™<éÖIò¾rŸùÜ'ÍÑ—Ð:Y´ú\È]þÙ "H‚4qÒŸ·›œ²$‰æC\=Hͤ7ÿG$¹š¢@¹íª½Ãå¾R™Iw\5__bà‘‰Q‰… 81ï…6ƒè˜z|‹üä†ÁRö=—ôë7÷Š«°ŠPI‡A×Tã>ɯM2(¯·£O…Â]#ÓJÝãøùÙÞþ®2̘@]³+åÝDÝAÓå÷Ô»Ü%ÂЮŠŠ÷;SY;Ž6»Æ19zThxáú]tÌ7ýVx Pcw4Õ‚ƒÃ\k’ ÿ+“¹`ÌcàeÍ£öT™Þ\?ëLùØl|IÌärb‘\©"h=a†pÉšþÔ6½‹,!BŽìÀ.ÀJ F¨ÕzVÁ˜›“¨ÖÄàBͨïµëŠ-1'Û.ý•®LºñËYûˆ‰µ}²û\˜Œ"ó^ý³‰L"ïOÇ–-Û·{¹|_#†f^î RXc¾]›Ã"ã‰wk9ó°¹ÆÆçc+n€:Ò÷ÁW2¨/ì`8Ù:Üß{zgÊ<8«®Ë|=ò=W9ˆøÅœ²£ÅTß cÑbö#@!M‚bÅÉ™…óCµ„²‡“(Îü拤'æܧ9†¶XSž(ÿ•ÎLb6Õ¼}iÄÅÞH9Ý.L)órœ9D'™ù§óœªi›éTËø•ëÌä:M<ÒÈcòù°i{‚óTóÛYVR¼ç¢Øñ†Þ ‡±&¥#rhÕÜz"ìv*Ñð–T ý¶’˜E‡¬¦ü¥\[¯ E(»?س1VèÃ4øÀêve¥öU/ìˆ'© qÁQ`-Œ?¢3¬Ëâ˜vXËÌž8Ŭäÿ4dC¢2"­÷ÓIéÎ6¦DƒÔ,3<3)â@ƬXŽ±»aû]Ó„èñ™Ô[!d¬ç8¦l¦ÝUÿGРڶÿD^fPï_øN™ÂCmW è»^ü€§¸½1~2j£[íˆã1'F ~%`ôÒºÕÅhÓÛÛ¸òùëX5]‡Nш¶É‰’Ê)Àú- í^‹è¶× » î"ÄÖÈeŒCæ N¢zÕ9˜"£Í¾;Àu?<ìcœÁõ\±]ïÎifX㢋£¡¥Ûmò›}¿?×k29µð"vï¹i©¼ †ƒwäõPÆ£…Õ»ð®qIzä3ð À¸Åáy<Ž—] 7U!^]Ñ£´ ÕµT„n.ñÓ7߈Íò[^eÑòÛ]7Båæ¨=ð[8m0Iì&SöõƒÞâ#-^>;îÐwJ(}ïÅžáÒ$g6¹PÝÁüCÅøª¿í‰ê²h,Ua«kµZ¿ä8z!EæFªM±u»Ž½ ’^UC@Ä›Q_ö ûŠ{ÔñÚÝæU¾«;™íâ}iˆf âö\êt» ® ÔÝÅk›²k¯‰§Ç8€ÀÕ7œÆZ®çK(x¹,V?­¤@ Ú;ƒÁˆ­6$È›,]ɨõsz Bÿˆ ,° ‚FˆâÉ+™šÜôìd–ø"8KÔ —ܳI×ÈOÁ×3Cæú@ì·ÑVè‚‹ %§xˆÈ£E,yQ¿ŠÇÒ²2ú¢º¤¼Ôñ4Æj+™îí @‘~0ÉUÞ¥`”xŒM9áT2熮V°hMG£ qã,Ù`h€UKeÂ+£lQn`õ¹œQ×BÉfÒä}pVäo·Ó»e4v¨¼„²drÌñŠÙ½†þÝÓŽ= Dão5‰ÔsNO4åáÛ"N ¢„51Õég†œAeO’ÚŸe¢Æ’Œx®fšñ4±'ýÅ™Û'ûÏPEü]Â1+„}û ^0B}I‡Y<³d™s²þ¥›Æ‡Õ•µÆ§oø% ™Y:Ç€z|ªM²4òäÜ·ÏÙ³Á-­)pÊD8hQ1ö B½*yâêÑRœ†|Üàâ:ŽpšÉ͈FÆH%§hE0×·¢¶¬I”ʸa`®«¯U>šo.= ö5Ö<ãÊƺ€ÿnðÕÀzúº‚P¶…´¡óaUS¼3ËN‘é1œ¶O6U…{+ÎX¶Ü"W‘Òí-XØÑ…äy¬½#˜=›:‹«ÀV7 Ù…0ÆÆJÍæÜÚèt\hb¯N…"ªa6O¤ ݼz?£³îŸª‰€êé‹Ú%½úE0Ö“Ö'\†ÍÈãk³üÜ*¡Q?mêҵ߶ž=§ÿÀ(—(<ø,LN¥®K†?ÞøoÍʧ T®./b¨©vT]^êûpQ…©*×>PE³WoëkVÄò©A²–7DíCÔïúÃ%èìêJ¬4œ†S†AøõhÔŠ†ƒ¥(x³þve½œ€svÛ'ˆÈµýBÎìïÈ_QUýîï"g9ž­1ˆ½iA`—¿ùOm—N2@ åÆÇÚ‡¨µÙŒX} ^îì>*Ò8®Z¿}|Û(//•Sõ>øK4™jË"Yâ¢ÞpvÄŽü§ÖXj”«ÔÌ9Ãœ¸°1ÉîJ­ññccPÃY¦d'82‡½Y{ûŸÚoo~þé­š˜‹L¤?›É¾Pq"²!*:„Åü™SAžXúnO­†W˜RÿÍ ,NÚÕ^Þ.±Ùòêò›ñ¶±”:eÌÀÿ–vŠL‹LÈ‹µ¢$u’᥋â„M:.ohнR ˆÅe0jv‡a­S’ô’E>ŠÁãk;9RÆj(ˆâØÍH,0½Ié¨ _Hªå.X7þÇ”~-jÈïŸ5Q¡}ÑGExèK»ßEø_A2fζ#>½XÌqi@šÉ#ÐÁÍ *I+©åÜŒŸ²Úú¤@ô@ü¥ò£™zÉ-mZ°Ê›¬•¿´ZÞüTP£àsdµm”v³ì)Ko;ÎýS·­sî]'` ÿäáÂ'F€WÙº^ã §ŸÍ3p3ÏÒÐn|ãÑÚE‘º’5‘÷öO]|Üà×àRû¶ÊËø-oxíyL9ôjïÑŠôŸM¾IW¯˜³E˜›úÒ$š¯ö®‹ã”æö?ŸC*:–ý˜(×|µ½‹ÚÙ:Û’L¡dïvö÷1ü‰`pmÃÑ´Èî!ÖZÅ’®; 2˜gÛeo(€î¿ l9[¢ýÝN)Òo¨ ÂïGÞ¨V$ßÅÑ0‡;ûÀÚ5·OÏ€¬vÍÂ5å¢ÙÄÞ“+g¦Ê0<íOô²Aü¨Ù=˜oñHÛŒ¼¼\†¢Èý´çŽ¦ð Š²TCÞ*Ô3‡L9!b“OQ”œÃ)‰ÌȨ[yO'ø1‡¥B¶f +O°pú}¤ I[zdH+ä&& x£Q{s äÌÓỌ•ñýŒÎW]ZÞÔÑ@ ÆÜ<>9z~²uЄ.¾Æ›;F‚õ:rôÑ›·¢^ø@¯ôÎϲèÏÖÝ\|Z1'œR:we83Ns<Éq³ -®Z"…§͂Æmf”Üéf¼ ®l=ÄcþÄiÞ@ÄÂg'»»Ñ|utòËÖÉ0çygäà–`†9.¤¿T¦U’v‚“W`3æwÆ2C)¤Çó{­ÎôÃ1ª± ¹VUÑ°g¤aiè&î è«œìï==­ñoV®zãäO,Aås`ËÒê´HS^*&jÐ Â&ŠMàÐä˜ÐXi~Î §$‡mì¿ŒcP«!5`râ#ÏbÛÑ¥ìÛjb‹YËcLm1{ ÌH³SÎ ¤ë$œ0dRÛR2ŒfA›ôqýüÚÀ$+[F†W\ œzb‹§`$ G®â’¾ 2L=¢_»ÑF\W[×Î$°È/ Œ»‘ÚË|ñÚá€T*„PƵMòùiØ]©8àñš¼¢òÍ1ÝÝÕУ§Kírì4ê&'JùSêœãàN>LçW4ãMªDÅ©wR- ß%sŠV-Ãs ºyl&¬¬×ç{V„Bäi96þ,ý\*FÏÊXìpZú£.½ùù-ZÏ—ÒrÔ؈tü¿ùTaa©a8Éô_–²45´ÒŠ U© ?Y‘eI%‡"šsü‹4e‘p®~Â9†OC›‹e¯Ͳ› 5ÌD”„Ðôð€’¤¼Þ,†¤lq©€[—Ô‘’[ùùö¶uß3 S¼‰ I´ôÈŒu%ÝL77©‘«<™0䚘]r¤d=€áKó÷Q8ôš$,c¯ß\~,•ÊFƒŸ]ÍÓn=¡—˜Ì|"­ó¥îí`€ÚÐ? çŒØpž!Æ „ÛŠÂîØt rYub â1÷\¾rÌÑíñDnT‚ðSªëY? …,õ”êWäM²‚ši9¨Ê%›²dKæ`,—$œÍ¨´«TJ‹óŒB^A3Ò‰kP/Ƭ§È®-Þ—ÝKwÈ x˜ÅºUÅúâ¾ C|”cê«ïàÃ>@W–+ZÉfQ.y€pw üôEÁÞÂFše&­_ EþfIdrþÿ£b>Ö‹±ƒ‡fðôç*þÜý0…9Xxqüòu#ž5Žvvë× 2fœ,F!Ì’Åž<ÒŤzh&£$Gpt«;#£àd4X¤Gî’œÜ?Ð%ÿr4ðœÿ·p#y61SB÷*z@èØ’ÉYPia™ÃŽ!zÀdm®öw*ÝÎ'QéyÝ‹‡ë­¨‡6¸ „ ˇŒq9e¡hðp=.ÍÉò*šE‰†½•þÉ#¸¯Ù]Îl¼Ûï·©”“ d™ªÜL®ÝÄrvE$AÓ5ܤ²Fmž‹¬cæΨÁå§DŽ|Y³<ÍBÁrÂ4gÕž¦n²jî0HÎR-OÓñ+5ùrE·+ËdQâtûˆÌ6N½žWÔC½¨´ ]RcèbÔíV.<cÏÃYå ]‰lýº›|ÀI½Ñ00g «–šÑÞ Û9ìc$áæ 'Wγk·›Tª‰…æ3°ç¦Þ&+ë~¿^*n üC“R*Ägæm‹J[¨ Ó¥2¨*Š²^˜ñ”ª¸¿““žæ4dý’ZY…Û©Rä/ôŠJæ Y.Q3–„Y–W;›Å¹³8“l𠛞ô öBücÂÜhZËãI3UF ‰M‰Å7õœâ–’é÷ÀÿñµÞmo|Ùn‹õêwÕÕá]¶#±V]EùeàÁ±°‰|'Bdi‰TEê ºgXö‘5-ñþ”‹÷WÞ6—·ÙCΓ–mŬ0 “.lèÇ%`JnÎR¹ÎúºX1W^ýÇÇÄ¥4¿sÓB‹9ƒLpú~Ì[Í(a¼ëÕõ5´ÀPØ„ÆÖIpÁ—C Í/ù•ºG®PÞ»p¿ÓF JOwäWõÌÈpÆÅ»•£Pu©BÚ°1dŠ¬Æž<öÆ$tëUÃv˜Óz¶€ u"Ò"6Ýúd®Šß—LЫI”ùóYü¥õ†÷â+­7üÂülî=Û==kÞSxH ^¦g#«D=Yã«o£|ßFÉ™ËÀÑ/ÆÓ‘Ý×bÞ( Ó ÏììN§ŒN*÷¯ó´6f» ëmw{›^}qä)c"îÍûÚdR•µ Ùµ¿’­I.Ù³ø%ѪÌÝ6~…éñi^WmãiXN™?Ýq[¢¶ÿ¶Äšuã–éÆ-ñ’Øf:uË"G™§IÂÅ[b¥€JØzÃ9è=Òk Þ·]Ñsÿ[¦øÕùçÀ4Õó$†¨„ÖDI–¤ ¾K¢44ŽDdOO@’Á¥ÊO%E2²àbdI¸ ÉA8ŠÎT‚@ÅXjBΠc%«:@K«˜ŽÊæŒ;–yźƒd)ÝPŽx)» ZÛ, SF =Nƒ7b%ÚLo0â+·…[tLdy¹û 7ÆNtÛ ýî½Ü°/Œ=Û9ýçÁ˳½ûàɨLFLeÖr_Y®|–˘¯\´übØ/ÝÙbÆ dv‚#P‚@™Ý0{ ã%ÕýœD‘îB€¾PzcOŽÝÇÒžÄô§ê|¥C“®~ñÜ}yÄ'¹¹r;_˜ oæ½ìå¥töŸ~Å‹·owñ²~½Øe^ìl¬2PɼÎ%Kò((÷ŸC z^Ç¿Ÿw õ…‡»;{g÷pJ0 ÌÓ³êºÌ×Ó ÿ4Ðs•ƒˆ_Ì¡ ;ZLõ½0-f'þ iô)NþëøÐ,œª%”=œDqæ'0_$=1§àÞxÏ1´ÅšòDù¯tfשæíK#.öFÊéva L™—×Ì!:ÉÌ?ÏTMÛ\¦ZƯúËô“²ô’¾ê#aL=䣔þñQZïø(Ö7þœŒã“G÷Ç:>yô%2OÝûs•Ë@>yTK}%ö˜Hš­<|ü²Ièj1ÝýÂx옓DÔÉb(9ý/f)“Ø?ÔK©:9c9Áù2é‹5 ÷Ë^æÐ{â“5¾Ò©˜Lœ¹/ŽØ$¶T^Ï Ó ÌØÍ "”ÊýkXNl;ƒéÄåüÊvæ³ bJ±žš–$þúBÌã ‹œÑàxa/÷ÂΨëiwÛêd<]ί˜gÓæöaÂЧN\ó.FmàتÍâÒ‘îŸ5^îŸí¡é—û»j{.,Š§:ê6º*»ö»v˜¨tb|40ñÏpD‡¥¢ç£u+<ŸƒÁ)9To¼à½?Œ†‡iMtkc¸W¯×Þ i&G^nÆÝBÇ–äϧƒ^zD¥ÝôUØU:B çUäU½ÊQÖè#]›ÑunáײŠ”BQ-ÃP†8”®±Ö6Ñå|ly×V¥a궷þM¸zª„é6D£PéÜëà·ñWåUw%1‰q2˜Ë¬ð„˜º‰„a¢öÓôa ˆî…`÷.p*aÒÉ<3^Ð /Ù’c5ä`MöJ!ÇЩE£Ÿñ¸‚¢¨aH'¹96 ÓïM2H‰ͦ‘9Cƒ2vDº”y%ôíÇtíG€Fþ…ß´áP*ræŠUáÝïUàP0>Ö7ñ¯¨(2soB„pÇ30M‡Z%ßßñl;qŸó70ÅR‘²‡†~vÆ ¹m÷Y]ŽƒþÜÁ4£«9& 9%9šÃÈ´wÃ1Ud. °2 ¹ž lw;Í̺w¡Ýy0cΡ¤v¤ƒ4ùÅ ×Df³ÙHåJùŒÔIEf›+f}G;÷úRæN]Ê/á¸Iþl. ôš™+x'Ç~yãÈÙãŠßyŸ¶×Ä y³ì½ìZc6\\Ꮋ,o­Dˆå6à¶Pü˜=€:&GĈ i×ÆæNLžâ•¶éRÍô¨Ö6ã°ÍPMy4ÚÜ:Sld®QÙjhBÙ è'[‡û{OíȬ&œI“Ì¡£ã¹]rnMIA7›!:¯úJµ–?†ûÍoÙÜÖ”|±_²˜ž‡ÃàMô rY’D“»Í<÷Y»‹=OÄq ÇôÑðL˜`V°\6’š¼¹YÙð"Xíœþó஄6Q>uµË¨0[Óú¤X«¾Y][[6ð2šn·^7G \/¯»ýhãu÷F|Âè±%åSQA\ž ÐÜa“"ÚöÝ6†W›¶å2F) ¯âqõF„qLmÀ¶Á(@®Ã¯­VSÐ*`®iFºãõ»á-]‡îÝ_«†ŒzutJÁ ü0 ŽÀÝ|÷„¯÷Q\\Ý‹à°|Uì„Öù®¬]¸¯ ÿ“å¹ôÃÁÖöÑéëæÎîñþÑ?vÏšg['ÏwÏ*P}õÓJ잯,÷d¹Â“ðÝòGN’¿ß|¿ö–ýϲšòˆ¾õiʱ%ÂŽ) Í¸šú^ú˜ðïI)úWv䣬;åÈTuɸ•ŠÖå¯T0(Gv+¹|OfS\ FõÍ^6s\ä[#2‚$kò„“^Qñ ¡|-%ƒ e6óiY‡„:¸Ó3ǾÁ^tbómEãexº,j•ži±]S¨I d·‘=(UÅìTŒ…ÿeïܳóÌW :¤ºì56d¶aW†ƒ1\óØzßÌFA„oY=åf^Å.€^^{n«¶ÈÊÄXSéÈ#ð#wÖ*‘|„‚Ìù¸u¦ã;áe„DÝz“ôHÐH(ÂGK„}'‚×ÑO9XÀ§ñNì:ꋨ ® ÇSL„ä×jø•Ï6u€!Èém†ïêÔý‚|$ŠsPvE°å{ò;2^zwvŕׅ¦¥B€:v%L—í6=5*ù&.ñ%2:T_ ¡.€V_±ä½¢ƒ+èÐÅ‹âxà]@Ê]¿çá–ý#ÎÈnyƒ!þò16ùéÙÎv³‰’.¦3gOLS#uÍ.¦À‹:ò2†j=ÜöNÅ£êPŒœÇŠZ¯Ýň®=¯·¼‚ÍÀ-xp‹'6bIõþWP­Œ1ËØŠÕ¸à4HBu8Εøˆ·Kt·}…‘¬ƒ.Nš{åìš¨Ë Sºwº-Ö««Õu¡p2=¥È‚ý)Sª6Åݦ»û×M(E^¶åÞÀ¿©<ªâÓÀ¥7ŒHÁˆHV{xÛLu‘££ ‹L«VÜ ò«¦úeR‡Ò1[¤=»ñYHõ1E¡4Õ‚•Y*‰’ø›X½Y}ö¬,êuü¶¾Z΂|À­ý£W»'Kí²X*¹%ñC]à÷¿ý>àWé’Qüìèåñ±,nTýI”¶Jâ´?*•ÅB(k†8Ý^ƒYᥜvý’."Pâ»TúwV±AªX”3Ši†Aø³ôhÕñí…EYùõÑÉìµ ¨»´äQ+ß,]”ËÔú72Ê ê/ð+°lpÉçhw¾øA¬?†ÃÐð@»„_‚V DÔÅÀµð¥¼¢¦” ÐØ0‡G¹(o—ƒâ|ù©T¦:tP ›ߘâdY®ÊfàUc/qÙ ŠÐjÑG³ƒ*,c¢–çöÒîûyuÇRãÉÔçN•°âL 50…Ð# {¾½ d¬ÛõÚÃuå©Ý3À$¬JpžIb „‘ôA°}´¿¿»}Ö<Ü:Ø=Í4MeíbÕ&zïÂ5ü )œ+ú£‹ |!Œzá;ÏLb ¤ˆùÁj#¹»ì°î$«†Ú9*x£2¢ò¼¶à„Q6 !¢X]’ ˜Õ€‰ˆy9 bÔï¦AhrÁÜü>ò¨ Qªº%82ÚWpvÒN” :–Ä͹äÝ´= §¿n¯¬ë+¿}%ÕðJˆ¡¥rµøxç Äe]£f·£ð‡´B8©P¡sÛÛõâö6•RÛÒ4Šï¬ôþ­•¸±S8äpÅC7hßö6Q>€Ún›$ñLfàjÐÊ£U¾Ý £Ü—Ø©Cß-/$,1cêW=diC»Ýz½>ˆêÐq¤óé@‘Öd,nø(–ß4µ·ñï6Ñ´8ƒ–µR>œáí¶ÎÖ?û£q«ÓåO]­QY.Ç,kÅŠ»tÀB[ÐU$_õóâîö‹#”¼s·Iîrº»#œèÛêríÛo7Eôío¼Ý®ïF•o¿uÎ ,]ëÞŠ¾7€yé1óA¼N¢®6ÈådØôWaGa'†¡×öùÞvsû`GÆ´•¿êG4 š)e9Ì1iöÜK¿M4&fãŒf»×Av¤·S26íœ~]’î„°½IN^²êŒ«;<ï;.N‚ó…H³üVYü´ADÓ–Õdݨ8ÉÑ‹:úB•)›‚K \ÐB.Cšp C‚<òËSwj£h€¯N‰2ôÓ)h·/ʉŒª¸©ô€3ÙJkûko2mÛŒan¥ Õ²1ÀҾϞVYßÉ´ l\ÆĦÙÒÂøý±àÄ•…ö!¸wéÝÔÏá”@;Y@±!L¥êr£ 4`A;µ˜5T,¢dljý(™ƒ–(…,>è5J½u“ýv2'S ºnHûz–º7Ãv‡bíÇ¿­ ËËËâ{*ØÐW'|PWª$Áu®„”¥Bî*/Z!‰Q­ oѵ¡¦tC@Ü¡ ‡8r¯^þÀb Œ3hœ9:T½³*ôÜ[ÒÃá«Š¬•ê AAE¥Q_6éžÃN>..<é‹\!øp5 /4t €%(€øRŠŠjÉñŠÖh¨ø±ˆ¹ éYÛU@ J ˜ºÊoÐýKwС×ßð‚U %†Špè&f¯ -ÁÑ_»hR†£'6Ê`ß0õ/`Ñm'w/6ÁÖ€ C‚Ñ]Vd×~F¥. Ú•¶™MiÓ&Ãn‘UÎt’¼›f{ØôÎàòðš5iÃX»>>ïàiÉ8Z÷+ç3;{3ï¨ØaÁ3F9•óÉyî)Îé¯Çòñ±<ë)üõÐýzè~=t¿ºÿ{‡®aÕOÁFAy‰ÊB¡ Í6k¶ÂgŸqÊ\†qÙg;…ÏQ{à÷‡…‚Z)ùßÖù^§° Ú›i/¢l©*E†T€-x&PdÒú7Ò†ŒZ²Nªº–?É/Eþ¤×T²ú õ{j*ù½~W›ÿ°1- ¥«a0éG‡:yÊC¹jS»ïC]:g<|rÞ”Ž‰äRìÿE:à[Z-o~*Å2{hƾ-b++¤§}¯í_øh1E†ÁÛÕKù>àG…d‚Ÿ2k“s@q¦KI ´òHŠ?¨¯å…Ÿ¤85¼†Få°s\Ó\„–,Ü4a<"l€ÄÎQžåÈú ýË‘r,2j×ÀON丟@ èé†Ji-Ü,ÂŒâ@ð˜Dz¶õü×­“¥ô›·eöéwxt÷©¹³ûlëåþ™ênNåš/ªµB,ÓG$ðæe•.X:"-œ¥$ÎÐ&,Ä/ yˆåd¨áÚÍ\Ü!meS{Y KµßŠµÎ¦¨ý&–Ô:%aûÜAzœÆPêçI4ç…âÉ©à<ëÀl¤?*,{—!±šUæ˜ ‹°W·~ÝÝ:»ÇÀvo`Ê™rö»Ä ÚnŽ ¦àˆÆ’Š_„ˆðˆf¬ ½'.½rµ¯ÜàÒC8XL; ¢¾é)·‹¢2Î÷eÉ_±TñF‡,ø0tÎm»·êÙ,Ì@ì3YM¸+ÐBu¥ù‰º øÊ ×;é!dè³h=¾Y*G!ÏDèÃ[ å•È›óÁûv[¾ÀOl¡$*¯5•©\Ài,³¥§”à¤+óÑ;Ïe/¥º[èxµˆ› ‡>ã'TsçRîÕØ=ÖlÆ•îâám,`©+1acÇžÆÆ­´j´¼@ªÖi%1³,Ñá7Y —Qàšpá¦h²×‹& „Eþe <Ái u+ŸIyÛ]Z+Õbè1KÖuÏ—™‘‰5ÃYZ/áqÒë¹ÁG;8‚q‘=2‡\î.=,+µ¸}TÂ!ôoC™†c ú?K¨¢å¶ßEÐ¥+©TM¯àCÒoáÝ® HƒKô|.®nû€e²Ä¦Öq]¢«pÔíð­¥ЗI÷Vvê,žß7/€°ÁiÚï}àiÆÎlþÒ²‰IäñÈâ„kw¬”®Ž!I£ÉÿcÅ¥h£Ê“ü©ñaue­ñIlü­˜Ä±¨\2+‰7¿‰·ËjžUùBoVú[ªR1£ÔFé °=÷·á4Y`R`Uk8´½Ëq-ÇÈuNëÊrÃà{ð(’ëò\¹Ù$IµÝ(þ´¶¨h{dÆ„nvã¼rì&’O¬¼S-1 ¯³&Cä_‘ga•ýË1ÛØ"þ…°®öé î±pòùÊë19Šýáã ñ<³Ì ¤®”zÍc5û\·Žó›¾„‘yîÛslüZ/X2¨oŽ×Ñ,¦ã_˜ÆÏ7}»ÄIÁŒ°$`cɨvíÇwqþ›àžî ¤2¶ñÝ•‰uØÑi¶£°ñ•ù™xnıEÆœº±÷£ ee£´SP¯»õ4¿Ó÷Û©RǶ`F/Èä²›)¡—ËRv¶]’úÜ¥B¾ßC "þVddmÔñ!Ûy ÕÇ{ÛÕ„hÕwŸ<¢^¨vdø©Çª2š ÙÛ‚âÚ:œRæôö©ênB¢”9¡¥Êô­+²”ž醑1fèh<è>Ú’õÛe­@Ï£<h¢Æ‘ÛB­-xtúHTᬓc²*MÑ9»ãë=ùî]²Ñg{¯v7P wðDïzÈ$<ùnu}U:»,i9fŠð¤~$‹¥J ”ØÏ;€Aݬþ½•ÀÒL,ë·x¡¸„ó8dW#&Ä®ÿNÁz´ZªN3~n®9^äw ±‡ë¢ÒsIïÓ†pTÜG3dˆÕ¢¶-=­c«šíÁ„\# öí%:×DÍë‡ë š>ÚÞ¥¾ƒðñ‡žW€¥Â†ˆ7’ìYdÈšðXzÝ®V™öI€M¢ ‰HõŒ–")¶n *.áY*Ù-©œ&½R ¸®!s\®›zx;–¡Ñ 'yã=&¸¹!Š IÐLªŸÝP‘Ûnìþm©Réøéx»£aXNzP6äêccgg¿¹ûúøèä,¹y¥S˜Xíuìò…ˆÃqŽ*Lºì6ëP«IÑ:Ÿ,;xÑÜù'úD& h ¬‘ìì•ë¿MF¯X¬j`ˆ'I–Þ”ì@ˆß ÈûJ5¯[êÔHt·Àľ‚ª5ÅÿVJ… ¯ÅïO½nãßÿtvVšïq€øemU[›~ æ²A13CLˆäŠb–H×W¬‘æ…¦dO>⮟›Iyð¯XˆH‰ÂäE-ÑxÝÙe¡6Ëi‚½Ooÿ4»$ó.{–—Ö'Éw›q‰–¨‡•_à{9±^“ØàRZmfŸÕ@òù^øn¹u–+—Á |vñ‰TüM 2 Ê"^†ˆìZÜ|÷¤ùäÑŠ4ºáË“¤ä0Ë4žª‘ÒÎ\ðxBò8Ö_˜c,âIÑ`|€OUf’-Ö†Ò(i§9¾½mð§À6®­jÎÑm“euåä$P‹‚`<¸ö0 Ã9vq‡í»WÞ­¦äßU×4ž\|ÿxÎþhŽoL—tŸâý©O™…œãeaÒ¹²0î@™†ˆ;3d4[ÏÜÖÀrÿÔ÷ Ñxä–"qæÃBnkæïó.\ܯþ%ãKÿòâï—_¾_U_Ë/Þ¦Óóiwä=‡{ï\sùû¤¹ü¿!÷^JžD¨ÏIìWÖØøˆo…âñï礿»|: bN˨¡v%Ý3!}Yýnˆ7k•¿¿­fd|W}³Zy(¼/Gƒà<¤[^×a}FAü|¥n¡Ô°Ã[‡ $9†ºOÅ0.ä  å 2&øYj,åÏÜÊÿÉû7œŽ‰Îl›Ó·-W¿ÿÜ}a|3p°…Žl\ëígo—íË™ Èx 8ÍËš EÈLÉîÒx?oü™³¤µtÇ ½ï: £'ä¿wœ©éߥœgìSÂl-’í£Ógµµ,²=3;èZóP,ïçXâ1<³<ïåi/ÏúhÈtüÆYôm ïfÒ˜ñ—(½ãš £G–Ô¢kÓ^þgÞ$SÄÀÏêúèš.öüëáôH÷9öìÅ%KÞYšçñ×ì aÏ(ðo®Åi–ÚáÃê:§Ã÷Çïé&zW¼—‡{¯ÿÚɃ~¶ÇmÚ‰}È©ë&†ãp˜ÇÐ{6;Í.ÏÕ7cÏ¡®D†4u‘œ(I¡~m ‰‹zn 'ÉÊŽâôا?êà¡Þá²ù’­p¡;3®T¶ìš›u®Ïéd@Ë·õ᥌p„“Ü Œ¯='º_»7ÕMœ´Ì9»?Í"ûO£M$ËÑà37¯V¡°¨=ÙÁ„öÜwø@&ÓßèéÀmGÀÞߪÈ1‹…Þ<î¨ ¬;‘žÔ£iµ§55"5©ø½¢ƒüKt€Çmþ¯ZÀ_µ€¿jÕþâµ€cú§êÿêf§=«ãÒÓëüÆÕŒy`~2“t«{§ƒËê Ý¾Á×l0Gñ@W4UŽã5§c’-b¶¢ÌçEäc^;ˆbÆ­‚ý@Æ°×—>wŒóŽóNá®ÆKFO‹é¶gãX¦6Ë"«Ý3×bB•Œ YNK庲TÆ •æhóåŒ!9™œMÊr1“­ÑQg”cò0©vÚÐ:Mº¥®Ìç$Ü6…´éãÀ&y‹b«OÎð ’bžiñzÆL¿ˆ¤¿5yœ%Ï‚´¥fú$é£`ÞÀ;'ÑŸ5å'FÈæê'OËLÕÀ梉ï÷xª˜½šê`IV˜þl±j3¾1†Ø+íÛ˜‚ߣÙg=!ã"Ó‡å¬&ŸYP¦£•PúþH$“”1F–Ë\Ôq"O¿*—ØŽõ“ „£»ÜþrL@C[S¥×Íyÿz››ûz3Qgìe,Yð3]ÈòPëþ%·³y/`‰  KOn"%ë6–,¢odÉ–Ó%g¹™! ÌÄ ´‡ Á²©nRX)ΔÆã²%Ùzç6p{ò©¡‰ž5ëqžì·Z*…ö[ÐX„3¼÷éñ”¿¤G²F³ï÷=}ö7J¥¨V]µ~Em<Ä1RÖû8‚¢ÝXIÒä÷›èD¢‡èÔé|@f&6ÝVvGC/‘ ‡ö0“™:¦ž•ÙóƒQÔÜOÀ‹® ’^lØʺ‹â—BùÃæó%ÕÂ÷À‡¦ô5(°d¿0êÆ+.&c.)\@XøëüL®éÃ+`,:Mܸö \_…Ж®kf- YAS72–¡„è[´ï¶½Šœ8ØÊÔ“j–Ó—Mpåc˜‹$š3«1îÔ±Ñ=ñýà/ù×E`äµ¼O]‰›–õ ¦ê7Ô»¸ý>ŸÂ%±T"ž¸T.2¡ OôF{½¤ƒƒŠnWÒ5&÷y£·ïÀ« ±Ë¦¬@FÝ­öÇêr§º\âÆ”rP<ÎJÉ[íÒ sÑ¡-:èKN]å…juÈ©Nb&ê% ñ·µßÝßm~T©ÍgoövÞ6¡?ËÉKf-ö/ |‹¯ÖOl“KÜ@F˜·Êìߢ¡•¹ä¶ÊèP̓Ò#Ã]±¢Ü}ø± ½J°².ýÁ1–Ú†1uý¶×OCñæ÷”¼êâ®"ÕR—gï2LTP–å÷Ú–Ø:Ô»d&H Gt…gÜqzÜp;y5G.a¹¸Eùo¡ªLw×ÿƒï4¡¨õæU\ Iö~,dzˆí¸µi·2è6-¹µO(œCŒí—:´¯\²Ílyèp˜¸]¶Éî†ð}>ù=åáÅÁ4g*NžGÚ£Ì=.ƒE£žK\óÍŠÊú>z“ /†âWŸÔj vÈ|\û&Ã[‡õUqæ¤b°|–$¥ ébEZÿ7nÊ«°ïÕt·`ÁáÿhÕ‡Š$ß}/–êrB¸²Ù’ºªQhæ‹f¿hßæþårº‚ìšåÄ•”5ˆxSx>ìÞQ@îµeèúy…LU€Fb,ÒØ Ü|ÚÚ:€ô÷ÚŒ7Ít‰üB“õvWV^£ÍÎ…Û怭ã~À-6—ìyS—á1$Ÿ;A¦grÀ-°dRª ”ãÄ Lãgúþ€MsÔÐý®?¼%sËÌ‘Ã^ã®\AˆùR¾ Žn!´èÚAC+*DäTGJÞÖ«kßW/C³p<á€Ãµaäm%\ˆ»%í"-CÁœãi*kÂýQyOÖ„lD(ÄrC4– ‹ ñX„¡ßå†ê i)ôfœ-% ©2e½‘·ÜlW"mÒ®KZÃä×K«æ§Q'€‰Fä¸Ýäa‘%ŽÄþÎ íÒím 4]È7x ¯×$¡ý‡9ä`@z%”A%qƒYA%%òq¤ ›0K6¬Š«ý¿ ý‚[ÀB¡É–v®eŒ;@Ç£áPnÀž„Ä‚0dë#v‹Í|Ž ÍÓñX¢æ¡è ÓDóR°¿ÓGëÁ_|Ø­°Ž¼¼o"Ç#P:òPÚ'æWž)rÒxu´¤¤+:î ÀgGŽ¤`Ÿ¬¬‰,R{ZHºHH)qê¬ÅØf"Θ0>òÌzu}ËÜUz6ƒ 1ÆÀ¥ÀDH8µï"ýÊT앺À(<¬Bstª°ï<3Ш|÷³CßHßZÕ8˜QŽ¹áŸïHÖ’ q`9½±@F bV“ý à™…dz‹‰üZ ©j)³SöPšÊSm¢ƒ'¢Èªö*ˆ¸»îßÈ3ºÚq‡îäÛ‘Š>Ž‘³©GØ;|ç±þþÞÓ“­“6÷vÄTŸ¹þ¯»'§{G‡¢Øsÿæp²ûëƒxï}¤aÓAÙ:ð_Séÿú-½¦ÿ)žl¢û3LøÏR»“Fóbx¢òp½l/èö¢²oñ©Jêe¨NvÄkØç² †#$ymÚ€#Ïë^d1 ™2TSÜlý?ÂÈë_‰§^tË…ƒò‡ZnáÃl‡éâÀŒ¤¤£ÄîÃ’nš Òͨ˜oàï=Yמ$Â^EzQëñ&]LïÎ d*sOÛSºð3”Ú4¥én(OVGR†©íŠä*×cŽ&òpB(*%;ûûÚò,9› ݪ¢c"F“PF˕§|“fËÑã½qŸsä5¥Rí·7O·wžŸœ¾}#ÞÖP‚Ÿ%Òšh”k5±³u¶UÛŒj¿QV³ôšM]Rè[\°öÛBêÀ—7[{g¯4Ü$ó<Ö„(òMóíƒLi¤‘Ñ|󌒔x…Òè7[•¹•?€å…”f§Ûý˜JK&ìyOV Óù—»¤¸)mj^Œw. d`:¾v/½ ú¼Ú=j¥•±‹Hãu*oóº8“n£µv™ˆÚ@nÅ÷·,§­ZS2G?󉈰¾mÆŽO0j&ÇdŠ§È›/džï0©Rm`g÷ÞóÏ š/‰Œ€do›SŒœÚo¥M _ºŒ‰ÌseåÝ(’0Y Z­õÍŠ¿³Jˆ|çŽHZ>ˆv?Y*g}pÊbŸ?¦õƒRÕ‘}Ló™X÷'ÙöÓU¾ðÿ£¿[ø—[÷¯EÍYO Ûùùgç\Sk1Që¶;ó-ÑÊ°_øÒùcD6+3e»±s nûÝyU}Š¯HÍ Ödý@|pQ®½‘q•[q8á3¼Šg »ä›Þ£AH!)–VoÖVùŸhÝj`RW&‰»òQÞ‘Úa·t•êúí¡ryI¤*Âp‹twîy½pƒÒѨÇÑ%:âbà^âm«Kð_ÊÒÅý4}¿ý  NØ‹ÙõÇOÄ/þSàüË»¥å ¯ñ=dõæ±6¸zóäÙ³mþ9$ ÒÀÈ»ºá{ì \½É¼ß˜· w4)D·—"j Þ¡(½„V'£}_™*N·—ÌïÞŽ0]ü—„£ƒJ±øI|+­~ÿDÔĺhÀUúÉúÚ£GâX{øh}íï_ÿnõ<¹}2|©s¢¿}l~tÒd.‡P1„ÿÜãX>ª£°BgÞØÆ?Ï)2‚®`ßоc‡ý‹É.d¹A£ÎŽïtFI^ó Ívì<ŒáÈN´„ÀJ$¨ÓÐømn.,&²¤œMgÝ·—¾Ál—³ƒ5gs[»3ÝâDúi(ÓáèTg•ÿv#¦ºŽ ¥¨1§Ä9ŒPœ{cMÍËJ†Fº-/À¿”×ÐmÃk¾ô˜/–äùœÃúï)â½ÁÛ7œ†ƒïyÈÈF5ÊoV!©mÄ¥Ñð:‘´"KoRxìMq1 Ú¬µ„²²tù†sÎxŸŽ/0ÞeO+¿Mévu!sö *ðïWcÿ«ÿoM¤¨!ÆA.ñ³`Ú ¹øFÈúGyaQ:‡6"£ú5d¦W|Å)H &Pò«œ›t-< p”R°fÜ{ÿÂtÝL+ž >l»[f´Iùd‡# ¶µåÕž7}w*÷Ê"ç9]~vt"W¬{ 6º[6À/Ütß´·ß*/¸ê;¹À¥'Ãô‚«\Þ.u<·Ë¤ö¦{¼ðåÌÑüÞ{] àKau€£q,Œ‰Æñ¿¹Å²•å³vü¨=¥w_‰À–wÙY&-9úM1Ý4Vþ0fñãÇ/kS¨ø¼dùŽçÌph<®"/IšÝ-ñ9Wq8A"ºSºûýOï餞BÞƒ¢“’ dr¿¬“üA°„n#ã1B½STö,ñy–\€±³âK]k,UYx·YËzÈÌÂ[WwC,oŠO›³Õÿ¼k‚©rž+Q{à÷‡”›ß¹ôûªœä0º@M _äH”c§äÊ‹´¤È¦GrE˜ÕÝ9ùI3»±”aœbBÎœY©c!uaD¾;_N"”HÑZƒäþX˜}g,|–Mñ·ÅÝ7†wšì$ÖOƒò „íæ™–!˜œFÔxC¼{¯n4Íæîþ³fokxH“«¬Óïli|J“B*çE•¸,©áý CÆœÙÂíûmŒvoZ(AEØ oi—Å ŸÛê²ý>ñ¬ñôÙŽXoT¿Ë|QÃu8õóçzõ;¸¯KGC‡BK¥@BÆ(‘œò8Tl@z7Mj“Œi5J^yb4¸ôHYdŠQÿràv¨‡FéŠØ*1ß#± «EZ¥[+Å%Ñ}©‘X•„8:e/kiƒ˜²,­UG@P;t…®¿¤_"õJRÚ#0÷øþu'Mÿ¡½‚g{7}…§¼‚gëüꨓôöà÷cø]žy‹žÚ ‰Ùø’8DøOªß¯UW«•9ë_MVù:Ý>ú‹wjÜõ/n¿.ÐEH²“èƒ<òÚ£?D«ð6Z‘Áð®üË+²Ua-®ÅD†¦q"X©€aà㌲F#uÖ^FáKÆÌrß Ã!²s†Ã4ø!l8zŽðn gl¥B•bG!žŽÐ[:52„÷ûÈÇPκ“ê UïepïáµQóñ¦›³*™Èû¢_s©š™‡Ò-(2—b%ë8CøŠ ¾Ã †¢?x•¡w3´8=Ù‰IŸ"Ç»—|SŸb'=ª¦¢ |=4ÿôCÓÖ³NzJPum!JÂàyüþžô>µ:´ïêùrR¯bx&„|tð‘WÒ¡~É-ë—Çj‰Ç1Vî¤Sïƒl,ADÏWà˜tõjín¤–ÿìñÚº¨¼ ¿­ƒÓ“ÝLEÓÌcmôM´ÁævræÔâÊHœÒO ò0ùû{OéœRcbA²­±ŠãŠú>ãVöSúiõÓ¤,- c9ˆ\ÆFXåCéâ‰{¢ZÃó/ÉR?2è ;W"K4À½ÛëpD&É^-Ò*äþÍ›G¦:Ê4A¡Q-d £ŠÆñãØwìBR\Ð]‡9•údÚ|íq¸vrå¾' Nˆ6Ç|øÓb ¹Ïô‹l¼¤Š£„G' âWSÊŸ2Êå ¦ ·Ú½ALqH«ÍÙ–7]Ð[aLuKÀ œ ¬)sU¬]Ù&SÔÃí¹¨vŠ=G3D„¦Æ2— è2¿”Z¢XÚÝ(\‘µÄ™c4»vßÉb±Íz×çISsaíD!d‘<äe¢çb ]²ƒDç•SÅw4ºŸñó„<¸ J[”«?ZyÚ¿ÌU"u¯ß‘šÝr µ´Ô(ŠuQì9sÊøô'ì$ž&^9er9µZÑp€WÖVÖÊdÝRÅÜx•Â,ñI|2•F+£,…ÑÅÆŒßögàg2_ù{„ ei_(³iØÄ^‡tHmT¼„ƒ£¢h4¼íêì*nŸJk0ìrÈîžwÍzÖr¶ŒzQXUÅ …ì–†¡¤êñé†ÔçQõÍú÷õ·ê2~ó˜i²™Ðµ.ŸsôÞ%Ä7*y)X"‚uÃýƒ9½)Êòôì%3ñq5] lÉ›³çS›³¶`»½‹…¦øFf OS¤©•Cš0Ô}H¿ ±œ>¤È(¾‹ì¤u¿Š-™ø%•ç(:•noá ÑWô=ÐõÐa’eÄÍn Bòó=„~Dl@¥pÁUF¬qLi¼õ‡p­îI§D´zy:gGÛdwzŒ‰#ÜNGTzpjú€L•aØlÐp¶_¿¦Å«móák{ùàA µ¡ lkÝ&¹#ÝI›?Žx.؇èò†jÈQ®pã´Ò-ÿ’ÛVZ-dÞCJÓß’n]2Š¤Ü·”6¦PEÞ¹‰ÞGŒÛçÅŠ©lžâ7l…¬ÔŽZ][W[ ¿VÙtþ•§Üð±Ù>#KÅ&xâQu/ñh-Æg;ù&"^uØÖßæ:t(nr߈lé=|ÀÀ\y¹:¿“« .U(U97‰*ß­ãÊÈ^ÑúI!U’Ùê`ä »ïišÄ³n@„Þê4´?öÛëè¾bö†yïËb`u³Ø8n‹_‡â•‚'8»;(écKCKuûœ±ÅÙ €$Œýä&vY#ï®è›ÄcÛð$ÃÊÜÇÝÂl#›¦h›5 “Ó]˜ÖBfa¬ó¢ôÓ‚4cIjÐ%‘<›σ&§hüm ç|HÚL åj$nt¯ËŽE¶€Sà×_ù™M<®>¦í€çñ>}ÝÛª Oü.ÆpŒK*‚h_Á–¡mF´é9ù€*x“þ vÔAÎO7’Ã+Ñ`BÎ?ÒEÐl7‘¤Åu¤AG÷šýè˜#‹¼N]-[m,ËÄ3”·òqX[A‡µâîÖÚo«òíkø‰¯DÊO,kµšÊîã—Oò§’ö²m6^?Ç0Õ¢ò"#,åéR ¤JQLÁ9'CF ¦+ž<ª´`3C+/+Ò!˜J0P5œÀ( K¢Ÿ¦8pÌ(^¥¿—%„ÿzÈ­A²gÄ…dïÑYgLºÛ`)ì1üÚÀ?Ò‹Sîñ;¬YˆéûÄ÷‘–¬´!yH™ìÆê¶78‹¨ñº[*Z·¨RJX}nÅ>Í"‚j—ÙŠÊ­sŠ#™@—áþ9÷Á¼âm4’sQ2Y‹û˜ÌlLœò¡æÚZaÖÛÊ¢ùàO"±rLÝ.s%œ.…Ùk§4Óʔ̟µ6N)ë%!sŽUý±óêhöçN‡ÖBæqµðõ úzP}=¨þûª…;Q|¿Ÿ†ii®}…«ß¿.€H§ØuÁ÷¨ÜŽkÏ#ñºœ,4…›Å)g”â ”“ˆüšÆníä]-Ç3[•ÁÌ`È`‰ÔóÍâ[):=•‚ u…“~wû#’¡= “BQ:$¼hRÚ°¦„°É~ÃÛJ*²ÈîXP î÷|Œo]¸ ¯I0zà›¹(¡¨ª¤ÚáìsÆ„ R¸œùšŸ~¤Í<–“¯´ÙêÄE©OUusŸp-ÙÁW÷U_ÝW}u_5Þ}UÔñß`i+­ Û€Nºx²³ÅtZFE«È͘ƒRWÑ öK|°u¸÷l÷0fÁИ¼`ÉÑNø Ès2§ FTTY’챆$*œŠ£AÛÛÈ*NúBþpÍž_dÄó;i¶RÂÙý¢Øb yøep<ÈÿSakø'úI9½¤öŽÒITºí"S‚s!*èâ&ÐëlZ­g0“TçG?R¤9ž,Ðõ†:ÒžT6¾U*J©*Xô€´bC’!üÀYÂO¥D4ÃQ0îÎÑqòÆ0¸rûQعÌ-r$!SDÀŠÃeñµgº`Ué(í÷à´Vš({3 B®Tçóy!@Ü›9ÜeR—f¶r‡P*HqIŽÖX&y è§°”ÍDnaÜ ‰]ì|Ô.lŒ¶Hœ²"d—@•4#BMz)ÓuÌ•”Ø{oÐ #¯©Úº5Ÿ…”x„ee*¼n—Fö ЙF‘ó¥ihƱ‘ò`©Øš§F‘ìÀj ÅŠ6ŠhiOïB+¢ëkN¾Mù Ô «Æ}žÔÏJ rºÞTýÍh0S°ˆ>JìJ9÷Fšuo$x÷†b†•‘ò¬÷åÎ;$ÅÊò×"53Vãþ&çþxìÈbš’°¬ŠŸó5©¿ÝŒ3É{.*WIÓšàÍ"%›ÖŽÓç==ÝAwS¬Íªœ^Ž"ŽÝÀvªíÃÕjÈ:`CÓPj0BS ,6~6Ž€KÑL”2¬Åðë EùãÈpº O믑n¸~dZ´Œ(þ¹ðH ¶äªˆ¬›†ZjÃaWY‘Qœ6öàYfñÖ ¿u`ôã–mv»I¡ÞÞjjHÓ,ãIÞ2Îmh¹(^xwèáŒ{œ’^˜#*Î1›áj]x..cbªîw¦fkZØ;;ž?$ܹ$Ûù²_N=T°ÞvvŒ9ÈÈuî%z½ÆrìC0Fl¢ô×àÊUtó}ÊR-K/~â;Š$qy^b¯»ZôÌ£%ÊlOqö”ý‡:ëÜd×w¤]Šß¢Khïý¸vJã¼ÚŒ+âKàÈî2,so|†AégÂñûr}rP,¥Š¾1 ÓÏro á©Š'¤‚ÅòCÚ—ÆžŸé”ˆl…$ôK-måuo #±%Súè67ÅÚjÖ®X‘&Ó°1V2õ¦2H‡©¾JçG&úJ™tp›Ž„MSò¬)™ éÆáÛBª-Œµ&Z˜¸ô s éÂlø¹05Ó>öùÖæB¾ôkÿÂU¿ï.£;Ù Gt&r&QrÌ“¶(ìµvB3ã÷éUâT²£ÙûpÇöïºsܾͳ.­Ï¾$­Ï·¬Õs”â:qS¬­UWcÒŠýd+”!²iб[oÈ –^¿þèñÃÊêšØ ƒ«kBNÈ­#û)f¿®>|¼ö÷Çüû¤úü˜JÒ|Ðú ¨Ç5{ÞFñ|¢¡PV¤&æ§ ¶Ï#ôŠ÷ Ý1 þèã‚©Z:¾|µZeÓMñ©`(¯Ú¾ š­ùX³aI&/Ž¾)-5ëÊÄ3Tš£q\…ø F.DŠú4‘xáãg†º"™ {ïÝ®À4¯ÿh*D–ãw‰(CÒ|°$ʨ˜&+qðpí ¬¤¬ÜI]öh×áJø‡rÊ°(NCŒ †Ç’òXAš2qT°h«Ñ/ì°ýD²(¶úmø“"]’ãƒÕnx©-t”N±Ö]C„Qo¬–C¢yª¶B\5Œ½îÅ"xTéí”Ìé†S¬`>#s‘MQûM,?À²V›æô¯⧣ŽqaÁ4«­§GšYYˆf(à¨cÌ|õžT‹ëð_ä±+±î첉¨E•I›uêÝ̦Õ¢˜Ý{;kyV1ÚÁ…lzª¼1ÓSÞ»ž>zê?'ûÇJÂÉcî¯aǬãÃ/ãaeaÜ Ùb&2YÎ &ì SÜ8ø€›óœõn4Æ9oul¥CŽñ ùU Púö yç ƒ{õ—u[%i!6=9¥í*‘7Tþ D\}­ú ¿ÍwéG¤ã›ro…M5Á¦+78® ¸ôÿ³.z)æF|R­àLùC-ÝÄÊh'¿béÊúQ“^Kµ$”H÷FpRD¸KO»·Ê·«çü6‹Õ:;aÎY_àKµ\ŽÜK|™Ž }oPA7„ÄjØ ¾4æ™wº¾ò¨³Ø¨v¥ u·ÝöúÃ(5WcX«yÀåq^ˆËÍDÙù¸¯lk!›ÃŠïY))~¸î~ºÃ<\Ô§2W܇Õ:ÆÁ—0úÊÑKbFƒ%uÈgÍ*‘‹SÍ,÷3ÓèÙÌÄx‰¬ÁäðyE 7²yŠÌ:Ó9øŸ¡´ñn‘q¬cÍ„kŠ;EM¸‚Ÿvì 0GŸúT'Ì=¸.ý«Çb/à”®Ô3µdJÁ4jÙŽf§fû4þ°IŒ Ρ(ÿ<ýÓrë䟱 ‹3I:,‘iz¸Ò–lÿÙ / Ÿáõ*ð®£0zò¹ßóûwßè7µ/Ý`’Kò߃˜W™§P¾Y¶|Ø´—)nŽZõVfÛµn§…© Z¦=}[2­YϧÜç†Yå=¿±.ÌtfN 8ÏïJZmzÖ(³Ó\&µ'£ûŸ­;›8„§ñåFëéȽ³è»¤U¦õèkÏKç¤aŠ¶ø{‡{g{‡§g[‡Û»ãbã@cÊðNéü£Í]ÃQ%ÎØð5XŸ6*ëOUЧ{‡Ï÷wÅáÑáé‹­“Ýéб'”íÝ ŒPãÉ„â„mÿB…çÊ¿Úƒ!}™~ÿäVë=FQz꣉˜ Ǧ…#/N'áÈ7‡™Cb8 ¤=ºû5–KcÓl ·ÿf ‰ÅvdÏUÆD}žYúRxú/…Ó5‚ÂçcŠLéF¼Ø×2Ê\ÜÛà£p±ÒÃ`̆+ž¿|ÌxÃí©`Ò_¨PqÎÿB6Íî—}}F¨ÂõóŒÐuçdÍ@>U/„óm$¾ÀIKvFÑçÓš"cLi²×¥ŠNåÊït¼À1Š¦,5ÇN:,ºÀXÕ¢ÓÃ] ³SK3õ"Hžå~'ÿ?¤4'{["ïÙOC@Ü6=ä¶onbí …Q›oÝÛ±;Am{ÌMTó©c2–[–W¸Ú tµ4Aä*¸‘KSëŠxS8ü=·VÈÔÑžfÇvT¤YÁUͼÐãwÀ„Ø[`î©H gJUÇ @,ã;*Ts$WW~”«™äóyŽÉ‰…Bwþ©‹'Clæ 5žæ9†X&ëYÖÚH™÷Þ;Íþ´bƒ/aþÇ væù»QƼÏ%÷ËreFìѤ˜"ò=~KêfBuÙ°áf3á3ÒÑQšfbìT!±…Žqð,xáÕä{"?×FZÇÓÔç*E2´TÍô:~Ô†!¡_*í©Œ0SAO`@ß.F]åjŸu)x5N¶§Ú§xä£e¤ ¿¹^}"–zîm cì=®®ýTN¿™gÌb’¨¢Ot´ŒiSNÄd ©Z KB¦üxʈ°|DÚàò‚M!jOÄA‹Mþ>B×UÚ(´ß †7é—ˆY°d0õô¢ÉÞõe½ÑòÚ.¾åûhQ4@‹(? ØÒŠ¨"2àæ{6òöH¸T…½çclAæ…ðÝ>ÛLû¹:½f'EDùYàØWƼ*ÞsÉä>‡Aý|”áÙŒW™Îé(ðËy§ñ¼oƘÄ"²D ©«ƒ¦ê?ýôšŒ|¯ç¬xº¸( uŒ²ÕA´B„A+þãý­ƒý½§² Ä¿GQœû|FÑVVó‡3ÃZW›hZ¨e6B)åhLî)z!°Ê@>ûT¡X<Áäè +ro#Ò†g7·´õ#Òö„]~ ûÚ˦+f<»Òþ†Þl¢RUi4¬>üì&Ÿ9ÝÈ ˆãvetxùà8ý Ôág Àkyxœs5Ǽ™+a,„QÇ,AÏHñCÂÓ èèš³Qˆ`üW%¼ ü›Wpÿ½JQ~߬­¾5ÿÝŒ)\]…BëÞŽ»üÑy¹‚„¶4îî©WoÒêæ#éÝîð´Y¹·;c´D¼T¬Â¹› Èñü³ èùçËL!¬Ë‰0¯<±½uxxtFš†RÞ€‚ÚkOôüË+ ùìYq0ÏŠñ¤é¢o,}’† ×Bw5^Œ©Ì®_aXVÈ)öÕ‡J…±ðÀù ÊÑ$;7Å,²éà¼ß|¼¹E?²Òb=z8Ü ­w·Ãô=×ÿ¸íYiÅ N+E˘¹ü¼ø&L…Ë¥ÿ”ŒÓ[ú-ÃS®':}äÊÓ.7ÁRRS)^ ¹ ³œÉHøR¦²8CCâèÙp—ªtÑ#Æ•K¶mm::½ ÔƆºª³Ý.Üv;·¢B†³âcŽy`8Z/ÅŒ„65 F)‹ÎoL`¯lgÈuý&“äd¡Ð|†(T ÝRf—r5'X^’ðül/HÃiðœ6œœYm8X_¶Ðp«? ¶PŒm8enß?0’P„4ŠêÅŸŒNX¿Fñ'ØJE]Ù‘íÐ^‹“¡ š$lF „¡ŒjÉ™˜ä!ùÏ–z†­••œ ?Ôӡį)’¥zyÊ(Y|Ó< ë•÷Üx|ŒÉ$ývJMZo¥õªìpzP°üh™í‡.+57~…ŒY1n˜4m½ñcãok¢¡´3møh!S¸T&*Í ìOÅ<3Š©Ž¨’ç[±4Æ•v2öE抎[ïXÔžmNL¢s›ŠÜÅ’%ûxÍ´dÉ+JÄrÌgLõ VLr8ÄœÙúožÃL²|ÚÆx ·=ô~4ôÛјl|EëÐ*Œ¹kå¼®Iw¥e ?u 7ÂÜ`k¿igXµ•ÚþI­¤–i\É’å·2³9EAFO ꇺ5@6ûMï÷z)úXo,½ÙªüË­üñv£QþØXûx™h>U£ö±¦ Éæ©¢]“#8!“mÆMæÌ æHƤ/ƳŸkÍ1ÖP#ˆŠš8/n§“ÍòØ—›’‘[”ž 8† wý ΦüƆ`–Ö§§Beé.ñ…Sºö£ØX:' 7K¸#1|]M,ùUeÃ)‹ ‡z-(é¶&¥Bhê¤?=cO€èVguÅ*ÕèJËw [ï\mÀ< ~7 ‡<1`5ȃIGúÇF^÷B…Ç÷ªªŠp•±~ÒBFfìD!ªmÖDí²t^ÐäEÎüÜ0 Š(Ôhžîol` ŽÑ‚ĺEqô>_ã*J×z¼Ð+j%`¢[·ì–0â!.ðæC¯O/øDì Þ ¡¦»Þ¥Ñ^ý^xP3Bïj•}Øë7³ÆƹTö ¾­Ôk´ŠÛÇÇ2¸‹Œ¬òöà JUøA&ÜšáÒ8¨´O¢µ ¹ItîõÀÂÉ;ƒ‡èZ£ÔŒÆô ô\6fF_„ê‘~8@‰bÆžu {–ð®Ü? @ðÀ»öäê‘ïÅÄà7³·§ÃÔ©m I“S«ÆßTâr Z^zM81ºYsŸÂTHÄÝFMOdö ‰çÆWY1Ù[b1AØq{v¦ÛŸÙ]+JèØ^dvœd ÂÂ}tщ%$¨Y˜¼Ýs :ò<(žî>ß;NNñ0â%žÑ·ÚÇFàl~¸ 4¨†Tò]ÜN8"M„ÕM¹ÂKˆB¥Ãg›‚¾þˆì'~«TÊ„]é)Ýû³v¦þYuT1³`s̬¸õ”äè]ý`Æ‘^Š; ½4ë›ÃƒŽÛá¤Ø1 dÜn¥b+˜Ÿø÷SA7mÐ@Ѽßßpú[è¼UÔȯa"ªgPúS‰)ÒÖ«_”x|…ò‹~{/E]Œèõ‰•€UÃr{£Ö £ETW PF‡lKT‹™í`iL¯>ÑÇZ×snQ Dt œsa~¸¿~z|®=ärÐ2P›Ê/¨Ž†?¼kÈ7ò,ÉcF^k¥$ýës¼:¾ÂËBVÔƒ(,¤¢…PÊ(°ÓP¯&º²à%á™Ò_ã',û`àw wòm¢> ÞÁ‘¤’ssxÛ÷àVDB b™¹®;±“ 4Œt j¢:Ý SåøVeÍ.üݨWc„ŦC‘% Äm8¢P¹T[)año…uŒ"ô¬lø‘v¦Ò6Àb]pf»ÞE¬ŽÌì£úE³ݹB ¿]ÿ†5¬É‚ùÝÀ‘/vä:Õ8¹3¨Ÿ*µüK`ý.\é+:cJÉ ‡*J#T' ôÑL¡ˆ¸Pöo/øþÞSRà}¿÷Z<$!&°¯²ãØ%©aNŽNÙþ¼ÔÆtSß±¥‚NëzõûÇÕ›˜énfz]=q“ÿgt=îseÔã“äwèX uÅØ ´ %R£‚ÄiÀÛ« Þ¡Éq'J‹ßˆj‰*ú‘õºŽE.½Àcî_½ŠµãsjEô¥jiE½²cw t¾®¡A»È ßÐZƒxïuÃ>ÅW²!y^ÄÉÓ2¤Øª««ÕÂE[Àa|ÆÂÒ’1¿WM%¢,Z,-Â÷fóùáËmtf ÖÑ3ñ’N€Óz9™p°wxt‚åêâû¿—IíK‚!y…™°óá_”P°˜a,Ž¥)×  }þôKUúaÓz]ã}°ëpŒQRá\OQâÐŽ|‹cwê¼ÕnW¾òC)„½t¼tq ×^ø¦ Ð}/ÝZŒ* ³©}eçv囌è (‡ Çp›¸ÅÝ“²! Þ %Uh„€V?Ó¾ˆ@¬ŒÇmæ‚4O8_pûÂË:2”ISÐõîxÌ+@x¬Ã}q2ÎwéùŽ¿¾öa‹á¡Ä÷@fÃ\Ö‰›nûL€ÚÍvÛ~ÇÍ”-I³ ï‡ Èuä €ÿ„!A9/ ³éM²çúâÂٌµR€(д2«p­ç˜¬%™eÐ.Ú:]YÑ~Ö“Oï¦ìÃ9–çÌÅYÁ‰­ÀÄ‹â”^-ÿ1‚­±¾ºú÷8qKÕöIõVŸW\+2+¿Ü¨6Þy+üT ØŠ±W€PWö#|JÚˆ=|Ò“öjá/C+¢Pqdãq}¨Æ1w“ »(¶ù,~9ŸšqÄ_W`€kDC 5`x‘UA †›Ì')ìb λ‘2Á«--›""²§T^©ècìÇÞˆ<öíoÕe¼ýVÃÐ…hñÛÆÚ·l“PukÙÃÙÄß@Fœv'.KêýæŠfœYhßÌuŒ(w$v(¥„<ˆü-ObþX,²WÒÕ$cÏ™\5kÆ?¾_žÔb?ÿ‚½1;©2o’%œ$ …Ÿµ¨…*Ý»õ5K'ñ¢c.ÒT5q•~½¶ÿ@aúÀoqBÖm;ŸyýÌjÀª½h; E´©âÃDîEÉòSAO“X[uùä %/©ßŽvoâReÖÌÇó|ñëgP[ #{T!þˆxbˆ¤Ä&’X;UÌm ›¡x'¼Žh½¡³Ð5ãR¥%ÒÿIwC !ýz]˜L1æ­&¿;ûûôÔÁ’ V}*.1–•kÕj ð’"ªžŽªŠ}#¯jõsÝÍFΕ…`§K‚óâé‹]híYE¥M”¶*ŠH¶ñk£¨AáO“ÙïF±Ó%Ý"Š°‹`!±ú9ü‘ s[º ôbŠÉ1XÉ;r5ÜWiª¨vFŒÀÝ’M«’ê·ªÁeÝ7y 4v¿H/t<”ع™‡þàGÂÁ"é1X…’ r¬\IüÅŸ6 qÔRµl aV t»y‹‚«0~hI‹1@i{P<ÕB$/Ñiq˜ŽÓ’y ”Û/V:Û¦ŠOì} J”ïWZÖEƒ«GÉpsbÑgvÿ¥ý*}:L½­Ö`­t.KInÆ+Žjoªok|Ó‹Ïë@ˆ1sÈq1/+ŽÝ4ÆíûŽ}9LŠzõ¬øÁóWñ¤ ®¾ŒÑ<È ÇYßeÀV'‰<Æ]ßÆrõ¯'®V)›´hýë;®Yö%<Áö”^ùŒ/`Þ5s…Oº+í®&ɇîÐÏai6盥џm&4ÓÆŽc¹Dò=¡< ‰ã÷Z–èÙ ®?Óê|ûŸÈ—ïíóntݺžˆÀ+Œ }hÊL@®žò8«“J?Èä•pÌíô±ÿX…‹܃ÜÊ[•½m4ÊE­ÁZ02´&œ;¥s{ÿ¤©vÜs´qC„è­°‚ …½‹Ì”–Û~g•´¢q‘¹+ °/õRJ†oÊ(‹RB›„è†á»È°Bzç ¤ôdŽ_k׎OŽžŸlýgmƒY™aü´BAŽMS‘Ô:§~ªqc†Ú8šqk”Px˜¯oãPÀÐ1ÊW/±îÓ¤N»õ—§@B¨–6ß´+lº¡Wn4E±G zhüÐW’KW¼bö›V°GR¼S§Ú$%6•zìp#÷ÔÆ„UÐbc­Ý7ÊŽAé˜ää„.L„ÎþåvAž„aPK^õ²*œcùtý ý 8¢ò#$É]â”ó,W¾^/î~½ø¯`ÙÇpGð+Å)ÞHšÇ o$®ø:˜ÈµÌÏÅÂGÍ^NÅÑtzw ÐØÅSV2JU°z"ÖL³e»¼RÂC.&•^a\ƒ+·…Žìš+qëÜv;NRèÀ@¦£JHFÒª¬éœIü•„bK²ò°Ëž®fH» éJ‰ÝÊU‹\ÔE_–€™#ÜA‘<ÞŽé;ÌŸß:'xþÚ”r±’]ZXZê±^Gîþ³êÿ+$¥“„ž8ƒ¹á‘á8¢ßÏ€5Ð:+¤ ë†# Žï25Ö€¾%³5^­]TߤúÆûgðÇ ü¨‡ï5d[Ž¼hÕPl¨ÜðâÂW [ÿfÄà[tZý<]îÜÔ&ȆÈa¾YHn¦bh8C)=Î@eæ “ Ñ$ÔJQWÓòG³\¢Û´~DʈÊÂešD{ƒMQ]¿Ï~gåföÒr«ÑMÀî / ÏwMCîmzŒ×¸+×7úKÈ.‡!•0šèÉ#íêÿÆ“"É-L@Ž±§x+ ‡µ«°çÕøUŽÏqJå[“‘ÀÆÌê€ÏÅZ{ {ø,C}«okòðzŽrDWéë*Dp‰ëÐâ³j€­<¨d|_ë"NŒÐDš4v¤ï÷ßÙ†l±£ãâV“øG¾í¦Ç¥,% ú÷ŒÁ«7Vš´Kò¹_ýà<™xNÜ«0'/¸ÝFâAzÁ{ƒü:.ºá{¿PÙbíņÀ…uª^¿|ÝDíÉæÁÑή­K5æ©X½@ &$›ƒÍNu’jGS‚ò( ü“GŽ¥Ì“¿1s¹ô˜ÒÆ®3ð°{G<ìN‡€c/Âkuo$C¬ W”ÓPêÿUL?úîújS!H»™‰Î= ÆXŒ˜cÙgXOô'(ÉØÀû}ä¤ÿrô‘DŒÿš5µå&/Ž+/_#'‰evN¹,¢nx ±#rJñõ {¨ñøñãÁ"ø´@Ý¡ˆd±ˆrÎ ×ïFèå`€ŽÈH#UM¼p‡a55»·¨•«À©ì&¶Y€òP"à ü›7ÿ*ýùÿ f+)GÛãY«7R¹gM,ï®ðSËîþ³òTL“¸´±ìÔ¤HÁ™—j£ˆHšäp†ñä±0&òv"ÀôÂ=¡tÂ`ƒÃ¢ÿkÓM‰^³¯õŸ‚Ó 2–Q¯|244bt¥Î˜E_SGÃC÷¸A¬Ví=b'ݨšžŒh %£kؾ"®Zìï0fT®\và¯p>.WzxÉ]oE=¿©ÆOᢇdÇ0­ç^úíúÃõJË*´« =°Á8™a%¤›€´¸‘C’ÐËvà‡näÉ#®jâÉ£–1þ•bàðCÃ~òÈCyü€tÃXé¡ÇĤ Æ4Ò’â ôÓ̾|¤(a û‡Å±ªä‰ ’ã`:“(zà4LmŠ ûDCÂn=_¡$pÏÃvxqQ-}Y¦<ÜüËÄ¿°`փͶ-+AèwÒ"Z.âÃç“”o©ʲIÛˆÏsÎr”%µpïx:I56𜠑¸ S’çPþA¡Ä(àáÜœŒ ÐmÁÀ£(ëDyZ욎™CR`¥õ6REéߌ#¤Ñ ³’t+ÈÁ«Œ#\-!ÿfÎj‡<©y½ꇘ‘qBbÙØ›4:C‡0É凬žÕ‹ .Ùi{(a‡±\¢¾p uß-£¸¿G(þÀH£*BŽLƒ¿_y·»+ŸW‚™ôÏÇ“ÜË¡‘Ñùu¸#×ßGÂÏxŽæÇ;gè¸U5|ß?Ÿ ¼‰`•ÜØŒÖ^WÞI➢ºœª‚ÖÙudF<\wë 'Ëï[˜ÆFaA‡GiÊJ1wç4G²/윋_‰Šøá‡æÖöîÑ3ñcÊ[_m= Å«p6×èÎS蹨èV.|À…ÂCwà Gƒ]G|*0Dté.‚f»9,'¢#ýK9ÆÔC9±T:8ÞÛß=aíjsÈ%¸î¾$c'Ôãqqzå>ŽÌwg0 6=¡å4Ëi;ëÞ;  ý ‹2„Ž¥›5ò²¦3Êp+¦·µ1!‡f€bÅÒô ( â‚"÷YÝ?´i?5QÜÌTX74†4F-©zc÷$Ýÿ *ÞᨩLc’‘ ˜ˆDû¶ûÂERJolÚ2•^qߣ¬‰ˆvæ¦]áG*‚¢‚Aò^[1âøè˜ÎqÄfr­Ü:ÈeP€”SØ8ª¡zbãª0[ÃÊ0¬´¼J Cû¼Y\´ÇÝÜ?kžm=ÿuëd);ÀêŠ(Ç“‘=e=8u¢æ¾í[|_vJ¾ì©Â‘|ÑCÛˆ[ Ç´UÕ6‘(ų–ðÎË­g MsãÅP„)” Œ [þ ÊnÍïõ¼Žï=fžd›ªEË߳ܯ¨98ý(B†l’ÐES˜*&[ú%w¾(o €©S,#ߎ#&σzVÙŒmé€Êþ°IZk1,Šg.…Ë%$t±:x€Bj74ME< ã 3ª™1|”êVŒ¡X!'žë˜~éKyý~%iñ`ßD¾1šítñ-%nÖJÖ‘éMŒŠ56“‚úm]ÆR°’À™6R˜©,d«tk/µ (h”Út;f¤2%ÀT2uß0À-ˆqÞ< îCƒû±ËiÁZž¯,0ü1‚ŠGgêkûÔ1¢[F>+&Í~TSäêê$Tºî˜9]8­¸¾—¼Šê|:zf®‹­öžž’w©Ó}u°‚¼Ê:…ûP‡ƒô#m<ÜRÜ2 B‡ŠÀl Còˆ [ ¬Úg@tû% 2ÆEÔê0¨<ÄG))¸Ë`t¤[G`(¸4•‘!Š¬ÜÊ‘N‡M1šVáÈB¡ß§‹/ô|ÑLjf³ÝïŽ"ü¯€ÞÞ¡%gÛ)p ƒuN®ßRy3¡ü'{fäßY0h7+œÌZñÙT÷²ñj¾£-c©ã-§ŒÚ1D¬1ÈxV±ºÀã)ýG‹²dPÜ<ÉäèVIœ‰~JFE«”D&ÖR( €‡Ý2ÃÐÈÊmÐçŠ ­àK¤ÅF‘ßÒ1PÔ®IÈx”¢—f ÄÇ6¤ñïœEÕyènz¨Ržmù®R˜ÎHƒäc\pä.¾ò ’‹yš^a; «rjÇÌGßE´;H|ªüx*ßÑÃù¬„¾ó•ÒÏFéõ2æÒz«Ä½Rû'ò¾Qâ¿—æwŒ<†ìÛÅÆQþÎ̤!‡üwŒ9C¾ÔAc/™–Cºf9šîF¶¾²¥_ÙÒ¯léÿ$[z$!z?‘‘IG0ÿólå+iøo >d³À+y0Æ0†@$Jå“«àÜD¡Ü•Ltx‰§¼ð¤ÊOºð¨ _/<_¡Ë8†T%îù£`ç_xt‰ÿæ Ä„ Ylü…'.9‰bȵ˻ðÐ#HÞ[ÑÐ~qýù$I’Ï$¶i‡§m;ô³† “ß6ø{96 ß>>–¦Äê[A$ß³xº®<ôÉ Ð.ÚAóŠ9teGו[¿î6wöŸm6_8… Vì×Ýz–a:[±gš¥{7øTÖTz%†UºÙVLÏÈ^šhZ1µpŠ¾Íùvq}å‘/KWéÐK§šï!JôÆþ)j§”Èp¾`!­1HÒΦŽêäl–SRaã­­Ó•ïoõÕMþ„ÍQ„´¥¾¦RP9M¦­s5|»E„B ü˜¢,xèìŸ5‘@.R¤i¹"0¥¤ä>x@Ž•1¶@°¾¡ÙÄ˸Ü„ÐÕ«%7²0CˆYê 89Ûßi>ß?zºµ_XSûÚÙçÔ…«MÐ"Î5ÖÞÙ7êf׶Š¨ÚÙEW©uYõŽØWè˜õVkW˜÷·þõÏæÑIóðèò2¼kÂëb!˜"VÏ €¨=àcßåd¹ï££×ž'ú]wˆ»«ò| pxÉFâÓœ`Nz4Fy9wª\ýGLBnJ\áEÅ×b˜ÎÑÐk6—–`x>oÉ‘a>r,5VåŠãz´NTIͦ A¼ç29 Šêf·ºbî½ÉE"^1=ƒŠEÛ”ÇýBå³÷CŸh©Ó…yä̇º ½W:Ï6@MT7³âÿ|(,—ClÆ “Ðb‚¼Yˆ1‘´vú#à‘±à070Ä…O² V§Ûî†PŒ‡´‰ 9ŸLî$DÌîrWˆç•4ºþþGG?ÃxðÓIÜprÎâ±'È–5ýgàq+ÄQYèñ…’á·:r~2ÎÉ ç}£øΙ®ìÈFèøŒ“¥wŽ8¾fćÍ0[ñ´ >o©ZS…7)šæ¦(c;fqõhhŽAòz7E+Ñß$°¦œý¸ªìtâ 1bL[E¢úGtf™õ¬™A8¶QÐៀç`Å#ô¦êuƽŽ¾uâ«Ê2sÙ³ß-R¤®™%X?Ìt}mûå4‹[î¯gçwS¥Yá©¡â÷Ý…mePEžô³;wddg€7k+Gú—p¸J­ì+£û•ÑýÊè~et¿2º_ݯŒî1£«ôÙùÝq5Dz½ªâýp¿1´ÏÏ˶&óÂFAbädôúŒEË–¤y‚K–ÜÆ/)¹yZ´M=ad€5ú„å,#‚Œ**òV¾ÉÁTMËI˜Ôµ€ùòû“°r0º•e}Á™Ñïú­z!D….ýkþ«ÁècJì3ÎV¥A;Åå`„äu 6‚;=;Ù;¦çþ**¿rZåËAŽÞÉò¨kÍÉ €Öì8 |…’*¯5ºt,VåÜŠ£€Ùg–çcµo½(¹ëdÍŒd¦(6¬¨ ]7ع*¤ñ¼"´= ¹Äæ((â2 ;€Záèò*ÛðÅ2ÉX;ŽSjø7êFš=­§3_X§œ“{03ø LBç“ %#7Ü#¹;ψ|ˆ^c„5e!ˆOÖ‘ŒÑŽh‰[?vÏ¥¸À?‚BÙ£¥CåŒÙèÓT·vù³XLšŽ§N¨¬JX3?ùƒ &e>&ÖML†ùœ6Í÷´[ó£@lí½^Éjt¤<ÆHDÕ ºÐ`X?rx€ÑØW´ Zôƒå¢wfÄ"ŽGy¼·]ͦ®óPîKÎbÛš]78˜…9Ù:„ãÞ&1hgî@.®`ÅŒŸÿiÈÀ³ê0pY^»T±¢v8ïf›G*ÜRÜ% (ze`AGs»r‰ &°Œ^S†¬”6Çö晓ØHvqöm’h+±GR¹÷¹A7ÓIÔMlEqà¾Ô¡¯6ŸªZ#!‹csJ‘¿¸e›âq+ñ¹­•`EŠùg=›wNåò¬3Ï΂¿z¿´û}À[`—…Öª(Q: €1o[TÚ+%ÄZ÷"%H„.PURúáza–O”–?§`’Ê„†¬¥Ò—Á¨.5EìÔBa{›x^¾l§ý;ÈÝŽÕP¼Ù”Â:Úó©DuÈ8Téœ{ÞMÉ]´½ NÞF,cÛ/´r¨QjÓ.ë³ ¤¯¨ÁDEÃB'díª¨ /(£~¯¤¥×u!…BÃ`ÖyÁ6{¥å¼˜&Â3ݦ̔BÚ¨)%>2Œ k?auùi5¤ËD\’!ä&ió†ŸÒâ+,J¡œ1J"gŽðó\¬)]5bW:èOAý“óK–0»—Þ°ï^z‘ÿ‡§gv¬IˆQÁ¶ 13rŒC¬º)u®É@£~¾{v¼õ|÷tï_»ö8y˜ó©„¢X™b¹÷ÜþmP³hž"( 4/ü¯Ó„o}oNû7=•©˜B{Ç5Î^ â=è‹f¢>”ía¬ˆ¶Ôý$é?‰qr3^ñûÝ&—b©ýˆ„öœBÂâ³+7xGA 0Dà îP^—¦ø=±õÞ¸Rô 'u©Ô 2 í¹CŒ8^ÐÉ;,ÊeáÐÚ(,pâÀï=zR YJ¤SšpùòG!*aŽ0Œ!ªä)\ÇíÂí®s+¬òòóÑpÈ$.Ÿ tž<˜ .ÝA õnªü|‰}˜KÜ¥²b©–T üÊ‹Q¨°$KFäkæÚ¦¼@-ùü è‹â1ˆ¤êå%jäðËPn€d˜-^F=7z'–VéÇE2Û@zÐêÄ*qÈ+bõÉêªî ”üA¬Z]YWyLÑ—pæx ô8P„£˜uy]øa÷¢£çóøÑfÛùô#ßl®ßes":Çÿá  Ìv—Tžá´SÈHä1ø:‹žö°”èzÁåð*áÝnàÃœî=úò”æøŸb^zL²qfÖajøM>ž™áÍ&æ¨y²óê=)7·Ov·ÎèÛÙÉËÃíÔ¤­§f휰e!NjuÛ…×h׬ú7%­[„g0*¨Ù^Ç'GgMèÞt¾¿:Ù;Û][ÇÍÓ['»;„èÐå}Ýa ·N…žmííïîX?™ûÖ²„†(¨|K0·V]7ß#æWvÃ@#«ßÙÈ"ÝÎÐØü¨äl˜•¡ñŸså²G0Ú©Äà0¤HÜ•;¤ýŠÎÙ°˜Ý(ä½N"0DP‚LœgÈuåžq)•ä&c\·Í¾·¢—5I¹ ^XX Nâ’Ÿìýºu¶ h÷^3Ødfuæ•fZݳðkk1å ðÀXI̧fwwHü(q‡ÀX"çÎûÞ v‘U\p¼ö.F Z·òJÃw?â«ckt)¤ÿ8&ÓŠ¹DcÜ(ªeµzÓÛuEm­Ÿ˜dÓa4=Íh¯†&µ8¢˜Ò>œ†Ô®=¼ëR>Ì\ÊGI>%%z‡Ê7¤Ìk¤Ì)óŶQårUÚV¼ªÞxËâ²N´Zô‘!mD¦¦Nky¨S›¥ (î–Ùãʱ³Ì/l=á-mŠ— F–4îh…Xs,Á]Áœiƒ¢ ó¨$9ðŽ7ô=v¼·-ÐX°Z u7êÕITV€ u×çì!\%ï¦&H÷Rå3UØ…µ5Aò Žß¤¥ü´\Y®Hß~±ƒIµ_Å6åÒUø³ÞT®®×žª>K§eªë3˽D²ÌžÛ„UCMc[ÛïÒõŽª“åÔ‰Dþçˆü¬är" íÿá‹”€Lk/ŸzeIQú¾Ôç"MÜã¬Ùä3c5³Ïøܺ0ÅD/s¨³•o PL^RålQ¿šµwœÊŽ\˜úšPhAnï“1tX+a4ìÃц²Ákw ¯:·7 Ú+¯8„ðxÚj”LìždWI²’‰çatóÉÜn7¯9u ã¬{Aàäquïr×Ê—k—DZ£Lò}êÕî볓-½žŽšš8]âl¼ðˆ£EΗ_¿ce¸WýÑÍüWÃy𯬃R¥f]—¤ÍŽÖE¥7L’fu¬B/͈ƒó°¿ôÓŠ :1ë„żD?+GÉ.jþk8yénSЖ¿ˆ-X[Á­àðךI»r1¬ÀI|¨BƒYîЗÑíï…›™—ƒÒ*ƒRçAs• kœTÜ•DéÑŸ .ý÷^P5ÍR3%.ÇÑA`sÁ§±¹¸Ü{·[/¦ªlZPœt/tc¹ýÃݧ/Ÿg²úÆ¿E|Š)65ÕÃÝÝæÖéîˆNHuÁ.Ê'Jó\ÄŠ®øŠ`«¾R )?Ó C'l×ôh`ü L‰öß]2„šD‡°UûíÌôÊ(ÐA^ Œcui¼B®²D.ÐIN8ÁÊN?üÐPꕬºB½¢gèʃs0jüþP¾¼`•HµHƒéED;<(,Ê}€"ü0`q–T—Šèùå–|L´<¥äû5>Ę ¸A¶Ðé2Z¡'4V‚Öûd’Y©pb…:X {C HàŨ‹Ý ÙÆÀøÙΧcjHñÆÕˆnÃ,_PÔƒ"U&Ïë¯Pú3x½ˆ¾ w|&%‹…EÙ±ª´{¥XZ} #æ1˜öS¾AñÌóD_Tä÷1<Ï"åW*¸åø(Nª;·xÎ瓼o^„a)¢ˆ¦ÐCì Ìš7,³L» B…V÷’ @ wx¼)×^¾ƒ‹eªº¬Ú ø ÜüKT‹Bý¹E €ÝnxPàÞ1Be~­K7£GD|ÉVá>y6z> D€ª€‹¿Æ# X$À€Ó u`€„¤‚ËbVÆND6Ò\ÈûãD°ÎŸwqá·}XÄŒÓ4êÞáPâù’X€}RÍcá—]R"®(j#½¿Ó»c4ì ?D(ê¢ù)GrŒ4˜þÒ½Å~“Ò¡7ä]s «h!ÎILáî¯Õì*d>BW–bx ¬ ÕÏ—he¥•%*ñUQŠj¿5–Þ¸•?¶*ÿj¾•_V+ß7ß.7Êõêr­±Vë—Î7ÃÙ&UÔ h·Þ(¼ó—³°½Å%>‰% ºŸô‘h¡(âÍryúkö«­“ýÃçrZÔêhàz«ºj‘Ò,ŸÒúæ§Øx\ÚõŒaf~ïÙ)ü¥9)Cí8óéÖé‹æÖÉó_!›¾Ÿ½<ÙÞ- í £ÄZUh²¬ìMÞÁêw²ƒ ›uÖ}ÂD s1±“çKè#-Êê%QÚºèyÖ*ë² að@çP©³b¿Â¡kåæv:œm@ÁÊ8视ZpÑŽ˜ÀÁÅ' øÇZŸ†ÔÖE#ódŽb“$Æ7 NT+ÕJX¹Tª]n¢ß Ü°š8äö évƒQï-ác2­ÛŠVñK­ÑX« õR­‹êôœ$ÇÏËÇMzíÞï#ŸN¶[q|tJF¡zËç$1§öÛ4}­›ÝÒë.—8’W(Ó„Êvt¢ö[|DÔZx/—!E»ëÉ.6ŒïL@~«½ÀyyóáÓ[˜r±¦DQ5Sö„¦Y«)¨º„Ó‹ÕëõO²ÆT(I&•U©Ñc‹qA–ð›+GÄ Kl=NX«î^›"a(Q¹¶AFÆÏlm o4tÛJpj6êw\:Ú¸·VÙ´j|'›Ég¡oðnnÏ,ù*sÌ Jz#gÐ*“å»…ÉE\È"z(Á[ÚO°#`¯õÞ«'~oA/1«.•Ì³‡a’BÚo“ ã6X0µ|é¢= ©—Ž¸Eµ£O{:4¦^É™ðÂ>BâA =9n<ÉwQ%]†’ÇA2õ2ºùÉ•VÛV $!kÃõagÔfàšMXQRdŠ…>Ç.a¬ZäK%(»’wCòµ¤L\Q"JÕäs.RÔ”B^+-‚¾C™T !×1êàï ÏħYüëôEó×Ý“Ó½£C){@­^oDöÑU9O,€A] ßu^îïoìÔ7ˆ#Ž¾ò¨ºnlÿ Ü!árGDý®?$´Qü°öÀ)þì|ZaC!‚à³è˜}…€D@¶ëÙñ#ºý1R&’بR×òQ¹% ±T/ág‰d7ð?‡Gäz¹yúòé陥éFr_Q Ë&/Ëî–ûa䣧Kv]Ée%êûµÎÅûsìÎŒ$~õR¡¤0‹ 8M~@³àŠnè7å7Âç ©Î,þ.j£hPkùA­5.ªI'ê$ûþ•t‹ŠDMúœ¹‚®HèsA.Õßá½–)M|h!–­ß‚3¢]­>ÉiÓopÄkœ-C©)$}ã´`šñ-çèªjŒ$V–û¢hìGjeà&áûöësꀨ Î™>Îñî¼V?r¦;X½ˆˆRœÞ ✀²¼.Ú Y _ˆo£;5‹AV³˜SJ¹Iy}¾DØ8j·jtT!©º öîáþÙæuOµ× ;·õIçSâK×’Uú˜,[2eS°aï prÖ\Ãk%›N6ªhOl—õâÚ¦ýf1¸´ŸdÙM®©– Ý–,³YX@˜çÉrÕe. »vn½IèïyàQÈ2$êÕªÁŒI1ÎäœÂ~@ßZv!U TP@”¤Ñ*ÄÁÊšg¬B3 ÷ðî5>æPåÌÒÌ<Þ:{Ñ<ÝEÛõ³£y<}cèe¢†¾U†NŸ%Lôr¹‰J›â%ñï¦àîm¤N6ÜÔì°Û€°1„•v­Ý­Ò&ÎÝ'> ñe þ¾òØöH:!º-ÃÞ59ê_!•N`e|rKBÒ8:½œ€ÿ7 ‰”ù?lˆ/ƒÂï‘÷óp±o dºò–Å)Ô^šC.miïB Ó¤¿ÚÚÿE\“Ký±è ßáè­lÙ.ÖäëÈ#sÔ,ÐÇ90wP’¾b=è•×ëoù¹¹Z.@b¸xgA!(úsÅ@×°‡ñ‰v€'ü~¾S/¹Àà\qÐõ¸ˆOÔ±p/òÐƵ‘e½%m»ïÒUÞ£t4¿i4jo—EYÄ¥ _9vùÐÄþáϦ oö:²ô5jBãä9 s ôÞK… –ã\®Aœ­Wc·‘@ôU‰ZqURÔ˜Þ®ûzŒLµhó„^_¹A¢Hèßæ½­ ?ÞrÑgεÇkŽjÀ?volî”ÐKJ ­·iFy…(y¶cµŒ¥ªZZ~j$$6 ½æT>ÀĵtĽˆr7X‰uCi£Ñ(9kSju°è†ÕŠÂîh(ÐW½J)œ^“Té%½Ǻ ´ç®=ËRÐ%\å A%@¸{DÀ0W/«¨=¸ˆ›°ò°º*^¾Ú;Dö- ŸŽ† †Q &õê*sÕÂAgŒÔ!7Õ¨ßGëyòfz+œSïµj•¯tT:"w8è—h´TZZ*Á6-Š„Hê%±QhwÔ¤ƒüÔãêzuíQU!³|z'Žg÷ðWÿlííÓ‰á†Ã½¸4¹Qd\Xœ5ä‹+Kê]ÊP”S&Áµ cÙ –ŠŸ®ÕKE8ºŽO×ë¥éË£zé|‘`4(hã“ïþvs ®sÛŠ½æß…ý­Ãç/·žï2…ìvppÕ‚ì/ÿÓG.@ôÛÈ›àîÉÉщx#CÕì=o>Ûy[ȾËeý+h«1ç°‚ü¹ý:×HN 8±ŠLµ¬dsˆ“Ü$îNBÂð½ß¡Èè6AÞÀé͇: P¸üŠ NÛ ÚH±\Oç€Õ¤¦í&/ÞÛ±Æñ…´M€t¬ ÖS#ýà ‘’‘ ÏÙ.Z¥‰Š÷»X•TO[³¬ž%XF¨ÔMáŠS|è|ŠóÜþ“¿‹‰„‚­°;Vh#¡¸Žt£øH1BiqUp=•Ýøæ¨ Ÿ„…EVª©©á©ÎG"Ô¹ÂÍó®§ZuÛ¹`7ŠjE °rY¤R|qÍèL\Ê@sìz~W mWbŠ¼©Yh‚ ’W8p—ï 8á3º=³öÁnro’ìyàé4P\S„Ûê<¦ÄÝæMûëÖIºÓxÁd5¶[¡‹©.p‚ìƒÒZ‹Õ…Ö6?HìF¿ëF%Ý´| ðßþËÝÜ„Œ-.K®vP·¦Šê¨GLÌ /ø=SÛF+FˆÍ~°óâÌ}‡;Õí¼w!ë’­4àÔà%AmÇž”2Éc =`\ ·áÿáql( À—ƒð–oÙßeÙ! u3Z¡ga4_‘}Þö1â™ø}äväuXÀ“ yQäÖ\ÿ=öMût¥?Z¼ËÒü:LþQt%O–úú¦>näÙçÌÚzÖ–eQ§dÍ?ùSü+ã×ÔEÜ“Ÿâ¸ñPsoMÖAØ+#p 0æ­“çÕj5sµå¼ÆÒT¶çá\a+#>ÏCæ D$´†!»Q”o“’Ç@—]`ܺòÌìòÒÛ O‹)Íâ@Zý܃ˆ»¶ÐÁë9oNNiv 2-ƒ]¶´T.³–'Ü7ÍÕbÇ»äÿüWF¿+S. M”1Ñ<ˆ:+s^ÎZœ:òú\ü9VÓRˆçÉÚyjÁF^Q©– ÷æRcÉm”K'~A1çÎkndþ­a¸f/ÁC5m¼^•¬›«@á:þ1F@i,v–ï¸Kú€¯TD-“åP­[%Y™E*5ë1F««/Fû:Ï‰œÃÝÀ¹Ñ´¾µÀ(k9R`n@B¨ËO£i•·L§$+‡˜Csðæ—碜/h’’hÆk¨îV{‹ÿ-7ʵåbI4>¢z¢x­ ½n,ÕjrN.2¤WMüÔ­áé-[“ê~¨ãWû VÚn¸-×(öêࡺ/ÿ?>áŸÚo¯±ü‡}™¶lF8¶hTƒÕÚ¦ø½tŽ$g‹vs‡TfHªÄcû .Ám4Ò=!NtœµÍ.YîFõ’ÛjÃryåÿû]·„ýßÑpôþúæö’,º¿{v¶{rZ/m=ÝÞÙ}öüÅÞ?~Ù?8<:þ¿“Ó³—¿¾zýÏé¢jÑj¤hÁ‘E;þ¥?„öW×Ö>züäïß}¯€î¥±oàJ…Âîö‹£æv]Ðç¡ü<“·ûs%#¼‘BzüW¨°i“Q¢tsÛh—ÎÙ¸k¹ —} ¦´PÚÜ\X”?YË=¸Ä‡·E&‘4¡xW¿¹- !;S`Jj 8€·w«ï¾“.®0*…xR];? ;®—VóÒî¾P·å@K• ¤nò†[±(?ªÞ§¾â•6^wT2ì=½IM˜Q3«Êíš,I½w(舓,¾¶/ÑÈ4àe‹œ1:ˆÅ’a9¡ ˜£Ir¨n:¥¢,]RÝŠ« ÷Åà:̉0€8™Oñê2žÃpþ×–õ¡œàì È`©ñ%ƘÌ7}7y£»È ÄžŽ‡Ö˜Äŧ<»aDò±pÖFKyt\.yG1r;|˜˜8ñ)Ö®Ol‡”z x¥ÖI,úWu€ÄbE`s›•¾½„–š ×Kº¨îˆ¾…¨.Vk gr„¿l1—kÈNÔq{úÙÞþîXaÎ_º ‚ô0ç \/G]¸#IŒå%|)³àî¢}ÍÐ纡ߖ´$®ŠÐÈpú¦^’Åù½ß(SϨF(¾¥”ö”ä^i2„hYäâë°¬Ôw=õžC©ÔÂÚ7·ß.Ûüä·Ç6Gùífôí›ßlÓo›ß^–œY{¢ÍÖÌîDW‰Þ<ø¶ß×f'C<ëPžÖNŽê¾aÑ«(ÜÕE,j§ ”Sª(iÑj¬†„>GÉ àªvă›ds¸ÙÚ¶ÚÒM§m¥é”¨“ïJ›ÔÏ’+ʾßáH¤"gŒ*° £. :†! šèE™BùÁA†âj¶PÅ9’]Á}q*¼a»šCù(«’ÅÝ ¼±yo$Èò•Å í&ô­îb[lY“ D‡µÒº~+6 — pâïÕGÕu©˜„5 —¦–FØ CdN€Y|ò=Z?ïÑ1ËéŒÀëX}o™ƒu½&”—PÑŒ2).³¿wøK %Å%äSÞ©QB%¡צøs¡¢Ý+:Á cÖxÄçsP¶O?Úk¿ŸœØY[qZû€ãËNÁþå¦7©øŒî_ 7EÒø¿¸¬¯>IÈÒµÑ8زHt™cÂÏÃõq¨þÌ×Oƒ¶]:¢Sš@A[µ0ÞŸSHtÊIA—ë€ÀZ‡Y7.«F’^]ÝiçŒô%¶þ †>]o¤¥J¢É€ÝRõÄ=‹[­À‘8<Ô6 ;Q»Ø>£(*ÄK6ÏV.¤£‚K64¼ñ†õ½¶ásx£³-¢!ŒGw“¶£¼RU …—8¦ Äî7GÇg{G‡oñêøªã܇•« ¯W^·/¯å¬jEJ…˜ºÂLzU€Ò¿bi©Î—V p,´¼åYgG*CD64ü§\+m[UíÿŽíÿ>òQ £RamV#š»þ'ß™ )ÅáìJ’Œ~×+@J³ª‡Ée»0=‡CõUùM€dˆç)úHž¾UÇI'%ˆ}±kíí‚­#¥{³q¶{p¼¿u¶û6kÆÒ2úXÓJô›*—7ÍÝ!ËÀx»°j4Ú(Íœ,#÷n\J{c³Ë©íT)…‚ŒwKJ°y~hu®/Û?wIÝ]un»nP —?VãÝ?3%ã½Ïׄ½žV¿nºƒËH]Ñ ‚¨ÁÕ ª½i4§qÞ(¾­áÅñoµËÒ¹#aÊM¥Q°ÏT›`ÒÑZÐM±Úùꊮ?1ª3zÒ(š£œîþ-©”‰¥m8ÃV×Ö)b”8 /†×H;ž¡æŠÜi{A»ÊŒÝCùð Öd]ÖÖÈW@Ÿ#ºð{>Ž¢>¸5WÚ†Ž­ ð¥-ÔIA¢Üò‡¸¢0–þu§^*ò—R!´ñæ\*ò—RaïxRä·Ráà—½“æ1$Éo¥ÂÖ«_à'ü-´ÆwÓ% sÝëww8=XO‰±?Ù¹+H ?íÌ€éø-=KÊKL»In†$ˆ¨¾Q`s²‹¨ì·Ê VÌ ¬±·RY®ÿ$½ &!B¬N¹¦nðÊJ^^d¹¨¥y)‹RAiL&¢¾G¤ÅvïÐj.ÜÔPè…Û¬JOFeú[H¹Öü’toC³µ(^H.X½ÚʃÒFMØ?D>þÕßÔùÉz†õņš4uH~Ôßã¯ú›ú"?ùÿþ*Ê)M “Ì8›¬ “‡êGõUS_ä'äÁf( Ð|f~”ßÔùÉø·#²]Šž:²>òùɺrqm'1ŒÚ3‹õbD¶{Ωãd{Ê¿E©TN‰YˆH¡‚ÞÀ·¯• gÀ´Á·U ¨D&d-ä¨yÀ ·£»mñ,:^åmºØ;áw¬@¼(A°¿©/ò“?H=¾1ßJiɯú›ú"?ùÃ$0Ò”kCF1—îÕ¤ÀLù5•rxkæF²ª—)¼Ì5y²I ;6ù—\bú¤rŠÛD>VHH×¹ÙËÅ~‘#obÂêôn_4§@K2¥ Ê|ĩ’`ïâ½$ä#|n¶ú¨¸1yè^â]ýµ47„ݳZiVSVÎî_V¤ ˜¾üz…hÄø;¤õnšøÕeëâ2»îvv‰óK±‘ƒ™­f¸¨Ÿ§™¥1¼ÁyÌîyج‘„·dÿ$ß®6£ZµV©]Âçopi­-. ôµ_‹5±¸XÛìoÞà%¶ð|zôe†'rØÒ€SÊ13¹¹¡Q”£ÝéÜËÎòö÷Î*Z¨´Xˆ-÷ÛâVvG7ô D?åØZ¼8®¼|MF_HÉÍ“Ô`S—s|œÇf¼°Jl8RLO©§K¯ùÞpvõ^˜ú&¹’j’-dºítÛ^·¥Ò‰PÐ뺷M%lŽ‹f$— d­ïN¥ó"êÀBYéˆütwÒ k,˜Í:ç ÖÀ{ïgSSB“ÞÌÙ³¤ÌJŸ*¶3`Qú”°(|GØñ 0*i¶Þ ‡¦tx“î“™;%\IL4$ú=e]¬bTÅ)k&Ž4 ;cJh( n’I­)NœJ¢þ,퇩ÆÃi[FƒÑNjFê,p’fêC˜îÀÔ£€&íîLYïudmUü9eÍç'»ÇFMü9-æ&ªîÎP÷Y¢î³êî›S´?í µ¦më°yj¶?§¦É7Ív¯ÓË"È:uJ8Úñ”%vF5%Ý#Gò&©£„)kw‡Rù=®¯’¦‡pz¼~¸oC ¤é!Û(izí÷ÍaØ$²‚w^\^FY¡£¿ô±Ð­SBxè]¸‰ñó Fêlp á( S§„ƒÞÍ^˜‹!S¦¬ßñú]¿Éø64ç*+{JÈ4±=÷ø{þíŒÙ¡¡~68Ì™zÁn! 4ð9SÂÛÙß?;:2·•L™²>³r•_ó(*þ°g.¿Ð”­l™¼ÉÖÉÔµšSɬËIÓRÎAûÊFº‰¢ê&Š£MšÊœö„>;Ù31Ÿ~OY÷dëpï©Q™¦¬1Éú!:µ Þ4¹³²g„¬ÝâçÁ¶ Ì]Nw\3kZj]0ë’Ø€ÞM’›_jÊv¶· p¡tºZI¼ÝžkU .£¾Jš–£³ºý|ê~óÝFM69‚¯½V}¿ï¥N²ìbwl ŽÇvÇkw§hM½{‹>¾€§k’ËÞÃ(›¨nÓ”ñÒ§®Uç¾ûÀ±y¤ÓÚÙ»cTŸ©gA¯I‘«.Èz¢]3sJ¨P…Žæ,’ŸÊ›¾§0ƒ0L ‰Lœ– ¶þMº1í£„)kl=ßÛn¢Ã­€N›~¨ ¢n€ßhJ7KIÖrRÑy[ì[B ¬ìy!_wǾîÎ 7%¹Ê)1ÖÛà2—BýT‰iñ_ðà3‰Jœ85¶î=Û==k&¸K+}ZõôŸ/Ïö,&U&M}sßÝÙ;³nï˜0í ~ïØ”¯áÏio9‰ÑÍ0j*ûäQ²ö“GÓâ‰ß²oìœ05_?€ÂIfËHZn@ šhá’³²gãÍ© ?—u3¸s+{éu5‡ämFÁÐïyQžH;³ðÔ3…ŒA³s ‡"ÔF™<~òŠL{w¼ 1Ĩœ˜¬rJÌÈwÒtGMöšžÁ„ZùsÜèx×ã®V™yÛÈAÚ±åæÀÞ¬w" ‘;­ô1쌺©©³ÁÉî^:sZ\ÆvŒš–¤ÝHvöЩEsHgÃI.&+{Ús4̛ʛö…ÃtÚaКeíáÜ2s¶¡½¥iC—™µ ~“Í‚Ì9óÁk*ï]ù€u‘Y[èùÁ(jîgA–Y³BŒ®0f¦ ˜‹M2àZf…Îa0l49%T?¸òþ°9ÀÞ­ô©ù“à]å@RVkq*vÖÔ{ÝB6å)É÷L‹fåÏv:ËJi6&•;5\´#VІiåL½Byð9Ó¾˜‹T=ë‚>×í\»ï#׈@ÃA“Çg@Î/4Ó½*KD’È™^ZùÃLžvü\º‰q·ÍÉÓ¾‚ Bf¤N}ûÈ&‰óP¸ŽŒ¸ K({” 9Ujúû‰³i&O íiH:eÀKdN;aV÷ŒÔ©) ‹ïÕ<%j2óg 9ïs¾KŒ}“˜û=ݪEWIpFêlpІ8 Sg=í1.c3qš¦3§Å˜[ÊFÞ"š´;’è“SdÆ:Ý)ÚHš™J¾ï$rf“tºhZ•pú<°(’}@æ~N¨¹úsé23Ü–Ñ" 9´ÄåX%O‹i(3B(ìŸá‹U?JøC¾ŸÕWóQ,–Cìì>Ûz¹Fb·ÄÅ(hsTÁ˜cÉ¡I%;¢(ÖR¯T`ë7/€’´Üö;Vš•ØŸjÊþðCsÿŒ\6¡îl£¸V0~— Ÿ°'ÿG!\±ºú&_ûÞ•Žw¥B2éýÁ‡­« 8_ ÒÊÂBòó™üÜǼÃüvØ<…¥FÃ_I¾š!ðKêfÀ·,Å H¶u#ì|÷”„~¤HMø–¯ ™['ô‡îákúÝÇŒoèðÉÏáðe{ÿ¨:jÉy¹c²Õkáø"üº7Œõì5KYƒIÔÕÌ.HL½PqÁ±O1YEú~fÍënV*Ó Ý¥ÔËöK? ÀëAJó 3Q0عwŒÈ}$‹HÙ7ኖAï<‘("\¶0ÓÀK‰5bñâY†ìG¦Óre.yZVB½·îd’¸¥©d.gþMD4,.”&¸EœÁÐ,’ɯQ»š _&YGò«v,EVs.ÿ˜’ã7Çá„Þ¡è»Ó8×&Xo¤AÕ9&C©·:¶3{”¢Šu.æpQ ÞÑá;ø“èç$4ñãúÔ/±¸(äp胣®†W~ËRåECU;²C=Oî¢ê·“- wÅŽ[çCú E;¹(I¾ØH¶Y[™aJ˜ Ó0‰’–(=+/Q7ÑB†R 9rüË.’!TTSò€?MéüuæT¼:¢skd¥¹Ï/÷+žÊL›˜`É8?½=ÌÊF'_Ú2ìƒJ†}P‰Ý;y2 ˆË±*=ìèJ…´šÖͦ›ëp4 ˜rìaráèòJûJ'ßÐõðB4 ?m·ïEdÕTµ¢¥52¥Ŏ3ã‹‘70³ý †"(å7öh)aA²üÆÉ'rrÀ?Br™Q*Ò'Ìü;Þ#^¨ŽArøë'•Ó0â6|¥ÀÒð??¡yÕüFþÛ|\{Ž®ªPÔ–á#…EIYCš&ü5h”N4h«ÀWN9an ƒIØßZÅ.9ÀвrÒÿQ A{DÒ…uu ¨Ž=UmUVW>pßyƒ¼lYEÇUÙHZ‹;¶kSV¶Šj8S°ŠjˆâÑ´ …5þ»K^Zìñ£ÚoO€–Wk,ØŠ>¼Î|M$!Ä¡U¦C †%a[û;œSۆ̓[ d…5:0QDKÓ†Œéƒad†¦+w²ƒ”.60öp 7+.*¡Þ3¢îò’\V‚°}¤v’rÜŸ*‡RÍSØBòkä`høq£È¿ °k¢åqØŠI€.×€àzÝ[ŒÏçÿá(;ÑòÓQpt*Uת«ÊÚÙ²ÖäVÅ3ZF£aHÊ,œ°½ö¤H²’BQ¡¤SŸ…9p4.¥œþp¢èFÏ5œ0ÅV®8½Pé½ø^ÐÆX?¸1"—t¸D†e¦–"¶`°…[=ñ¦Äc๺íºt1Ð1ym‚oF[u9œÜQÉqbŒAËžjÞ+2ÂXmØëS˜(Ä°p5‘QŽ0ÂTQæFôÂ1ø€©ê¼±ë/÷ †C‰pºÓ®ˆz. :p˜ëˆT„mz‚®}(‚;£å Ôëu6Ð'ùÄVy0tt Ýò.ȸÒÉÑúxn¡F[¯Cn™‹0´RµP”ž?>²ƒÍ^¿Ž~âO kRBï:ÌÍOL‰¹ÔFá|r( ˆrØÜa³-È o<äy§mŠOh›ÌQN à…’XÕASÖJbM¬‹µ‡bíqáSìóØKšÉ{eìwŸ0…²ZÐ#;_õÜèXýûß±½wˆŒÔ]Ž«üšþ9‰ ©3!öåŠ#(|æŒU¥{ç Ú8ì` ¾DKèV•ë– Ÿ&ûÍÞ'€‰0Ñr©pA†ÌõÙG¹wâX ö)éµUãÃã~:(¿TX·'} T@4 @µ R\‘ƒné0ÐYò^užS­¾¥ÆêÚãÒ9Æ’ Dûö6Ì ÇÃí “&Ô üósËKÓÀû}D¾ìopµ Øíw2Ð8Dvÿ'£üðر2& ì;Žõç²=ŒCÂ鲂Ž?1zôÉ‚K]ò£»áV2V;pµƒÆÑ傇 ÷‰R£1hcqö5á^¿£ A÷V¢ôt÷ùÞ!l6–î:ncÐrħ’øÁ´þÑ×:iB£H.íâöàSˈ¸a6‰=‰#–˜9< "íˆ@v«$~Tû¼†÷°µ*T@_½šM×¾ ç‡Ê¿>–Å¢Ú!ƒÃû.öè@·:¼ä™.۪˵¿}SüæÃ%ÐïÕJf5 ý@­Êùt w\iÜ„=<}’1ÉÛŽškb”‡ó¼>^¼>Ó,ýx«ªÔKß~ÓüfQ”Ô£‹&øCÞÝì=%ï¯rŽ^ŠàXã¹Óˆx}å êç8½¸Cq†õä6Šµ×µ¾#+ôõ¹ݬÃCÿ¬æ”ø•§mrÝ_4¦ÃöÒ?ï°L¯þjÝ—oô7ÑŒ¿{ü'Õôí/§{ת\}ù%¶ÜPñŠŠ{;Þ%rþK…«BTû­vúÆ!Ï„ß¾;oëµB¿p‰o~ûæíò7µZaV [ÀÛ>|DµR5ÊU C³†eÐ'Ðä¾q ô}ø·Ú%¶ú[[/BRYØ|Phqc+ÉØaÕ(õº²Á½ߣõ±Àt‹{±>O/¸@>SXM$¦€“ì8okHµÑ}M­@ÅOP%… ŸBtK83ú0~ŒÇ¢‡ÉKï<¢)§eqÚô# 2÷’ÞÂfD|ÏÐk²óÿ9 ŽÜ8Ã>% Nk¯Û‰ÇÇè·K³—W„ó³ƒB1¢u0EuªN®êø÷rxµD߬½-«®øDkSøâ~³k5À–8pÄÇeÕÚωaX¼DíÒQ<tC“ý ²˜€íTN$çiÇÐxXg`i¥ëC¾šõÜöÌÎàÖ&öŠÃX¿’›¤ž{+okÉ—™;Å«‘âÞ¤à(„"Å%vDZÆÛañÿøD×ßùÇÏîý_]¹-œeÊÅKSuVèQ¤‹ìväõ’¢ÖšàÏvØ%Ð1Њe¥Ç@F[ÊÐá®âÝ“xPŒlÍÎä9À147ë@r¨T“#fóû^‚b'ÎQÙâD¹ÇÄŠVMð}Ö§^Ò· Þ.Sè[þ)D‚ Déë~Pz‘¿o4ôn@Ê%'©‰ÔIj2UÂoËqcÏ«:¸= ëÇÁó‚$¾tòÕU°ü'¾>ûî 8z9’É7*-°ÿN%AÌs«RbÊœ[•„¬X{š½ùY8Ò,ˆ<=€‘”Œ¼±›În‘ Û‡šQõ Ek!…Ÿ†³Rº>7€–V[^§C®Í½Ò Û$ÐÃsÉË ‹Eˆ^úÃÑÐc§éýAˆ‘§døl’ž:ø2YõÆó°3j{qrÁ”ÐñDÆÊ v´ß^ïÆtoxdÚÁs#5]¯$ ìÒøfgæ뎳?ŒÙëZ|q‘|5÷Áä£9æ Ös>߬ðäžg ' Ŧ1Ž¬ˆéÌÒ \ BnÛÔÃAÈ®±Qp…¸ë¿ó®}˜Ác6’5P7¡ç )dŃ­ q¬h^º#˜’+x×D#pPm\ÀëpÐi¼ú›¦¦ïí;"ÊrÌŒ¬ãß,(ðÞ'wƒþF’t.Ò_Þø•é§`¾ó¢ÐAø©Zƒ™ôVtm&A‰Æ·&»ì”åÆÒқߖÊo—Ë2SIrð\;†ºkpEpëN£°£~‰ÆC§ÖÏf0ª¬cèãçì¿›Ò­¢_ (ÃY{™zMŸÁ„5CaêÊÒ‡½íñ×=3íñ&£o-kH:ªî‰KÞW§v9Ý5cö+…}IØ)‹q—„Oxj ¥éc‰‘ú#)•)í±^K˜²ôöc£X® ãzÑàû…y«p—p§t§ à­ƒK¸:ˆ:4¼è(æ¡–æ¯3w„`M¦<|[PìuºŠäíòŠX/'k¼Oºc˜³‚ùëг%èÄ"Ö`²S§t€CŒ:)¸¥o>4|#ª~”EE¬©AêÉ& ú³S0faÁ Oø€€Ž8**æÁäpDE ƒºâð²8+²·Ç²±#¿P•À»&§kQœÀu[Zäi#žßpèE\hGÄ:tà awãbìë D>ØÐ{8÷&ù9mž½<ÙÞU‘†tW*¦ŒZ’$ß[DtÑCËcµãÜø9¤ãµQÞË'‰cVõ-1F€:ºG†oN|W”ÒÓÚ2L•œ;U^Î,ýrMésÈc$Á éJþúéÎ÷31íÝGʹýds²êpLj^ÿ ý;Bl<³c3AÊ‹$K€ÞØNÅVr ì‘Xòjãè˜0)‹b_½uª˜Fðge<ÔÊ?*bu™_pÌ’|ŸA5~» eçZ&bãéß\H¾µ<±stZ‰†·Hs”zæѨg4æÅù\ŽŒ¸Xˆ¢q.¤fSÞÀAÊmBy·_àÇøÚZ“€þö75gVº¬ˆX¢Ú2ÑtM?÷ÑêÈp8™J…â"_QI­¾Çñ.’¡.&DCµZnß \R!.d4æð™Zß\Šàzå“+kcÎÑÓ}$Î5É.)ÒoÆÞZò«^u…c4IX£H_*]öÂ> mÔ @t#¾\Ãý§£‚"ÿÚr|â¹eǺhBæru!µvb½W"¹Né×͘ÌåøÝéãoo~ÛNþãÇÍèã†ü¾">^– 祸Q€^-©‰p膅”‹¾©‹›Šq_K÷I†n™êhú ì¸=o£ø£Ã„‰EŸ6bU‡¸è=U;»à“ÍOLO|9é‡Þh8Jû‡Œb‡‹Ž+±æ a­N)‹A"­4csb„FÐßåÆßä/7>òGcY(+QD¯CjGrÚÌ-œ5¡âG«'DRmýÛG#ÖÆ–Í–3 'Ašºžv }~¤Êu}Ȭ-Ša2K‚Pü7V*Õâ…1¨D*ć>¯ÙŠ¨dˆb•>}Œb»Ffât‘± ¦ S¬ð¿§XF—æû¡?p6á€iuéè¥ÐÜ2¶¤.Ž8X-K hF£ 4ê&'ìëjøv]¯Z©Êþ‰ô mµÄIcDÞF Ù¨âaúöãGš­9ÕªÃwà`mµ–¢º*%eÉŒvko~Ãf—?ÖªÕ—@žk²ñ®L€å-ê8姄ÈCfnV+µx; £ÕÀ[‘U´.£©¼dúÿÏÞ—6´qei¿_ѯ¸-”H"’X¼$ÁM ئÃâ; D.¤Ô*E%ˆíþíïÙîV‹L’î™d¦ªêî˹çžå9~¿ ó4ž(íºŸñ ˜¥ÎYn±·«…D3üvIcu R­½À±€Å¢È2K'Á‰z7L¸.Ýfž±hy—5:™î²“:ÆÃCKéä÷«ò“š²®YAŽiì×/M÷GæIV£øo^;dôÌâ…¸ ƒù>§ÖŒ±ÌlɤÑñóŽ¤E§‘î rRùMÉ»W<ÃÝ=OÛÔ¹Ò;“C¢ñqá“ý‰‚2uð>“Z¦û-«÷^z{»Ò‘ÿtà?ÓyÓ®y‘ë6ådխ˲uNÜ@1hÖÑb­®ŒÍ‚3tÊhÃá4ajjŒ‡ SÉüøÙö›Ý­U­ j½ƒû fYGØF³²ðZ݆Á@G„^i<^b¥„-·‰¹×(F°û6ÃÞZA˜ýa­\Xt±Ä•_Qð÷~BUÝb¢–ùá£ÌC7j¡3˜~DÓ_ú]fÃNGE‘¥KXK·'EÃÖÈ¥£HþG NËx2Sý¹ c<¢LC>.èvâOÝLüm[‰OÒH:ܦæ£_¯ìmï=_M6N m•~ÑC\\õºÓZ17ñ¾Ÿ’Wž|ºsÈ#¥²V^aâ/Íð~Y’__^ÈkxO?ôk=î_–ä—þ`'áË’ù­?Êœ|Yâò­>8 ûħ//ʆ$Z½¥sCa5:yÈ¿Õ‘FÕšzÛ(ã¦;$«ÏÓCçêGõ…YEaùÂ1æìÒ¶X°&>À N‘º :,{ hËçÀ¯CQßß)†-nª–Y?RËJº!w9®aƒõßÖëÿlžêKõoO~XüÛY!þøCâŽóÃÇRê"ôñ ô·3æô?|™uô™J*´7‘\Þšäb#@‰ø·ùd=þlŸ½ÊÜ$öÙ+%™Ìg’ú=ÔO^I~÷MªÂtR÷­I.Ç"§’óQÎ-þ(ü±”±‹ E-n»ä—VÓIÑ^5ñE< 4 Ðb³´ÙÎwú5iw¾¶ žš;ÙìRÁÛàsdõéåÅ‘€ÓÇ6Rß>qDäœ[ܲËc5®S$=¯.¬aÉúÆž]Ão™5ÜõŒ±ÚïÎy8@M¶?¯=_ÕÉ[§©£Š27sxaðPYÞE+¶ˆGƒP„v’`ê3êOižq0žl]™¤¸<.5ã*³ØÅ›+ß&Š éžÕùÄ«=9Þ'Š°Ÿíýn¢MÛØýÀ|èê‹OÎZy;@Q+»ì,..¤¥lÀ$[éúåLjï»Cå4¹ûF+Ö²¬Ÿ-ÙÒÔvçÜ›Œº¾Ë1fœIRjW†:o]½‹ü ‘›XKL“Ï䊒×]q:zR˜û¼Á#©­iȱfšõz²ÅÐ^Œ"|ÕÇK¿ˆr̪uùþŠB3¸Â`ªkÎðâ«x\õmõ†hïMÀ·9]Ž1Õbâ¥åÁ“zð|”Ÿ«VMvY<À¼N6„#«—¯ÕWjù­J8ÉòD‘ï!¦$®–YZ k¾%ºæýÔÝDŽ,nF’±EL#еø_)Ð]¤y¬_&g¿ ®Ö«ÕhÛyÚƒ‘G±&d!ºåè’ç©/;r °åúPrcãâ¹T$WÐtžíwq?­†¯gÜ FÞ:}“¨ˆO¼Z‘\ÐN{9Ï“xñ†üLà.¸à!X+Ùï·*ÎC23!·oF“c/q(œ bðv8Dt%ü‚M"§]ÝwÏT‚:Î*WcTq“´¶"bm à•á º´!ÅåFM½èéáfJFä»ÏÄPU«£>›æ`3iÓGçFÏBÊ«sã“veÔ¿õ•]« 4—&y81ˆ†£JÎCj|à–ýº0JQmmŒ@rä+ÏE°¿|›o¾C`êÄ·>[}l"ì_»Ñé•i>%;Ùùˆ¢8GìZK?Á£²H/Ù¸£ÙûM+ÃtÂ"Ñ­x>ûemÅ lA/f¾=ÄDYõjC°z¡5“”Bz §¥´h‚6ŠÜzá5—ˆ¨{QRSc×Y”Ù6è×,6ç"ŠÚ*ìà ¯ªõí7ì@wI.£äöÁ¥å2Ö´²ôðÞè*£ +[{¯^¢ñ?2ÏÔ¬·q{ª‡KKKÆJ_hâÚ/ó… W=ÈT7jojt_âECmz3–¡‚c§ †JÅ«óÔñƒ¯¦>ylâ¬CÇÿš—qš£†Úù¿Um豞ÚàÊWâo1¨–·èô×PïÍ탚‚3ª)Po  €/ˆbKd,ù 0ÐCdTÆåUæµÈÅÚv¼ø ¿Rkj/ÕçÕÃí·7iNDW0¯'Nó¼B÷JvRfOMÎ8hYEÏ«ghÕƒ[NF Ùp!¾U0 Úʇ¼Â[:¾¤æ¶PK:)¤Tá>Wņª3 ZŠ,¯1ßûoÇHy¯;páÖfP|U†ôšÀ"Zv6è±C’ÔŠn)ĘJP¸ g.;‰[W¬‰#ª)bòrÑver»VÆŸA»½-þâ«*™ÃÝ¥«DCnûýTaIã`j „[Ú]'¦­h)-ë¡LöÖ®mž‘CHhàCh§‡X›(ÇžKhØbÉ\ñ½Í6›È´™˜Ñ`b’µÄXS‰™í$þ—IˆéAí¤Â¯´µ„,hÆ 0ÆNþJÐwn0¯Ú£««Û2¹0f¤£‹šüÑ̳¹|±6–ûl¨7.f&¸·†gF¢Ïq`oyxorp°‰Óù›¬~ ä¶Oü•[Š¥ƒ]uR,I’(™Q\ŠŒâ LdҵݔÀ#Ä°úî;7ÁüßT‰Ð„Q±c!œeM‹ñÇ¿ÀŠøâ‹ò[UW/Ñ{´ g^•@m%£ucÒú„‚‹&÷ò šwlMÌÒï«Ä(UÑ8wU¥¡í ßO¶ºb«BÂ;‡ÂÛêmÿý€{Ј I¯êoXêÇò¯oÜgoÿhk8t”'¡Ñw[„ª¨TâSrœ!kW ƒÜ¢þ©_BW h¹õo¤ÄªÀílùÛo×ð߯éßoèßokÀa.-Ñ¿Ëôïú÷!ýû¨FåøÿÁûÇôõkú÷ú—ÊY¦r–—Õ³,õÃè|x +=£ˆgèÍ@ E5µÝk5(ÉëAg|=öóhû èùð·ÎÅ;à–©­¥[GfЛ¶#®øç{¯ô4p÷˜î›K“ž¨ÛhDÀ-0M´Fêâ`à¥ëõöÑ‹ýWGj}ïgT¬ïýüÄPÜð½`Î!£ÕAQº6ö†·<ƒ»[/ ÇúÓíí£Ÿq°žmímªgûj]½\?8ÚÞxµ³~ ^¾:x¹¸E u¡ Ę%Fâ4h‡Ã Ó¹Ë?ÃàˆÑÝ  ;l7ÒZ0yé"°9»’˜ÁÁ'¨°±Wðý—?oï=‡Ön#‚ìO®]taW¡éËuQ€µIõåpØ_]\¼¾¾n\ôFhp±Øå:ãÅ‹~·q9¼êâ2‡¢3Ô)ñÆAÝ5]¦£±{ˆÉNÚ#¤>"³÷P‚†Ð¶gsèÍ3 “ƒšz 43쮫¥•åå¥úò¤|¯×Jx$²³Ñ‡ÁÅEØ6t=à£YŽ½½a±—k£¼‡ !0Zȯ• æu~~^±wõÎöSB g‰~{M ±AÈš/t7:võN”±|_ Ç$J§ä=ÊÇAø¾ã~ÕÏ\ zX‚CŠ7ò×`P{ÙÄ<Y/mà0~üȱÅ1Èzª¸ˆ‹tŠ¢„\ wnûÔuF9MB¿£ý‡ô¯ìú‘*^¡½ÝNòK! Ì€ÝóñUS^™V¸/ ÆJCsÍN,pÙ"~> @£@ ÉF±5¬ÉzYFM5IRŒ[2 ò0”èUGv*x]S8Xò‡k$â(Pþ+]q:>4 `ìozÍ/8E¤?G±.Ư'S røƒ¼ÒSn’piëÄáxƒcìã†À ·PÄWåF‡àÁÝÚd(†6ç€IèãŽPÁûñG[èØ—äv*yúãâåž”ç!È›ð)‹yÀBö9* lhª*½hpERŒŠÕÇ¿dA?1ßé!HŸ“³†7!e忘ÏÊ«CÙ‘Vþ£«'\_Š ñ@?©Ãô 3Gƒ»Ô2 „†ÀíŒÁE(µŽ4b2èDœ…³Ãøc ŒO$y¨Nxåsßø4¼'´¹V6€5>Œš´ÙHu cº&1±“ïó ¦2‘H·.ÑæÌ)–(wF±Þ{YºW‚ìñ®ÛÇå%±T(¯üÆô»J…ÄH®ú@ »†–òÓ%WN¡êÌÀ,TGÖ‡ë¯)Ç!É™Ñ]ÖTÑFsàÇz¡:üW„K k(™<ñú*gqÜ]ªÂÐ(ɺð!bdÕÂL²pfúj¡j¨ÚÄ;ŠÝ°³c!b ƒ,Qm(“üN wÇQ õô$â{Šßáîù!q¨äüÏúxÑar…u>ÌÖé{ÖÖ‰–™€¹ôtʆ ²#ÉùÁÍ ¥;]¦–ûhkK‡ç¡âÒ¯åäâÝA¸N},Ð $…ôᣠ9ƒå˜0Ø àƒØÕö‡ƒQü33b}ÏúHÃKïrO ÙW¨7Är@Ý6%q7ˆÂM7ª†ý¸Vó‘pCép6 ƒ…ÍÛØÀøh¾* J7lt,Jg¦ø%¼$!c‘:â·^ÑÊÔP@™sø6®eêokCÄè…tP%MÊs£.ùhH©6 ÆPcm 8A7癢il…:ÑÄJq£Rñî*éc{ †±X³Êh‡šÔN5Mïyt•Õ:ƒ¬Î{Á¢&Ž‚—úŽ­`¢Š1î ,B¸›NlŸ u¦¦:Ý[¥ðo¾Qpcc9u¸¯‰ |¤kT’Ø^²{–Ñ/Ñ>)íí6ÒQ¶¨ôÔ[Ý<4и äs(Ž •–q¸×p7qZ”HÙCߺ¬Ø0ÈÁˆ‘·IÉþö†EîÚVgCì·1/µˆØr/ÕøÞÀYÔŸÿb‘¯„è"8 *ímÛŒ‰î,¼ÀòIÜAÇ+¬»ëÏ·7š»p1?‰ùÅC6H@Ré0 Ãú!£-ÿ½HŒÇÜ.6…½e$ð"ÚQÎ3RØetÝkxaºêÈÐÕ—Çüôˆ…ˆ¹œe¶;#Z·Œ^âêD³XdìRŸ‚6ò#w “˜ùë9õf­##v·[Kú³;d}é€Ñú4 :$5¿Yó#Ugä†e)Bƒ8§$ «ð:»,ÖŸÛ@´¨=Eé:¼v~Tmoõã-€¬íxzñ´µˆA¿(x_Ì[Mé„fêMÅ‚L§ìùïl:‘ÿpDQGVâ yœДÙy.8aHÝo¹»œ”-¤I%5}w_Š¤éQp!ÐHç–#úÁ‡~!Gî:€h­~ñ½ümÁ¼=g‰É†+,!ÙÊ©£ósð[G ‡J„QÖ7̱±–©#) ±<á ÃŽh3M;Œˆ·/Ž³+êó“Ùí±Ø=¿3½£&wL…ënvq×ÝÌñ–á=L ¸LI?aå¥>¦‘v/l¢‚Êt?î\ºÃ F£¸{k,ˆê-ºÝÔ#­nú¾àÆ•vîô©˜ÓÙªL4;¯w[þ@ORÔ2 ‹Ä]‘úmv=íNÌÆe¶l¹ÒjÆ“Þ Ÿ†¤!á¦]åp“–§Œ©äKjŒ3Ódη8¾nxƒ<“¨¸‘B[.,Ù3«0Ðì¾rBNn˜W¾.É]µ‘¡›åíÙß< «»¹[Q_,}ií³ì?Õ‚Fvìotx_\Øó ò•wÌŸœ¢nÞWdÝJfÒÕ×;íÌ‘É™ ÔœÝä½4’§êJQpzgÄ€ö9ïÇÖjŽ*¾sf°ñzS£¹Mª‘NÐiªÞyÎAí&I4Ðáø<0'cÛ­Õ=NPy^ØöYëckÔ8E¸PãÈ튢ϸêa#3V=pÆ¿Ú°Ä°EÖéZép÷,v‹rËŒ,÷{Râ˜÷ZšN [Õ ø|“£Cb4\‘0¼cã/˜[“ß,`ùfþœ ¹_³ôùæFP¬C-21£1´ÉHhñ6R•³’ÌÊÍWö¢x‹„¡¬¢ÜÜ>X„ÔxÇ=) Uo†‰a2£ŠèÙAc*—ìQ—ô2<¾N™ì9— ~ñǵEÇbq>h¶Æñâ ÈEL[¬ud÷?cG0‘¡æ%Aò¨_Ä"@(¶\ c£¡i§†¤©+Kù’?H„´ƒý¦µ’7682hµ9Å<]uz£¸¹ã4FÞä7âðÅÎöS²Oúiý` síH±²ßgµÉPÀÀ§_· sïÜF™äâヘ(Y³{€¡1o‰åz†¤^BÓvÜýijv:bÞ9¸ )Ö…°ÊÀ!Æžt¬35hÄùrD £pL.E,šó]¤%D÷è4·Æ¿ºC8è@äl‡M%žÅ+bÕ€qÿMÖ\%ÙÌ…j¬xå(€Í¥683¾ÉbiÜ继_Ù@kfFªñÞ¥ª Ià>’$èF_òÅ Ú+,ñÎcY ¿ÈKx3 BEϬ™Æª8 ²ÞóXöîÈÒœc*c±”Ktµ,¥Kê¾™A *V9¾ê3­÷”{¨áR„AÊ%Þ‘ÝÕîˆÄ mô»µ·™2ù7ë]/6—ì\tn,T¯˜“·r¶Á©Ñ‡X‡¦¶nâÏɸ¢Û…CcÅX­( σYIƒ³k⚤]6öwv¶6ŽšxÈbLõÎ â¨çZ›PÓaš¨F(è}@RR¶„Ÿ“˜ê*zÚUXúßÖ8°¸S~ Éû†Pö¼Ðý÷ôKdñ¸Àž0Œ‰9ºÁ3sÑ8Ǩ‰õÎàÔæz‚®½))ÀpÔS›ÿxþò%܇ìÛCÜ~ç\c°àªso7wžýßyV'_x¶.Tê°ƒÀH˜ Dæ£6Ü I:_C'6 éÞj{¿˜KÀ5J…ëXÔ6zn òL ð‹Ía¯ñëË["Ip`gкG”NXjô½û+—~E÷o¥¢¿Ò4œËǪ¢Qlô7íàÅNnWïý¯Ž›ûšü‘u¹ìgfpà™ôGÜ­K+õÕIX°.wÀéÀ3…ài(5¯œ…‚b|Iƒéa\C °Nt"æ0Çö™´ŽXVòPõ0 fvXaJ£0 :¥ZwÃqÁxM”³G‰w< ¨]Ôlø@dYâн”&áâèj‚GttÍ>OŽZWS ùŸª‹x…w®á¨˵{[£­°(>;èsRSÆÝ ³Ü™"¼C-‰Áç=<|Š¹è7ìàYÍCFÉO°ÅèÂ6>X<úÙ`Tô¸Ô–ðÂ(3;ˆlb^ãV‡!!\½[ˆå‹ÛªÅl¬aGÑ&†ÚmÅlÀÊ ¬bØð¹7(¹é§# ¼¦¹ˆ®ˆcEðV3œÔñ뢑i° ±bƒÖo榜%¸¾²ø›PTèÔÔZx°RÈ|ÃXFÜ"Ñ¡( RVŒÇåÃ="#I€ty™8Xx꽪×ù )ö ÷#뽯ØC3±´UNQŒKétBnØ‚¿³óCÔíUŒž“5"d_~IQúØþ70Ž¸QŽv$xì¾5ŒÆD`sT‡’ ¡·û‹¶/]Êþd¨¿x& Fbú¨TÉk®ƒkEÄ"ÏÅRz°Å¢‹:Ÿ6£>¢bI“Ùá(‹‹ÙÊ—\aš{‘™åÙÝJµ0šQÊ2š3ãoƲ•=„ÿßýüüW— N *ˆë_76VEôùÿîë¿%øïëGðïò×–Ü¿øóñÊÃGÿoyåÁƒ¥¯.-=zøÿ––WCrõÿþ›þãÎ,™¿ÿ%ÿÍÿM-ÂÅ‘¢8¾+"<Áµü;–¨2툨‚ƒ‚S®·T=*7 ÖŸk˜¿:úû=l,/?Aªr$Ú´„—ô·uHú`‚¯!5Ë8,ù9Þª¿éï­Û‹œ ÐÞïØ9“7}užÕ#Yü‘Qq7dÏY¼‹§÷HÎt@ÆC1Û9ÙÕ¿|ogö½:Cè¸Ù¢îßÇùÒ~×(|Ž¸x€CÓû€û¦ºÃÀ²]Œ˜±xÈS.í®×·¬Ñ{p× RCh”n^Œúì€Ë÷(ZƒìƒòwøQ×PY?Ȉ‡+*FP¶>¹òaJÈów®.¯MzhG¯»V.;ðkí¨‡ÞdÀÏgÄÐk¤±Ü€ԉîØBGÀð`%üÃÓ±8z¨ÍµµÆeuœ)eW$#z€bJrHÉQ\À½#ÓÁý£8Wêuá*Å®apõ\ÃF¢AÓ¼bé)Cvƒßn‰r²SZ \w7hõscX´ö$t¢ž"äÌ; > zGeÑ¥Çê5ܧQÁ„%_-žopESÆ7c²³œg·áNìHÛ*C-é³z‘ªÚYÿçÏÈ>:¹‰è`ÈJp“D+ÕÂ$ÕúXZc…•ZTÕâñßO)jˆ [‡IøŽFÑíÔ«½ z'+^|gSŸ€ÌÍãw𢣻 Ãq-7 ñ³X°ç8‚€ŠÄo%šÝ.ðp¯ªŒ›c§¯'×ü’ãÔmüüüõö^:!œ^×OR¦Ó\#\Iᓈ1w¼(Çb­´R£.ÔìÛ—ŒePóù™Fý-Úè/.n`½kXä°ÀðvP¤8v–Æ}ð‹»½ ‰^ýÊqr /šÜØ;//¾àÌד2§"öYáÔ'³³ZÝf;ˆ/wHŠÎ `Õê2¢‹gɆKø}z/ø¹õ"õ—n±´\L'gÔ:x?úÝZI–§3_lÆ'öˆf˜ut DæIÕEë³*R6”ll$Œ‰ë¬¨€Q1èm«[ð³K¯ÉÖŒá±ÖC,°¬¨œå'eÁØdE¯2}R%ô¸3°›”ωÓIC(:FsÓàa‹XJ£Ýí6ÐÚÜCQâö܆±¤¥<Á”˜ôÙ5$–?–Îj„Ý‚%§ÄRƒm=”æ-íN[$\4 ²SûjEä^ •./žœœÒÏV·kÓyG\|’¡õ+@¦h Ž´Aˆ>ÈI¬ 'éZ¡Å šc!~e·"¼ŠáT¼í@ã‘Y¹'Ve^”xìl‚«ÚXf¹@Ýù.™ž!‡PhŸ±Ñl ¤¶ƒ{_ZɺƺÔ4rø‡á0·Ú9C©€®Bþ––̥țd·ª õ#úÄ_8ºww3jtç]K4ð2kó,$Ä,‹ˆ–àã0j«Š¯õ4‘€ò,Ôðf£/ R€ñ†ôè†âãHQKB+hÙ!0|ÜTëu?€Š`f×%ÞñœÔXmË0[ZÌIE”amØi²H3ÐöXö[cŸk ½k¸$ŸÔSójO<-¹ìPh’㣎РŸoþ:œ¸8ûñ—Æ‚„9~¢0,<ÇÒ;]¥çÅ“F«´ØˆPaíåyZï\7AhR4 ‚Ì2îþÕFý´¬´d/ì ¢u0´ó€it -É9[_j±h#RcƦ†Ö#¡C¢§=lj6£õÂ$54?niq=$h‹FË$ÖFÈ(jëvî†íÃ^z¶‰Ån>êÎ~l~¼(¿m´14 £Pp½at3ü\à¸0OúÊ[©†}8Òi3™°~Õbß&d²V…™×AKŠ³px«ë¥«$ÐÝFŽWø¶¬[SN³{¢ëõÑ(Ðê Ù÷ζ>·£bú ×c=XkÞΧPQú“± »^‰8Á§³¥Ju>e•ì~6¥ãžá>Û(ði6`Pµ‰0ЫŒ ë™.Óu> Õõ²Þ!ãT¢«jM3ÞÝUU Úíú%Š¼ÊdýAa\èœhÛV§H9¨o²Ou:éWUÑWòýDÌ~Aª/Voë_,­\á?íüó"‘’~þk¿:ÚH| {mx/JCü¶/ ÿï¯ÿ~¯ÿ²ôÿWï]5þõ×yúV—kýÿƒ‡þßÒòòã¯WþŸzô—þÿÏš‹Œ{OCóøáÃÌù_^zôðÁʲÌÿX&+0ÿ=xü—ýÇbÿá‚ ×QÓ(÷ ƒÿ$¼ s«ê u­X†Ÿ¹(øu v?¥©ÇÔèôž¢9aá1ÎäB] ³)0êQè'ôç·è¤ùëßj[Ï@¤Æ¼Ë ^ßi1T5™i’aA3Ÿi C!Æ? ùÕÃ&ûÊUŽÑ®Z ¾Okê¸ÝëþOà¯xÅø+žÀ_ñf‰'pZÅPXÜ:¾Q@V·÷.`O›/¶¶þ§"qdð~SOý'hÈ#ž…hG#Ëú0Ô;_¡}2­A)¶!„}Ô«›:Ok…cxÝ9¯À¿„Œ Æa…ÓKrŽv£ãVá8(-ãŸúrMd\ê˜s óEå¸ô Ÿ›“×çÁ0èBI‰†–– žÎćŠcŸÎjÿ{ü zZ=µU•Và±J#H§Ô‹­›O_mïl²¯æødÿ[k§Ãg‹:éz”aHçQŒÑZ—âáAÛ±L׎ƒÊÖ8ýëö[)T- TòdNdÅëÍÝÃçM4³¶Ãb<ÇB]#¬9mÇ` C­a±§U#Ý•aEU9ÞyStxš³ æÍ­g¯öh^1¶^Ê*<^i<úæ´ g½ö‚oÛ{;¯6·1çú«#,¿Ú>ت`^±ö_õ¦  SQ)˜ôéÐ%HYZB6ªÝYŽ"÷+Æ—¯òsoîp³é;L„,šÌ© 4ìŒ 5ÛQy‹B•ŽzÔé äV0#F ! ykQ(B žuÚ•ã_šßCâãõú?›§_•LCt2‚1€TñKû6w0ŒÖúÿF;´æþAsoÿ5¾Ø…ÁÚnîîo¾ÚÙªJyØæ Å蛺É}vu‡b…,q žâÑE0 ßxhj ¼ "€DJpmœf)´«,°Í^õæsçHVÝí2N’ÃWÏ×Æ%Oã’ì?=ÜßÙ:ÚòÓ$guMðww}[»¹™È‚—´Ï >ÖÅlüÁÖ²ôŒ‹Ø‚¥ÆÏzq!I3v¢râhXAhªÓÅÐ \ÏNÕ—UÊ0²¿e]ÜEÄa]H̆γV.U¨ÅUUªÀÔSHQUßrË8l­"yœaØ:zE`ãûט–²Šz­pÕåãõF¯­˜·§×!¬€WÍõíõà Ós®L6¥à$Û“ÌY½õåÆCr…‚³µÍ(JÈ¢Óí oWykŠ”Qµæ¤ÙÍJc ë‡[èZÙØÈ&tÝ£Ó¶ZM„’"pIï:}ŠªÛ³ªQ¸±K?Ò‡¸®Á(瀭‰*©][Mt–&†åbÑ ,o¿±rMTc¨ü#…©}Ój­K￨jí9²¡lY Ì‹þh€7ûE^˜¬'õó~‘ô<€Þ£5yOš²|Š£RŒ¿ Ø{ÀÓ}ñ‹^¦þÅÅ·gŽ0ú5â›ãä0{šx¦¶E½ü½À=ÂÑ›Ðâ\NP lÇEU­j ƒ~ óÕC|Ž[ÁŠ,'©LºM§Õrr~3Á4¯* =/׊­¾ªŸ?ðy÷§µ"yÁÊóÁîZ‘üXá÷`Î0èâmí J¢!ô]Îmï^ßÛßÛÞXßi¾Ø?²j½‘6³HµÐ¬ç÷¨:+-[í—(ÕŠŠó³Î$™_eýEp¡3IÚîu0iç·0Õ¦¬2«9c ŒÂô#éŽß}Ý猚éÂ=œ34‰Ñ;\ÿiË|vÆ(wóNËÓ너:£^²¬%mHîöA ¬'ÕÝ?Ø]çoíq_àÇä–s ÕO¼Žã•ð*¼‹µ‚žýy€ˆ„Àˆ 6‰|Ñ*»Óe u¤Võ®Ê:ûéÓF@ñ "“§JÐEè65…~wÒ«JcĦã¾rì?q’_Ôþ™W®îZ/¦ã2°~§ø˜„/!–@Áuöã¿}ß8-‘†þ×€¡d÷8/ô_ìܷЊ ‘û°¶x)šp<Љ Ê‚2ž{VièBðÇÎ+øs¼¹u¸q°MJ4Z³‡u¸4<ßÚüþî 6­ª1-ÐÐl¤žGK9c~Ä,Bæ­Àtç%•U.†q<µ¥¾6/t³BOɺ¨ÓRM‘Å s>¤²!ËfË5CÊ­ÁJPgëGÏ‹Þ­ŠØ,‹9æAm'ðCb1âTàD8ßs¡`ÍQ¯ó+ò.MŒ‹<6iòH¹‚ÿÖ”¬9JÓA´ðv™Ówá­Í‡lEŠB#ŒÔ¢—Ùú‚<.§.›:L$¯SøCªmúÂÚ!Oú=âˇ37ªžå"loœ¦<Âç[É^$ôÞ!t°ÂgÝŸ³’kAªÇÖÙ]j¦…‡—GDº¡ídô @¯Íj©{éÄr£Ñ¸S›Ý¶fUG'þpÞéÂq^qgG½ôƒ1íI¤=|õôÇ­Ÿíç4þóˆ7à~ä@Œù<í/VX't ¢_cxm1 b⼜¬"™"=üoYçáÍ)+[\jU;‹à´¦’”AŠz0kQ´žr ›PÍäñ)^©‹/æ¿Ó2Ì^ˆ~•™KѨeoš^ýέÎlv{–v¯d¶[çmòVûcÚ¨T¶²÷äæÕß×ÔŠ\·KKhmH­xF„ÌÁIvZ­Ö’g­Nü#ŠGª’Ex`DLö¸ßí ±Vìÿn+{XEGàÚp$³ÈAvçtÃôöàŒò¹Û©‰Sô š"Ëá$Ënu´¦f˜ž„Š!5ä'm2§H|wK&çæ ¬RøÏІ¬AN6Þÿ+êô k-iÓonn.û´£nÔT¢}rïH„]Lì:j§e¦žHö?ÄVhJ•¯.ÀA¢EÊ»€‰MŠÙâH[£Ñ?ö$hjrÅF¾‘Œ\Œÿ¯ˆÉ#ÌÓ)-G÷‡S¶À›¢„UüM¬däˆÅ ÞåݺýAÂY*-¯•Ðé1â…h¡Ržl¶ø¶±ù’âµpí¸tjÄ£|)ñ¿ãh;IV&'ñ¿ÎÒÎSÛY½k¢¨áEcý¨Ÿ1ÌþíÂ]BMÆ+•1:ú jZ¡³zÓ–vt/êÕeGç(¨ÜuÄxŒ£ª›ëèÙýØ?°#Z:HyRu!¢'¥ŽÆW©*ä&¦µü‰àB󺊪ÆIÁNåIP5¡FÕs1—Ìû }Üõ¾å]MÓ‡A’ÌM>¨•¤Mãh`ÉÐÌpšyŒi; ^‰n@íP¹O˧d63äCPLB¦Åùå¦þá;O¥´pÙ;åõmV½×Öˆ^ˆôìÝŒÂÓ³â{N¬Œ/D¹'ù¿Ê)–SMAËÉ–ªº2'r»­nÚhçg£¡³3s£™›0ÝE°-.—Pæcã—#n\ŸÑ#M‡~!pø¹dzÂÛpìSÏ 7Þ6ôAm‚±À¨ÞkNœoŠðM–H|~IlïÔ;×;縷ËO$¢ÞzÉ(S§Ss%/Ÿ/oÕFÂ8ú:ŒíOb"À7mN¢«:ªæ˜ÍHõôå,ÉVòÝ“ìp²\i 32êyŠ”à­nùë"x¶Û$še†/å&‹r»jst¹èW|Êa?t•tM³¤ëÎT$/EãÐ+ò]U ¤óK(žXKF¦aËÚmaCkœ¨@m;&ô÷‚˜|.š3¢C#³mCƒÄ-b©Õù‡ùÀPúü•#”vÕ ‘ $'ÅTäLŠ‰LšbÁ‰$r@®Ýö² ÂûD~ Š/~!x¦ò[UG¥÷ûN;ö©K‡›®Ö ÅÇ]ìU¸ò}‡\ŒÝ«,ÊvZdb.¶ªR¬ªJ2†xÕÓ¨i†Ö‡±ªçmÿÒv»D1í¿æˆã¹Ë¿¾ÅØpm­ªË l/ìÖÓÙ’ö«Ê §5Ò„ñ3™ˆkê REPÅüü¼zºõ|{/©[ϳ2ÈR'K9[{›ÉR 2•ÃÔ9JP*gêï³ãÞ;Æâŭ֑ÂêÈDê`^¨©c4YF« Ò·HÕ’/ÿFu‰c|¶üt@û‘7øÇó—/a‹ yɲ¼àœ é`à¤0Wx»q°¸óŒèÓγ:,B5¤ý‡1…ú´qdzçY˜‡!2HŽhÎ ís ¸¨©ð†àSSÛd´¹%±DªÛ]¼ÖÝ `òŒì©n骈ÚS˜tÛú¢‰¥F„ŠèBé×21ø¸3ŠþâR'Lñ`KV½Ìù¦éV•¨a¹9°"T†É/¯QšÔÏÌ_’uá6pøF‰IÂ8«)¢(_ 5ðráÃ:À¡ÌÒÚmŽ8Žê´tT9‘´ V´XÇmÍÛT¥Š¨7PóÕF&¥À‚xŸ£G&eÐG`5ƒDddÇଋt‚,v¯sØÒX ý]+kJ\¦×BŒáµüâ×»ðæ`—Ӧ̃XlE©60Îíš°±dÏÇg–ƒ? Èã˜Á"èC'n‘ù)ôÉd“@7’f›K‡TÂÔØ3|•Íþ I¨ªr²…«¥å²/çó>;0“æ`Ô˜äÈI"ûÖ‹®SæEŒšöV¶¥”4ãtè”/¹*øOjÌ(æ ™™U£ ÁØ/² ã£æuÎ9ö8»¹*iHB¤Ix¼l22×ú>±É2osss¦§• ñ Úøê+üâ|xóF>=yžïË—ï?×óÈ78©`âzêë¯ýϾþÚO‘ø¬¤ãÉ„1ð‰­’ÙT:•UW˜¹;--[ÆÙ˜IP¾Ò²6ñHøszv•ê™X¥¨o,g“E3ÕÖšMÏ;žm9øÍ C=™¹¼–» º˜FøAÞÜ°æ®w¼^—@(©ÕªGÒš¥e}=Ã3oÚÞSë{·ƒŽìçûDÏæ?ã?Ã&:úcÑήP…Õ{ÍVwÄØéh¥+Ò ª7¸ÑѶ Žã×(¥eM‚1ÝƃBgà\¦`”æÜE>ÇLCêkÙ,6Rgåá[°¾‚Y•†ÿßüç ˜][î4] ™|ùêðEåy¤Ñ%×è(«?ßÇ[m„ç‘Óïa§éÉ$gØMaz²i“7w6)uEÈw„Q×ÔE«uUý@‰ðÁr’Þå.h5É|˜!|Ý›){ÎE—>øé?Qe§ù_ªŒÇÿŸßžŒŠ(³ùC’’*ÃÎëI‘ß¼Q<’‘áÊ7wNDÞÃA;úæ!# ºî/µâ ŸlQÇTú ‰¾[©%ú•RêD¥ø®êgŸXéF¢Î1Un¤kÜp+ÜúBõ;Ø9^?=8k8êN‘–lX·óN£@¡R>êk8m*àYJ„7HuÐÁ—<`L¯°¯[ö„ÍÊåµNNºTÎì¼úêesfçõN]¿™sYcMŸƒïª~á @;+rñ‰þøøuÞÛi*ñ;îUá}R6¸F~ñ§“*Qhwl÷ó*ª‰±Ûw«ÝϯO7ô ±126†›6ÑÏwclht…|b†ž\§#ŠÙ ƒÕ[Äx#Š!jcIËW_U°>”i„ÝŸ†¹Ìϱ‘‘!75O°IŽŒmnÚ¯ä$ŸZý,0ýÄФ±ôSC26ÉƤÒïqI6ˆý.Bm–#Ÿdyx¶itÛ{F«XFoêuµ¡,>¨­mf)‹ùµÌµ±‘ͱxÐ T)ÞÖiîeIë¼ÓÊhƒ)…][-⓸Hº•mÇn`Ù ¾¤_|/ýס Se®EÈ]nl4Øx¸ôÿÔ ÕõSfnê.°®ƒ0URÃSaô dÄ×Oˆ]C¥â>kc~‘ЗU-£am–DV“ oÉX ¿h>ÝÇ?/wÖ¶ÆØâEÞÀ¿šžEø§OèuâÝ‚õ‚AZlÕÅ›ËdõP·“Vº¤Û•¥‚Á)G(Rñm5¡~’ÆàuKoXìÛ‚UËs;šÒŽ&&lb3Šê;/#å"ƒP|’äE¶q÷„ìdåZ^ü¥´Ø~¢Q _-¶ËNaá`Ph2¸›;c¶örnÒ·Ôeè7 Ž¬(c¶¬S×ÞSN¤7Œ°<û$b¾ü L·æþ§[0íÜaÚÏ™8¥i¦­>Ș¹ŒÉ‘iB¼ÙÜ\?x½½ÇwœÃ)œñF½&ƬáÌ.å´vœ­'Qjpôã¨}‹æ#í`pÝéÙ[ÎUñxóðç]Ôq|T|{5vºø{õ43ùÞîÖ&ZªãÞUØî Ç$ÝÙ~¹Ïþ»ýhL²}¯&bÇ›ñ ?4Iù§Nì1p{eÁP4H¸ª½NŸÑ8h¼­6_¯tõà Ž=µüäÐmKE[:5¹d)ㇿXž¥êQºuR¨·oê´ð©þº[K ¢­ ˜iO;7k}sh4:e•pìx牖;â¹2cܵÒ÷8 ìïÈÆ\3A‰œf/Øœ£èUTÄœ($ÔÀ½6¨Í"m›¬žiÅ˱nZbmìh¨V,=?Øz©rºiô’f»—;s ç­e‰ ü™9Y‘¶j‰¦ŒÜ<ˆ®0¿ËÅ“¡vP;3vMG2V"öƱԷ£_´}Èßà™*ˆÃé»zÞ»-Xak^/ÈlœwÆR0Öç‡í¦œM‚gñ(™O­ºíffžiÓYÒ†>åZ®¼¦7ˆgòÚ}¸í”$)tÆ¢ÝZ¸i2묹ùµ¯݇÷~te9,_‡ëëÁú.*Çäâ27©G„˜89âXæL‡ÝîS“ÆÎüÓ5 Ú™Ç TjSdL…ýhÇŸ,N]ºò÷¿+­åfê yÚMŽô[©ªJ¨ìÊ“Ož½‡±PN½z É© šH6¹°ŠA<¯iÓú‘·c§°± ™wŠÚÖ÷v¶Ÿú%Œ­2+øz&M"î wî–¦œ;÷ÀÒ¥»ÕÐf³«ªÖXœ¾÷[Uöqè†SKÎ&Ë:“¦"Ó2¨îÑa:•{b$šÐöÛô‡×íÉÚÝ·Æ•—ÚLlø¿ÄY‚ù²7Ëj¹™Nî6ÜŽ43þÄ“/Ëãã¥å•S#ß'T›`À¡}›UÝíµréº[7ªôáºû Uÿè•S6±9¥Ì…©JÚ:$l#ø<} U5/?Õ£Æ "O‹RWŸcL W‹G,˜48FP¿Ý£­á$”)C \àr"êì#ª«›o33‡W–dq6»_,‡éj“”náRÐE5xgø½!/8Wv×7öß`hÝýŸÑ·y´~ð|ë¨Ù—>Õh2q&çð¹¶ðÍã…:Â7 ù•<»L^às³Í§ðÆM4"õiб.Y!S”7ãŒbá÷ÒJÙ‹ìu¢<K´Ç@.»èÛ>ë&9ìd¹ä±Ô傳¡³kÉcS²«â¤˜0^+Óèe3Z%æ½QƆÁWJ@5pÐë’¨¹à'7Ô˜jþ]bYÒëéÊUø>³ï«lëª5ECŠ{‘?&–”f „¬°iº$ª3W³;¥³¸²‹ÀQÁˆ¤M${:*eez@A-…]1,EK6š¸ ,ãà혲f·°_H»ê [sd„U±:4-a4µ¸‰ òf·US¥å*ó¡NJ LŠ³&ûMHd,ß9{Y ãK˜ ~0¼dà/LìX†Ælì¥àÔA¡-šº‡È7Q#Õ”ß †Ð{Bl"“â^‘NŠ'ƒš«EƒôE€ï'´,{áuÓI½¯hÿ9 ‘dÆ2{á!ܤY*ýEE_n- Õ±hõ;5Yèg<3BË1)(g)ŒÙ5SnY‡ÜsrAN$ì_ÎÒHPr*š“–rˆ½-\ÇàÖŒ ¬XI {Áü€ó_—Á(mJsd§(¡s€{8$We:»(…:SpŢɀ·æ-…ä»[“û_<)A3\AÔI)k´S?)ñwøf4V':Ø"ü23κÊ:Îá¼Ð¸”¸OJq$/™!ÜUJŸm%—Ž“àó.Õ‡Ií®ŸÁ—n8UûÇ7@"Ÿ@nCØãçã/›ËêïP¬=ÝHÿ¼òµ“œsíßÿ¹óâÚSÍUöHÕÃ{¬û_{ê9°‘Þq‚ýúÛ,\Þ;u êï°ßì:ïá"JÊpЃ™íCÞ¦~J‡ëW†újD¶Çw\UnI÷°´2òÏÚ_ÿkFsâRE£V”nÚ£×=FÛÌ4Å ÆÁ²…U=üùP?w}ûMe°TaVw0½ ÔU§×¹ ºÆ…XVfdIÿd@ ì“lnaЮŒÊK3{ÆRá5àý o¦xxÇ5²7@¬¨X-ŽâJ‘Vñíª%¨£»/· ËKMÂ%?—¨åaß uõ¨×‘—ØtÌN³A‡¡çxÔ`cžëPà@Ðw QIÉ~” xÜHÁnOh2´Ù}]dAçFu3«7 ºXöáТ¨Ä8ZûD·;ç¢vèt ‡’ÐíeâÆ,*ÐjAÆY%¯h4–ŵ¨Ýy…ŠunšÂ_'M62VÉd› ×;‘œSÕ$/:Þ¶óª «ÛˆÔZßqz+Ç©,MΫ-rÇi Ø$½íb )[ܾ"× gè{Èè|‹5´QP¾°øË’ü"<xR9þE.œTÕBiñdyQîãORò§Ó²¿qÇtfím{tÕWõF,Ç6-!:@®¤MXàR2U‰žß’Ë£5ø Ôã‡uÔ¤3c/ΫíN;µÈÝ`ñ¤Ïž®í9·¯izûæñÃûéðyGÓË?¦ÒWªß[ðÓ•&> y´Ûˆ ¯ŒÐ¯Öò\“Žs6“Fƒë ïl]k+Ç»_Ôù£‰Ü™¬¬PðÂ2éÓõwÖ_Œ…†«ëá†~úœ¢ÔöX¥!Ž/lÀO0%èƒG¡ ú /g:º8æ;­Q¥¤.6nB+ÇKFVKÀí6¹llj¡Jød° HɈ†èm4x{z®è¨ÒJbDWUqã1‘™ýNV3C2û#‰ÓƒoÖÊ'ÌåUGHYÿLøÌi4ô I—¶÷žWŽ/ùˆbô-;%®ã·%¿>ï?T3Îä¡Á"0ã‹YâZ§øâ›·)¹Á:’ámŽ¥7ðöË/Ù1[gs31öC2Wñ ½·Ä€'ÃÉX.Xµ‘.ò\}ß¡@ÌvÒ+ëóo^½ŠÅ»ÍÀ S|o¬1<®ƒÛ˜ ’#JX©mš'œFæ3‹›—.³Œô‰BǺr«`pÑhðÖ|Á¶æ10¤ˆnSS$̯Ça?”8¿ Á=VJ£q,Ù˜e9ôŠ„8q”pF¼­ž¾u$ZmÈ¢*r Ôw™r¬›S`q žóÆ5¢Ú`œZXòå´lŽC>2hÎ/År’É „>ê±G zëèp¦ m†¦ šBøS1ð’/pðñ¦N€aº~!Cn›° yر·a\-dhîžolx2"§´·$}¨ÓÖƒì£zò„*YdU¸[†˜‚¸MÒÐEÄ'д‰3ÖÅõ¢årÕyÁÅ'h¡Wö©›B þŽøvOͧ@ygÄÑè}†(tÓ<•z„¢¦*ù`;µZïEŸRÛÍ~7þM•}6Œksa'#Y7‘ìsš!‹Ò+¿çŽ„)<±•T Ó'¬½›o7ñ y‡°Ôgq{¡Äã£~Ë òc?ºý–Y¡áî?øvɾ§aÿ~ÙÛúÃV³R{ÑPƒ\H8Y¡ÂDˆÃ¡‹–w†# ÊÈLCiS |ÅŠ3*®yÏ«v„ç•êÂý‹D™Žq® ÛöìyÙ¢G•ƒ˜˜d ð"XÔ“p ½hLÓÏ{žá¹ÈéE‹Ä‘øÃ÷({ÿú< ÇÌõVeí@riv@†sHXä4H„m)z‰ÍMÙ>QB,@~á&æ2*}°Òä  Î9®P"âd&§6ºIiG:­•íóø!°¯~“3+ïöû-JUÌ,dš"2KÀ=z39wÓùqCOWq“Ò:¹y,²ˆög/ N?åâÈ/ k”§™(˜Næ¬ÜÓäMfÍ%§ã É™ª…i0~¦&³ÒÄKÇ­èAcåý#¡òû=u¸±¯öá’yê>¢ÀštKªŸ¡+@4àÆÀ>u±æl×U¤V )FÚ·hC»Ji,¬XH»Á$P‚µ70ŽíH¹8`°Ê­–Øóá[ Ad!Ê6ÄÒ~¢ŸÕñéi ÿ©o&¯l65ÌüÒ‹NJ¨Ðý—ž–.atãew9|k€¸®pw½E0µÒø¦±TSáE+VË RõBX¥OðP¡y!ç¬3Í­é‘w¦A¯¾?ÅQæ*þã¸Ô?ì಴ÉõH]«ì9Sc»N!64ð{8j`£È¨Ϊþo‘²© 1µÛ}ÚÒì¶Ï,ΰ’¼  ú»ÒXYF­£žÏ&T¶B<>óQÀ‚±nÚž[ÆëMkò“ú¨.a_ÊÉö òz¡óRóÉqö±Ç P<¯²ÇInݲVž#^Ž_RæݽWÓ·;?äÝX’ɲ>6!Zïâµ,á“‘‡»â5O½¼ž8ÊRœ®kX# qXY?¨©c B-È€yjý`-|’ŸMÞý­ÁèSBÞȱ —µœQlÚ)¹¤.ä~Fr2Dv0ñ$³ „¥ƒ/Ìjžp¡eP(¦ YÍã­í}'€ò þl_ÖšsL²ï ¹gvªŒ=…‹õ(æÆd}D.O« äO'–jË'ŸÔê—¥ät«U8±Ên&uŒ⧠z¤O«*•íËT¶RFªÕ2™qTÈœ[|R<á@R«¢Ûò²aXô †¼jK):©‹ |Jf˜]瘥B¨ß¶“Ò÷À¾:t^và*eÓV'x=æ©’]ë±á¼2,¦>ž ¨Aà+Z°è´÷…^?l‡dWê’a HàªhÍ@cFBƒžØ0Xù1‰L@[3æ!€} Jò¦/edUúsà<­¼ÛÔß*+hó^&Ê­ÉOa…þH¬-á[ ÿ›Ä,µ¬œèìK§¥wš4~D4zÉø#ÈgôÞúûcûý±oŸ8e÷£®Ãµ¯×w¶×}Tç乤2«{NWåàˆÓþ”L@†ãöïÆŒ9ù=½\æ¹ïuë?õs!ÊÒècp gžñ)TÙÌž(’N .›¤š.™J{´¤i•ŒìïI© ã@•ü=>¯Ö)¦ º1ü`lͼtÈQ#ñLËù E1L£ê¦I¡JÓ»RCêü©žO÷¬üÆ1ÒK=X`gAú°r³P͇–*>Ì¢š ªêPMoNA3{Zelôû —©jll/¼Kí®¿iîlíæóÍ¡ý”P÷ë{û{Ûë;Íû‡Ÿkž½zpm_7«Ñ•ê†½ àQ1Ä¡8%‘åXO;¹Ì’›°ÿF–¾Å·À%7xÏmB„¸L1¡:kKâKÀÞ3këO76mLºõš‹ÿUÜŽâö¿.ú}¹Ð“ž’¢2ÖXgÆ0`AGG}ôªoaÂ0b{²·ŽDÃìôH )EU°¼é^iÂbW–––ÔÙ-l$Gž˜ÜwЗ•=TGZy×JâsÐ@Äƪ6”ÚÂSvz!ý’ØŒÖK–ݵ:±ŽZË•6Ýí"`–0cP„±éeR•9ÎkË++ß|ó„‹[^ù‘ÀWÏ(ð-Öja ü½è̘¾êµ¡T½ ÚîÈJ(D9ËÚƧI#»JdärÕj²:iÑ4$Ÿ‰ ‹†ïÖ9®¾Œæ:¦PÔOÆQø>Œéx}ù‰Ó»ÖíJŒ€þ^ÁÔ\ãVxÑj¹Ëèu§÷íÍ"ò%¶¿¸ŠPðŽN8ä:DŸtÒïBÝcÔGXüWHÀþâv]«‹…>"=èrcäên¿†ÈD¤6°QP„Ž!áärØpÂ*1ÚF×$3â¤áa”»g®ß¿…½"Ѧ!º…ïÉŸÜ„>FËu‚ß1úfn+%Ž(€¯î¬ªH¹0¼,Çê_h0ßõ†«Æœ¼ë‘ˆ@)RˆU ;Ke·«ÝmÌ< Ž$ÂoߨÅUýÐðÖÐç[²{ôÖM’vàÂz  5èm!‡yÃè ³ÖÈ“S‹až²‹yüèуÇsó0$ÆÑX àF)vÚ€mEžµM>ºÁy§Úo@KÆÌí[ 6möø¨NÕ÷wμ ¼uV ÑêΙÿסz×C½lb¸HÀ±»òxeùáCZ¯ ƒ=a‰´8ýQBƇÞWÇkß>~¼ôÓ‚(^qV_èî%w?ÙØ?\œ¸#¼‚ÏMÁ›ƒ†zç¹Úz÷.Än¨—(ß„Ã’ÉX¬â fZaèl¯Ó2P›Æ$Ûp 6H95˜¼ôd¤)>2MXQM>ö Í2¶ÿh0zü°¡¶õi¬Ï\4>E½Ènõ1J»´šÅ„ õasÂñ¦)Ë3ôR&kž@B»«r,ñøÁ7¹”ü­K=ÏòbðS¨ú¯Èžµrá­k³°¼PÍ=ýóŒ÷E9åY»åvliåáÒ’“é6†èƒÖŠ½L¿àÕÃÆÊèZ¯¾wLÖÞ’] zFîÃak{¸Ø:o´QE¦âü¨”RPqzD÷|C|äÊñbcáøxNž..–§$IV¾~üMj°ÆÒÛÊt‘ ¤³è¢®Æõ,³œ¢qb7N³ÏÔ1šKf›jx¦"ƒŸI±W»ÈG8Ì'a;u.‡mÁïD&†-XEVH-ÿ(¨Ž Ÿ·? èAç Àµx«YV+êz écõµúæ [–Û±•»VÉþv~Jʶ>\”"¿âµÒú[/}ÐA¿é‘ ñâËOŸL³·Ï½Û‚†”Б±ÑŽ´ÜíZãFa_™]¥á2E%®¤¢éˆ3ÀeÐ=לbÐB®5‘œØtScV”áT€Æ軾DEÏnï›·aｚeMÑÛ´*Cþ#ßììLOÔ§¤u¬v—ª^þšy§ˆµÅµûÔ™ñ°‡œ»™kŒ§gG}¥–ß~Î#gŠtådZvš“ c`¢³£1Å–ñÆ£¨VU±±ÀaªtKvšf¬3ƒÓ¹èa0¼a5˜98ÐwÙ\97¾úÊbæšî`\_¡²ñ=¬+`?áôƒ¥â8ˆ˜Ë§ÞŒè&-qf®t ]Ëò€UÝšp$tÅ£ÎE5NŽ8žÆgѤ•·¹½SÐR7®°ã‹œºêàR9‰{°6H°æ6;»„„ùABÎã˜ðæÍ'Z6ð½˜$$c“%y„&©1IÈTRfv‚¼ŒZÅÇ‹­õÍ­ƒææγ½É±+ÝÔž‘'€îµ»ç­^ã’£µóÿ ÑöÞÆΫÍ-£eðC¨{m0A5~†7û/·öš‡[;ÏTEô)ÛÏêG¯¶jÊ®¿®¿:ÜØ?ØÊTÏ°©£Nÿl}çÐ+`ã`ÿð°Î¢í½ç÷b°‘úé÷&Kã­禽l1rl,:K&Ó¸kÔ*)]žêmx…ÝQï3½µ¥'üÜ‹š#àáÚ²~ƒ¶Àòn…³i­²[B!%C/Œ[C˜5Çót‰•²ëÉY˜?~ #7.‹0ÇзhæOÝm¾°éþ.+è»Â<³ó‚ó)¶;~ÂüP–:8ÚÙl>ßÙº¾ƒÓÎìnÄÍ~;7ç%¡šGösoî8y³s{Itîì¤K”„š¬[¾¸€Ë«þ÷tÙq3î¬ÿóçæþAsoÿµv›ó¤Çz qtè8P\dÙIKK›jaÇÑT%¶ã4&ø%Ý'½ŒNg{oFÏ1¦/-Äk‹´n|IÉ”nYN£¼²òKK¦ôKËÏ·ädáÉN=˜ŸéÕ€ûµ~þ¾3Ù^»ì´Û!™Ë Ùœ+Œ$V$ÕƒIs oâ~ÔcØ“±[Ù;N^ J_KšÍç{¯6šM¼ºT*󸶦ŽT¿ÚÝÞƒî6Õwø¡JHH&ñwøŠCõÐt©R…rƒ!pEÀ¼†Íf¥Ý“c©R”ëx±Z­>1#áe6Áu®ßiÂîhø)’,]ÓšjwQp§*K5wï}LNRõ ‹x44oqIK€ÎUKå«âkð^iw1}¬©™Ðzíôâh¨ê7lŒ^„KiJ¬(.±i‹L–f)òÇ€ËTpш± Ž>WÁÑœÓXXí.ðŒ»ô'ž@.]tøŒ"Ð]„Ÿ›ò¤ðéÔ p”öpB¾Ò7úI«Ó½;‡sÝ­4uâ'IfÙ¹Ùõ=Þ³wbIÌMɼ·B–›Ä¼TUÉ‘¬Ü¤Æ¾¯¤¾Ë2ùx³Ÿ$|lh6VµÂËõ½€³gíé;ãÀÿ“CAVÚG u«È­¹¯³8_ÇšÈ1;kñ7Š†7˜åǽ×k–%ðÞ7qÑýØd[v“Ær*ÀœKád3â¾A×$´AÏ64ŽÂ+C:4áÖÔ”{UF©×±øIúZÖºõ¯¬$µo^…;Pᣠ«ÐSëeÃ&—à™’SX$HÑîâ b’ŒÛë}÷UpàGàüX½pE@Ž”ÛTâÓ‘ø¼†e4ªÞÅœÇ]¹í¶ï6öâwÄ=ed‘cæópp‹]Bõj¾MÌk†c>zùŒÆHßA^çªsѯ¹}‡´|&–ºnX•!ШÔýÍÃý¸q—YKwV"r'“qžaSoTŽãË®E8gœÌ¤Jç›1=ó§³óé‘WHδR®ãD£ì ñÂ#z#! ¾Ï&Í÷‹Œßs/B³”Y,ç6ýÈ?øC‡”.?ç`U¯ñ_ü×x×Ùå.§‹ãzíù”%©r’.Ó’2ç¼ÿ÷:¦ø^Å2>ìŸB¿¹5dµñò¥ö‚—_RßFÑ.û}ó£Cštik^’PÜd.šÜª¾éÞöŠ…Âø¦×]º„’糱ѽî2hªÎvÖÆ~Pûu 1ðæÄ«kû)Vÿ2h >úcLS¨(I1;ž¨6à À$Šòôh’>¯­Ô΢9•uþWx•dÒÆZÎë¼,½(+‘ºª+5ÆËÉäk+fŸ•TjæNœ(²9ƒË É®ƒd™í™‡[êºÓ¨k~%{ðݯ À©ÈÿêL‰¡¼S•ÝE%oGT®¹¢YÒ%³ØÓô%M¨EL C{Q5‹»ËÈ¢{óyÁ©ª–Á˜Ô=fùä·'Á~:ÍòMŽrWû+SS¶B_˜vKßc‰>Ažƒ_Áqçàœ˜“S™ s0ñN ®Þµ;ö+ ÔÚÞ#'ˆX{G¿ÃlÇC (vÑ"‚ØQ)þå`8ÞÁð/ßÀ´o »˜Æú&þI>‚y‹Ÿ‚Aüƒwõ L èxÇÀôà'Þd9&“'ÁdÍé”yn3ÓRÑL¿†}u­h‘9ý¾×!ÿómÏômåì¼c:‚;‰QžÃ¹‡áM ·Ð gÛ„©·½Œšà¶€oWBÑÍ{Ý\|ç'‘¡ÑÈ8J2]+= w4-nPj 5†ÈÜñ&S{rf2§!¼Ç÷.¶Ã¤y<â Ééðaæ’œÄÑiG̱t) ŠˆT‘<¸I •Ç­ØVe1-.dûL|KšË£Nl- lb`†8s䄬eÊÝáE¿&Ù¹EÕ²÷ei%Š„®6׃Î0tl‹#΃löûN›ùDÁZ·X¯&;ü4Út®ÚY ë£ÓMÞÃÉ Ùí)&Êü<ó‚zAÿ¼ñBal„´Ò˜¢¾|„Ä*YÆ]ëNÆ'°ß=°B™EûÕ^H¯×à®P.ml”-£÷X™˜Õ2±#å+4ˆ¬ÿ«LÚû3˜”ZuÉÝQÃs„åk"s¾AëSÈMö³Á/ÚEçˆëPÀLhûY5£ü:*¦Ì=o7’Ýú$ÍÜúÍíƒÉ6=njmÓ“„Eã –œéçÂ1f5Hlæ²ÙÌB§ßc°64sä¼FŸlø¥ÝÃúæþ¡1Š JCEb̧Ïi¹M²1õ %Ùëä2Û£+)Kn¾$fŽŠ%7„7!ÓQ…6²IjF†'![‹tyÚdSimtV·˜h£`ÆÊà™˜ ê®>w…%|è_¬lnìoná}ƒ Ízêx'¸^­61ˆ“WàœŠ3ÃïHü3ãÒá EÚЊíÉŽG‚ÎÑdh!f”|ÛƬԨë Ø1ȇåaY£Å|¡ô’‰M@󬆆Ñ‹<1›ì¬‚¸·à¹azÝ‹zu`Óáì ÍJ\‡žþ-¯*ÎbŽÃ‚cG,9òêWp“zøʽ8“‰¥Ki‘zzêR´­Ô D2^cHëNLæç_…T/¼Õ{*¹VouADE!µKÆ|Æp=€ÑÖ‡Qý,¬Û2Œ…ñüüäqHôÁŽ‰™Ñõ2nîx³¥ÝJ¹™JIçÐ.š¡¿f77’A23-««12 ÄŒ+Z›Ùé2zÑä"¢5„-…&ÄÓÕÞ¹º ÛÀƇީ©[ eaT ï‹Ñv»¼ÌeÐ$Ó`®Ë_Ì“ZǺÓáÉd5&dwxTó7§Í5iCwz°Þ;Ã&Å©N¬Žyõ, _Z®ÆZrغùŠøÒ6%-r#ÖPWk°Z7…éf*•²(†Ž…í©ÚÕ [aó¶ÌlpD蔦y%r.1~žyö‹)G· l•ü™HzÐs"a;çXÎÉá¡`Ø$|˜‚“rRçŠb·žl!Ê6UBK×|Ñ>¥N,­³è–6L"n‹…CÒÐÞbhòO?&GŽª„MPEô—§B‹Y ‹é¶ ô\ÔÅ×éU½ž.Š^^æÜŒ£ß‹i–ÿ–‚õ‰…æ³í7»[ªŽk ¥té„A—MAjʘ Åh3‚_Ž<ŠÚÖ+eDcÆ@z‚”tn´F3{l…gºc ÃÁDÓžáá–—4GÁ¥AuÍdÃÁ!¥v¥ÀýÌ>¢Ù+n°ûÍŸûÛÞÍFìàdV¾¿Ü?8‚™~ÆØ ˆ0PÝvngÀY Â#PI ü­8#tº_ç”Ø#ãöëç(O¨d–_í¾œ^)ù•¹mùülkýèÌ·¹øÄBì €‘?P0ì†eO8‡…±q3¶ŠÝ,G}ýÝ]×Ê‹¿˜5³ºX[Ü9X,kÓÉq)ËøjfuI 2 e7Ã_×Êñǵ“ÊññzýŸAý·ÓÓÕ“êǓ剤ò,~\4‰¤” ‘D›Á™9:¤‡¤xŠ¡AÐ%’ßK×L8ôPc¯—‹E|YJ4â­«OV˽_8yâû!HÇš¹OŸÙ #k³õ8㘜±ÄIÂû²@ãnZûïÛܽ6Š“¨|“MU:°¡Š«Åª"LšÂµIˆp`08;Fõ¢ÁUÐ¥‚èJì5–H0 ³åºYï‚[íAÔü:tulHÌß`ÐåškM” ãà­Ç˜çeÌŸˆ÷3>ZÉ~¼ødQ-^”ßfùß­LX%Š¸õrý`ýhÿk(¾MaÏ«}¸èôØàï?2Ñ5eâ3£|B6Ç5ÍîIäÕGÖóĪ#èa¯ÀÄacy¬ða†ˆF†WýfVßø+å‡]ˆ—½µEÚÖžKÇB1¦>²=(S=Š CÂk|^Aý¸ Iì»ÂËùŠqfàÎÓß&[Ž[ËîwngÌJ/0 ÅÞ&X’sPØú Õ2öl@«§4N=l¬|ob’& íEšR·óO²·g‘7hqñ‰*"q*.6ì/ýr!UZÞûEø`–›7ö©Õ‚9ŽÁÚ7³…Ɖڑ¹ñz•ŒÉ&¤|Óó•’óQ­! gÒK·ßŠÌ†‹ïýÜ}4±hy+ñ.ž´ÝsJ-ÊyP.<Ýz¾½§>âq ÄK=£_‹OzÅ'ŸÈ×òŸGt£*>9%úü‹¥'2è„èÀ‹½gä°×Qß)væëÔëUqXAuk‰>¢”¹}óØ(V=¿þ²†_ÜO¶ö¯¾ÒŽŸøºýÁ¢R±„VºùÝîÀAÇõð+ëÇ’*ÒÖ[¯;É î_ü÷SÁTuPGÑkŸM:>槧Ð|/±÷½ŒÙ8L¹´Ò*3UZý£11 Î"Ä "­‡ë(zq¬ÊÀ°À¹±ºØŽâE:Ž(»¸`A‘y‰³ñ2³.uBέ‹™¼Ï[fàrúy‡ƒ Þïí¬¾|«e5¹E‘BÖý†\‹Žü§ÜÍ›$¸—ãÞá#?•1‚>– ¡_âËAx3dD~¸R°ÿ…¬p tâKÿ )°¦!Æk#%v¢^sxÛÇ@/@,´¹1³Û@tôlÓ=¥XÐCÕîN¬¢„æ´°ÔÎ;7¦R#AA[˜÷"¼^‘tÁÔ‡rKûp}¢Ý)©°(6‹ë7Êp&uzÄ\ÔrPFž Ђ,º5˜Æ¥ƒ›tŽyƒE!áÈ_Š z([o´È¯~ùúŸu.<œÐ6¦WL¹$K¦4“+,±ä ¯JXñè†PéTÃÝøn$=´÷·ß¨äk l¬4œ LX¤FAd:…Fö_°ÝáŠò·½»jÇ6”J)KD;·ãã‡õoOOïwô’ËŠ4ªÞ\Ò›ŒUÆ d}RcHpÖ¯â\·ú#_b#øÈšýaˆlæefœ<ÙÙ¦×ùÊa3½‰b½ƒõƒŸ›4ã¾ÜLdG}Ö•Æ·75énFzE°,mø(ô(‚[EåáðëÐö­ÐQ—)2br2Ha€CÌÁ2äXÈóS2eUªÖp•ê"ì…|ÐòÍa¤a¹¨~ÄÚ*7Ê5­6 ÕкŽÉaŠbÆòÔ§ñ>ìF}‚{A.gŒ@‚ƒgfDQ74–?àœs¶)«ø!²Að§q|¼´ ç®÷ÔXp"K} {è¡ìx¯øîÆpn¯ _“öLþöëj™Ìï¹’_¸/ØÛ¸Œ`6pŒáņZü‰©Ø'ÏjÕuäƒ;V“]yiç-'bT22ï„{|‰9á„OWZ#ØÔ½!Z·¥5 ²ã¥`¦,,Ѷâì†z©q‰äVˆ·¿tmv¹èÕMõ'B32ÍY¡œHðv>ÂH™L˜[ šG%ÂÕ‰~ÍgáI/ÈaÐu`í´"Ç Ç îbxCS¯A•"aÉþ»ûöº #v⺴ß2@‚C°Fý®òc“Ö8ÔФ¦ ©hçNõzÑÝ…neP¥ÉÔ-I·¸üÓûØuäÏÿ¤+JÆ®sy%ª6nw€9}ô»ð¦ú'ìÙÉ•{§,ã0­OHÌ»JØ EYÁ•ÕqûHñ¤c.Õ”5q­~³¼lP¼>èœñ‹¬›·->ó"šU—›yT­/ …Ó Í GVºŸj œ=”[7ùà1½®ègöÁg?þÈIUe¼r<ÓG1[ûÕŽÍÔDë_×Sqè[nɺÍQOÃ9x«’·£ë˜æË7´Éo(½\3.Wæ`¾¹Vjµšgð$lû7ÖŒ>š0™"CÝ–oîìøHÐéR…WYu±Ñ@hKT$…#Œÿ’Š‰m㘨oM3OJøâí¿5âb—D oK¤~d ‚z‹¨mC•tãÏ“’) ;O˜?)µ»$ÊA²kK$Ëvˆh^ƒÅ·ðTÌu™„Zô‹Pp$’­Jë}ýN'-é~á àfIÕ:¥~Ö9Ø›!øê&/#¢Ææ³wÅ:´¸ß0&<$•×Ž—(Y!•¨ÉÿIéû'æ†Q6Ó–k•¡€n7oRpÆOM)µ¥Ûý· š'£žˆäe:-CAþuÐ;!‚^à"&¸+U†eÅ{GÁÕÖDî*SPÒ vR€ƒeop09`‘¶u \,¿•TBÃ¥,$;>nœž.ÖQÏgOïHp4äˆ_x¬Û‘K KyŸ I]ªô;Eƒü —ÆÌØdðÜé=mj8Ì%ÆFmÇýyƒà5“ˆ¦m>:“Ø¿ž8‡YnÒTö¯?{&³/è †¨üºÓƒþÀ¡Œ}Ù…f©µº†TïÑBíþ´¡I¶;æ,¯þçbâA£íìE?^jÕI‹ÙêþC s¯•¶ŸÊkøµV~RvÀ›àA« Ñî'…ø‹YJNqæüÚãÍúM\H{F”4d•p‰¢‹o‡5Ä®úŠÏ¨–¨ YE˜ð*©7T›ýNWHEŒh~¾øwÜ)ZLâ»lxS{¯8g €*F½÷äñÁòúùûÙ˜4QFm“—¢èn©'ð»ð³:Á[RPÿm½þÏÓÓ““êêGµxÂ63œâ8“Êoý=”¦è¶ípDÝà’¸ª±9 ‚]F±û„½”¦6 A¤]D`6žìJ/‹‡¿UÙIXü”Mˆíü.v`ß… Oö¶ëbkçÖÿ½¼Ê/ÙôaüÀBBZÒõºü¡ÊŠ¸¼Íê˜!7öfÜ,¥@õïÒ¶q‹À±HÊ7FQÖRjR#œ}Ž>ÿS,Ãc–¸–Ÿ·ê¿mÀ‚C«/Çï&Á2ÍK¨ˆ«ƒÆhÙf€ñŽ9§y‡u€}iLÞ­Sm‡»F@ <Çû©cÂ<Á²Xº®Ú€hL ÙÉhàš‚‰íLŒø¡²aPÊg BXÙ¨×P•°qÑPÅ—¢æ~†ŽGEUÿ^É>)V3NÍ¿.÷tùø¯`èÇðHð”â’4‡´Î¶‡È!©ëªJ9—Ïዬ€Ò0šSqvŽÍÙ_vÀ?!Þ¼ªÁ†d W>WþË»!%Üq$g6$Õà2èÇQû–Æ+W&‡Ð‰Å¤P‚ ™^—;•¤YYÃ9“x,YŠ/éÊ[_þpmþœ! s¤/å·´%¸°`Ð×Tã–]ýiõ ØoÏôƯsö6ów÷û›‘„ÑõmŒ$­ì§Wž…‡Vô·/F7ŠŠÿ¿B¶:ILŠ#èt³ÞªŽw…ÏÏ0r¦EVˆÑ㶡6g‘­¨où¾;@PÊïhMÿ"jy(~r¨®ƒ¤ŽÅ†ád¢³1[âð2æÄ_óÒ½uí2Å'ÒÍã㕤8wÊÃî8¦íöƒe³¶¢äR“rë%“ÍÈ,Ýt‰fÔ¡hÃþ.K)_•µš­~bá;Ì‹nú}¶;ëkf+mtbÏ oÂúÎX Ò‹m;1ÍùMUJÆb{áÄB„¹4o§/4×F(]ß 2¥*4¯Olr2 ©?"K›:ãíÃÆrc9‘ÞLn¿,‹I͇4…GWêaã±B_M<ÿ E¹·arôy—AçÝèO9 r91ä tàìµÿÏ$71aqŒ=ÓÏ¢h¸x]…‹¬ÕãSÞò½Êy Ã+}Ü箚ûþèæ[Ü øcyÉüZ–£ì9E‚Ò6?^Äm^à›!jùHõs]\ó™¬~æ}pòÒéLóÖ_<êEñôk)ËÍ iqx9àÖÊ“vI>wlTÖ“ éĽJa£ÑïX}Õ‹ÂÞ{(†P `Ò;ç°ý'lÜÅ‚F3%páA»¬/_½i¢fsws+὚¯jÖú \‰P’ÏÏf¿-&M—¦,þñìâ?,zAù3—k·”ö²ßòÖa÷3×awŠuk Ô5¤!ºvõÚp…9|©þ¯®Ô)ÖG?XYjêÒjÅîËâ=,Œ±+âÓ>Ã|ö"˜Î¯È Í¥GsNŽ™(è¿fN}¹Ê‹—õWo“ˆÕûß/¨¸]õlÄ 9e¼ˆ6‰WhÍñèÑ£šb1}ZdÈJ{HB­/SeÐŒ¼Bx‰‡!«V=ð*FWŒj¼J1¸8ý¹‰u®Ar(KXèããš%þ»•”´mó¸©1ZV•—[5VÈlí<«Ne5‰OËPu ìP¬ã07è/ò–ÌK¶“D%Ý{øƒ£™ËÆË'˜@XÍ®D™›»§e3Çvè~qØÁÂÜyÇÛvS.¯ÙçúYÓ‹2¦Ñ̼?áÔtlʯ,ú™:¸¼MT ³ÆÕCÆ)E_ŒñΠn2¾î [—ÄW«M^õ+Šð¯*~\¨_áewå,¾êôñ­ó¨ŠŽ "Ù0|w\tZkVêg¡^võ—Þó‹‡âäƒ÷"]¼³•ì‘_êSÉã‡X¹ºŠÇÏœðSºpÈ` ‡Söã‡nªã;Ü aÍÔ¯ؤ±Æ4²“ÒS觙¯|ù\HIÊTþƒÇ³ê×M,Ç•YœDÙÛ92CZ2ì ‰0æLÄœ–ÕŠÎÏ¢/ ô w?bû„ ³T4FX·dêµQ§>Ñ •?ü¤®ˆº£[(i“¿ÏQ8ËQ–´ãýÌÓI áÛ%Ë?+骆Á»[—ì±´ZaŸýw SM0F{N”ç,]ÂÏcÀKâuliuÎPØãºÃÌ$Ý rÖUÆ®§Ÿ™·â°[áÕÚ‘ö†‹¯¦br¯÷5„›IN?F¦ÎCaËF\+×w£i^ü/%ðз øÚZŽB/oXÊïPP‡#0žEua±Åúüû/÷ùæìõÞLíãI°]õPÉhˆ<Ü‘ŠkŽ'l›Q§‡jó¨yðjO 5à´RÀhÇT¤¡â&&ÔBâüTô…{¿&£P0¾Eù°H ×ݵ“$œt2h-÷àO sÙ±“¦Þ4'Å¢C¸«æö³­CF¹ÚYß{ÞdÛŽ]Dï:>­:qã!iåXUJ‚M…¶ épžUÏ’6Ó N@¦¤± cábÈq„™ÉcNègb›ÒH¹36Xà¸âK[ðßF³á etÇý-ÐöÇÀ8±õuÏÑUË[‹6£#„qêQko Âdñs{Q}P,Õ®Äd•y^!((ì –øÂÃP.ÖÔÉqét¥Z}¢âwÀ2®¡GÓ'(Q9þ†¯ªb݉é–L*øõ©¬þžl¥o2ßXX\|²øËñœ:]¸¼n}üµØ~/¯ÖæNÑ ~¯ÿ²vºP‚¤ü+ùT\„?Ãá£Tù¤WVðo'‰•à%gЊ&À¹mb$gš xœ_ék1*•Ú˜Ä=)1HÄXšâÆX3ñ*wß Ÿ×ó ¥òk¼$Ö ì½R>\C‰KäP{Ÿ ¢w¡ fS42‰ ®Q!l„Çí©óÙxÝ„& ”Wƒ™ˆ-Æèìþ#~¹äšÌ®éõº A»Pd[´Ã P2v{µ­ag mŒÒAÇy<pwdƒãßÈ`pl.š Í_ôÂ!rÕÏT‚Àò&”fx“f3Ëã\ÊŒÎñ»ª¦g8â¯Ü#>=ˆ{áðéᦪ ¸FTíHùÿÈ2§gh-†ñÒ¢²6žøÜ{Á„Ë]/¼Ž£øñdÊì|çgÆ Á£ýÚË0’‚—ÿÇÌî.M.ïnFÏ!{xK#ª³ Îó)à˜CQ‡yÓbØßTñí”ôñ­«­LÏ«¡4Ö6´_GJzW:z?›#ŠW´ów–ïQžÇjrN¦ôO$×Óþá¢kZ›‡ÜÀí>€ë þ>”¿Ò« Þþ×K±g$‰ãEŽW¶¨@­?a n+ƒÞçym«E¨“‹˜ ›§.ÅÙ´s OB¨e- X~"?˜‡-Ø&–½Kø¢^õõªÖ`}ŒRõ«£S¥IEÚÿ0ÿLøsˆ,.q¸Þaaâ0'Õ{x+J(örÍNéèÉ8’h0oã÷‹Eÿqðxÿ[ÀQê½{m¨Zô³q¯cÒ&KïƘ;Qu°þƒW{ÖÌ Ç47¹'Ù_E0@ý&¦Ï6_žªC¹‡D9lSΉr†á±Y‡ »/Ü°iõ6çí!`°Yã÷¶<§æ7ãiDãnwÀTÓ!À)2R-Ç­èAcÅü~ôž, ÐýòjÀßûÀQ¿ÚÛ~³ wúÂèz%½×{ú?ùœû¯8ᦤÉc¶I‚/ÂG^½9Ì•Ò[ÈÜ4&ž, <!Ѭ£êg9š³åå\†¯Çdÿ${Êûçbm|ôòƒñ°> áÄ ¥^ÂÚ„i Ûò;“ajÿ#œßïj¾4fñ[ÿç9’ ¹~ÐÒO†íòÓžV n+ÿ#a¦gÁ|4,EL íæy4hr¯µ"÷–¼¶«’ÃbÇUWt)ÿ#b±6·Þlm4_l=Û~£LPj;rˆ¶mc“¡ñA4b9Tå+H÷ɶ2`|1Xõ„šÓÄ)§î¬ 뤢¨ë~Ì¢ü1Õq˜I#ú“N¦®ÆI´Þ؉H¹QÇ ‘ÈÄÓÈú Ój•°›!…Òl«@‚¢SM*”R‚ÖyÑÍ6 rSÐ/Ö¡àì R‰½a)tF¡BD¤D¯´ÀxŒ#_Ó¹„È´# Ž§$}Ofv6ƒÎ«ŽýølâkÄ(zŠÒñ¦Ü]&e%Kš¶„ gÈ· ”¢GŨ+ZYZÐ9[³£nM +©3±¶ž1|CØRäá#K £ˆ÷V,ÌGÌAw è1DéàÌ~FNí <Û¨:Q/¬ÉS<$éþ² âUwƒD64ð2¸+¢gCD Q6Ö»Ú5=æQ²çÒà#ÂEÅ!t£åJ7kÈïaû1‘ÙÏ´Ó§+Ê4éöª|®:1­x217¶áçtÏt"Bc’*ÕT}I ¾[ÑUI5B¹AäásÄÝMVaâÊœeVáDL®Ä¤Ÿ¾GÐ’U~lÙœ™êé…ë‡{ìaÜe •WšËø b=VE§)Åš oÐÎ;äÕäD\a5ä¯Íq °$Üž£¡XrSD©ë^z‰¤ù.oÛ¿–‹b\tà1ñrÎÃäà¢z½N„ +\âÓäÜ*Ò‡žWÉÁ¨7u:|_:jž âGh5Gûû;ÂwTð÷ø~S¢C±°KVáPØA6t+ºèu~KØ@ÜJ€ëW{ù.Y󤨚™1ñ°Ç%ŒTè‰í>ŽßîúsèôÆî&”Î×6ó/nÇÇ''‹ 艬¾_Åߧ d{”Uš“•Î®*†åeÈŽ5uà(ÄXBƒ¹Ù)—l² -¤±Ùž0´˜)T€‘PhÃÕ]]Ýâ¤#&PÜïv†¯7BTkܽ½!µ®ŽæÝNÈÑßà<Àü/÷·ß40 íä…ƒ¡M6ñhŒqȶh4ìè ¢ÄÉ-®QI¸9ÑÈû–>ë0­n„ª@W¢Þ…Ÿ#¸z<{[pµުˈm­tGÖŠÙÖºª)ê5¬|x¬%n¦Åˆg=Û +„Í*å¬t%àŸk>ê}ýÜ$Z,-§Âee¬I\„Ôi\Ñ"!û4ɾ‰/ ÃÈøðRl‡7[½y¤*¢° sE›™B‡Í)å7/›µ·0¼ódRT«Ê-ã¤ÒX8©ßbAN²ú…IÐàMÝ> ÆÞIf§ÔŠkA}¤( ª´ÅhKÉv³"3`ŽUüÃ.1,cª¿ÿ‰ÀÖþ3µüÝ—+pY\XP¯ƒr¦«„ŽK}x‰W´j‡C¼Q'ü•èU )X{„{HV:Q2]¤„m0D­Ae1›…ÉÄK9®‚[òZã0癤šB¥ ¢×¨uiBwW 0H-&-šDN|ÿxæ˜ÁJ±BRý%ô=œÌ^›IÖ« ¥R\C³.…h|Í¿€Ó’ÔNÄËaHbÊMÞÃMÍÄÏ5 VDÅ`ï¯>È¡¶×Ùð-Åz•Ã &/¸ú s¸HQH¨Œ³ÑE]šöÃEoÔˆ|郕À[ééœq$q€ÕÎ`ÈÞ¥¢¾eø4ÙJà,˜´]¼=o^[úáË/lŠª¹å'èEÕt\_“Ió6sêø•0páMp…fœùC@ÆÄÎ= /P‡HSO„¡Èªæ’‡1²û]æãW 믚ë;Ûë‡dwœ>·Uöy^¥ã!h‘€¶¾ÜxH(‘×°¢ØÖöYžÛUJh¹ƒœJ0"»ËµÐ¨¤8•é¹“dLñD¨a[r&™¼R霸Lå’ÿ «¬ä Ä¹MN$ï߬—¡·¤ìÚñÖ–_•{@e¶mš¦8rp»ÌWYÚ ÿï-mœýfgÓ|=𻮀b¸Œæª3êÕñ'_5~ЙÎmÜ›†œê97ÉÓWÛ;›w Ò<)X4µa"›O×7~<ÜY?|Á ±-ëÏ›¯·^TŽ–Õ»mÍȯ6_lí¼¤¸ÚÈÊÖë¸;ë&Ñܱc»alwùŒ£Ql«þ¾úƒ@÷¯õ¢V¿ûÁ8»rQ,ô"¢©9Z²Ò—äîkŒ5N͇5‡h­Û/ôœWÈ}à‚½hµtlVÌZ§èÐÔ ¸¦ÆGœÉÊC:º˜žÝ¢ Ù©ïÚ+A“ë uð˜ öU7 ¸øá àp.­8r8\`ÃGƒž6öõãp3d2å×]|[q"A»-G‰/±Ey½­Ê'KËtFiÔe¼Í‡-Ym°®õ_Ïâ¨;†šgçû4^Pd .+ò uMƒ¹ÑBy‘c¤H¤”Å“ÆIc±lq}؆è64ÐÛ¬Èf´u´/Ý% */Š&¤òˆ;üÅâPF(n2ƒ±,–L=& 1‰ŸKÔªË0!—¿°E@ÍWÕb¶¤ug“˜ýæÔ±Wu^,êå³}Ž1 g@ÀŒÂC²NG):½q„+Xò o¾e´Ü¥ Ë# ˆ.!‹K©rQ—`¢‚LÙ%‰³…»uw¡Äè«ûm€Ý±jÓÌíÅTã4Ézø‰ ‘Æ„p äݬwðJíf;ÎÑ5ÝM6u«Ãï¿ËήÆù_­cTîýoÇ^üËJÓ@rm M@wá?:šfç¼]nk8}Š×Y{ÍÍúý@¢ÇQ,m÷$p“º¥³ç’ª¿o˜ìO‘ æ¯Zèx¡½+ìü2StÍòép óazëñ&¸—êï»öïÓÚª¾ D2î.‹ùôÙf¯­ú ú[râ¤1¯®õÜŒÂ`öT9Ì `,³/‹=1‰;³ q(ÄíŽ ØIðÿ;ùŒÿÎŽ?E¸$ÕÖÁÁþAåѺ¨áÜG£6 q¢pQO7î᫧‡GÀ^m"ï,N‡öZ±³iGV %ä4M‰æϹ"ÄÞa—".Þaíª‰‹DN¢»Þ¼j¥ÿRá}öî2dóõäm"ãNÀi…QeÒH´rÜ9w5)4çvãCµ)L(c>—(xÖ2i—§o]\Û9»5{ŸªtˬõBÎwWI£é\iìÿ*!ƒ­'.°vö×7s/sp”FA›B‹›.ó°õëuõrÿàhw‹]6ùKLrQ‰Z“SL#1³¶YKbfÕ¨?”¨ÀRTtö/”Öàe‹9iîz·Ýää΋ï³>¬•ëƒ2 žûª”•Pb1;op2‹È[Q@Èó¤ÜrŠ^ò¢±§—l‚ }ò ­GªÄB0ýc– OSàòm¼þ–º70ãjtèû¨HtˆÔ Òv53JéØò ƒGÀ‘ã¿ìy]ïAÚääyÝ­r;œÀ½»Ó ùÝ ÁO‘`§C‹VV˜&æDõ½ÅF´¼ò¬ÞÏ“ò8;Íl>\à"{ØÝ:z±¿™«û—Ò4bt¬¶éÖFIFÑæ¼»+ÏQšØé÷Uǯ“³¶.ƒAÐBŒ©xØiÅÉ}™jß$=Qöí]Üà]M‘ìmé“• é¾ Ã¯Vàm™%l‡öðG_æ ÅUÊ…T #>_SôZY.eŠ -p³–a+$µŠ‰²¡nWõáâðÏ"™wÞÆØ…qΚ³|,#àK§ÎýÂÊWí–Lét›0iŒG ‚Ü“³ªµ8¬¼a/'ù3¸JaV*¥Ä1Æú¤b°Õ^­øU˪{²â¸•4p" ¡¼¼Ïnæ³—r¡7åp!ÇǤ„8=õsb¤ÌJý¸½ÄÈ(ˆ óÜj5ùI ‰pŒ(ìèqP_´† :±)p7¼FŒ[NÍ*£X +*¼{h•éÉÇQ·Ïe‰ê!”r-JmgIf¿ÀØ $¼'‘¼ ±Â2y”àG°6MÑAêǬI]k*péôYü £ãÖ¿3w[;Ï"G‹¢ ú³€@Tðnwçôô𩪈<—éäG‡ÐD]ö&5ðí$.®ïd¦´›•ý®ÐжÅÁ«`”lnKl¯1<ªó;m¶½/C˜!üFP¸NOÌ͆WA§×ˆ/§‰_n¾yl¬‚8 ýGz·¹³“ßÓdô¥°~s'žâòÀU‹®®Ñ„åô^ßdýjœ€cœÝf‚ßÂq$ 2Ë´i1Ö ‡º‡)l®úe*קë¹A®¹F»Õ@ Ñ$63›àÎí_aÀ¢ª:Žú"~r3îcf™ÃiÌ«ð/š¶`ÄšloâÛ^Ë ¨Ÿ§Ðí~AYZOã Á–*ý°³Pï<øæq¥±@=Bå)šU…/«ßì‡õ`pU¿F| |€nÖ?¬Žë¦Å9/»N–7œçð‡—á„%ÐP‡a(Lf£p§Jû hæÐ SÝ„Õïó7N¢/c‚¿LOs]Ì6¡²Ð&² »¡ØXš6¸Ûžœ&æ,†"B$:'ÄLÀ;(‰˜‚xeÅL;á°ëëçYË“-þ®vy“-HHtyÔoxµ‰sXy£­ø(­ùhû«‹r…nUH.œqõûvHĨ\$!TnË^݉9öN¼„ö`wã²+§Acámf\J  1Õò0{ņ˜~]1â|c% :?U¯' ½O;k±JËŸ°hëþ«ªòNlÞ³u…Øæ9´Å9ˆ}Gæž×CzïaQL^yf¡äBªL?Ð×cú,.ÒÇ ¹îÃ…z¶ê’` 9ð¾ÿþ aP»‰œê'QãÈ‹‰Gh6S)<%û^kP‘”\qøë(ì «cnk†(”ïg¸€/?\ªê—0@ŸÛ¸â,sZSœÈÝø2ÝnRb¦)é·îÉa¤´s÷Ô[‡ò¢ÒÓéÞE7:[+ `°Ù‹pÑ‹^dTÚEŽ4_$= î0Ku3Bi1’È\âËî‡.kk+„Q*Ù.¹ÇÑÊ$ûÂ(X?{ÚÚho†[çÏ.ž_¾èlÿëï~ìî\íöö¢ýþË_ÿgpF¯ÞÿtýúæÍíÏ¿ýÓá|Ri4Nª‹ñÉâññÉ2pÅæïÅÍÙUPÑè¢gjbé–²t!sºJùSé˜dÛúù¥Ê,S%¬‰³Òzn[»ìˆ`=ZF¡!a›·Ëã ï0·û^M w7²\ÎtŠXsÝŠãªÀ•àÕ!ê4’ö#ÄÓí]‘òß¹ÂÄêô*|–U[9«†ªú.­«síq÷v§²Ç ÔÓÃÍ:êvëÚ¢¢ËÞ¥0±ñ0Ó2wow ËÜ”Î|bMªÒ»ªZË´©ÙÛuíÊЪfo×µ4o³Óð-}öv× »cÔ»j#ïµ”ùvïj‚Ñ5nµI¤1U YR9/T直>Ò¡›Ã«>¤ 8?­±…›Öž.Ӣ΂¡àQŠdÝü0ja ÃNÏÔ˜c7¤¡YS9ÓǤ§Záñ—„i¿L[äÍeÛÙÁè± 2–ÎëMl= Óz»­5Ê(b^þµŒÏ÷¤©$»ÄOë ÉL¸6 t¥­†ãà6^ÅR€»ZUBXµ9HñiQu.zˆ €iŽ£ÇË16É¢·‘öÐw¨BÑþû ÛñÄ_âöÖŽJýiÂT`è@z@6=s æ;›ölK±$NƒÕ Å£/™Éü¢ë‚ªŠø•ÌìÔ þD?Î’jVR³”rVe¯®¼ŠûEþîTÍ•³Y`:«FHUü$â+Q´‘-]ÍH9-®ePæÞƒ›èÀš× a=Ä8ðrVçxQ~Ǹ¬h=Ånóèì—‘J{$Ë䌽$ßVU²/½è[ê]¢-(½d–âàpxŸ4½›W›6*ÝÙ#¦wK]ȦÄ5R‚õ@µ P‚F’¢äéöžT¬V F 0 ž Ï:ÄÐSå°""OÂU"FïªãcŽ…U'ŽÓ[]¿ªÇ·WgQ7VõË#ÙÆV"—nì?{fŒå¥¤µb~™E_”ŸÊºš)ê§i·†—’øÔ•s¬ò\úƒIeà<Êkãƒc‰-Ì8Z\WŽm'ÌIæÏj±%ZŸ|[Oïø&¢êÔЀ*œ-Baà5§•óÖšº¹ï׊¸ðøÜ#&½ˆQД±ilW0Núè( ¦ýˆP!oTΈq4‚x¥ÕÒÎöÞÖÞþ*¹ ˆAÈIŠørýø£ÃÃõç[ÍàPžmVM!E'qV‹© –-‹†Ê}—UÚ-ÚÛU'''E¯/H†o†øzŠVb™Ù‹ÉV»C†Àí÷Ö ¶iÓV¯ [Ÿ] ,|Þ•·nP8t ÞÔ—¥Œ‘úú‹j÷PÓ*ÃP ®}Ðå-$¬–4N²ZæÍã°½YVˉ>Ój™K̵Z6Ÿ=³½Ãë[›VôÙÁþ.A;ÀÃXð†¤)zJÈÔlxmI8GR”†¨Õ †¡1s’0µ£A§lüöÙý\KÀÌÏ›;;x8å ša0GìnFÀµäADXÄ»!\2|@·óÂñ¤$Žõ_Ú^k*ûÛy5¼Žhß 'Î4CzBùÚ0³íPØ_b…øŠnì3ZA? %M±M`‹ËÀìqÍ/`-@­}:™ßj­Y½ƒr„Îùm=:­¡§Ì3"dô]Ç>7ÛÝ.¡}Q|Ÿ³ÍèÝ k ‹[8Kü¦ ½$ɪŽ_"e«íCej-LÑrvóåtãRO*Ïáò/1±M)°­¼ôyR»Y4`Qz¯$9T-áû½·ýlëðˆÉqËH‡LÜ MsÂ<Ètöv Õn†]­xŸkêjHü©lï;¯÷fíjXÈpñ³±± ×RËiw»¿5ù›å·Ò_%¨ï)ů¶\ÿ¾\Ì9¿3’ŽgA¦ç@,k°«»| Ÿ!Èèµ/"Í ¤üòŠ±Œ¹?‹«Yð ÞºÖ{×›Ä4Ú‚¿„õꢉgóeåøÙöÎÖi.S (ÿ8W˜’WÎk¸èE×1!ªrx™¤x&“e¡gLHôé¤kÒ7k#¤FæJ€6™æáöÀ.‰8Þ¡(ì-KÑ{Š?)ŠíuR.Ç‹¿c8¯Ó…ÅE|Æïê(=·I0söxqø:7ãâ/'•'ˆ]³€a½tN¾ˆ…]à]TxÕÞ"I ¡‘ìQQ¦“¨þ¤²õ9’Ó‚¥yR=©p£¤|èÃb_ס³ÿj+Ìúo°m Î3ׯ·ˆ6ïEj•TZ~[Tî0©E¸Hï\.ü´nWˆî•†ÑÒÙ2D³YÀvw­à;Ô£;=Yp£ä~3ï  OlŽ&š×ÀߎZ—P(e¶_g“2wG Š_ËïÈ7«3”µÞk ê®V×P^hså꺦šW×$Ô¢1éÖõ¥Þ½ºN§®Á„Ä’¢XÂ? ’¿·>¼ó3@ʪ>«}(᫽Mðl僤˜ÒõEçés Qü"Fƒ»·ß<8:Ú®­?'äÆêä«@’ÝN”•ÅbCé&ÆÅÃìE„¿;ìôØŽbÁÆãIðmµšÈn2b%¾î½7~e3×XVõ7C£~Þ‹ê’¦ì1w)7]­ Žk†tÿåÑöþú¦%F¸H¥ †ÃÿbœDdÒ…«r|*Mƒ0yÓ¦ökLI°n$ÑÌýô4+K~—Š§äÈx¯%J®gl-šéœÓÈ‹öEßœÑa³Î•¤·w—ÝL,vÏ#õùÎþS ž‡?ï>Ýß9Ìg1Ón¤~Î)ió ˜7ômýõé®@"ïÛ“A´žæœb–›ÁÅ 8cÜ×àZ±Ð•ÅçUeð— ý…Pb{W4ò£Sd? ¹ØÛÕn”Ëî1Ö$A"-Ö4*dƒn“ëlö;ˆ‰\8.èÃŒtÜA= jG{¶!DzÜ ‘‰AÈ]u^c¼v9þÈ_ ]ë‘EÀb³^uí¹i(õš©4ú4ä""èIŠïÿö7õ¤zÊã(ÕêÂ… š¼ÙrMÐgn¼0´¤…zá ­•ŸnlÂÄÁ:;-caè‹ÖÇa#µˆÒroAM¹ß1ä+°8Ôô *©µ2²NÍõú?ƒúoh_#?ÙÌæ¤Jm’lA†¢nDE®»‘éƒFdØoýÛNaJæád^‡ÜÏ·^›.µ¯>~мÝ(qÑêÝ<áe†ÑZë¡‘pÚF8gô)GŸg¦ù7‘kç&Ü=1©A#Å[u´þtgkñt³ÒÁÕr 3S…c‰¤²øpÜ9u3r¡pWê]@£ óVÓŠ •~î‰0VÕÅ”ÑmÕéÚ²×µpèЬ…Uµøàë+ÐØ¥ZÜ«WOŠUèDg-ÅÃA%îaø„•j¢œ£Û>€+yñvª“âlð¸SÓY;5noWg5¯<\mÛÓMþÛ¿µY„Z8ù¸øÃ}¹Õ¨¥¯Ô«=°ëoðŽ_À-ì—§'Õ…J5•ïCç¼Bƒ©Ç±ª’)Î×NŠ›'E(òïÅ“ÊIµAmÀ/GøÅ&v9¨-ž|üx2XÄQ¦×pìv->^>ý÷â/Ç?|ª漆/éŸ'ɶPr¢R%Âdþ@“©KR <°ôÛZSÚvžß¬ýâ–ÓbÚ•+oŸøŒycõ'•ÔqRåO¢Ýpª+1i,1A/-–„ä ãËáÌÇoÖqŸµÛ" ÂXF‹í²ÐMÏ@Öø¡l(´ˆuȹî- |ߤ÷-¥5u^Ú2Ëâóæ;çÀ0C[Zýî(Æÿ„A+nÕ‡Â|ØV³@Üš7£– èᓤú ’X:[«¹>|ʪ듮W ªñ*ÕN5kå üÄ+«ú„a+KÕ'Ÿ ¶<Ÿ'ëÍ£ƒŸ›[($²ÆbUïôØC[65-!ÙL‡{xA\3#&†Ï‰Òá&›aâ¥N>ªñ“_T'ß©UQ5&éõrÑ;Î ¼oã1×û_Gó[mÍR³†5ÍÆĦ0–ü ó¯ßiSì«÷l«-¯Í/ ÏIÁx5™DÖ>Ö´obB£Ð¶¸q/¸@< ¡ÕqÎœ¦ŠúØ]T¥²mûw©PypEŒÏ” G‘a¥¸¸à`·°?»èZÏÂáuš¸r«‡5±¶!¿¾´5.™‰Â21Æ×Â"®sc Ó|½½÷`-äÍ›æÆÏÏá-úÉ~L¤k¾ÞØÂm®­ ÿ!œÄæÎY·sq­Uqg!Ç‹©1l*ò]+`k!”ƒÂå9@¤u"/Ýv96˜_®¢§úq8jGu9á¹;ÒHµsô×Ú›;ÀH47ö÷`÷vÝÎW|ÞlbÈWÝ(¬!!CK&bÜ&v$ö ÈSÕ‡ãRpišºLKæÜ`L+ø2-̬–m“bMÈÙäsÒõºXVww%/ãú{"xê»ôš,2VnÆÒåF™~i‚^°Îå0v.É2Ÿƒ§ò¨5„qP2 Dï°ÔŠI¬_¹$>Ò ý&ÆÁúnšù/ˆb¶eâããÓSµVÀr?¨â’øïb¨>ÕÜaÀð»_¤‹3¶ê“qc 5.y÷Ù§'³Òùt„혨)P£ áhlY&¸ŸlmÁ‡æëýƒ×ö1,È……§€k"UšU8úú•*̓jò<±‡ìØ8µôñ˜ÄVëÓ-É'ŽÖ>!YG ½‹‡WÎ;ñ[Á½MbGŠí§‡k¨â?ÌúʘŸk%þ‹)(}NÙ’º(ÉgVw%rR‚}À®{‡´î®umr£ 9ÌÚ1Q´ÓòRVÿ¶—²G 0§Ã*±-˜„4¢«§{’¿˜>3ìµæL˜./¿4Œ™;¡0ÏMÆqêõ …ƒHMà„òʦ’M¹b‡³HÖ„÷Ñžý:ˆWóËò¬Ù4óûÝ—\3³Ã1ëå»Àìø&ƒçi¸³ f^î:¬TôÚ>Â. —½ÓñŽ¦»×p{Éïè43MÎ »¨þã%Àn|à‰åN>ñrÀÔyòrðÔ£wU‘ªXg²#œXZ4î¦öD䔋 Zb`ÿPæ` ¤Ò6ÎN 4vx/ÿpzŠzå4c™W®å8K=­&¨¯sÜ#d¯ý@~=†•Àgý3æØçŽÜ.‘1ž—Qötk•›Æ¶ÌSÍ£ˆ£YÊŽñí`fwBCl¢éZBâL­ðst}WAoDȶ†ÆÈ뚧–§Ï4r¢Ùପt³4Î \=c;A¯?§Éì$ï¨$€EbœQ¯3¾Z¶_šÛ„g›M• ·Üœ^9‡dÒpKÔ…ÊC¿Rà)ŽfìPÈõŸÀã÷ØxP奬ù^noLmÉ—gÅ÷’ƒ—M¶ÖÇì\wÅfo\¢~§5E*æLµ  Ž÷IæÒo(È˯¾úÊú¡¶„‘êÐE`«Âa+ë¨|þæM2<Ú¤¾•ë¯»µòÄänûË¢(’°›E)mТþ]µ¾ýÆ ÝÁì4þð¹æ(èÁY'qm)©$šëDƒÂÜômªŸ 8Õ—ëçÐö²õ€åÎ^u.žÊ"7ºGÿ7OÂ1ÞVÁ*­Ö±ÀýǪGÄÜÍt‡Æ‡]¸z<þæ]²϶ßìn­j9“5ízüÍÒÊOœ ’m3Q^à Ô¯¨”²1R|¾±a!¨L–ÐÝ/åŽ~Ù‰»wº¬‡KåÆ]ƃÛ,k“6íÁŠª_1v8¾Fƒ°<Ì1Ç¿]Oº¶›È fÙ fÜ)Ä€”˜ôbw¡ãdÁÚ? ã†ïmmÌ¿¬EX¯äÅ `³t(ÿ2Àu±ñú'aL4´„E$’+ â ò: ¡:'6SGš×éµàêkã£CÆ ‰I8ÒxxCáO&Ï¢UWM@í»Fro( ãI Y0Œ R=t£¤5IF,,ê¶Ý¼ÚyU©×ÛlÇRFè®ívlÔYYù.á}¾ñ1 ž;žrm¢÷ûS”O«þÔä #çÎ3™F¸k‰Y`£i-ˆzføðˆ…(ŒÑî‹ææÏpýå3vFâÕ‹ÐJ/'œüÛÿºè÷önþãùË—Vð(4(µó‘Nh¨®)[áWl‘~Ç¬á¬éPå*2U o€U‘¸¿Oµ1Eü“Ùk[h«º³­õñz·H VŒb+÷dW¤  §`À‚vƒDˆ«^ÖàŠ@:AFp÷¥i“¹y¶Ó¦¶ôñ9Õ¤ÔÄ‹;,B|•<õTi#ϱ3Åè­êåºÆ‘Á !1 |dtX[„$j ;é’)£ð³‘VæµhÆ öøú)vÕ ·˜_PXidLºÄ¡6&Ò=ÙÐ6Ó‘;—srPaˆŠf›ˆ'jÇóöÞاhôÀ#'¡ODN_׈c:STSìëNl©!JSj¢± Þç³³8º¦rÈݸ¥,hðLö‘H•c.‡…œ›Ì=ÒQ3™œ…û5¤‘.NŸ÷¬Gpýl{•€a£ÍKÜ€³LRF»pZ—Ñ`„<å\¦OÐ\ë¦uùøÆšWϨ·x³Ó%Bû…ð×iÛW¬×{QOP¸A¢-ò°ÃŠ­úH5ÉK”ïf€c…ƒ¡7½ ¼¹} 1#÷g@•vÚÝ2¯76ðÏFê=Ù÷wnjò¦7‚¢-d‡ezhî>xŸ¹ûb{æòX .Iù̇“öQ朅‚2௾Ò`RSÖõ#“1‹ötqÙºÑeŒ_nS×ѧ=”ƻʘõœ 0;Z=ä’N'#Zßšˆ~l€ÜñÚؘf´7è¹™®Ð„ öÀ‡ëî' ¥"%xío9$múAþêŸR.+SôPfÓ'ïœ{ð~”À sú8ûêŸîñ®ßsG쪙yDlÉlŠ…(<¡C^Ðèá›o5^<íªŸ:ñ(èÒΨô"‡±‹ù,ëÝ"°È5µÅÃìÛv|ïÖ4ŽÿÏ\»pFôšš=‚€zaÌûÖ˜r|g…âχí@̫׷g$Sv€ê訌A±§ª4/è@æµú­eš…sx—à•‚çÅÍ7›ðEºûšt<°ûŸÝlº?»8ÐéiÇï©éeÍFÙÅ™r€ÙÈ¢…ë<°¦–—èŠÆ::Ø+-.4/¾îö÷Œó{Œþ,FäP.ZtÉ–¾„Yí"ÿð|ú´ZwX ³w˼wazm¿Z7K€{+ø•ß´u[HW:Žß3tƧ¿a0/L´z[ïö/]Ä’VÆqñ1ª^õàö-¨Ëdœ5ݾ°2ˆÏ%xÜÿ›.FÜtivÏ.nºÇÇ­ DÀÿ¨ óh·ÁÓ]õfG}ÓXª©oK(zùrƒú÷´; Ÿ‡½ðwù_ï2ó¿ò#šsd²k✈+~rQ(ýúÖœí ‡£Þ‰ÚpOuxCKþQãÛÙp—FÝ}O;Æÿ#Wm Õø†äIvÛ»!€swùæ›wþ‹÷ñ¸3ÌÙ_SÍkÕªñ5ƒcNyæš5ŽÀ#KFq¯RŠqrŠÏ’T8RûÙû4<ÃÝyî—ý8 K´0„+‡åϺ'ydw³sÑÉ^L’ßY)Èÿr=f ôãÄVµ~èã8m¤t£ž;Õšª=l¬Ô€´É`„}¶ÆTóó¹ü˜OéîJçäÞï×þ$Sê²ØI¶Â¨Õiÿ^âƒ\àâdG"rP þà;ãý®âŒQ@¬„ðj\ÇöÜå±õáú\õß+«¥Ï‰™ ÷7d°8“¡ôšìË´‹ëíE¦‹´M -æ.’ÔŸjþñ—È_ €Ü·HžˆÖ|ˆ"ä/ ?Áä¿Úä?Úãÿ¨ñAZïqÿæÿÁf.Lëâv'M“þÁ|Ùa󚢯Ðy¢ÅW!2t¥µÄwo¡iÃ%Sí2"ºÈ ­ÚÞ cºO³rsy7õ&ùf_ën¦"Ëþ—X„ü9¶H÷jˆâ°°)ÐU »ŠôxÔÌmWm:ïáÏJc¥0‹(ñ¸0–“…!†¦é‡ïÞ>eß‹úëtµäØ% wæu  ‹v©Ù; Á©6)n´{`ŽzñjÖ7¦³"Ÿñ6óç_,Ø8è~LƒrvÁ%¿‘»Û`¿Ð,O༷þ\=ƒ‰=«›fxkÿW+Ï*^ö.Ow^ãoÿ[Øùß•¯gÅsGêËCZN88a)-?iòk¾Ò0’Sòvƾå^8<2gÉZ`À}QçèåÈj•³p-ªol£Ó­­66¾Ÿ‘uÏ´üIðœc[>kJ+Ô’ÖUSF(³neW“à÷`VC•‰´Ï5™ÚD{Ž·&-˜¤ðv6™çì¢Á鮓?ÌâÊúCNzÜÐaþNq~± 0¶>Ô¾i,ë~tÏ¿}ô;µß0ï3tÁš²XU±> çrNæ¹Yä¹™´FwÑX}6 ~œ :pR>…Á–Cävʱ:êô}cöÎü ÉQVJ ’þÅù×_Ëo—ôGòƒgÆã¥GºÂXUà0[`½/‚LŽ®è¯ÔpИu %˜w0ð p¹G^5»¿Ó¾c­Ø}0_-‡‹ºÃébÔ¨ðÎRd|Þ¹â4ô¦«Í‰øï¹±'âå+VDhG´¨wàòRc¹¦–—ËÙVE¿ÃÜü:ëÜø–D³3ɈH ˆ€›‰O4Õ!‘ ¼_ÐÏ'êøx¹þ5Æ5Jú¦q|¼T Í±X]l‰ðº´¢4 æxÔ„­è¢×ù š ØHbDá¥v’ÏG–ÖðnŠÏ©¦­lVÓ(=Kõ¾úÖà”µmü†;=Ú:ì?©íZûmÖ/¬`bÛhým<ƒ¦OÉŸ.vVÛÔ;Y¦Òxëãà„σ߳±ý)F8^2ì7é^xGñãƒ?:—ü;Ÿ2ÿ+¹c•w¸Œáa¹ølq9ë°¼+Ø í¨Üï£@7øȽ„ÆÜ …ËO8¼xÔ“÷ø‹?ѯn.žZôàÏö¸ i¬·îlo{WiÝgodRjàˆÚ82æéÁÝ7ÅŸA“î]?Sö4åû0½qÛ:»]ÛÑd@¿ZS­™Û&v¬Xäªö-\@`¼:+p,lqÜ(ƒyøA™§ÁŒ±ÛÂØQ#X³ff!'-· ÈG¯ödÌÙdì×q1c“X‘éXõÙéáöÕÑöÎ!†¬^µstx·H²ããÐfÄ×2m*€¬6 Àa·Ë^& RÚÙ¬ÚiHŽ>Ìjx¥³tÙ\@ã§7[WíXk†÷vat΀*ÅXwÖ['ìµ0ªK)3Ö ÁÙs(ûÆ‚Z\¤0õ9P‡‰ÏQòk,'›ÓêŽÚaAiÊqYçþ³g‡[˜øéÎVó£~Û|v¼½yÚl,”O ™ÖI@‘è,ÇDø¼Å´Qhè‹õ¢ðZ:0V}ƒ8P t{ Š»m”°”ÉW*Ȥaå)UæتIF5„Á#ˆïL  mÉA&õ$eÒ±¼$…$éP B1±TÄmÐ:RÁËâëbCGyq‚”šàeÈU†iJƒ@'NÐñ §þ´‘»z‚ëw´L>`#*Œ×´¢ÖÖTñ¨XÅ8!öÅfòÅÓä‹×Å*×WŽ9àÒ)~zP[®Á„, üþAB3á'õI}rf}”½(=¼÷ú½ñ»uü÷ê§\퉹"{¦Ôm(·ÏpB¶»]zaËÈ€ìÚEåJÏZݬûf&E(7÷^íì4·wÑ ¨ñáÆÁöË£ýƒéWH&£Ý;Ĩ\0ú‹¿Pääç‡~Kž."m¤_úE¡¨O–) Îâ 䯛ˆ ÝtÑ[y²ÙærÛO°®õm lkš O3îÇåãæéW™ÄØùÐ<~Æô˜^^†A»ylboÛ&¬™©7Í."ái¹AîEý?áü’ÆQSå„Œzý`xIq½üŽl5›á’ˆ· Í‘J‡žNM¿6G¶â&eÃ-§óÙßy*s“ÙÀ!aØŽ›|É®Ñ3’o⡦9ZñÈi©ôF˜Vê;A–g5ç?Œ3®¶Q9B{W–½OvѤã°ôS%jgqÔ à ©¡Ïaü°%ÇaƒDƒ±‰Râæ΄úãK(T¯kN;êC7?S§lHgØ`úìré&û®}ÜÒ%¾ëE×=?éUÔuóW¸|ž°À#¸Ýë½€Æ`¡_OŸXan¸h#¥‹ƒópü ]_FÐVSv*é<›øZÚ«M{ÏB7ÄC?h…u™]‡Md{Ÿ& nqdî„öÂ’’s–Aó©ˆÄi@6ËØŠÛö°pŽî›ˆ>!ù ®>ò]œ¢!Ì˪R&û—rµT®¡‘4â­]¡ãÊ~a§µ.!ËE§G1 ¢·2@MˆÓÐPj‹ œWU9øxÖúØXháϕI¼}å@j%q%œN»5ùaŽ]ƒQAK«ôó "$°†ú[Áè®wºá-Ù›föÈÄ‹èwv +~¿y†¹îíF­wÖÆ2Ää°zÂ0„j¥±ümãÆ+ƒC÷œ³(’n¡°„ƒ üoë%`^(nYÄÂK;ÆHõÆœqg'¢,DC¡-œ¨“ 4ñD=îhØéÆ'ÕÝšªÉIt|¼Âò¦±éŒ#o¦$oÊ%Ú^¦™æ›/¥‰ÍX>9øQé·Ï•{åÀËN¬v6k´s760ì |w¸¥â=‰_ÈëD IP°<äM&žLweÒÊJx# ­ñoDš6€Ç¡‚sÏ’ó çeHãè“ñ {9ej»áà-M¤fÌQÁ0tÐMËî…ès­a:é^÷v6›¯öH$¼¬N`äɇøe¿Jœ¨œsã͹CQuNS—4e=F½Vu2¶íNÛõŸ®×‰1­ËÔªF8èZa!n@Îö"?ãTÒñù î™– È&%p—‹…j~-¸í¾F2±´¬-¥™¸,!Ù°/–—DC`’[Ä0úwüºl‹Â§Æ·K•5¹ ˆˆ÷âëÆÕh4’…¬@!ËÓ–² 'ûÕŒß4V2 Ó­gù6¾2]0ämªñ²žâFe%Ë=WO2Þ©9µL•‹/_nÔì)Æà  Y·‚°åÜœ žÏŠ ¦”yù»/W ………õšOÓÕD+jhÔGêLtˆ½Ã£«†m„rcÇR˜¼H¢#©;ÄœËùš"£õ¿A™Zâ)]ӑñ|FwÉÒZâ§Èm4¢RôŽ‰ú‡”p¼L¤(äÞ%å0¥bV+KpAd~½†¿®¢6¿ƒÜèûyôÂøàèÄX÷gîs·~†êèúHú mý‹¨C#Mе©s1âpÚ½aƒjçXÍý©èSi9a™¼8d¸­HMä1VãØd«<[âˆdöx@ÉÏzDYË“ªMIgÊSÁ]MèÀÁ®*qœF”X¹¬tn„Wh`„õ—¶6^ì«â¼Xo£Æ›ZŒ­/¢ào¶ü;ÛOÖ~nnoªå"ÆÏž1ÿO[‡Ûû{ªtü+Ü¥„ƒ­Ÿ¶¹ˆAø¾ƒTpºRÖü¯Iñ–iÌœÿ»t°¾‡°øâß•V;QªžœòTýÁJ5wÂ'±9õ·W‚'—¼5€S }9&´¹¬Ëªã¥+W¼U8TÃîy37•ßˆÂ•äQö/ÕÓÁgÏ8šÿþ¯ÁÙƒÎ0J3l¯ïèÒà °ÐiºªÀe˜n4†93ué$X6p»ƒ÷¡äíoŽZ±TÁorÎîïELÕîiû§¡4RZmœRb’’3~±‘üLÛ09£5ST =ï1l+ÐÇIŽGÑæÎNœá1ó¿Í®ç«è¦[„ÙÆk–’ÍR×s›7ò—^õ?G¯:Atàøò¯q÷ËS ùðÏ­’¥1°z.N`pÖÑl@€¦z2c“ñ43o™ Í‘¨¹5ÙNaW‚.êknYÂÞ€=D¯)èJ ƒówâ'Ö³«†òè>ªüäï1sSq:0èd7¶³ƒ–gÍ—•ãÄJ9­&Æèa?¹œrF o«/N\Fº½i^'³dK‡©º¿›.óyçßæ··róþ¹‹äsO-Šñç¶'ªS-Yž"8•;/a†fxlúI°ÚgŸ[Ö³ñEÐz·J¨‘!‘µ#¤­Ò&Ѥ&Ó@…À~$øŽ ŒÄLÑ¢hªðvÙS´ -ÃÊÒÍòÿ§ÎnMa"ÎC#.¶ÅÆö–.˜Ý¾‰V¨|–0\…WÑÀ©ãÑó¶Õù ¸À;">ë«)p‘ ÞG†f¥1èwZï Ô䉮,K´òè±ú±ó¸ÎZ :}9 ‡×¨‘Zºy¤»„.Ý<~ölƒ‡t¥6…V¤R»Ñ{lͨ¯P™®œ!a Ë[)FÅgƒw••*k¸³o,mŸ?僵æÒK?joa©™øW£ÍýÝz©ôI}¡.}ûX-ªu² V¯,?|¨¾RË®,ýõÊ7KoÇlÐüãõ¯Åøã/›‹i›C:¹˜ßcß!ªºõ1Y§óplå¿ÏiB…hLÀ›ø¦aÿ|2Š“&gh¸ßî„CK‡´ŽÊ«ã7Œ`iá£ØÈãò@ê1 굚ÈFááªÒéOŠoy¤Us¼³‡™µxS"ÍeŽ&de‚ÿí’…ú¿=°ª¾Û‹0âm™•¤°k„⇨cæ¡:gÝY×,„T„éÂëÍnH¡çn¡e–,6‰¶5Má(‹Âš¶õs-V@vñÅ&ËbÄ2^F)X³YÖŒ®Ë#šF¸P+LåüG¸dÏöÔ£Æçò‘*ÈœâçÜØmc"¹)~Ic-UÚaÐe}Ó=Ž8jfŸ~½z_ààK­7j#ÏAþ¿±§3!Ók¸0%Œ”,û<ˆ¡™59:OÔtÃ\ÿÍåÿ³G9µ”Ÿ—=Ð);¦ªÖ¸Œlᆰº÷EïÅØîÖ"OϺßGµw¡ŸsšxNdg…!¾ÎiwŠHメêa}Þ =~U9‰oÕ‡€Ç´NÒ·gÚSM¥pOÁ7þuÔÿÇõ¾ï‚¾€‹/·,_´•˜ÍjhqgïštPºs´´ç`V!_€ñÌ‹Îùhä#½l‚ÔUðÀ>Õ±ž™à¿÷o3™¹OǬR܈ùæL“.Àg[«©åwôhyEÕ_пg»«‡[™¦Þ™5ZKt‡^eg\i½b$0Ѧˆø$˜¬í§tn³½ÊÀž³———Aç¼Ãÿõqö´9ßYáÓš»þ{.fAè9÷Â1bÜ2Ý;äzÑ ©¬ïÄ]$eQ@~ª:tj· e¬øæ™d<½¬ÒN!Ix²é"J(Üš‹É‡1˜Ùé ŒºXÀ‚Æ7ÃB.ƒ÷äõÓŽlHoš.tý›ƒ–‘?¨XúJytÖÂ"ÄØ=ÁS^”@«{Q3ì ·üÅ£‰Ÿ»6w˜ksŸ¸†¹‰¦A[››jmîÿÎÚœfíþ×"¬Í!Kš¿Èùžvú¹†f€½C—–ˆîX©ÍŒ—¬hpÅË—1Wן¸Åêgƒa—CN^…×ìÝ{“N´üì&¦E¤C:›2´Æž©H£¢SûƒÓÓÎïÆÂG¢^„z!  ìòÁJU©µ ráªi»áVÂÈÞ”$=)Vå#*ýÓ ªîe+gT“ülÌwVLŽZXO\ž"bg9D ¾FôìRÍGð]d½»«õc\_š\ŠãÉä§ÛF ‡)†(1"£t1À5É94<ƒ¬C„`4ÐŽ˜Ý'õŠ´k¼ Oˆ•èb\¡(€œêa*Šá`_Žö7È›ý8¡¢ ÚmU¿‚c·Kª>ŒZ°&l¬Ù7ohò7˜‘À¹½øê«E´Š…&0ŠC‹d:¼ÌèNž46ø¦ÀcÀR;ïÜphvîe+§™>ë\pÝz™6 SÝÑÊ÷r›Ê„áŸ%^«¼zÃl')^1šÌ””œ×Ê…1¼o¸˜Þ·KË+vãÒCƒ?^úÂÀëÚ±Íd'_õ°±ÂBôGeN£…¨ÑÄ ¡å #•ø\‘‰‰Ð yíôà+Ü|: òžklýAµŽëµNou’·®*²~®ÐúÂfFö¶9jØqê³>faDÝ÷4aMâ±­’Š,„œÐPЄØnØ·º<ü¼êÊ!lZŒê&›…d}õP"H΢ò\ömö“×HcpôÏ\IxÇ¢—…ù¢5…Œr‘ä²¹wW¹¹™ìÒjÏ9ñMKZ«&7Jöyá(±ÝrŠ%çIi>çãÜgi=à%[é8Îa–ÖáÀ S?±òW=j<¢íD‘Îw$Âq9ü§á0†CèXDë¶mS¢ŸÏ ²àõ–1å{!à põ­&»W¦Îè=óH% ÓƒãŠêR øjjôÖf íY:›—žÖ°ì öR†:xˆþÎw"œ¥Dhl *‡7S Ñ«ƒv©J³J&››`»\„½Q÷\8>óŽtw"Ì8óZ½¢êÔ Ä°¸R|{1ì]Ðu—E b¯ª0Æ H8C` ¦(âänÜš #Æ=Fû—Oé]æŠÜ8›! êáÀ9ѽ…v±F?¼º#DÚBÊÀHh=§r¸/?ÎçáχÍÝýÍW;[ û‹0Ñ3#ŒN#¶?“æ­ [-ó<Éëba&C3:g‘]wË%A-§dšo½Ø'Y"+(a•XDñfNrÜÚjõ ì×·Ü—{^=IÞ|TÙ¥ ÑœL#gž’¥ç‚eÁïÕE­>˜jië¿‘€÷q1ÇÐ*5sÅœ:·—ÅòL3Y†`¼½¹,–³Ô™s¢ó‡¢¡òŸµ×æ2wÙÜ„ý5wï;‹¹¯iHžJÓ¼g¿jç-˜¿Lb§ø”ÀÙƒ4oÚ•hòI¦) þæä&*Ì<Ê ˆ‹'\N §&'câW#¥b›Õ¸ÚÆä›2[A<…íÔ¨ ËöGÄÃÍ J^£iJyñ¬mvZèXÐåÜ1ÉÀºÙmy<î<Ão t¥sÕ{?žù—pB¶m8tȘ ŒB楠S‘¡Å$â‹LÝWZ¥Im’:…lÅ’XC4‚\…ƒÇùýô<Ò_ðH,]Lp‡˜P#–›Dm©p&JCýšCjòéC^”‡ƒQè/ÍYà¾æî;NÓÜtXÀDÛ,! Æ¿¦ƒ9Ú$Rð="š‰YëÓ+¢~·ï­Ë«¨­?|{£ÛNYÇa.R79YºCY•Hl׊?ì¿:zùêè1›Îò•„G±™•š?¯\×®œla›„[o¶ª®O¸g—èÔîTìŒå¤“'¿ËÈèµ9#·Súš½Ê½^4IÇÖèœmœz®€“8‡oÅ Âì£ê:-’l±)IÕù-ê®FƒV¸š•œ´åáMg¨–ýñE¦?¿‘á,'äçÕ:s_ȵH˜–ÁÀ½ü/e7|Ûऌ6)z•Ó§è¬Rõn«Ä”å­’ƒšüï çGöÙaF4óè˜ýà°ÃÆ`ÿÝ-·€° ÄìïV+#µIB~E.ÑB¤6 =«BæðŽ"þÕzôÏ8¸ÆÝÚÁ@î2ƒË Gí[ïž´¹~ðz{ODz}¶µ~ôê`ë°‚qÊå\Œnf±4®ê—IwÜi-Ëï št&ór˜ûA>=ÜD¬‹Yh¯QÌ ÝìîÑúê«Áp©±êlH1u° ÖZˆêø¥Æ÷æÙhˆ±¨ †½¶Ið–4‹i)‡(2ÕHyFíGf@ƺ‘=QÐx@¡<ºwV íÍ*=Tî ‡]m¬LÁ”¬Ê·Àsè>\¦¡÷³LóìîJ«4uï2íSLûýúÌ«W=D®õ‚aˆ3{È‚™Wc³‚p’q²Øgû< p$†ú÷éû›©Ìçï³´v/Èn€4–ƒ&i %›ïd‡7DªÖ.x{ÔJ ³”?¢þ9÷ß±V/û£›oSæ×Y&V3 \…¤çõ]w¿:#y±æö¹ë³Éøý!ÿ75¾x“¿(&•pEòêý¸zʳ¸Øé;îÇ3…=ýœnº{õwè¤ÑG̦µ”ù›¼d³-šVgXäi)§›UôßÐ4tœG–_¢NÖ‚{Ò©û `„—áÕ&´Ñ]IÜ,0­î&\^ÊÚ…5ñ„‚XËT€ÞÉ/ ¦î2áó•¿g"vSmÙ–éËÙ3\.–¤ëA6aÈf_äs³¬ï¹i–öÜL†¹s3/µ¹;lš¹ÙöËÜ [% $‹ùN‹?­&»ì÷ƒD$œ5ÈÝÉ-1ÃÊ“LBœ±Úñ{’ìrpèÙ_zö6Ýs{>—Fä`öÜÇ<žýáSxö;ÎÙÕÃfç®Ö5uLÕÉüb?u‹ÀM¸¼ÜX² ¨ú:ÁÆœCd›¡¡·á‹¨¼xùíÊÃGêKËjã--cì(±[¯)çóSüü¦ñàÑò×êøïãÆó—”Ò ˆö_mïïUŽÑÝ ÆVn›§µ´;Ìòû„ÓbóŒ†új³ß}>s¡NÛ‚û<ÈN«\ëŸØëjÆýÏ7öÝ]nÁYˆ:¿ÿhߥsùLÒÔظQ¼26~áç˜ÀLVqÝK.c6ØE\gŒ÷ÚÞÛ>ÚÞ;&ÆAË;Wý,µ¶.7˜¦F»ÂÏÌ, šàZ #‹~ÔhºÏŸ,”g¸¨dû#ÿ7‹–òØÂ1c™1Ì(þ§Üÿ[oBÎæ¢nð÷Eò bÞpŒˆÒ¶ Íþ¼(®_aÈKÍà?~?Î(q¹Ò!=ÿC¥¿÷´`þK69ÍÆ—¸%ÝÔ²¼ÍÕó–‚©Ú×¹*~«/â““^1-Â/ž”:ÌM@Õäì%Ôl^ÊX¬_vÚí°Wt’¦<ÁÆN,’Nú®Iƒ˜ŽäÎHMÕÔ“"<ÙýNÆ¿ÉÎNZ[&ɧ,ôY‡¶nn¬Ü =ðVà«]÷v¦¤·‘¿‡~¢?Z'cÕLƒÀWU„t)OA°œ GùÎædP©A(ž,ßÕãÎÑ´ô>ÈŽ•¥Ýز‚eéœy¡°Æï° ±ëo±;Mbñ§¬gÜ€’G²¨CsÆêQc©ÈJk™íiƒª=Ï& w€Í}F¨´?tr%¤Y^×í4ÜaÓèÙxq*9ÆgÍÎ]ÅHÿ ó3®ó3ÏÏØ6Ƙá¾åÚㄬ™XÿæhàøENOÉ×ÕXpüPÙÕñˆœ}´Á‡í%ß9xy†ŠZ/ÔËÔW‰¨0zôâð×B „:hO;8Ø‹¯p5ÂÃT‘c&cÝJ¾š: [ªtбl€Žqar‹3Y#ÂBÈ)•­QØqµÓë ií5`?w0Róh”2ëés}ÂÎNþfTe…Ça|‚»Z®ß·÷OóÛÂÀm3¬xo÷:Õi9{`6òÆDÍSX24_C9tïýþûï9lXÜ ¯ÂÛ»ÎÏ+h Æiã²Æ‹žÑ/wÖww¶ŸJ X‚ÿÅöëóAÇ»Q{ĘSv÷n}„ù—Ú®£QIÒ`©å)Í#¹«î(@}ÿô©ëEj~WƒÝC,¤8¸Éi€a o‰”Åø©Ö-Щ0›nºÑƒÊ;›˜àË÷± þLOèqÍœ^Áfcœdtpa÷eZ•ÛfUn/lÍ`ÜpÇÕ2ƒÖ×ig¢ s&£›"©SN(çÆx´ðÀŒ® ŒÂXš•úÅ«^çæ5°>_7$åññòÒé©Øòk7öec ®<ÌÆ.Ë—RÃã©<‹Ô"kLµ¦ò·ÒýÚôâ_ûݤ ɪdù§âOݹ3šÈ=ÿC:üü÷ìëLÁ]«‰Ð\¯Cµ±¾··DÆÏ"ÙB•Åu¨®:—ò(î`ÀSÍwRD%/‡»ET0qöÈh™s½[ƒÆŠqEpºå…a9´s¶’qb“Ã0 À0œ½H›ÏsM66È{¹Zi úî-Ç6á(Q&l±GÒyÜͦ¼T]\êêÉŠ®àð“˜m„m1 ïtÝB쥑]‚÷·õË£œÚŽÅzl÷EaòÕ œq§ÿÚ4+®víÎڶυ2…½KâDþ‹îþEw§£»£álQ`ÿÛ°y²ú–gU•}n§y²ä¥ÖÅ!Ó'ìÝÃÆŠÃýá%@ó}‰hâÓluŠ°)`I”³n04ÇðÏiµ°¾ÑÜ=|Þ<Ø:|µsT9Ο i§‹³ŠÊ¼VÐk^–`LQø6W¸e]¹Ý®s §ÜÜÚØ©++ã—á¯%ügQ¸xí©xtŽ²*å .ãÅ -m÷º‰23|\Æ]ô—ÛŒ²q”]šHÖ4€£)vå”Á#ŽE\zE²NŠsBÈL"ôaÜ9, µk@é ya¾€ˆx˜ë tÄ©{ËÜrßC:ZaÅ›Ò4gbáÍÇ›[tÍÅ“\ ì€Óq¼²‚6öSC¾|_|ç訕<Ì1woðÎGXôŽY(ÿ»ì°z§†,ÜØMtÎnöĶ]ºÃN]¦A$­Ð°*²-ˆ¤ºÅRˆA׋ÌȽ·6ùØp‡"fŽXbiJâp¼Ð‡z±‡.Z -â³ÂsŒšy) !~ºƒ0hߪ>Ê cüdy6à a£p°N uš"0Âœ$Ís†óç5±‚(vzK‰ŸÔé4óÉQíÑŠzç8á …9Æ…Bb©P»j7ñ{é1*~t†F)h5‘1%<4üèàçæÖOë;x/9«jå;“> œðS‘Ä?ãø öAòOœ5¯B ŒpCŸåZc5ÚZÉ÷6÷]ͯ»ÔgLª5·ã3@*“Ã?f×êï¹qöð“WÆÖšäÙ6¬5¤CéNÃ`££Zßì51—±ž:Ö†Ä×pgjì¦]9ùîäËeu¢­ÜOŠ´ áωõd‘TU7¼õ Öáñé´ì½(c¦Ìâ|œm‘; ¥qCn59¨Öt—®ZþîËG¬‰Il›Óê,—™Ò,ÝËàZäð‡WÌÄH1|¶ñ‘ ëŒàS¥$<زj™¼×Bh(â*éã4™¢ ‡X.…KN®Aß½ð˜êàþÌD§ÔµNƱœÐÈv'¦*†IAçõŒ£‘rÁÉ37Í‘ £Áukà ²‰¤ñ¡záy7¼AV¦ÝE‡—8«‚UàøòMàµDHmØädžɪÖ.œð¸Éx•¾Î:%[Ð9ñ(ã á©ê³*̵÷x« ÂôC8KH_爾šÌc£&W•ËÊéꀭ¹‚yFN1]¯Vj"â ‰9¹Ji&™o$”lÀ̧.Ϲ7r±i¯HÇ”Ñß¼êQD~„œÏ‚vçü<ÄP<ðz›s|šD{c1M{ Bæ”ð†Ô˜Pæˆr@>sÄ2ˆ¸Wü3ÚN(÷¼Ö$ ãŠL ntÃ3‰aœUqJ:–SkØ“ £½(]IVÁ¹÷æÿÏÞ»>¦\Ãýjý Åd_“tz‚I³¾ýÀÞdŸ$eemž¢âxwÓ¿ý=—™ÑèŠ$°ãmv$ÍõÌ̹͹DtਠÒf‘³HYæy„;½7›ÈÏ”ìëRè†!*,9òH»¸dZ IlÒŒPéÂâÖ•$ ™lÌQ_`+Ëc:‚>|ã6h»]Î0«QbÏŒ…|Ä¡mE(GPÀù°.u¿ÙB÷BLô#óJáͽ. Š¬™ƒ: FD‹œS 1HS Kù~‹ñ =·þA ÈÀ1Û°GÝ™ü¥ GZ(›ýª’‘ :WÖ莈Ö"PøªOC²â‹K²ºV'3^»—*a€Dúä'M&4VéäZ:ßÌRŒªýæ ù’R·‡£»¥©HЉƒRhÓò#¸›@pô„Q© °(ÜËì\ZyÈ?ê™ßYþd‚qi!ù4û‘G×ç†5T6ô/T¤—P0ÉÃa ~&w°6"jÍÇ´²¤’‰DP#É] î•Q$q–Ê0/çˆðÁTwÚ‘Šå‰™LE¤)J\P;˜,‰ãÖPL/‹Õsˆ$ª´Hmì%ºa_¶’oKbI¹YAAqÈí@‚î1Û¡$÷$‚¨Ïƻ•“³ˆjsÌɽø¤‘ äÙÅ¢Ž<¾bÅ]sM®¹Zà’p™~rx.r*¾ä$iúEó7÷JG rQÍûsYù%2`RშŠÜØ$;€´Ú ¤ã†ÝÀ$½R_8Óø9Ôñô •\ @_D2X#Y–áê&V— äcé‘\PkÛ0 ñ–"!uêÇG¯š¯×ÞÃp Ê#³ó>5F.Õ§­Â¢Íè¢9›pŒ3{Êå`UfÝ}HNœõ·Ý@;‚[«"Ïd»¶V“ JüÈiH{H)qÀ Àp]: Ôΰ–[ª6êõ½ÕzÝa¤NÎÚoÖꨌ6Û”c…Ób£+Q!TÀ­¬ÝÛëb­cZª¨ZbV½PuVÔí9ú­¿z¡ÉƒÖëÈ¿2»M`DÃQÚˆ²u¶ë2“{ v…ÊÛŽ\$sÏÜx^HnŸ°{°q:¶^ËEl³­¬•~ãZk¥ç_‹JõësxÒxJÕ¯`ƒüSÈo€J…Üx¾–RïºÀføÈ7±‡è×@ü‡ˆ©ékñ–o”ˆoøR3ir˜þÌ796#Š›ˆÔu+ŒC¼b€†b ŽO ä<®ÁãÄtÎ#À‰½{—šËÃQ¤ûÌ©ùGqdˆÒÏN›mI}ÛÌ™ÍãÜ‚ßI³àK¨Çå|‡†BÛ~M#:aâ5íú5s¾]Xµoæ/ø¢òÙÔoòÈ´[kªzªÑRÉKÈ ›è¤uLਟœ" jo·¬ÙåÕ”àdO&[Uö °£ß}W2ÒÞ¦»ßL—8Ð\œ¥–Áiù.R¢ZK¶í1Rø^¤ŽRS6ÚØÊHoÉhÌõŠé9ÂTK UE©¦¢ŽˆÛè/ ]€„‡¾˜—‰¶Ïœcsóö­_a×íÚY{c$ùð¬joŒùæ¸FZ—C#Gþ@dŠeFÀÑRãxœVn 5‘Ar<ÂÄå#ô:)ñÙ­)‘öâäÒ8§gOíÉî` Z¸J³"“i¼AÙÀ„éuRÛ¼‚H‘óºÓõ›5nÄ…±êÄE[#rBC 2,cÀb›}n“øl¥‰&Õ_ž‰ 3â! í…‹Íÿjö1ºöâ5Ö}M•ùç»wÚWí×oôé!"€ÍŠ¬üh$”ß´œ ÜD÷Ë—ïæ_u–?THµê«gh‰ØW-0%4®,­g"ÂÄ7ˆÈiÕ :ñ«ÉSÇ*¦èêoZWÈÝó2pkõßàg¥Ðýî»ÂW|#WïÝ;¹~ò¼‹uŽT ºTŸëõÎËZ»w(l‹R,%ÌÑàV|k Ækk„±[GNÅþ‚ñøIƒ:,®‡Èˆ¹øžMÑÿ]N”+š:FÒpÄÁäÍ/pø‘n ÀwúDÀ$³½@Û*2ŽU|`¡U­WŽö¤P™n¸0˲9+ š4ˆ¬°’N’ó‡£êׯìî'ìHÖ$t&,#D"rÆÜÈëOß(áÎÊd ­à;ˆsÑ‹ž$B´Ûw…ò‘u5Æ¥$"!LBÄü€„‰UÆ9î´GÞcx¶Çitá}€ª _‘TÑáü2DÑý&à ¿›?jj‹DËê§$BœUDm@ÐRZß È³¹€ù8iy½^æx8º¥óp<½ÑxŒZ'tí£²]kD}àê,qã8˜v/*@Ø1¼)M﵆øæû3ìæþ%mŒB!r c´jsèL쪹vxè%—Ðcõh-Y£no¤ÅÁéõ{ˆ#U4² 1åih,0‚UUoz?[³ÀÁœ(ê[‘P…L…½_  ÌàLâ9P ´Me{Ü" 5_ãEó3b>2‡E¢œ°Jó,î QRTeBCPj6K慠?b²ZûÐ"ðÒè«Rã;Ç>Šûl£3eÌ$ºh&ˆ˜ØkCz ×(q/q¨=Bõí5ßnL#ãkØ0)­ ‰5ÃBÞ(ìú)ÍmÊ, H>Ÿ€Ö ^M( 2‚SäT­Þg ÃÖ¥-“6qßÒ€B¤”FACk‡®â…Ä÷¡y(ZÍ€Ào†ã­ztP3^ ^]Ilp^z³.eQ?w`]Øöžé^’»ª º×(ˆPŠžê¶,.£E|Zô¼„#Ð\ë]ÞÐmm$ô„í¿NGÚÜë"ÏÐgÍ¥‚E[:ë*º<(ü³.¸ œÝ‚ú\øP9(Œ¤`D¼ylÄ¡ÑÁüÈĈÕhpbheÌžív'ý± {bºpŒ)ºt$Ø¥&euA¶p÷» ðx:¦vR«'6ì°¿¥9FI>~Ò¯6&l–v¹âó>‚ƒIA}&ÎØžˆùH2JÔ‰ˆs/4½°[¡›Ðmˆï2$„®é&ªY{ºSÆY$2Ϊi ÛvÞ‡ç7«¿}-u_kʽÊA§÷)Yš ÚíëÔˆ†q £ÏÐDsd;ØG%*„l8 ‰“.Gâûòœü¹„ï&Ä押h!X©0:úÚ¨5ß™lñ-MaûVÎ'ÓIúÎÐÈ|$3H3bûÚþ{=Gs.Ðìj££¶á,wªïßomüø»ö»úøwÚ"OÄ!×2@Aí ªÌE†1ae.,nß+$ß?¦ÉȆÀ+ß ¢¤µÃm»è…¿Ö)ï,eâé”M}”å²Åóx¹£Ä0¢)÷-7Ç!è$)ÛRùˆ_?™k×ó˜!ãHQu,òa©vxÅRÙ×€¨ß?ªÐYØ&q6"Ä¢u£„mKR›€ð›> ÷Xôb_ÞÏúóS3Îdº)åÌð1aVkÐg¤ØÆààÐòðxÿì Áúv8­kïW7}©d3êOÏÅ wêÜ-òRŠ×#W>Ùpj%©ëV®ÅU“] ©W~ñÝóD­Øg¹NâŠ#r0wŸÃÿ…Ç ‹»‚©âÌ¢Ž«ã°sœ=À—trÜ•iw×9ãGêM[¨üjr³B¸VÜR>Ð ‚6íB1ÓÒ¡XßâŠQ—ÑÒEýÄ…)DÒ‘EN¤l¦ï0®Ì?‡+·qW2àM3Œ8˲ÅqåJÚ¬L'@ÖU¦ß¨ª¦ª–âön%(–°}31 =[)Â=éñ}ËQ• eŠ¾žpá@ŸÃw !Þä‘ٺ͉û¡ñŒ˜wrv ¨|q²\§Ç­¤Ž¢ØóGì˜Ú¨þ°?°ˆý¸Á9ÉéÄâÜ\l|öÇ.9 ò\d J6©Þ!r¢}&t9‘÷šç`Œ»H,õïÕ èZ«ÃÚ˜Äh‡üsDjAa1–Õ´\â÷¹í`Ž `D¡ï¼›6%³wMO›¢6jêîVö»ˆºo[É‘5“$ÿq@’º!¡ xâÜê^™ÿ¿Éùö‹s¼ þÀÑ®)ȧ¹Ä¢èB xgQõWÎþ=Ûµ'°¹¹¶wí û Š"¶ð<Ѐˆ_1/­àì¸6¡ï@›¡„ üDb£â‡bÑ]ÿçz…ø¿ çúÝ]Ç×æßC ‘~0ãûôwyÑÈ{ ;«‹_x‘œuÞíái`¯pÎ!qoIœ2ž4 I¹R‰‹>ù†TåÆ2¤%Æ„¡„â)-Þ¶Á˜¨8§+Fk$C` Aï8Ñ}÷jèô̧;;&zHùR«ë‹ * ¦ÖˆVö /ŽÏNOÎN_A<íhË"Š¢sP'º¼¸,ÔÛöSH¢’°ìßWï%ÿŸ/º®oÚüÍc[Q‚Ã^ ¿‹¬’\ÿIO1u¸1š`Á?¢H¤´Ë¦ñ>+Ï%‘n9ü-½€o…HäåoȬÈÒÜLp¦ª-8ÚôoFÐýa7ª8{ÿ}éOÍÍàê`(ÂøK ÷Ü#¼l ®drË^p;±,ö‘ÏF+í'o™Ya1'Þ× ±’âÎ †hšLcDoj¶ÚÐ:*bÖ¥]A–׬¼ä¡‚Ç BáyϽ·«žnŽLG½àËr5Ù³HúöO…Dž^—M‘ŽÌRvß}î (cLŒÞc2ínc€ÔRó"\N(à{,‹3—!–GŒ?žÉµÄáMCLJú"¹”ðÆŠmíþï9O­4O"duÊé…kïY!N®¬±ëôn4bJ›§ÖzÛ<’¾?¯µÓ³Vƒc>hRoïrö%½Ìkw¿ûNZe“|çÏ4@Ž/¯º_¼®^Ol{d¾FÍe ;ÊÌ8FÞ¿€‰Ÿ»½­ªÏ¼» ŘØR‘DÞ\V‚\0ë†98Þ)º@'ºdÑá:²Ùú‡U±m—>áJD{¸{ëÒ] nü•Pàe{ßÜf‹ oPKÓi|+SÛ ßeêï›$Z]£>•¼òRL]¿HõÆzeõ?ÍæÏ:* É¢Š­\VIÚÈdz/ßG<Å Èwçó8Ræ!ÏÊi5–g%4^áœPÒzF°”xY<'üñQ5N1+|¢ÄUUT)™g^šÎ«k™´X¶^ÈE9ì‰SŸé¶³BÝÏÙà˜Þ8’Tþ›ö>í±w¤@+¢Á&Ù…)ø¿IÔ*|‰î €—T_( Ê?ÃÏIʯb`1÷X¦Ç@Z¿Q.P‹chIS>k<¶ùnˆÜ¯-ò-‡µ@¤)ïêdø½‰3 4HAVàdÌïŸëËX‚v}cr>´¦n]G…y¹΢—Uã:ê&p>£ZnLÅÒì{9>æøSPFX´½_ÖäFžãUQBqªá9NüòœV}Ï|Nê¯dv-›E»k èC°Å×MƒV-<n>Vñ!¢rÏɪúyÈÈKŠñ?pêSÙ¦.Ž"Fé ùŸ…7"¬œx=f÷YÌ¥á7‘EØÜxü;ý»á]"âiEßï/ÄP¬dã%¢-¤»ãYP y5[Ÿî<þÍ}BÇ€ÐóqÈÍ£D´ë¶¶&IOv†<Ëy’ŸÍGYø°ÜûKbâVæsp+iØ·¤ƒ”‰µ» ™Õòz o²ÿÓÜzRÈ2ÌÏ]EÈ'KÀ¾Å(w!q$¾ ã:\uöG¿åq/g̱ðÖFî¹g-Æë®,ƒÉ]™ÇÝrÏÌi!~ve9ŒìÊR8Ø•(Öuå6xÖ{βƫä˜Ô• |K5^ “ã’±’ùäp+'ÍúaQ?FŠÂ¦ù/vt>ý› Úðäî`bw‡ƒÓóð²gê7PÍÆR¤a*d?ó%‡þô¿¼¿-ŽSp©+éYÓ•dÿð N^òd®@ñ·Á‰\ÜmDóËs–;ú&æ9û‚4àÓc4¨ÀAÂJ’ë €µrå;ø;=‰øQ§?ÎÝž¥æºN1€³9êV͵kÍ’ßEU‚ÍFöÈäáÖ•éañà˜a“jDªJ󀺲`(T]§`®¿ÇßœTÎÞ±/ù„‡¡/˜:ä¼%¸*µF-ŠýÜãÅÔžxñ…RAĸèÈð Ù„éÉ$­X{ÿþŸk¥Ê÷µÊÿZ•_ûúñã‡Òúü³¹~‰…~yμ.ÛÃcè5T€VVEªÕÇë‰uÔLp¨ÌÅinèÂû ”çÏñRG=é/»öߨ¸ø¡å“ÐíâV»H,A³XÁçòµ~ |VÇ`~`»N†h]á>ê#sùõË~»\¦ý%Grî@ñüŒ{&¶Z´œÌT£zwÜEªnÓ¿Š£öeàÉkzÀIÍÃY²O«²ªÁ:ÇÄmεÊÁp0Io˜5!.[‰ °× aPl4ˆ3ËèE ~b>«nRf.yÈ­É OAÙ5©Ç‰“e[x]{ðY:ÚÆ*ë'‘-G‹¿W€žU ¯•ç{ÛQ¯WVÒG¹íAå‰m½²¢_ÝQ&mGaèGûZZSº°á¸Ó‡³¸—xƒ°"5î^ù¢Yé˃^Ä>WtÍn†E-Ve£°ca·éÌ ¸œ,¶XìÒšßì½rWA,| ‹ñ%È8è5~ÙCv¦'0ÂÙROœÙ؇ñÃhÊÃP±Õæû÷›•'†ÚLhï¢ kôüÉ’Â{§BÅS…‡÷_˜\@eCŸitÙ¶D•Š§C‚C7²s•·mÐ×UJÑ¡äwÄ{OeµoÌ_(´ŸlŸBšW€Œ‹€::ØjŸüR(FÀ%†–¦Í<àä‚“jÊI3`ƒÈ|TÕô°‰èDfˆÔœ_SH¯ßnó©›ïH]ÌÂúü¹Ý¤øâ<@†d«rË«’‹®ú¯mñØ §[7׶õÉÏ=çSÅÞkš52ÞÝq ‹Äˆy¸šMî}àl~á$~£Ï$ík§ñCáC„~Ò¬£jýC¾ ½:…jðJïÁÇÀ«²(-à‡Ë× ¹H¼•è~Ñ<Q3lý+Ï%ã‡û#¬yÖ3©Ï‚Ô}Lf#i(²w°ßiQ¨¿ì1‰ÅAȘx×xÐhþh43gOúK¯• ÂP~)H­=ªì×þY}<èU(}X3ñ'üµŠªÿÍõûeùnUý+BiKd÷…‰Á^àç—_òk¾<4ß°Þddžœ`ò-¼bÝüø­Sª8Ôü¯á'÷j€\‚–%Ê\@f¦éX#`W…&3C;ÎæHU¿™—çÜì"B7ÈXKÐQ˜ŸŠÞ,)š¿ð•Ón]Ø­Ï× QaçÁáÅþ`×|üÜüú<{KZ|+ ]á,DVúHk¨™F®x† !=®€Ý“iê’ölôÁ¬{*‘G&¼!mË“ê÷‹Àµò+F .fà¾_Gñ­\Ý¢rzVãG—‰ÛXÉl'QiùÕb q³}n¦c‘+¿jòï¿ß-‡žwB®{£ˆús‘Ý—Ìê…ÁE9¯”ÌPí^ì2ÒkçZ&†äý*Ðp,÷àƒMQþ¢rêJîKŒ!DqvtË°¤‹µ¥K}í÷Åš$\ùE9ùÝH[Ÿ›ÑÇÍ—^m%ÙÂÝëdø·¿}ºÅ nzOŸ3™õ‰”·à0¸rËÑmB‹9²§h°åó+&ž Ói¼êt×Ä­Ó0+ŠË–Ÿ~˜9bb´³—tà)×B䃃8i¤Mä8\Y€.¤ñ£]ÉâÀKA™oÉ'kâå°ÌÂf]Ù¬>11`÷ ´¾Ü|’¡¯ºµÒnepÙíš•þ¿vw E}s<Mº;ú×èKt˜šˆ=Z}4ÿQ„Îû ]^ŠðÛ2ê¢LÌ€ÙÖAsd×õÅV"£×óÊ7SžêlíÂ×¢ Ü¿š…_âOöåÄË/¿æ¼c%m £¶x]ZJߢ;Lš¬¢ÈÅt“/xºã^l㱃wÄ¿OÌnï¹ÙmAÄ1¹Ç†··a«‘Z—»¸Y]‚åœg*¤ÙyÑ1*-êΆ mƒIíøxtïè¶ô£Û²8‹Íw«ºSݼ“X“œÕhûª9)n›#µžDvɾýð¸˜ÃX+Z³±äK•E=Ow$[YšO‰ß/óòE¬Ý=[¸Êý$ï‹àJ¦üqHû¨ø%B]ü ) (ãë…Yø‹kþÅýðaT0…ú@È͇Õ>ëa”®€´Na•¯TWĵ˜V%ªð·[=ÜÊý²b+ãÍøE]mÔß/{1#A‚qØÄxòÒÐéJ6„‡;Ó‡;Sqgª 4<ï.ãõžÞ¡cجDú —…W0%mŠw ^"çÉ)…y¥œ!Tî‚×¹gŽÉ+þ`-yé¡|›àÊ` ¸j”fYyhÖR¨Ö’èV Ê•€Ìs¡pÄÚÿ¬C‘þå +"ÂÚ-ø‰IÙýþ(»yo‘rÉwgp‚wr(|;Õ/w"C8u ÷t0ëö{ÿñ©d €,ëƒÆ³QôBm•Í'Õ/tXë6Æ‹`^c4M‘L9)ùâ5d6¹— ¹­–¤„m‘¤k-ƒ&I²fœ¹QŒì˜ $!‡>©î6@öo¿œ–ݵ5_ï{_ås`t\1ge«úþýºs‘‚ÿUõq)ût…³ô)ºØ›ô?Ët}ðò2s&=¡‡œ1±ejöâBL(¡‡k+¿šÚEl±êqYxe.]··"m¢¹U}j® ­жªOª›ÿ(ù}“Íq GØ@'Vwê»u/""›øšL5U˜–9²W¤ÅÉÒÀóZ›|ë¨MÉv&þ´Bé³ Ý¹ÅþU¤½¨¦uð-‚ZOâìâÖ+/Wöû' d õH%ãQC¤û/y ùØ.AôMLgÿ«¹úÛõà«Ï,óÞ‘Ÿ˜P4F¶øÏ­Õg±)ïîMx©«$Ǧ?w™Ó`¢µq ¸-’»4oiR^*9ïÛHz‘AÙ((ÐÛgBCJ@œØÿšõavÅÊë¢yt| ?D$t@e©Þ’‹ g2¬f:‹¯ßüÃ÷úá´Ýþi{}Kí¢ŸWÖŠÒ…™þ• ü>%ü]ÉhÞ.¨t _í§ã~þ:¬̤roÜÏ;g×[$ÊÃÓã±=:;j¾S/ÎFý/oa½ŸáL7a¢ïßon|üˆßgðé?Q᮳]Ýúü¤º·v(èujf…æXƉ<Ù³ætÑ=%‹š«dQªC•Rã‘ ýúÃ+Ô1ÏM§ÓAœ«õó’±æn(íícð²XgàüîdÎZg·4ñÐÑÑôex8ô/~?ùŒA˜WÈiÃÞ5ß‚˜R;BÚŽ1XDv1éεmû—WSxáPVÓ¯m% AÊrC÷<¢iBóìœÁ¬ÑŒ;À˜›.AÑÇH6ÂI´I8R÷_2(:&wÍÿCáÉ:üy¥Ž‘:Á(¢ ¥ëLÐ`wpBoCƒ\`D/ŸUÎQ[ÎO4…4¿rf—W²S¼,FÇ:øÉöØ–Š;F*Ž>_%»æ•m}¾©\Á´m¼ ô9OƒVVÒ]rÊ×àc#©‡£(Ý^èþVtØþ9—3Å]ñ„X¸ÙìuÅQƒÖèJjåþ­ãÐûESkoNƒÑ[¤²!ȼ «óš,„zÆ, V/E§¢àüŽƒ-¢îöï†rÜ#Ú¡¹û jníaú{–#ý~åȵ§Î¸röß›@x6þão¦>¹v&Ÿîö²òn:ó'Ì«Õ;‡í×V£}vpºö~5¶•<8=~~lY2PèZ£Îù¬O_pÛã0ŒÀ@_×ë¿âõ»wÁûâÛÁ>W|òií§FíÔlžœ·vå[¶ë»80^¬±;pAäb„ZûÂAú‹ ÃÐêN©ˆ ÚRi˶°(ÐÒßóˆÿGØë>™!F^Bã/SøvÍF ʺæ33?œkÓþb!«"›#I?Zd¯†^ÕªšiûçvçMs¿qÔ9h¾Üoœ´×`Æêsýøð¤yÐhuNšõèõÎqô‡Wðwçà¸þ£¿ÅƒæÑðµýºóÁ¡ìÿ|T;lÖE©¨Šoj­ýúñ~‡‹T—Êh½½j¾õ.úh}¯¬W$¾*`ñz}ouHÏ\Y¯ã ’ѵ—ô öëïÞÑÀß^zñZoç55¤¦UŸ´—PÞv?wˆ‰­ûÞKxÍ„ LœKÑl÷ËÕŒ÷6ªdô¨<`a8Š?Óéª0°Ó ²cO&ìAíèuçäøÄøXzÄ‹ƒ/°/€aüþÕÙQ½Ó>m5O`]úÑ+øP‰üèb‹¬‘tº£ 4¡¼èTsÿàk(Ç'­ (Úg¯ð§sq¡~±«*  ÛÎÙDWd¤‡;çƒfNìKz¶¯o  :œJT7ØŒïk¹W¨=ØE‹N·9‚GäÚeÓÖjÕ2¶Õ˵Gpâ¦æ¼c€ˆ‰2C”Òä«da±ŒÙxÄ—j BxÁÖôL]k€*1DÀ÷*ïÚÍ’Šv “öîl mi× ãSgDéªÔMÑù9Ü1‘–£¹Áoè9›ò÷®ÔCa[Àa£>”U–£è>jrÈŒª1܆°ö>zÕ?–ß÷FÜ:­Æÿ;k¶\p¿Q?è´û€ÚƒŸNZǯ;hÝyYrPk¿R;d­düfvâEû÷[ÌG f*P„ÀÙ-VÙÜ okæ¤ù'¾ÙüË_ž›î_ÐeŠZû°ú—¿~!ª…ñ€h2Ø‘À¯fÔ¶Wç*âüˆ“¸ßÙÂb§¸Cæ?o¯h}QT•ÞøŒY´úM<R%+T°¨3MP”ÂI´&._J«âáz=ú®î¡–Š®­eJyŽ|Äv·^,ËÆ{(#.ÄÚtvÚ<‚ÓxU¾£ý±µ?#62•{dîëàASïÕŘ˜—Œ"$’ŸŸí¾!tèþ³·køãßúb‰#Çáû 6*@ Ä׌ø¢xwf‡“%w¼t+†“îŠSRjС²ÑŽ9À-ºEzÑ!,‚üO™ªI…N_aY— æDÙcadƒ.ù\‘"¤«]cšÍiÑ5a n½öa4î©öÔ´­îUšZ—"†;ÔÙ×8ÈÀÖÂ{ãa½ïuEÚlž°/aDœ2F°UúÀ†n~,›ïñ?¼–ùASÜ[]ò½üûßœãWÌË´ž”&ïÂqÌ5üU2ƒí™Ïͯ†,‰ÍqÃ@*SµÝXÀÚ½rÀqãÙù ßE–óUd/ãIÿ³5µ±€Ò×ç]¿zö,U×Ò|ñ¸Ì)Âæ&“¯ Ùk–ldk™/íÉãÓo¬½ ©v¶§³‰î`Dª~‹ƒÊ7¤×õÿI5&^“— 7’#±r%à—¢]rnMÔúÑx áç×è5{}œn$V÷æ^D  QÁk؇¶YF¾µg€t^wOÜSDJ z@Zæ赊5Yn«àB¥E<̵äv® ±”ìSe-T~;(·¾Äm"«zM´l)/Ë,¡¦?ß—Ê©ÆKSýˆ-ñQ™áà÷VÇð ©[4“¸†.dU¿/c9"÷Æ8}Xç/¹ü̱@Zf´Œ›„†ˆQ4hµ¹|:´±Osà,EIRÅÊAÑ,Ålh•ø±·ÉÓúa°81m¶Bm¶Ò¶9ˆksjs²M]•Ë ¥½˜®÷ôžYNæś۷Þs Écì9ò6•w.ØÜö$žÖ>rê› ºÔ+<"qîvW2F]<.’ït„Î#ÔÜ}î#ß…» ð[nÚ¦äMk0qõÆ__ÖÆ ¤éô™§wÙ»ÐÓwI·D‘5˜tSláÛÀi¹O¿É_jžU`ª¦Ù ¥®_Xý-mÙ¯…±Ò_XêŸ-4 •A×”/,Gt“HàBP. ª,P„öÙ<'­Ÿ‰FèG í"xõ'&oŸ Ã7VVð ©`[Ö9ß7¤¼éý¢ãmôЫÀDx®˜ÏŸã¸!Ü^Srpz,I¤(.‹zè—”(À͆(ž WX3Hå˜ý‡Ósíš³±WÛAû¡´ îr&ÊÇ¢„¿›ÕöoZRèãÖ0 Tàº1WØ ÏƸ·8 žUEŒUÙ ‘«˜¹¬w«wvMÒÇî"Ú¹v(6*¢‰ÕM$ê|'Ö°`àŽB‹;h·©¶K ÉúÇȨm:9nâEðQ“ ‘üÓHø«»Âc f "Òœ_–&‘×x²3CmÒÿòþývå{a=%(^ÿ‹¹]}Âþh3á߆3‹ä­gV–0äC^´þÝwÉÓUR[WÈ £‹ª¸/éO˨C( ûéÿ.\~÷]©Øþië"~“†$q#Å–PŸp§púÚ’17\°+8(Øð<†¸ÛÈGÆšôÜ ®µ3RPé¯êv¼(X®!].¬Ö”•,hrƒÛµÃõT15’ZI3~qƒÔJTâ™%= KX_Ú2U¹í¡z}µdWÑàž +Q ÍT=¡’ç»wô—'€òÑ*D4SPBƒ°Oì×Ò‘ŸµìÁ¡ËG=7ÝyD5àg»ãVµ¨ÆEÀóžlÝ'…§üå} » Æ\Šû<ÿ‚?2k½žâ¥„RXº:U.æmOgcŸ}Šì>£í*Ö@\ø’»{R}Z&Šcž4ë*Û#)ÑÑ;t-‡Hr†;·ˆ:#G‹æQ–·Iûcv>…u;Ÿ¡ àžì`ú…Š%¹”qì ¯*­h×0­µ«êd;²´Tv+n¯~Ó³ö R©{aôÌ,è‘ûÜ?ƒ¸÷góÏ—EñøOóÏ.þ‚D[4ˆ·dk¬‹Ž ~"K‹óþ4 Tàr|©çDC÷6ä1uq+€ŸúºÍ|#âú®DÐh“ÐAtØÆÈÁøÉ.&vÐ ßÅ-·š!°+Ë*CÒ9kæúB‚Ö…VÁ,‚¸<ÊàÐÔåu`øvKÝ´Ó ü«gϤ ^ι„¹h* I^ú²íŠ¼4aþÊ2_.™{öÌ>Œoäg}¼ÉQùtYÅàÚZ¨yìåʵGSyíÐðì6  y=éOjSÿ° LQ0ÂÅàý_ Èq*{…³ö›5o %Ã'p@ Ž¯Ë[øNaNä{}'ƒ‘AÆ:­©l*;\)´_îøÍó"›‹³ù3R›¸ó"û{LdS6ÚÖ×HoÛY¸™Û9HìÙšM!FÉŒ*մПv&ž.È_`èôf;¬âc"è£mg#b9Œ¹²«Á×FØÕÛA«Ú#ÉvU{cÌ7*7Òºöø6݈Ž‹YKæF®´,Å´?´½ýl º6’AšMíÙ¶ 까CÓ¥"ÀúðÝ×ÞÖ;Ö4:þzô"`ùwÏ·ÒüNBd­O¡\R IÃ<”'§„á°YW& šÔH©È‡Ûì·`ðEË+o²±?šx¢EžÉw¶„Mó f£Ã‘9"Ñîl2a Ê .R¾ZcÌfŽ?íÊDøS*'J´åAZ,9Ntl˜…Åð½òVb¨2lൺ3ªˆjlCŒgA´›°:9ÊüÉ–²=†"[«ÅÙì>„ï§q÷¹cNÏäØîÖo7àõ)”)ªC­ÁtˆV_Ò–À%çJÜ~SëòÒîù©©Ï½àX´<ÚTS:(#Jnõ1æµ5Á箟; ¢@2 φ–GlÌ0_ã?'µÓ†á3¤Ô?P75¤J jª(†rÊ$‡’¤hM.aæ${xæ“{«dù¨ÙAî­¾ö½ Ü0³ýåo°K*8š…¯šæ+YDn5Ñzw-Nªú\¯w^ÖÚ ´ÕY{¯ì=Én˜Çô왡ÝJøŒB5 IX$×ß4ê?6€•‚ÊàMäè ɆÂ:9hÍ´AþX2¢ûWµ|,×Ο'«gÎP&Ï€%Gf­ù®jˆ ÒÞKióãâÚã ÛSrÅR«MÈ0eá¤]M¦×•|Âü¢ÿe[31÷%?ó Û7šnBî[@κ5u‚¹WXÕÿýAfþ@ÁÏõÄè0d¡oäšE•lš¼½ÍÎ×»´P‰¹#”˜*ãDßzºÃø‘ÀÑÏhrú2BE’ÖM²€¦âÎ ¨•ððÔmQpƒúšË°;æ£TK*Ôf÷©Š¯´Dð ‘ß-tIóÖÜ?O©ä‰›•úXJ²ø'tðßfñÿkÒa‹ŸÖÊ?Æø]çfìÞ=q3 ×Ó ã¹eñû-ˆ×çÈá°Î~)¼Âë12xýAÁDð»Á»Ñøêoðã¢Ûqáí—iåâkZ‰¼{òú<^ÇÄñyâx¤ñïŸø¥ñzŒ8N­¢Ýóg<ýê†är43ÖDôýADÑ[D#˜7ýÿ7ý[”éë‰"}=R¢]ÿŸÛ»_ÇïIê¬Ï–ŠB¬È®`6ï—|ïÁCøÊ{Vzp£t­¥*m8˜É’Í?RÖø?ø’R¼ˆh$ƒ€‘–ANd5‡À¯…äV5æ7–õ-úü •ÓÖoÒ³P k²ÜCx­M™WÞ¿ÿøÅÏ%ÆsókG²,9Ì gec™ã8Ö8+c`‹c8ௌ?|c ›¸R¸ìþpƲ¼Î’:[œÈöÆP¬d^ø Àÿ1{°¦Hì/˜mJz3#BðeWé+r‰q(¼þ¨šZ=v?ô F˜z/‹r/‘jÇRì9¢‹o¿wZ§§MAcy O&âq$<…ÐgÔ¯JÜ ¬ÂYå’ì#±íÐØãÛ'±¯{NWç‘Õã¬T¦IS/”5ÔÀ]ÓSéÝŽ¤‹3ì1à Ë!°I<ÐÍtó¸Žt³{éè”óø®§ó@7èæÝ<Ž$›­Û»lÆïoû£ºÉb e"1÷š~¶êsèg«ž•~¶êÑôsÒMI?C Ü1ý,ºÕ8lôýÓ”ÍËîÿ•åÅ #{JZôߤ.á;xó•ÔèòÍ^¡riVŽ·äý4Û>{Ù>]“Jáï?"*c¦çÃMÀÜ5jgÚA³Ö¦YæçÓÎQØ#«Kéc*›Õóøàkt(5¥§hПÞìRA0Íâô•8ö-DÔ: ­븎À¦±\2-¶êóZÄj± Š³#šœ §V]R‹%@‰SRá/˜Û%D­á%‘@®q€;{„9ÌÚlê ‚¤¤oWŽ#.Ïqg]Nì1ÒåÏV@Aïô ô¢?¡”ß*$LÑ5‘— So€AB*çÄCÁåçWÞgÏÈ ßÑ­þØ£ÁÊÎØߎ;$ß:8J4ïÂ9Šˆ‚ñ’ö¤Ë- ##³Ñjˆ «“PáWa!í‰509yµV ×öÈU¨6ºäV쌖\ Ìð€Ë…lΔ¦'¢¹ ë4qâÀ³êóDÕ.W?~ù?ûg‡KÞ˜`{6\â¾£ Ÿ7ñ¡,»,›ÖÀµKÚEhˆß{r€þ¥Q½x+)"¸°9ž‰uhm<°Ê:ò°«!ïà#xc%eãªØŒˆ²aˆ H ȦF€@!ˆß{¢tªx^»ÀcŠs᛿¬š»±˜;2yWv÷“°*½˜ 7}Oða¢‹²@ ìbOƒ“\Àîó"%ã²D€“‰}Ü;ªÜˆ}¼€n@:Œ„%†f8æÀ¡zÀ‚'ü»-ï௽‚ô¡Þt×ÿùn}½€µ¨Î´6ž¥cA)WÎHøÛ‡°v†ÿ>;”ä¾-ìÊàŒÆh™g ïa¬n—¢7“ã/à`k ¡ ËøÚfIf¹5ɸ¬2Ò<}Õrq•‘Ka:ÿ4£;>mìr¨$’û1Ê5à {„økØŸNE¬VÊÒJ E&0M¬L‹ªð TÔ+ÿ½š9ŒB7ˆXDe ÉM&mZ kÕœìu"ã÷AC²2mbDœY4±-”9ÿÕxFIдy.*x$u‡B·ÍqO¡L±h®ŠWI¸£„oWÕãÔ¯–««¬¯zÝ®jÍÍ•¸”‹š?%àÿ s^s†Ï*©Ç1jéú+2nfh}ÙÛ¿»€:§ðD!LÌõ™;Yÿ2¾ÜY?ïÖiñ]qà¦7c (‡°-Šô»ˆ²‰g"ùTÕôãuéÌ[!û烀9-öŸ1Ü”&NÉáÅ:Ãh¶*Û®×–lÑüSá¯(ÊzçÈ,llnm§ð£=/Ë¥©~/|ëF÷¤ ¦L»Lܤ´§â{IbdNž©Ó!Óhª¿»®¬Ýš–qøŠ!ö*© ¼÷Á+SÀ{øJÄžPš¼jÄ u|ƒÐö#±ÁïϘ0tty<®±P‰ÐTÕkGÇGÍzí óæ¸}©­òŠ¼6´VP%†šŒÈqžC+†Áס‰w·¾¨˜"àcåq…¦ýØ,iæúÜŸ2Ö×K¡¹w:#¶o‡Dg\#úÜ£á·X Ë]oo…-籫îÍåu$G”©m®ß:_]'—…'•ùxÔÿ’½3¨Ó“2±ç|>¡9Ý!”¹ã¥zòâÁ7zSdz+l{·uê1 #<"ƒ‚<åu·dä›®†0Tm5º¹/]̧ }d¤U­ìù¬0Ï€5ˆ’çÂ>¨>º?š‡° Ž‰-áLzýÆ°#ìLí¹eJ ¡-]hF´·BwÞæ $½é{VÛEþW£{ŠßE¾bÁ]äÿ¨ï¢À—»(fáu#ž‡øÓß,ýskê û¾3v+Ϫ;Õ­õáÎú`*¸©êpgá>P~º³ƒÿn>{²¡ÿ‹6·7·ÿ´¹µ½½ñlûÙ³'Oþ´±¹³¹¹õ'óH1õïäZ­xK ü·Ò_fÃsø¹²²hËSeÃ¥u4ͺ3¾™ô/¯¦æZ½dnmlì”áïÍÍ üµm¾šØ6ˆQÓkä—_¡NŠ8á²Ùu«ÔÀÛ êäG$ouéÔüÂú-{8²FÓ25©¥ìóÝÕ6슆Ÿ³ß{L_æ%`xTÎFƒþ°RÞÅ×VW]˜ræë@z}¼=Ÿa’«i™5Šðÿ:½þEŸUÊ.²|]k¹¬Íy²ß¥‚@éړϨ¶†j/TâÉ©€^9=é[sgcûo¾NvlMHÍ*¿¶“z{‚ØL Vÿ±ö¨!£BÄ©[xŒ«;›,]¸Õø©UÚg ‘«jÙxOW1Þ½¢ªZ4øËÄþÜ}R„¢lúê—Í èþ-%×'8W/'€ym‘[pï:¹‘­È¾ º|@æËÄÿÿv0 ˆÛ‹S€dü¿ HGÃÿÏÿïÀ?øÿŽð¿¾ÔH„šÔtÕ¹/ß”%ضO(®'HÒD€&l–TP¹ÉEõO/ixXƒ¯@)ßÞUa¢¼‰Í1Y.0L„\5Š¿}î8Sž5sDrƨœæHä•s§:ªEå²Ê¬Åfóæç¾¥Táæê^Ïø¡„iÎMF;”ç¯ÚÙÄžbÆ(ÒÃs¶oPu††>’ªaV.ÌëŒá- Jí¤I’ÞSŠéÀ®)àÒ'[äe¡æÎm„¨\s¼qrfláRVàÀ {ó¼Oy£»Ÿ8 ëí@„•ÈrŠ&“`…/…Xm¬k`BIbmähÝQ3Î0ïÓí,ÜA.‡ ç»}•–BŶÀžœÙÄäA"Æõúèã¡ñŒcÑ õï#s­?õŒ³l›šr¯ú£²žR€ÑxdIò\°ÎñþAV,µ5ÅÈÕÁ²í Å‚Ø ¼[ñ4•Õ’#LÝ>ÝÈÂ{šëp" 1F ìf¸™8N>¦ »AKÊ$AÚÔ¾Úr®·}¨ðZX¬ Ý_ÃÊ Ú‘  Ñ°DzhMÁA32/åSó”è0•ùàrÈ"L t-PÈ_øÈ|K*dï0`!u”]¼ºEöÒêºé)ïÑ u®Ù º7±®1†×ª×fÙÛet©×“w8šŸ1Èç9·­‘Ë°åmE©¾¦pNF<þ‡µ×Ízæó¾Å Lñ룳œ)>ÆWm5Žkûô ?ªL¸¥ýÆ úFŠkëÃÆé›ãýPS‘…æí퀇gòÂ…J'¯Úëƒã—5üyø[hž4·|Dñ´£?iÖSŽü$r‘ƒÛ“]Q“¼W,¡½ãö), ¢ßýFüæ  ´§SÕÒú_ „â*“R§j>lè]ÿU9ÂÅ/Œ’#KE´ö ·Q&Ø’:u ýଂŸöxãôì$ñòçh2ÅgtÿàUý(šhê’O™?4X"‚ ef¤+o ?#>G ©f›X•Wµöi,OY(†§@§CJcÉWȯ •_={–P¿&T&'»ØÊäÊ»2<8åǯûJ%!²¥ÈóÆôî]ºQyå’gþÈb[ ö©§K›V.yíçŽ-¾¥`Ÿz䵤±iå’·Öܱŷ쳕n£µÒì´Öü­ÖJ±×"QHø{ô@8Jp P.r¾mC³ýÎ~­õ¶yÄØ´n*¦\‚ü ›¹~rô‘R&:r4ÐvþßÙ1êj­ˆAÅ”‹“[çIä)ÅqöD—êSlµzl­zl¥h¼®>•Ä…Yìý;»´&˸ýŸ{ÿ³±³³¡Ýÿ@¹Íí';OîîêþG.5ÞýÈ ÓòO6Ö=‰wD‹¸þI¼üÁŸKºû‰¸ùÑî}^£!×OUó'kvyeþSLÄ•ÏSm-nG=Ú>{]kEèF7ªB;JQL:ÿç`¸Mtö®µ^o¢ä×z½U­Vç¯c퓉ӛÁ,±*ùÖQUþ+æ #&Þ¼ÿèaÏ¿+»Oáw\×éö-\ •­÷ÁÙ\³öÊ0[“nÀ¼  AsLpu·±U}ºU6Ý>êÄ1n¸mM} ñ£”Û}¬K@7¯¬žÈC­ÙLh¨èkïW)kxÏšM¼Ý¿ޯn}Ô¾Èj[\ƒÿÃÇÎÇÒê|À¦ {Õ¿˜®©«/J¥’Äîr4¨ápË[Åt»‰ƒK×¯Ø ]k²vÐlŸ–ÄcÏ{ ¬ü¡5êg”f¸CšnUÝZÊ{2žÇk<ÊÚ¡Û ¾# "ð=^œH³U}ò½¼†ú×ÌAï>8q6'¬® ]Ìú£Ž<à¢n𸰦Ö^mìâC7LdûÇîÉ£îí\€T`l†Ö¡G#õƒ8¸²ä#Cå>Rl }kŒY¨×kõÖqõeupG¯É\x®Î?—ÁCÚ²Åͬ×0¡¼iìO)LÖÃTæšãÁÌ5‹ª¿b‘ÇP¤céL…OîH„_WåáMÄpiáí/c8èèV)oƒMž¹R@ÿÚh,B}kÛú,r†puˆŠnµ ˆ+GŸOv¯ÄÃÒÆÑ—N è§Õ¹¦Koûsß™¹´I&©1×Ô®¢Ô*€iäÄTöp<½)i¶|Ë‹>GE¢¥”ä\(”tˆîò7 vÚ¬ð.·'C8¸ù²bË÷xè1¼¿é"< ÊŒè±ô~uû#þ½%ð€8ùÎð!Â\ô«æ» b Ô l¼ƒyö þÅýÏ¿Ò‘Œ´ôÄ™Ã2H2-=À±­þ„\¸p„Âá>ٛɋs yCfÒ-Æ«ÜÑùyÜNÃü"j CêZ¹b[:!¢É!Í_ÖžO© ñV—ý};#„ĸ´‡¬àoû3a¨GææöÇ’–µ]`œñ̽âÀS^y+ÌdD½UË.°%!& ¿ôžP¡3±\ÊEÿ 6…D…v÷æ+åÎ.¨”±²òчû‚X0†ô”Jï¡®¢ØÕ8µÐ6õ}}—äÿäÎí_ˆÓ8¶ÿ/2ÙhØÎŽšÿÿ=:>­ÐïŶq8ê ©x 76y“7™Y˜ðø‘É[SGmnt,wA$ðI¯ÄxŠp†‰(“Õ…)çÜd~ùc‰Iœám?à?í/k>ðK´»c{uk•·e…ª®˜>’ø†ù,¶º#ʬ>!bŠ=%×V¶×ÇTq½ÞÚ~³ˆèÇÆϸ¤gùœª²¡¾\[Ý*ɾÃý–;ÿdßèÝ·Ï^fFºQ‰n¢·»ºÍã Ãåž©ԆöžÇ–r3G…šTÛƒ±Ð6.š¾]´QiûC¾…ÿ1® T‰(O…ýç8ybê@‘^UN[øã=üzU;h7–s‚ÃÇ&,kþma^-Är°åEÄÕ§áåë¦öDL34C¾b ,Nnc—†¢óËO<±ÂàKB#|ö¾}aÍÓ5š,páe˜Š’æ$<Ç=º¨‹È{Òõ¥·’º ‚‡3P–2É{I7Fk;À2¿ }µ²"ˆ`h·ð*¨F¼å€¿Å[“¶‰?*á­ý·åtûþ?[Ïž=Ñý¶ÉÿgûAÿwGú¿7ö` B›ç5¯>Ç%äü‘‘º¿tnAýß‚¶ßÿÙ:@tòŽÞ-I’ýb;ÞFRj8¬½>hsG×̯è!£êÁ'…º@úBoù±ƒÜåùØšRôɵÕÍNgu É?­Ê¯µÊÿnT¾ï|$ôíu»qº¼!£14ðäâ8hmÐ)a±_ïÙí>É‹¥Þ Ñ6Q‡ÁNã©J(ã^ãG\ÛþÙ1éO´n\™Ûú̱,£èWƒpô&íçÃËèq#%ò¨U\˜VT쯤G´ç—ÂÞE êµ÷gœ‘Ø\Ý”0,®nýA~ź5_ÍY6âê`¢ÌÔ¡$ 3<(“â¨Ù¢y\?îUDʤ~Ew^ÌШñû¤§ÄP ˆÆ¼c…³£ƒF»-*´£à!ô.j\ @Á9O‘ï•+2¨c¤÷NÀ™ ›ïU€ñÏF@GÓÀÎ¥„::Ìòf‡ù õZÔB]nÚèPŒ´Z´iM‘_-J ¯-œ±‰½s»lY– c]i '_Š·S7#šL¸‡ªåò®QÐLÉ”7 tƒ¹@ ¹ÓÙ¥#Su”CësÜj›áð7~Æ ˆŸk©4е`€ r<™ªE¦r‰XYÑ¥ÕÀù‘ÂGzÈØ5rî"Ú BÚ8ÊS€?¡!ÛÑ¿Ç gOㄵ1j%¶æÀ\Bä1A0ža’í~=Z/JˆSÎaqlk¤ÖçIp¢)Ìv|ƒÝ“çHÀ‚ù¾7pÆ6Îô½È<Ê/8aíÇÒü®û£í­Jo0ÐÚ wÐÒ@kÆ›)l—‘ÃÞ6ê­Qs>´8›Fvf.iaIïêŒÇù?‰¹–eü0l隯Ð.àbZ¹çd†l­Šìà“­`‚ƒ2‚Q\2ˆÆŠœ«µH7 E‘ ³"_’zÎÒÚk™íœ#~Ðè.DfbјHhã"—)†–b1D–Yß,UžJç‚ö›Z‹¢ÐÍo³ªÖ8¥l µÓÚ)ÚÙÎomÜïVÈ#gäTÆ^;o›§oØTw~–;­ˆüÄjXúËÉê#ôòn’¡;´3mP’Ÿ¹XÐÄè¾x½H7ˆÈÓV1Å(å.«Šr©Úó³¸ÌÊ,ƒÃap©ƒ K/\.ž8x2æ5«•”ö_þ‚§?Ÿ¤“d$VÇõ*Ó‹¦˜¥ËõÑk^ËzÑRœ+K”ÿ"ÃJož,Í5‚òºÄÄÙzöLøìll<ÝÄø/;Ïò¿ÜÿÇŸEÚä+‘iS,¼YÁø/Àdá;wÖÇÐÿüÁíNúãiÕ0ø‡Ì‚Þ•g•ÍíêÖÖs ÿg§u#"LÚü0ÒóA¦¸»t gÌžÕ>Ÿ é¨A~˜ñ^QzQÂæ˜>Ò•.ݘUåµ=²'ÀלÌÎ0݃~×¹±~ŒoÜ+™82Ƀä¹d U‚e )¾ÔùC³3á(‘6éFDË—I_"§ê͈ıï+g,â,`4t¬œsÀb4~ €ôöøìÔ¬ýl¾­µZµ£ÓŸŸ«˜6`j‰R]¢Q¯5™X£é »Ç6Zõ7P£ö²yÐ<ýÇÿªyzÔh·ÍWÇ-³fuÚ¬ŸÔZæÉYë.ðqmŽ£õ€I¾C¼gO­þÀå9ÿ ë'2tR@ëvŸÜØáfî"ù³O52ër~™ü`þ~5Žw×ׯ¯¯«—£YÕ™\®¸ wýr¿©±iµÝE'ûK×fROVÍIc ›TdéžA*d>í#‘íÀR L«(ü¼ÙGÄ—,T1ó’zœÒTžVeÚ÷CëFØWû[ìQJ1 ÆB“ =ObÝ™X,<±]à>JàA_* cõ¢`&†²9æœ=[„iÁè9²¿ÃŠ%Š½ÿw”‹Nìd0NYÞ Îße¹Šx­ÊÓ81åÃl3ïQÖZî…ì@+d¤¢LÈ´'g"r `Ð{0ÆPÎ_ ùù30®ÈÍØ©L샙¢ÿ 5wef3׺´;Ô’¹V2~“YÛ ÈY®>.˜?ü3ï'œoÐ’ÝÜ2¾†þM4‰Ðÿþ÷ÆѾq†¯wEzy…v+ô„òùU*粂+±‡²˜¸Þ³á÷ÉCÅìØÅÓÊ´ÙÄÞûE¹¯ñ[×8êÁõ>D4ÁºÝ+àV+4×ßL°Êi£}Zi×[Í“Só½öPñ÷ì°qtÚþh`~Ž¢6»båÜ„¬îM®èù1LÐÁ ­3¹©¹¯l¾Ö!(!©Á쾸¥y'¢Ã¢-SÖÁ=”Eßr·ü¨8¥‡ƒ8†Ä?IØ`I5É·`0–¯îdˆœ!ß‘9Á»Ãð†G¡¡D¸v\Q–¼¾ÂsFí¬>¢üì$ªJÙ|“¥òJ·qIßpÏy¯­þƒDÌJEД’بúÆZõ‘ëB°¦Z—’év9¹X‹BrµJ¦‚n°ˆ\?hF‚1XDÛ„%S‡P° '—Ì|CÅC»Véòuˆ«•Ä“y>±­OüòqÉÔO¡?úl ú=±'wÍâêf±Àb=õ*ŠÄ›Ô AŠƒÜHG—À^à ÙêòKaUÁU _ÐòÒW®°ª?êËSPMÈ%(˜éš‹çµ W(m rm †Ô˜|ñ—)˜††T¶x9fÎ`à\#ÚUÚ̹­]£˜P^õˆÄþ¨ND=¥o ÔÕ6ÌŽžjå‘ù#f/!º ½u™«(‚€´n ×2u?U­áîêš5ìt¦Ó›µæ–Š¨¥BS¯âÿ÷~ãùöæ°hR|-|}9‰×[ôú5ð#ü0¸¤›òÃqÈ—òóù`&>ïÐç—ƒ™ï‡—²½'ôþæ”?¹S¼fõÛ‘Ãg ÐÒÀµÅi@Ô9uAíQM‚SÏé RØ+N†fåÂT;ÌT;å¹¹ÆhÖ$q§E3M™wº·¹õýssU4T07µ/Ûú—-íËΦ¯Î¶þiÛ÷é ±&²Fæ‰81NaõeoØ[?üuÓ°ñ}ÇþÞ>cØ#O€(À•h«}ÿ½Ú%²­M—¸fäw»«~ìÄ({c—.a!öVÑ,Ø­½w'5`©ÙÅEw—Èîâ/Â!»€RL®ËEu¨Šª#uFUyöŒêPXWªÒþ±yUEvóý÷^ØT§Ñj§?´ÇÚt¢Î»WµæAB?µéHP•Ø~Ø–ÏéôRwÑ·Ž3E£~¶4óa¿A«_Wƒ&áoØÆ_/ó0+·q œ°’ýRÛîl0åkrR¤Ô“ŸAR”]¶¿KX—+@Ëð¶—wd©Ësn *Q…#J‹YSú] áQé*¢qØÓPƒ (÷à'Éÿîr{è=Tø¨ ùU#7¦S±-L¾„mÕ^¯r… û"¦¾² ÍÓ ×,bÊ*´FŽQ€õžðï ̵àWü…8{3”úËîMå/ü«W…¿ÞJÒÏ_hBá³Ózà+ð^(ð[^<äü¼ø/ãO—,®/O5öìYœþÕeRÿ·½CñŸ··¶þd>yÐÿ}ãõ÷>UÇÝjt+ù¿7v6ž©ø?;”ÿõéö΃þ÷Nþp,Žüï aínG¾Ô^°SzýÉÞ þ÷…!ó;â;ï÷ Ã8ÂÛ=ÊÇéma.zcìÛL-ˆÕè;ÐÝ!J³qC;c{"Bx"ý'—me@ŒŸ˜Ôìš/ɯ_ýsw׬¬þÆãüjVÞ0Œ:Ú `æêoÞ ¿þ÷Ò‘´ç¿2‰›*l2₹çÿiàüom<}¶ñpþï×ùŸ:ãÙЉ·ÎÝŽþ†¿»“®ï+?ÏÁ 暶·J™0Ä|L°ú›>ʯë0¢ußž¯,VWoy2ôÎø>ÿb1*îÕù¿Øû_àõà›ºÿåüÛÛçÿnî½ë_i_Q¿Ô•UY(\èZed–=CWÀ›ºß­n<Ó®€é.É™ô/16·ír’†w››­'æÚ°?]ŸMûƒunÊ•›¯ê^•d ÿk ïpøÖ…uËå‹(l⩹ö¥».È5¤5 '“öt]u#:qXÈ]²ùý÷;æ;x9rñVa6¤2'^h@˜jžÎoÌK¼HE+Aº£v.0 úäÒ.SòæÑ ÆtñÂê¯Ñ838š£[ 4&o•qPZ ŒžÓ)·nä\s µy](•ù*­g“é:Ô%µ¼ýÅ›¾I¿ËWìÌúôÅÕ)~¦À‡ÜËÀà ÛÃ2¶,îÔá_›&'nÈËÚÕ'lºå»Q¾Š§è†°›  ôJ÷&r„¬Š~(æâT€Šz¾¾r†þÙÐmÞÅl2â‹y(ÓstÔ+Å"¶új‹›CÔ‹ˆ<ñÖ9Z…yû@ÄddË0¼Eö–X|r¯,¾pWYÍû#º~öf51)‚ ì¼B¦{(†^Ÿ¸îÓ0ÛǯNßÖZ ³Ù6OZÇ?5÷ûf¡Ö†çBY]åËk|óø]ëÿØ<Ú/›w'-¼˜?na0ñÓƒfcÃð×Îö1ÙÂK¨yt|j4›§Ðìé1u)k6ÚØ\àÂæ]øÃöM Ìpô MWx·‡wíGðÒlüOfûMíà{ƒæà쵡•³Cóe†ƒVÁÜ:Ì¥~Pk–ÍýÚ!nœŒy õZTŒ‡d¾}Ó WÍ#¼£?2ku2ÒƒÑC˧­†F>…Tå·ÍvÓÖ4Û‡W­cèá5Ž±¬wÔ¨£]1µ„pö/Ãç³vÃÑ~£víµ±½0¯fƒÌðª_ÜéK£ î“`‰í¼t´"vÆ{$Œ:¨«˜uÚçHZ-¤À¡œxoü16™‹R„ Èvzt骱„pÂxÒÇÐ¥"¶ª5ƒ·“þ¯ÓLÄÙ“#­>n6¤9ã^i¿B,7º¤›|Ýä´ßËm%zZ S儈ô„_1".ê…=A]±ƒ—>/óÄéîÝÑj ÈÖ,Ý>ÞÁ$qá˜'„fiH"{‹òüÂ2}J_Å61­sä½VÑÌr¼«i¸9°e1_¶÷U»’F¢-ÆE”…=Âg4q¨Æh°W4ŠÚ ÌBaeu4(pØ©¹Ü<Å4m8YR#pQs­A Ëî;æW}·"’‰ìT·q8MóŠ° ØE#å""ùOh.R5zNº·ú›ìªòUÝPDü\P·øÔAQ`ÿ’×IÞ[*N7"@gd`a¡.ÂôÉûDØɈ‘\‰Ûô!–&)ìÕs¤‡š“=úÜŸ8#2ÿl¡)¸Ñ½ºœŒ‘‘×ß¼nÐÐéíWø´I}<<Þá-~t®GêãñÛ#ñÞÂÇ¡jôP49ÄÕ[ñÞ ? ^þ¸ßlÑz ?Ë/?ñëÏ_ÉP¼kÒ»Éð«”R¶Mé´é ½E‹Çíé Ö¯ø¢Ì’“þ¯vGÿ"ŒF`©¼·tùZøGÁüýwó72Ј¯‘1ËEÉÜúa½g^͵°d¾ïµÊF꼺O»ôŠL޿¾£¤‰ïÑ^´]JÀBüÃ)qÎä³D¦î(ˆUì{{¼døkU-¯}~¦O U$>V 0£ÑŠ ‘í=w õ'`¼è‰Hæ;Ψøj¢6#§3E ãÛO€oérOXüì>ÓsuÃ|/bºV«Uó}åô£ÙnÕ1=¦¹ß>Å0Î$TT”jãoØ':©ŸcÊV¦^½b\ñž*ÞärF“±í¦K‘¹†Ì­©‘þƒ­Ê’[#Nd´=é‰Âˆ¾dßTCŽHÕÙ™&Äjû`Âæœ7‰0Sa׈¾;X7Œ¹8xµ ô)ÊJƒIUV¾è.­8Zetu›£µþåÈ™ Â¾Ôõ/“¿ œ•ÊÉ\“!·9¡ºü‘%²›îœ¨ÑžÞ¨˜¸Ü-Èña?¶ÕÓö;RâÐqz•Kóuëøì„ë¯*ì8D<© U²K’ª$FT%,HudVZ^ì¢ê`Aªãê“[U8)X‡ÊêûSA—œ ´]åNõ6ÙKÙâáBˆ]ÈalÕ¹ƒµmø‘½0ãCê?é÷l_¨Pt‚]A›MSa|S¡wS`s“ñ·©ðµÉøê3R66€l±Fv´-îÆ:öðïzÉ  ™édf«Ï½’)“ïý%T“è° íÕ­‚±"m” ïPI»®UBT>..5,™ì­µe¬ðx #÷ÉéqÑ,R´¼âŠø×(>†÷øë±xóñïûâãÇ[öL¥ß-SËlÉåp(›0’º¿ ßÁ™ Ô^жhÄLÝ’©P»·1Õç)ÀRàvœ%团äÇ\”…Í3ä 2èȇKYÔnûQG4·¶‘hN@©‚x¿÷aíCéϽ¾ªë²\ÜOKfUñ-xÐ@P{‚]ž¨S⎌igÆï—VÂk# ÔV7ÅÒ¨e^{f²µšnf…{_™Ä0_È›XB¢ ™O½EFP&œíÅÛE1±‡RÝáeúœø±(šun­jíL½vøð»S‘×Ç*ôn¼É\õXÊGe½+Çþl äVá"þ|õ6„»ª‹+Ù(ÁAœ:[[­¾`ùaʹw)ƒ2ðÎÛÆѬBMéÓˆŒÙP°žIfK^Ëò;® ´Le<öËûÀc4½Ó _,r$<‡PíTÈtó†ts4„[d¢åž_äà­¥ÃÕÛÝ —õGh®Kâ„·ìÒ[bCé‘Ùœ]óøGÚ]¸‹šˆYÁÈÐ<ž¼ƒHÜC—’+Ê>ÆÒ¡’%utmW¥Å÷†oºÑ³R&vÂŽnb{†tð›{2~ƒ‡°1ïcОÎ÷1dRçÿ²ªÃÙclõÙÐr?™®ƒÊ &Ap>SØØ®{§B¾ ôÉ€Ëà{ã\ƒl>)cÜ.ÀiE8ÿÿš \òH6ñÐÒ®##ÓêbX–n¡éª"±’dñ^>–Q„‹0–õñÓ +ã ²-“AÒÐ>lm)ü÷~£òì£t]ö-•¤9ÊáwÖÁ¬§Éõž ø‚ƒöºøL=S”.ÇÒXuû‹ýe §m­h>{ö̬ˆ‰ýÅÜÜØØ0‹¥¢¹ªÚú%èU½àÐʳï&×±£x{´÷/b¼á"ä·*áåÄ+4É3ùQŠm€>àoF߆ñ zXI> Š8ˆž¹fñ)|)h¥:ž)¨™Øco­>pöŠá\;çä­Sg÷Ò¸¯v†s¦ÃqA²¤¢­!i”»*1tÓÓaê©› ò~‚÷¶p=‰åÜ’M ¨§5VLÃa}–<Úœ[ÕG¥þŒ¦»¬WPÄûÏ |ç£[š; ö£ÒP^p§vÕð+í'#´E#É¢ë4< ƒûP+-š–kÕ¼±ž,Q–y2ÉÍM‘ ܼÏبyºv&Ÿ<øöœjó\`Ð# ˜,#DK?`å¦òÏÑ·Y#ø?uf5X‹íšMßà}[ðð÷¹x½þË95R/ó*ÿâ«%÷ýFPÃÇu­8¬ÍšË ºê°ºŸ0]­Å·ý)9W^È’æûñù÷‹±²&¿3¨|z'ó÷ßqv€ßñWs×,¾û°V}üþŸë?”Ö×éþ÷xýñjÑüð»ùA¤™õ×X_ÿPÂbsŠ$6ñ¡D_«áâBÉ¿seTÈ×ÿ© öÃúm¸ð{uý7΃àB×›ëüû_øÏWü‹*c%yõqêâ).ÍkÒ]‡Õõçæ¿$ÉúÅ?¢‘f$Ú[’‘€ ·ÀšÀ2ìB¿¦¡ñU_+¨¤ÜÐNÓMŸè1œÅb å»:óýº1Ú½¾Pà|@ž$HTÞ#ÇÂza¹«b#2‰iÀÑ‹õäEAÇ¢{ºÍï¿VÙܨlý êNÿü"EEI‰««Ì(±Èˤ Ðý~kûé³ü7Hç (&ÃôŠ“¦Y}¼ñ~cë#þ$²üí¯ÈüÌŠÇÎÐÕK0ë!ù¹µ¥Nò!üšø{gJ¨w[1E±¤¯ —ú…Çÿ8jjåK§r­Äe\†·È>VzJH·böµ‡½{ØL“Š"´Ì´’š”'Sj¯j]W½p.QüÊ„©I*Cb…`€Ä?ù¾Q„cE×tóÖ[Aßßonm?ÁeÆõÐ0ìq»ùŽ6+cû`ç~wýÅ<ïï‰}iMz”j Y jÌÈúä¼x ï`UÖxP5·76JtҪ܌\$~‚hÉo§‡'ûÍVe^|E»‰ÕVíhÿø°²º* ¢ÈPD‘aõÏÍÉçPXåê뽂ú]ð_/xâ ÈDÜ^EðàôÅ0^"‰×Ì]y«€«Tô>K¦†®ÉÁ‡G*7̘ˆõç[B‰€RÐ=^À‚{e(W†UYãÍIåì¹¹YÝÚ&n·Ù‚jO«OäÂÕÚ^‚T4®˜ÎDV%Ƹ‚2gê“×éØ"´¶ñqá{Ä¢ú–‹ý´ºîNÞ¸ˆøPÓ«RýÛô:bɸfeÐóî.Ä[Z/J;›Úûü©üc‚^‘J—·äÙÆn-_¹JT¹'O¼rð™N’|ƒØwª¢½}§ÓßL`7û›lU|g3v¦êâL/OñžVý-¸üWA?¡ÄEÒQ®üÈBüJ8&BS* Ÿo¡ƒB#!¢jûb Áf÷<Ǭ£Ý>nA}vÐnÕß'ÈRÚÑ©®¸à¯Š~8¹‚,Ÿo8¥Ië*Áü bì#Ñ÷5A!ÃçyUÝ Ï;Ô~fƒE_‚ð®Ç¨*NõTÒsòùë÷úÝÙÀ™¹dÆ£Râ Zƒ9“!Š\t¾Ëª¼‡˜ïŠ9^×” pŸ‘I…eN¬®í©yª¦ä=Ð"J6áX2½8×浂‡;µÇ¸`ø/Ð7Ä0R¤Äf1G?«Ê9)=›Èÿå¿üÆ÷#¾Å•MÃÄŠ«¢Z‘0"b#üÏßÔº^/JØ–Í©µÍ Í8ÎDœ Ú:ÐZ D‚c„¥/I”°„—C~I_“®æéÁ~ÓØy¹F=ÒxMõN©-¾â¬Â5ùÒ_“ßÅÖ,¬FÌFu¨µ¹Ç¤ᣋšÜ1›ø;æwBWêuïÁѯ¹£ð0hK;ÂH¶uöpì³:†htЙ#!ßeVZŠ\]]íLS}ß&Cú"ú=EʉÊqJé9ÃÈŽk{½Ó¥gèd¤YG'ˆhÖB?;øygî ­’ÙªUÎKš¹Rø‚»‘Yjz±AI õ¥Ðª Z’}Q4U{JüˆÍ€÷ß&­ ß©±ÛQ@ÑY¿G² ᑧ¦£&.DŠr<””„Ó:—Z¯¯œ…J¢üòPáÓŠb˜WG*èHg }º£Ó-›ÿ7s1ãì'ÌLÇÙT)•6Um蕧Êö· 7\‚BWŸP¶³†­ä>n •ÕE€VY¾KÑsºó¦5á­e¥^–{ç¬è'oü1Ù×`82!³ƒPµY•uÕo!LJ È ·÷ËA½S;8Ø«›Èµ÷âä¯hœë/Z‘}WGª&ë%rDZûaÆGûˆ/Þ™«0n<^8üÝÕ­ÝÕÝÕ'»«OÃQ¿qÌ1ì’>h‰p=S !ßX…ý¢™†V‚‚²’“¥ÌàÃBaÝp‹5Ê ñœ3A/ý]2|¼¥Èn/ˆßhdE«³ŸØJ«Œ·#€«¯¬± r_¤ ?ãµlq*Ëa²eBþãÙŸºöà‚¤‚ˆFÈÏBÉT2˜žT;2œtåBNî7d/Ž€×Ÿ°¸FíPlsÑ@‰Ò 'ÌŸ§¾ Ë`Bý@q"ìá=ÉÁ¶»°<ÅÙhÐ}AõN+»7 [ ]ÀVï…z櫧sÌpìÞMg뢹”"×l cpä ËbqñF›(2n„x¨sv¶Á—ï°z&0a÷<£»Ü XYä§~S¼ÐŸÕF(Iì²çÔ>•ðˆº"7”F-õ:’'ÿ-¢ƒpñçæîs꿪޼ûX$$b(ªm:î^<ñ þ¦¼¾'¦ÚdÄ©vKÊ#´â›lðèˆMøUpˆ7døÄxf™c–aA>ëaA¢}<ü™ïÿY'}à\.Ñ52Þÿ{ûéööŽæÿýý?7ž>}ðÿ¼‹?ÆÞžùž–ý#çÝ©l<©ll™{{†ñØ|Õÿ†ÈD9ªçt×[Úþa£:ý25×)œØ= ƒ ô´` gOû@KJU¨ÆþÚh8p׺RÙ&"mñCýÚz2&4Ôˆ6hDÛèQºùLŒ¨Öë §Âõ/€™ŠKã LÐá­l®qpÁª¨€¾˜ë@¸&Óõþhº^;îðµ‡=@{½ŽÕ%C%¾·›×š3#¾Dl…Žšö„)0ÚÍà H'˜·@2éM­3Ù€xv§(ÛŒ§WhU9g§VŸ~—)=v.«rDXä\{f½ÖF®!Àí3{UúçI£‰ª(¦¥Q ¹Ó´ƒù"GpaO»Wh§cy0\ºæ6Uk~~ú]ÉWúÌÓ‘†cõ´YÉzýÊ9î\kíöÙa£óS³}ZÃ5ã½É ŽŠS{‚ìÍÄa7CuèÞS Š>¬‹ó`®€Á#ã5„°4^Åî§èÅ -X‡áIWQ›àê^[cÙÒPx¦‘Ÿ›r Ó6jµè%á §Ö—àÆ•Á‹FmZ$?­ÈÊv¯"¦ü®Ýü߯°Á&Äj‡Š£òÃ$X11ƒ4x&ôUÃú1 Ywd_ZoÑk‹ÑÜÕi¥˜o‚ŒÉ¨ÈÉS8–ÝOä:!½ü†îÅÔ_”T cõB3[¦$CtßÃiÈ{é W5nIù K;$RIy$·3Ú骣Πi ükæL¹q¨B7 Lâ-î{îz@rÊ<ÅáÆÿ/Ò¹9ãòè¤Y$;%³~ræeön·[æÚe·»þåoO©¥—ö Sm›§oð¸í4_¶‰Uêdv}ž<fÒBµÐ› p,8XBq(Âô™1ÇΠ߽wå~é#4š Ï᧹VhNœ‡ÚÖür Ö`|eh.uL‡ŸMð.˜|ê9ׄ»ai±Ð>“FìrtÜ9áIÒ¦ôfÞÇ=+ñ¶+àNë÷Ó—·Îä/¿×žìwA x‘ý?OY‰òb‹_£TéLjŒ{\F>\VG«‚ík¸\CO¸ÑœÎ´Ówqj5Õ~°\IÕ&¦<Œ”CnbWƒ£Œz ãê:‚HR+)Üz3ô¿E´óò¬‰¹TŽÏZõF[Ñæ>:Ñãbw`hŸ¡\ç µÑj›kr—´æäù•$´SPô ¯É'>L€Ž#…­ÐhO5%]Î]Úw°† ãÒL\øÇe‚-ë< ·ËÓ,ª×YsÚ.e€e=¥jø£ ¿µƒßÀP èŸÀzžÂiRTyhhóyï ßÓ`fë%ým=Ý©œ“OX&ÑJ46ñW…Ã9½Úh³Kt.3s ‚tâ-tDDâ~¯}È>¢¯ùWŒæaá] `-lÐÓ­§™eë.L…TZW>ëâàiâ¨ã¼Q¥;àp4j‚Õ+}Laª„Z Âjˆûááô¹o™ñ$Z4¥:Ab´•k#[yɈ©š6ä·u ¶‡Ç"„çÀw1‚Š ë3à¡‘šK²-Å2 ¦%¶cEó¶TAÆOF%ýš‚L°\Dï0«zy­FoÊáŠÕ‘£Ïb}c–.ДÆ &L ÁÎÓsíu½^ò*à†÷^Ù,úÄJEåe€`3\_Ýø§ç·îßú¢õµçkNàðŽŽÃ;Äy&Œ-ˆh¾“LuG0ÕISâ¼ë¼,\ç£X"ì‰e‹ê¶ÖTÙó<"QÖÄ€‚$Êóa€‹å¢û3áÀq~£¼2a 0§ïoÁÏß2UÓÀÆmÂòÑ‘Ç„†¢ÏuŒ¿ÔTÇ¿”_Dí÷°)>êìPT#þÊú 0#oE¶’ ¬©äªMh–ÛµÝhøÎ9 X§=Õëë‚Þ{5ÃçA‰—3‹BÁT“N6 Öþô&²ïHᔟ‰u9Øo5Þí¯·Oñ=­cDŠ.‘_¬€¥}°£U @O²뼸·box^$Öm2ë²e?`áÏVŸ2c)%›š æ¡gŸÏ.9SÙVüÀ¹Êï".#qÁöœ™O„7öd¢×¡‹å i \G¤pç}ÿ7¦+гFYô½w ƒqüBú­0AV‡Ò…E~"(–ÂÈFØàgêávó“}s–70wuLõ…½{X«â)¯†ŒVÊšwÚ©¿:¨½&.7V¤m"ÂEò§x3aàÎâhKD§ZHT¤1l-H! E“Yð 5¤ë4ƒ±—|m5àp±¢<Êv™±1.¥5š‘'TÊõSpë.€Q#~í5Q¡5Q¢î‰LˆUt:«Öš(?ÉÙún;±'d±F”á¾æD˜éfâ¦S[[Ð^8µcïÌë,`ÁŒ:0éª{EóÇà\EºŸ( LßC£õ!ÚÓ+Þ[c¶¦p§Œ˜ì©R’ùöaÄôJP£1RôŽùü¢ª7¹ ‚½³'•7,?7¢ÄeÑŽ^ÀA´Ë6?=¯1=QØ7‡L™iÿY»!E@ÌÅ׆B&›öùGg^GP­ f´ØíÍîÀ9?’#W¾‹j@Ç2ñ Œe ô#¸°>£öîÂwÔî×Û™2€E–öÁ0uºÜçÇŽUj òE’…¢_б>/XR’ÁŠc2Ï(²“.Ìh2uo ö¡ê‘–MøFW¨¢à}Ú<WJTûÇg˜{˜ós6kpÖZ"”0eÜäÖ`vU4RiòŸTí;ËëüÌ[Ú1Ã&ËZóUóÝ!àdº©¥&N÷Û…¹g÷Æ‘ÒÕñZ›ôJ7~!kÝoŠ¼(ªÏF2@˜&qé j‹ëëZmÒ½BY@”KRñ£¸U(ößÔW}/R¾8+~g.eaH‹£´±°Ã˜Ž `&ÃÎgØleój<¶xÓaåŽlÔÇ!"Q¬„¤#ºÚD(_±U©Ó¡Œ.¸'ɸTS\È£Þþù¨ÞWRc4tU êu¬ ¦û£ÁìTwªÛJ*f5ƒÈ@U9¾ˆÇ@WÌjp‘×Û¤™âK—-¼tÙÜÔ®8Š•‘SQ©ÍŠ8éƒ}E¥1†­¢Ô˜¯+Á<`Yˆ·GEž§xÒÊE‹±Šwܧ|ÕoÖÎNß·ÚeÞÑ"<Œ(æQ6ûQêKè¬Z­vÞ0ò¤õAá´m_G$ÛÄc‚73¢;ÇTwÓ‰Ó›uñ2e­ÃΛÚOÎѬOã&»bYW»Þôb a ñG×eqGû—g¯qoUZ)uÓã"-u]Ž>©Ô‚~…I¤šõ è1ïm~„®7MàEÁ?~qˆéŽ]Å@Sk™u"&»#„Ôaó¤ícÓ’Î DÕÕs¹9ùcÛü©þÝwÏ jзÛ*‘2ê`Û XÔ‚Ði"<ì¶üÓÉ­uziμT!C7È"bˆR’¢µ£"l3ù ™Ó‰m &o½"6¡Ž³ËÛt¿Å˜JV–êaÖ^õL—Öìêeµ ‚) STKäs”›’ù@¢#Ä­ÿc¦Š¼P“Á{^€lâÞåm=†…1Åì:—#±NZWVçuã¨Ñ"’¸/ØhÙˆ  c/â>žn4ÒMaaì/;%•“fҒŹ„lû2v"ù>¼^®ŸüŒq;)îR1oÛ® mM…Þ¥(|hU:GnÁ;nDŽ½ó&;D—LªÆá=øLõ]U Õˆ²œGö™V+¹U}º©K•Ÿá)6ÛWÎ5Àg:±"0RbZr&¶³ rQÄàûTù¾µdzut ÌÍAó¨!0VÏ£™Dóú£§£—-¦ÌJ5pœ±çἬ’@m]Ü‚A@Ë–»F;1¼}Ë£¥¤Ìj®}Þ¬nîT7KeD⨆W[h¨PÝÙü›>P[³ØÐ*ÆSRÁ‘¤R–ÏoG°¸;=ý Ö¬vêÇG¯š¯ÅU…ÿˆ‰5¯À_ÙT¥¼â0\Ïƈv¤&(ë<ñTæ¤ñwu)›š ŒOùâ¿BzŽÜ#_A ®Wp½>L ò7!“¾â••Û®n}¥Å­˜wǦ©a7 „,í] 5.6›>O)A;ÉRJ/8x?%Ôì"Ö¿œ'áä_*ƒc¯lW7ׇý±Ýi'ü÷`~‘«t‡ã/Ý«ËͧçB’É¢Žëð¹¦v’«‘ O'$8 .gõ…oÿR4D†¼p8œÕI³.£Ó4Ár¤¶RÀÛeì:]+â"°z¨Ö$Çû>1AÞU®aˆºÎ(m^Þ=„n"éQÜT"@êŠzMÿ©•ºv&Dë‰4ú sï*#íï7d•‰=E|K—ûÎ…w[«m™^8ö25¢€²š¤K®©ìÓÛ”}Ú´+@fE¶&¯ôyN¨ CÛSØEð…yœ„j£ï²Gõ q·)n:ÑLª7oŠ^_1ªS Ç>â TxáÄ’9ù‘0È&¥¦‘†ž”¯þVÙø^# tVÄ)­ ÑÙŒ;t¢-ܲ¹eå^f/oôUqƒÛ\SéúY¦àµŸÿÔ°@›bŒÌÜ¥k/"ÓùQžLüƒñóý¶X}ÆýÉik¿ùêUçT®º°³ð×¹=½¶ÉIš™%^ø)ìâI5 |%ÜèHRª{â\Û““z5×ÂÑ’­É+ið­ûxæ^É«5Ê7à‰ùx³€TŸÈͦX}]R ébÑ»w "ëQvY1ÕxÈÒ¯ªW%9žŠ%‡tpðÓ!²–Ï›l1|ú7u;$3×Zõ7'Ž`ýApè ”)¨7q€I:ÚÿÑ\#&¤ä‘õ©ß\^÷GeT_^W®Ÿî¬ë4L–ÄÌ ¼s:XÕ'°¥­CóŽlm£”2 Ûˆ –Í ·Š|ÌçsMÓ-¾Z& ©ÈM÷G'í_E ÿìýŠÊÓ]ó&y–êªYÃÂk[À÷§¨Ö@T.®±<’QŠ¾Éÿ;nîüÇ‚¶ó=R6¤àÐdl|C–,ø$y_B0ª˜ô/bOR¹ öª? 5…²“ÿ¦;r„Æ¢¬L ÈýøýÊþb]¢ÍãÉ™†•ˆ[{J¸i³²ñ´²¹£á&Ù!…´8šL†Ÿ¥÷ ÊßhÅM+c4í³Ô¨àé×'Øý¾K%º ÞŽïL9Š>Ê$¯l;Ðhëôj6<¯l)@øzm®Iƒ, ‡X]ç¨'nèCvÂ3[ñ‘{©Ì’—+:%— Äx¨¥'F•ŸÙƒ’ð˜kžNËêzw¡Õ wˆ-¸˜°ÑHßt.’öéÊå&P€}Ê/GV} ´Îò5Þ™'kÐHnw•nš»nJ°jBÿ‡X¬,§«TÒR¥Áú¾p“ZªÀ³†["´ÉsI#âqM¼õW¡rÄf¸n¼Y<ù?P ÌúágœÛGqlúõÓ5T´@ðˆŒðfóü&öÅuìõï¾ÛøbÚ„³0›,™T6¾C,×Ô!Ÿ*²E‹exLغN8è´g£-W·µ\5îˆMxýLãZߨQ]· óLM©HØÄÔ×ëwtÔ.v3x®Üd…½¤µF„$, ¥‹ŵqà Å7¨E·(Xz>‘´…¬“l/ðúy¿ëj¼š»µa?Ã"qL?ùôÄ[CF|O*@¨·.ˆD(ª<á²¢P÷È’„×_"Ñéêw 1òƒDÕÏ¥ ßëµ£Nãðì CÖ rxrxÛ•­M””ùÌjH!”â¼ü8 =D>º³ãív ­ö<ð»B >âõðº ëïĹs²~öÎsõ‡F(«âlÄ,©阄î<·â2ªQé‘BWœ‹Š¾¿nÀFÊ|YóãÁ»fÕ2Ñe,Å0ê/ }´’Ô-:—ãJLUõñ’Ï %eSV6Žµ)ꓦy`% ‹Šý§AXiÈ€a¯ Êä=QÆO:N„ Èéÿ÷ºËvöìIlþwt——ùŸ·1ÿûæÖæÖΟÌ'þÿßlý5£™[Žÿ°±±µ±ˆÿ°³Ûå!þÃ]äÿÖ2¾ùdx㑆ãñ§Kd:ûµÓÚÞA³Þ8Â̺dð¡Ù~ß{¾²Ã(2x-ˆ—VôáÅ’¾Ÿç?¸N·xþ·7Ÿ>ÑÎ?âøû!þËü9DæOä¤ÖÙr!¿Xt{ß×å&föš#¦MfÉo~dÿ¡uÃ6A E÷$nW,NA“ô žQcÕhR2e ͈ïl´á°NܘYC ¡¤EÉÍn8â&&dþ4r® 4Pœ:e2Ý…»6Ý89]õNÉë*ÍÖºTmìÔ‡¨ÐÊ?8qxÕE¹AÄ6¥/–}Ë‘ƒ ‰ÝAߦ„¾î|›ÝSÐ?Ñ·Í£ýã·íïÿ‡ñQo.‚Ùʇ® ]ÒˆMX©é!˜}¹­ƒ~¨4:àóô3²1ƒ¢Ï£’Ó8r¦BgJY2Åâ>þLþœ"yÎë£3éG`ž°ËÆA¿k0l$eÉ%Ä?uÆæ–æWpÜ[פF@‰§ÐÂDªWØ®{Ïÿù8ýÛ•ÿžl?ÝÊ›Ûüß]ü9ž±[žH‘+ø†þÔ>àFê}›¤Œ9(¡'ÑTNê'9)àel@voÈMšè]âÒ¹¶Máš@ Œ H€2p0ÖÕyŒf¶ð°y*.HŒ©Õ„×4#³ pP€—9èj´V5N ‡a¥1Å !)GvÑz9¬Ê­Z&2¥ˆN=Äš(ÆZC² R3ûåqHbJÀØVRþ1 Œ?¡°½kÝ’Y­ÂXNÐdÖuü0fôtI‘!ze^8a§|‰Q€ a<N©ù¹$óñpÍ‚B'óÒò}ë:Ý>Ýpûïþ™œ®ÏÚ5 ¥2“Kk`®\~R}€6¸Ú²é‘Mù}ë¤urŽ8_×à Z¦q–9ÿþkÓ´ÈÑн*{¼tiÍ™ŒqDXáÁÀ€ú·-GWfuaý ÑA¹¾L¬š 0™3àâÝ+Á82êñÿÄ~÷­µg|.íf”ºj9èwmð`ì­ªøä^Q²FÛ‹3GQý¼éL8#,<^Âàm”ô¡ãî}Ó0ÛǯNßÖZ ³Ù6OZÇ?5÷ûf¡Ö†çBÙ|Û<}s|vjB‰Víèôgóø•Y;úÙüxž²ÙxwÒj´ÛæqËhž4ð®yT?8ÛG‡®—PïèøÔk7Tƒæ~£vmµ±2NQ®ÎGc*Þ—¤gá®%%³)Þà>›²0Z“ò›ñÒ±¯†•}`¿'nå­ <,¹BbnnuiMÎÑ@¡ ›žÚäåLjÑh¼e÷Š"µÃ‰G‡)ôw÷a»iæ OßÀ~>¬6ZÍÚooÓÖæmÖ^¶ÎN?ãöQ›\ìëƾ«Ä;hî\ h­vjþ||‹òöÈ„Õýqú•DÕ“û”X>)û2¡âÙdì 4ðËç>l/yŸ}‘Ò†ÄmŽ‚¨€Ï}UuBŒl@,­òA)¼è¥Îä€6®"Fʈ…•ˆI Ô޵媇¾ëa+•î1õUÓAÿ^ÎFòMs­móݨQÞ§…j‰57Ä… q0: óœn‘Q†ObÈÀüá«^wü237¢¸P «)èÃs¬çñJa©jÝ£<€l|pM9Q§u‘ 1¶¦"Œ'kÞX…T2Œ&±"#šO<$8É¿>9"j®Î¥S2ÝÜñÛeOá$¹I¨9d3'êØ¥1¨•Gº/ÛAjª†ÐMí"ª‹z(Ûå-†Ú.¼ÇvпFE•z30PW©Ë20*%š‡Q<ˆžõÿêBçå¿gOž> ÊÏžl=Èwñǯ ’žQJ5 zBÿ/°AÙÀ4|ÆQø/,þHLÈEšª-ìâw%ôh˜ ] 8aørŽ½ÂK´¯ÞáÀvŒÕ†¨CFtìåuSQ5Ya蟎ÓÙ¬(U(HU ˜Æ¨O”s *ôE´1šöOYžÅܦ—q8¬3Žô³ÍÊ1i(DÆùm:5ûÄ×Á‘aîNàÒÙ<òFjJöàú™G0»—3Îcc¸¶ÍÆ;@YP÷yNQ–.fƒ²i“•6Î53@±ob¡g¼3ø,"a.K ‡Œô€H ÎÞ¥œ´ù …DŽ&Ȫ>ÿ|„Rã$À@GÑÆÔ¿¤ØëègD¡ì13©—¬ˆ’bõP â.)l†Ø ¬¸-oZÙÉká šÞ`õ9’lKî´°h@?ÀÒžÞÀˆäPÄF#Q3r_¡ 2A`Ym”ÜßX#·ò?U“¸ã2P#³Æê÷#hø%ö†#  rÕÉñ>Ùét¼»¾N.4ƒªÕVÉåzW¾ÕîÅð=§ßÛÛÜØÜ|öôY•þ}¶#HŸ—ì/°Ìú¶—¸`f¥[ÞÈÊ“½Ú #×@Ù€ð°¥p@ßûC±åT¢b”IñVΪ#YöÁ î¡·´áLS^ íê!0(Ê|L)¿³ n6WÖ¤‡‚©Á{¹¯¡îèûgyj©òµÍ\å‹” tãlºvm e»§)ÙÄc8gˆ3ò•q¼BƒMü¤es¶Í´,u"³!•Œö“óôf¹…9mÄèÆà3ì NB êâN4gn¢;R:†PR8ÁH1ãÉð%„Ù­, -æã›3KD‹YŒ³B±»&L¸}Z«ÿØi¶;Çðï«V£ÁxòÜö‚¨ŒØ|Ø3¶;Uéd*®þ”¯pzìpa¨Ö#`få¥mid7]R¼!úƒÝý”ýÀ,á×hgGnÚ´¹½¬‚°ƒ¬Ï¶È Ñ•–#ÒN¢ ýl,Õ4¬‰,׸õ‘ibîDÛ U«*nÆ$ý2gÈô‘ÚÄMS5ÞâFµÈy$D,t?fɤola´ÁúRW(Leð©+/r ™h´ì\ŠÑ´R”S– ¥"tVâ㨠oËã+†áŒµQ°£*ÎÑ×-kpµ)CEG(¼VéÏh» °CÄ"&‹×F¢°¸×¤-ÄhÇÅÛp¥|fj£Tº,,ŸÓðnàTC\ƒàÎaFÊ™Ã9k r]LÉ-]ØåÜ*<7Ý£ÝëNT_ax÷Ìòå‰1Ð9^ NΟȢ–L7O›Ÿq4@ÙI¸"p/îÙÚB…Š.¡à+Ø5û—÷ âÈé|8U„u¢Ëb—r7R]™@P M†hAÏöš…ÑqÓÞ4nÑf,x|×FÆOtˆ;•» FÒ%uCƒ ¦&çñà{}7ù”v|ô‚ȸ,j3È%*©µà@øy*°&~'Rà‚H˜T.¨«Ò(æ´à›¥g3ô òùE§Âp<O½eŒû,¢"”þ úŸ%\þÏÕÿl= Ûo?yòpÿ'ÎÐ=ˆã‰RŒÉžyÇ#­ s˧Pè³¢–îÌÖ¯ Œ=CÄ÷c–¾+L¹+ ©ã%Ž‚Ž:qGzh¯²!mH9Æv1œOKšdT:1HaEUšw[åúqm,¸EÀ.¨‰Ú,™§ÈV×½@5• (Þû»ÌfÛëO~xNÊçÂÈ £$Êš4Âþo6ÂY¡ÞÊ™Mº’"ÍÜ°xûÀV°€=®€Y)EIZ"h&¡VBtÌ[11Ä´ÐjЋðž–Ååp†E)Ï™‰c•t|<’næe¦}AKnéšðØ*™5íCŠôÒcL·{ƒ–l è–É#`4-ýòž»:™ õCÄ¿1§A9œ‘å44 =MÉ}wb³Ó~¯Ìˆõ°.QÖšúïMªV­‚…À ÍQ‘s.õ-‚\OLEß'¯ºeT¡ YxwŒj$¨&ü}i6r€ñC!kƒÿ¨ Q’¸Ç?5Z?5owšnd¨éCQU'¯OÅ’ý2‹¢¨Eƒ÷òæÔ áã\æ†FF~d®qÌ]kP’Á|ô@‹luÁ7xâ½ ùXÃéªyf¶…ĬB×b‚3!‰lJñÚPj“¬ciá/ ¿ÂCY• ¹P©o9¹T`˜kvŸšâÓ»X|”7n(Eß-iœƒ…¶¤ÊGr"Â*HB¥gàíI2•¼i¾t,´]WJ±>ÂÐ]=ÎY)¨SD{–h6aU5¥(‘Â)¥»â]€\YŸûÎDÎÇéÂæ“!Kz°î“KÝBZÐ!ýôj®5`•Àwô—eLuésŽzNë°ZÎìòŠçÀ@ÂHä¨WîZa-‡fèÍÒ¨t€Ò‹V‰ãÛ–º9ª„r)£ÙDØKRŒVÅ°PŸPe Û!×X³Qÿýæ$çн÷ćî+š*ú±ÀÍX«*®ªðð0é×jÔ‘”³§Ì:Æ­õ2p 5œ:RxN¡–…gÚ“~w)ï/Ò¹K2ëõ P@Uî»w¡« [¡? ‚9¾"â~ÒhÕО«½+œ tÁ,2Äd h]_,õ·[(TÆÑtë+ÇZº!›FòB•o¬ pžS[ªÄuJö ͪB1(Äð¨Nr9ÕL³®¡7LNÄc ½ˆ¼°QÙdéx_:NOG¨Ná%²÷ŠÕ#Þ]BRÑî¢à§¶%.xpÿŒ¬‰6â…™™-Ja(ÂmÀ «÷D]]Æ¢¶@jG¡Ó“¦„Z‹8We‰ƒ­VS´þf.€du6‘á]ï ºŠÆÀqÓ…¼.uhe|×…¡8œWÆ3ŠE­`Ñõ,$áÂÐùþŠãx ôLpÉu(”°S׆Ĥõ}J&•V®ՂãRñÄ JÄ~Yp ¸qÏÙ£+Î0 „0O&xŽE¤`™°½ °ºP)EQë!ˆrKI­^B}„><#TíJa+a|× [’¸hgW\ªyJ\MÆ6¤‰Õ®y`Mçwúl¾áÖÁ.w1Ê‹kÿk&¤½¤ø»æ|+Ç5J^c(ƒŠÒbc}Öˆ_wäF‡òŠx€£G78 ñQØ£O/fɽ£­ð®y,r¼a3[Œ ÏÜ€ ®t1^زDRY¬9æ¯Jçe‰õä[l“î}1Œ½3AËVH(ˆ’>Ú‰%F€JoÛIÆMÃöÁÖ»|Q uÍ®k s|†erO8?Ùw¨ u¡êK­?8žpcÉ?0’§p\2î¶7Ž^/ûPvœ°MSp< ×°þ™ HlŸ1·Í6]ÁŠ––†ÓêiªfîÚ³*“Q¦0!w°Ád/Vö䶟–±Äí— ¶ ÜNÔ6“xBòƒ<›ã_|êju7ÄfHÕ¶_=r4$ªlqQ¬2ƒfâ,LÖ7¬à”îÞÕ"°ÝNŸÄ‚ ‹#“ɲ%Œ^ðÂpb°âxwÆ&uhSlÀV‰õ˜ôÞõ•— VxÇ¢ð·5¸*pý‎ã»;›ÚÊo8¼¾²:Æ™zü÷þ…Ä8=Üšß^´”!:¡¾©äF @°z—О#!ªÈÀÞa÷Xá , 0»“®ÄŽ2m0$Ó¡n“AØ'Ë"ŠráµD\6×ñµ'x74ﵤ4®]X^Ûš»pÏÁ+jÏ;"(öátACÛ‘|áÊ[eŸb(ËgÕJˆJÄÝ”¼'4è²66Ú«OÈG5%rRݲG ôÖ©¡Ï²¡ àA,ñQóeñî¾IÜ/ñÝftÍF¿dŠ«2¨Ã/š¡ß¦B«¤£*îˆásGfï dÝ•Á¬¼í­åkB•™-Ó ¢öñØk0ŒjµÊi+‰9¨Ùþ©:pF¦@Þ>“9† õ]zþèûjmŒ÷Â'’€Â~±™ÔC½ûÛÓ]¶ §0o°ó·§¸ÿØ€C;êÁ^9'Ø®±Å‘²L•ã³ã±+!Ã*Ÿ’V²¼#Ž BóOÖò³¬oÏ=‹,q,#KÜÁ4Hù~ÿD¸°Nlå/¦k':ÿ"ÿôºÛÅa}¸i ‹®ÆÑióìp§ƒ)¼ZmÍÏ<ÁÓ?š;&g^ÑSdU Ϧ@bi…ÙYv»€!Nøêè(ÓˆÀ9îuü/rûíÅÿxº±ù4àÿñdsãÁÿãNþœFÆ+ÒÕ½œ~Š ê+ÁøÁªfŽ§ì1I`!ÇtT>Z¡-"1Ò2ýÁ"Êûx î›Lx¿pŽX^‘( r¼Ç¸Öd¨&u¨(ŒSe‹J7oHiØŽL(MÈNXz µ*s/!Ñ€™)ßýdz DZ ¾ÔaÛdòæ¦!*'DVIXôyGª@'¢š!‰%`~¤8Á™5zâæM qA(³Ρ.´±tœ ›þ’­³° õÜNðFEùH#'F|p@ü±¶ ãâëCíÖ‡Î]…+‰”"íƒXjØVÑõÖÓðÜÑf.»"*1CzÚí qã7°¿ø‚ÇqÌ@ ™pj1’QGÞ½u„s‡?–‡Äp‰•åò^‹ ×€àÙ4ô»|r&âÐ ÝR\®`˜žc¶Iºv¢°È׃Ñf°G>ô­’Ìq‚4áÆ- )äò©ƒY÷¢²cåŸ+ÄooÓ)¹°®]q§´ÒÅF2õü€Hd.k:ZÁC #Ö(peÙƒ"º]\: ²\ µ“ƒý&Åâ)yQ­\¤#ô,Å ³{刭æ9A¢ë»=AEÑvòÊgœ˜yÏ©_{` ûV¡Ï`úÆA©W:î¡®ƒGÄÉÀ£¾@ßQ¡œ¼HJt¾2ئÞdöE>J¼ ñŒ’Ÿ·ðÂ/Ák„¨£ëkÕ`ñ¶Ë^@óSƒ|v%¬„bc¨<æa'(ÉÈp d6ä2ºW³Ñ'Ò¯èl û¸>>èn’‰ÕSWܶpe½¹ùÕ+çTR;dRˆ¢®9ú¹k•eìmVs¼lï+ ˜ªÔX˳Õ&ǘŒ±¶+¢AO‡¡M°\]Cm8ûœD¼.|+À(R$ãhËÂÛRÝaTÈ6Ut)‡WÌ=² /ëaCÆ/j.æØ\Û:|‰ÄH¬Ô¾ÄA‹]Xý—È 3(„=¡… Cý5 ¿Â`zºó£¡µ‰fDÞбÉnÒ ?sÀ8Ûµµ(Ó®ÔÝ!"1¤eÒ¶éÂòÇ œ%´Àˆã%®§êj3Ü'»†ñHzÚþ="™Çæúc×½²¯ ãóǪ¯5œÄaŠ@×}‘h|ò™nŠÅD©@W¿ÐU÷…Yü‹ûaT4 Zã~pþn"·[p×WWÏ]üï=þeâ_Ðåúúeᵨ.úDŸúãò€gmÜÁ[¸ÀÒ\ãAÿ&Z¸\F ÞôlV¯®®¯CÏTí«èN ”Dج®ú§ûãCp´«á»lÙ@H°ß ŒVú;?—¨u½¨Ø{ü{¥àW5tÀW7KÁY›ÅçZo0­ TøÇãÈ*þfÃeŽ›=Žjö8Øì \fØì ªÙÞlå}¯±?üXŠoäýÿœÆ~övU쬮úŽ7ŒGžUlÈ<iæSD{=lù—Ø¢ï Óõ&7˜rÏ\óu³7z.xÊ*•¼F>ÙöøÒA±.ÔΧíˆ4¿€É¡þêšø]ZqR«ÿX{ JH;WQÈ{ ”¦R–áŸáïh꥕z9p·êûHjöà þö¿í7Ÿ­vóøè»ê×Õ5üÐi7€XÕN[¥ž³.^àS$§Ž{Ei‹Å`å»’Yéš•!H‡;zÉ“ÖñëVí0¢°^ª]o5ON£ ámi퀃ò5ZTB¾ÂA” e«@߇ÐQo;hm_2ŽŽ[‡µƒŽ¨ Ew“VÃÿ|Ü>õ½uÎŽ‚µo°žÿY/uðp lÜ—/èÅ ãÊq§úk|~aˆm¥½ç7/ w&Vdch|§~|xx|DSe¡¤ËQo]ú`¬ÀÞ ¦.µúÁqfx¸C NqGV·º¨T‡;´cÄcg¸Ó¡\6ÁâÃuØn˜ÜjpÁÏS>.ˆøêÎ.­I|eáJSùßιë â?²ÅLW­.ïÅ]«ÉDL²¯ëÇG¯š¯Ï`Í÷'£ýÆQ½Ùh—¸|%cøIìÛº`…öqÏà–ômŒC¤}Aƒ„ÁŠV¯datÓ;ê ƒ×6÷ü/‰OTŸj‡Ÿ:'j"Ÿ;'øîc2|}Üo¼ªœú m@)Ò«7›´Ÿ©ý×#­x ôo" „ûÁ/ØÓ æM[&Ð\}ñ\+„sßÖTkÙšz†áÏá~áuë=Ríã³VÀH'Ì{¤­bµwÄjöGŽŸ]†žÎNà8!.yuÜÙo¶<7ú}äü~Ÿ`ªH:¹;*Ô`¥"¶wÉüa½g^¡ÿÖÕ¹YõØòbõþ=.gc or"ä{¿0@ìWÑý½ ÿ»,þòÜß ÔÓ{£öp ôB5º:ö¸¹ßÿ ¼˜×ñúï¿kü$Õ‚â:'NÝ2·ÁM¶‹=s«ÇùÏêchMTž¡¡õêìlÐË‘ƒº\Ñš1©©@±þþcõ=ŒÿÇǿ\ÿþº 5-¥KæNQGN<©‘çÄx3Є £·Ljv¹UÃ)=Ÿß§éë—æÍkbz6^(šëfõñ‡õõ?»øþ[¦°üa ß–Ößÿsý#°aå›å¢h ÐÚÛKfñeãuó¸kŠçö¾P-|„q æWõnuu ßi<Á«›r#€$µöÝw#QPÎZ[Ó’'ûü&¬x¡lYkò¹)«›ÏýýÒX¾Š5ã¸nk¸¿ú"_bI´ ïd«ðó£ù•b}I$ AêüóÑóä¿Üõ£uv¶ÅÄ‚ÔÝl$çNCé æG‡ß<~¶ò+ OXBÊt¿ÿè㟔àg¨UPÒþŸ1KzÄˉ|ù\Á‰Zhw x:6” ÍpP• \@áW(|â5¯^·WÒ»¢:²Š¹¾ê‡WD8Šûö)àÇpiŠ-. ÅKFp(ØÎÔº¼´{ 3*Ç4´ôY küy B0D|:h¶OJ„ЄwU’zwˆÂéwãÝi«ÖÁŠKBÊ!~¾¢tZkÑüϽi´^·QÿCŸÃï¡4WÅzg§ÇH×éYüæ·ŠQxá=ñùå{ÖÁ‰¥o|aÔëø³^Ç_µ6ÿ®µù x˜Ããý†|)ùk(ÄzÀ÷¾^y¯°,yrB''ôÛû.~ÃÛŸ_Ëò–^ˇ¸ÃWø/> ¥güoN úâ'¼kÿ|xvÚä—â7¼=;ÔŸ_ÚÔØ­sWIYøAæ¯Ì4ÉoJï¿u M~×ßy¥ümxo D·ÓvãËßò-ãjù[¾Õð˜ï…¸ wÛøÕ{äo6‚èôœ©ü®½â2ÿš¡¥¥øJ/•È·ðó…`X´·ôðÂ8Ç |ô’½`e‡¦ä`å‡5è[®zËò[w<ó¾Àƒ|ïhUú³=ê9ï ?‹¯r,jEg­ª”2CMP§óÛ1ª'­F½y|ÖÞU6†ü±«7÷kc…&õÌ…õ ÷o•ûŠxk•{$X½¦‚à ´H,RIeÝ#Á Îørhõ…ØŸ°™Xã0´nÎíRñù¼Áænš'Á*?#¨»fŒ’^iÝ1ËÙéYÛ¯y7VrX(Ôc¡<ÝùGà»3˜Ómð6b±~£ZDÇr`.7”¯".pv• «uWŽaD~œ\˜Uxåšü[2§#JßÖꬼX]ó_Èá;TÄí£*À†•f-¿òZTöÂkXŽT§e¸±bJ½ŒÅââH¥T±ð\¢U6V…c˜+±ÅJ”—šÔ¯P!Ó{{÷öö<­õzá¹0ÊPÃÒÀµâ5ûE)3K¤•\á|Éäÿ$´sr ¾‹T¥øK”èŠó!´ŠÄP Ü0”>4¼oô-¢®V—³Ih¬{¿ÄêØñæ" Õ×ï%høýÉ^,”¤U@œ¶·LÙ¥k¢º`—êò xñmò?8,xGŒÔÛ*KVq(2_wh·4 @%‘mhH2U;rM¼ÑI C«¤œ‚eD¿h—+¦v£ºlz>-xL‰*ãŸÎúïAòƒÕxÀâÎËGÕñÎK;ôêòË+[஬˜Bñ¿Ž×+½ç0†ßy_ŠÞܲº_·+¢FʨÌ~15b)1† ¯ÃHÔÁÃÍoz †›T:Q›BÃ%ª%¬×[÷ÕÅM.¦/¾ô¡OîÅPhí4`ˆúþÐÞlYάP8Ç^b 5¦Yy¶±Ý‚ôiv¯†NÏœ}7¹þbþöÕüð\õ­&矞¥dò‚æmþY³£®;8[á´‹‹?¸å¹©q©uK1"a•¸¢léˆú„'Š@uìfÓIDq_ob´„å)È^J£»¦|oðkWG4G\‚v´Ë§C\íÅÒï¤h7i>R.®Åä EW»R\ÅqÉŸ¸2Þ|Ò¿bßÞW _îß5="‡ò§÷[Á)]4è3Ô‹lM@TÒ‡HèpWãŽ~EO U"šj×Ç#püIä…BImˆ°ýWR%ÿ{ìt¯âz'I4ÆÈRíã{9ØB ÷Nãè§=*‰/ö<°|³ºèûqrèww%ïí=ã ¼[©x{}-l7Äܸ¦ú.¨ò­G÷7ãÖlš×Ka«>…IJ'•à„øË[z¤ƒ Ê-(«ËP9U±.·hüåŠäsä€Nè2L”È«i¢ã²'$±ÕCx—S‚Ó™’¿ä;1NÓ'™úra-µ0»¦·Fx¸…(¥úW¯[3´°ª¡¡±Ï}nŸþ…€Zß]ÿ¦÷â­¾p\85Ð]Ã` Y˜n­(v­=øP—J=ioxú“¯}О”WA›„ï…V6‰ö4î]xµáÁW™ŸõÒ®VØõ—u}Eí ïß]3´££–;¢‡˜qÃ'›ï†6œÿÙÿ]nÙáÞ0VF 6 péd,¼mªˆ~uÚiúH8ys|ô3Qbn&Ï°õšÇŽù•:µ’gäZÅŒ8¸W‹œØÔ•9ƒõâ0í䚯ª€ˆÌ'“þgÄ9o8”œ1æg¼L\ýͳáüºnï7Q ’¹AÔ ¯|ñ-"ÑM Ìêš›éq6bšRi0HÜøÚ ©ƒ6bsÅW_¨î¥ðjFÖÂ,®åÎ/)hgÌÑ(çWi^Òì Îc<í\OæWÁtRw ƒ4v`;ɼ}óké™v™@!¡ÊSQ£¯Þ¼¥œ jÁßÏO³ÔCZgaò¤§;)Ö ÆWVÊ¢“aÊ‚Ÿ'Û[éŠv'}7]I±ùÒ¾²¿X—IÃWxŒ†Ý¼zÝì}y´Q&MÄâsZCñ0å±ã¢œ­w{«r§›¶Rp±’‹v²D-®R•¥ÑF¢,±›J¾5V„¡’»û®ÝüßÆ.âàÝKñ¦~úóIcw6â8Í믋ϫÿ00W_„j³“P]~Çú‘ S=¡Vg7PóÛ&õÂû.\I=½®‘,Úí¦S;üwÀÙ˜'µî¦Õ¢h]wÞ½¬µv£_(Shô ñ³LÌ_Bæˆ/Ái<“Z°zóà%’ïæVEÁ‡Çóº^ÇçVã ö®±¯Ñœr /c7 ìÐŒ=eÝÊٚς[üÛÍ×|­NiÿYŽeô¶ÞÈÓ_f4“£“¬+ä÷àhÔÚK_¡¬½-ºBYû˵B;ɺB£ûÚn7þ_§Þ>]öòdêjѵÉÔY®…ÉÒC.j¡&ÞÍ{qñßË%kFw—pòÀ×gáëSjw—qËô°2‹­L¼¾ywi7¡Y¦;Äs®œnoØ·–±ÀåÓ-Nbî?öy×@·8ú,ç3Åæ×o v¹°¿-~kƒ[þF¾½¡.o»ÞÞoeS ÍíîB¦ ··-oex·µ1og°ËÞš·3ʬ›óÁˆú?Ðþ;Â0ó¶ò?oomlzö¿ÏÐþûɳ­‡üOwògý±a>Ö36uK˜ÿò‰ùƾØÓiåsØMzæ¾ýÙ8c ŒeRòúÑMÙ<¨žT¡>6qâ%Zê»&æQ<¿1/)r¯ÌIœ0í†õ¢DFÐf0r¡'RÄÜ¥hÂödNZ™ù‰’Z®ëtû” Ê¥KøS®a£‚L U(Q?=Û`ƒ"÷’J%Ó}ÕÅl2‚Ž9ÿbÏðQ¿˜0Qfºpà<_ã»Î¨×§\»b1¯!§Uìª-!]ÑP(·•·Òâ“{eq+i7?°5|+g6ÁaP"_tpE$rU ÌXî¦Ó7 ³}üêôm­Õ0›mó¤uüSs¿±ojmx.”U‚,™Ë<~Eɲ~lí—ÍÆ»“¦³:nakÍÓƒf^7êgû ô%T=:>5š‡ÍSh÷ô˜ú­¡Ù9´È“Uƶ|‰²"ÒdÁ ö¡å£æÑ+Œ{Ú8lV¡cxg6~‚³ýCîBoØ\í ¦Ñšõã“Ÿ[Í×oNÍ7Çdbö²㫽õã£Ó<–aº­SUûm³Ý(›µVÚ™¯ZLJ4S„.T:¦v êQƒBÈûŠàóY»¡Ú4÷µh®•Å\ey\äuÃX‡ÙSVysNVyó\&O%ó÷`Îyl ÚjCu ¯µGÁ8Ðà ñ7s1-çd6 ìÅúØ£þÚÄ›^rï7Æ#‘û[çåï,„] zzOwÚƒú"§'ŽDd뽉ÎÚ§µú¾DâÆ#3Ô¯ÿ;»Deü,=—IBÍ`–PüDÐ< gsE q9wSN|>à9gL°w0k¸ÌJ]Õ6?¯¨'Îþϱò vÏù¿õ¥°FÙüÿv¶ž={ðÿ»'ëk»´þÿÉÆÖÿºõ§­Í­Íÿ¿oÉÿocÆÖÍ!àAx„€ÛXÏ|aO»W."•‰Ín ×À‘B`Ü[æñMí§F'©ŽôŸùë_CÕFθƒ&Z‘?giZ^a• 6”oÁì&ëHùUšÚkòÖJÔ4[½Þ¤H2œôGÔs0É€5(Ëç‘}Ï8ºß ­`·Ù÷ÏàÃkV¶÷œƒÊ~kâÕÄžªí?§„JºÄ’žRŽ¹OK-®K¾¥©ÅPiÓ\óÁ´Q"ï’•2.„{Þ…`Pcý‹ü`6oÐóZ¤ˆi.0² °40³CEá™ P‘ØåžBEõüP!3ðL0¡÷"4¸EàfïŽÕ»¿§ÆêyÀPú¢ÔØG*Ó²Á0‚,—:¤û‚¨/Ö×±ý@MCkw µ9¨ñžCM¡½¥Â, ÜÑç=‡šDŽw´$$›fÙÙ1yÐn‘?–_JÒ“D+@žÃ/xسrÆ8 ßBäâoÅ!¾ àï”!áp?°„¹qÃr ›[ÒËß;¥ëË‚®gm ¨ôNа¯Ë¥mÜåadßø¾-`3óRÙa{§lU$hµÛñ£ãÎþ~縵ß@•*‹KùžEjêõ².û:,A| R“¤¤ŠÈªY»M-¨ÛZ"lt«ÿók§³é¥Ã,ìB X:-t4ÕUЕϚJ9":Nå ÈÐ7Ç/íRµÌùõË·½d <Æ|^ “9ÌK©!™ZAœC5œM)¼ ¼âÛñ‹(iðÍBªßlJßùÄ÷ÛÍ:‹j7‹Rwžòífœ^u›Ai;‡oý–»:…j6—R6³²gĺ0(MZ<šBfX& ¢ÁÒa’€†îLbU(K‡H,’ºWðˆ“ËoáÐD#±¬ÐÈÂr,Sý™Zñ™ó.hå¦çïÒª9TÁå?—QJ·oyJ3+Ù– ¹"Å’`·:¸8ô2éÐr£¿eÍ7Â…YÕKZ¾b¹p[“±<õbÅb:ÙâJÚ`i™ýÜŠÄt*ÄÛÅ­Í>­ªÝí“Õƒg—™x¶ƒ %8ý;͹ø¦¸Ø#¢7‘‚ËòhÎÈãF9Rß,’›v©`GÔÇE D2iV9Rβ/⧑ä±h3ax êNý3L6´öM¦ëŒÜ©©ßNaímÏç•D ·lž[“Ißž˜×ÎlÐC‡™ ì‹ë–M·?êÚä½@ç¾+ ôìuc÷„‡¤hîܾq0gð´jæÿ#š[HOžãäÇ.j`×Î?r)V”öí’—SŒšÎ° GÀ‡'< qòfÅ_„O|ò‘‰‚Yxê,;!<§z­ÝyYk7ö;ǵýúrßâ~;£çˆ¦·‹æd+%l†wÍWóú ;Ày5Þ4ê§WµƒvcíÏs#ëQßÕ•²zŠèÓ*‹K¥%íÿåµD‚<—¢y–MÎS™ÃøxS]Ó‹Åno¹ýý÷Ôú¾< VJå9ú™ÑYŠCMxì>jàýPçEöaë·gçînéåÿè«ŸžŒ4H”ç/õ}^â?úÒ.¤â “½H]ëEçsg‚D™ ;7·šJª'2M'‚Ææ_ZE…iLÖ$Q‘¹ê.•p]à+ h¤w ”Ð.´’T¯¾æR ÿøæM$v O-qì©Çœò±W\ÚçeAÝw’æ󈸯ø¼ E]6Ũqc‘B®u‹¾Tš qÿv û.¥ìºu ù±Áüå‹UAµ\Ü ‘àÍêRizppÕà‘v?ÇÜ®g€Î·aü6ÃŒE²!q\, aÍæãÄbä–Ä¥G9,æB”aE)‘˃Œ3­Õ£âL¨,'"ÖY€E\œÖ4’¦¦<ËÉø±œ¢¿Ú~sŠæ)(ÙÜ#~ÿ÷Z>ÙJþ »…¦8Ðù”âyX¬4XXîÀû‡£ÄÄqqz–"§rSG;óÀý_¹¯mãîÖLG€¡ZïMüÏ«¡1cãbÔÏÍM/þëγ?Áקۛñ?â>Äÿ|ˆÿùÿó?<þ'%‰Êþ3¡Ê‚> -G_b³MñÇÍxÜ_°‰ìñ@C-(ñ&ô%ÄU†Jè¶T ó¸•`¡)à–äümöE¤.5E…¥ ͱZ¥lk <©z’+xJ›·ã9 f v˜ Œ‰Ä©pQzˆäŠzWIçBžÔB¤ùÜ ÷iÜË“÷WøŽ{^ùûzR]Ïç #Þÿ<©X&HÛr<— ½'z”-`‘^ ·°ÌA«îÀ".{W e üw6)¾xe‹7—\™­å8À§aåÒ˜¥Fÿ\àtgdwç;ŧ@Ísý»—wäóþ¼›ãŸÁëû¶›WhËóó®(÷’›Òici(7wØÀ;Á¾é½ío¦Y¥\‘>ïŠgZ†#~jxgrDù̶‹ C9lž“xª[ÎbJ©åÁe¾­5µ›Iï¼´P‘‘­Í î™Xg®J9RQœNÑ<_‘Œü9Ô¥þLÈ\=å-¯e<“±ü Ÿ©Á]J Ä´ÊÞìjÞL ÞÅã}Æ2m´9š¯¨Ë¤À]<ÖçmÍ8ƒš6ƒ‚vÑ8Ÿ·5ÛÔjØô Øc|ÞÞNž¯fÍ£`ͪÇYƒ. ÄLAÍ"›˜/", ŽxI`ÙàÈrë[#N;²l`dø­@#w/ÿ”¤`—ˆ ÌÄU™i•˜·É3ó™KÍ´¥TY.¦SË}ó¢¼c™Uk¶d e—–¶Å)Ý€ˢË‹êr†¼¼—Q•¸\x¥g– ²Å9ˆ¥© ³+ —¦2 Ó³îy•‚©Ô· †ÛšyJµ_R¨NU ÁÉß+Ä¢ãtú[‹Éj`>û4?H§*3بAÎ © ¦_ˆÆ ùˆèœYa9?ŒYhâ©ðn†;ƒ´€NÇÌ[î…Xçø(N ÐIᜢ5ÔYÌ’ÿ;væĹÃuO`–¥Ž Ãx ëœ3’gH‡J;<1²fŠ(ž1è!?ÌõO`­3ìŽÐtæð¼Ã-”"TX¸å´þ² RÂÃbÆs§!ÄîˆP&Ñ÷yT2)Žå"$2E¤O ÁFúŒ;óâ|FóäÙy´tÀɲbº,§>*ÔççÔ/ô~úœ”#E<Ð{ÅH~ƒ}²„ ¡÷k«¤æHÓ…¨Ñ$Ó ûâ»þcöÁ"š¹¹‘F½R C%Íø-žW»etÞTÂ>ïØRê¿#Œz%æék" †¿¢%zI 0nl>æI[Ô+7öø1§ PéO;ÜTðŽ»r‹*šÖóc¸EAz07Š]\©ÌAìr¯V† v¡eYúF›~/ó6[L§‘ûÐçŠ" ¢e¢ˆü!DóÉ|Ds€"åÎ=4<÷èÈg!(d7Tž·"U\´eóôß"Äh^Üœe9ï3gAoùðò¢±Eƒä9$ù"‹&¢Ì¥ q©2[bTQ _ý§œú;‹=š…¦ç‰<EÉçbðPÜÑ?:ÿVáIó0+ùÔ²óc“1ØÌâÞ}ÓLûiñ!ÒâC¤Å‡H‹ß0Ò¢{û c¨Å¤: Úä'5=ÿŠˆjó×4 ES4ª¹X¼En"2à"J$Œ\D·yIšÌ­Ä\L½$ÐoµC"uOij,=îbž%+e\ˆθ‰õ“|rÓ‚Ù¼=@Ïk1kL¹t°LôìL‡ž2@%WÆ»ƒJ:ßÞÄ&"]|ç׸¯Iãÿ;g£…oçV¸¿§&ÑGxî@â]…sRåR‡ôÑA}Ù°~¢§Ðm@-Ò|ý –9Àн‚Z„’| 0K·Œ¡ÙîÔ w´lÂÒÀ,;;¶¯æT_JÒ³Ô‹ö¬œñ|ç4{®ï21@þ8w… 2xøÞ>tsKzÙ‚5Þ]_tSZÝ/ çwG9½£õ­63/•+lãݱUËðÆNô,RSŽÐ×a âSKÒD®ë6´ nk‰°™oÉÊ gSg/-ì_tssb8&Wš¯¨ŽV?g㣞ÆqŒîÒ9&Ce¾Þó¶×4 Y~0Çô0/¥†dj rÝq6­ñâš6¦Ä<(¥ÐúeÓ /ÕñöfE÷›Eë»hdÇÛ›qzÝn­î‚ÑosW§ÐÝæÒÚfÖ-‚Xe¦ÐWÑm¤*‡I‚ì°t˜dŠÓô a«cY:D2Ä•û†ðˆÜoáФ}– ,,Ç2õ£©5£·÷1ûLÏߥՃ.¨£Ë.óF1¼­SšY ·lÈå)–»%ÐÁÅ¡—IÉ–ýåŒWwK¸0«~rÉ@ËÀW,nK`2–§Ì¡y\^ ÄœÐÎÀìçÖ4¦Ó1Þ6(nmöiu‰Ia!½ ^ÚZ¡„2ÐA\$Ÿp)¸¬ùÁ!½rq#Ž霰…^É´ƒLÛ8 #2;Tç¿ Ï?Rβ/⧑äéã`i‹¿Ã.ÆOÈ€;m”MžÍ¨ú¿#bdnÔ;fdèLf[òy1ÿ–·Þ9#G&¡…”˜vÁÃ'±¦ˆ‡3’‘Æ\á$®<ËV Ï)KÉ;ØPC‰¶Ó:-&‰KŠ¥èNDÝ5Mäæ’Ò¤ˆ‰‹ÑÑ%uôQ2öTÌ )ÃÔçáìRÂ(ÆÈŒ³á‚y¡%ï?.XfxÉû€ ò’–&ïûùMvÌ’MÞ‡M“ž“M·Dt3í?ôÎøÚ )çFÔŠ-vr56|n%^TäɹӉ`r/­š-1ú¤Vd®2(!]D@Œ½`G‰A¨"šK‘RÄ Ô ÆN aàijåS9äc/ãCQæ†úü˜_‘0ŸÇ2Ì z[,sÔ³Ö-Cä³ðúÜƾ›¶-Ç®[P_’äŠL ¨åâŽüÁ)9¦ùÂSæ‚GÚýœ=Be¢`…A‘Ç;E¬ÌQ°–#|‹@•ùw¦u½s´ íåDÚ‹Æ« ‘ñX¸ä‹X™ŒK—²28È% ‰Q+u4ö…î,ve6ÊŸ'ze$½ŸÝãWþañû· b™­É©žÇ2„Øþ³Vùî£YÆ!á‡p–á,ÂY>„³ü†á,û£¬Á,ãk,èhßpòE¿œ_;LÆò­ ǪŒ'x>£šøaÞJ\ÊùPIreýK©tš_~éñ(³/T)øSx'ÔNò&N\ó¶À›Ü^Öhzi ˜èš«¤†F®è“wtÞÇ Dz Ï+!‘Æ+9q[…ïþæ¿Ÿ§#Ñ[yÎ â=–sÑ„åáûô±ó#µ,x<ÑýhÙ°Š4x¿eXetO`¡È^Ró¡•1zÜ=UØôó@•-^Ù|Hee¡–ã‚GKEF–92ÿqÎÆÃÎ÷–ž„çúý.ëŒçyç=ƒ'ðíÂ4§ü•-JäÝÐæåÀ4¥%ý’Ðkîsw€iÓû]ß*83rA¹"BÞ C´ oì´ N/Ñ䈙 ú ‹69Ì:8¦ÛÌBÚ¤¥Ád¾))6›Eû»´(Q͉û˜T%VÁëSÛf‹ñ8?´cÔˆ–Ø1iÚóTˆ·»\±üÂò:¦…t)%üRª`3+_³¨]ã;Ä´1 ’a3W–E­ºxøÆÛ™mzåizµé¢aog¦i•£©Õ¢ †k¼­Ý;Wù™Cí™QÙ’U.¾L©¢Z˜ËÛ/ ‰X~ÉÈ1é›@"F…±d8dóöM -!/ýX¤ ;–ƒôlÂòŒ)U‹·z1ë!Kˉ¥S$.¤îÊ{òò ¼s˜Q¡µ\xefô—±…iÙ¢0Ë ¯Ê‰Ör~»—MÁ·TP¥æ– ­…Ùƒe)ð2«î–?0ŒS3â9Uui”t· ‚[šu:e\RðDù=Á¯X‰=TÑa}MǪ VŸË͘(KE3b|sâöÉr醖ŽÑx<"Db6ÎèœqÔš~å㟼éƒ9©^„ ž‘ÆÓ§ Cc$¤Üýïˆx˜ë\çŽv8Z)V3)]þ¥ÌÌ0þ§Â€ hÙ/EÃèótÀç:ŒÆs½é×>8“´¡ —·?2DJï|Ïž/!~зtd+ÐΡYI±õò¬±=Ty0fKÏ‹;ÉgeRA%ûψªRÞ¤ƒ÷æð.+†à7=¼ùPzŠ°ß€E»»¥_b0Àoºúiy»t! <¹mþRß÷%þ£/íʧ¹üT¡Âø%“&3vÇæT Eð›3EÍ9®t*žÄÀ}ªÀåDB˜®Ðç@2‰qxBMÍE)‚õ©b1ÃŽnšpoªtÊ‘¦rÌuQ|x¾\žß(¾ÉDyn|§˜B™£;å\£ ±‚«±Ü5?"UÆ}µ¬Ÿ÷lç Àœåa‚ü¡÷ò¿|a÷2C!ÝŽÍp/4íè8=AÌ7Q)Ï‚Üô·£—ÅfX©;E°PU.ôºhà¼iF¾ yIØo)!óü\¢¬”,ÏC>c|gAðÒSÝ<ð"híE‡ùš *µ«øüÐ^á°^þˆiâMÍ R‘>aœ¾+dæÇ?Éû$ÝêE 4ØÒGé\®Ã¡©üKxß–îºd9sÃN-r*C¸©¼¡¦¢ÂL%‡˜J/µph©Ä°Ró‚%„œI %•2ÈQzOðá£"üD÷IŽh~€tЋPûLJˆÊ¹ùñ;R‡…š±dÑJ2Â>Cœ’¹! 2íŽù±TRîܲgžs—+ÌSŠàFOiþÐNYK¾N©g<×eã”"„Sdø¦ ^´OoªP r“ß"TS6t—rîÙ¥D%™QÝ¢á˜âB1-†éVC0¥ ¿”NH »¹tŽÞ…WšOÝò„UJR)&œÒ=Âß*tRz2œY]5?\RT¨¤{´&wé!$ÒCH¤‡H!‘îUH¤žGÂîd‹Œ”XiA“ÑĶcuꢖÐ˦jÃG•dý\Á“Te=†’zEâÔGý¾;qÔ·X)œ’¼x¾ÝFˆÔs¤ª²ô K¹Ö­”u5RøT%7ä`•Öæ-B{n“YÖ¤h¢›OJt”2¹b6Ý%dÒ9v%·éå•¢Êý…J§°y;.|Ï3¿Æ}>A‰eó‡ï]–—°,›h¤~´6ÌH -åot‘¶¥wºÌ¡îè"”ÅË\*àe Wsß@6W»3Èe‹µ’ p9˜¶å¸á¥c Ó¥¥F¨Zèìgf¢ç»î¥Bãs}Õ–‹ò±º;äÁÃí.@œ_<Ìçê.©þÒ@œÒ`x©¨9w€ž;ÃÒé}ïºÙÙ­\Ѳî’óZ†;cÈg’³rDÒʺ˸rØ&óe· ¤EUdË„Ï|›GÑrFøÒB>Å´7'לZI*î â:ut®xÅv0HWÌè–«kR¨Lo}“ø‘åÇñÊøRzp¦×@çÑ=gÔ:/ê+i¬i·ç‚*¶0£Vyñ0`·9óLºãLZãEC„Ýæ¬3膳h… v»;<î7ŸÖ7»úh!|»8@3ņ‰i$ıÀ$ ËL¦ø'ß0ñJ™åƒ%C¤¥o ”X!ÿ6ÎPÚ Bs@’‰1Yª~5½fõöƒžå8‘XÁÔzÔEÕ{ Ó¼‘¿nïÐfWà-|yäepTr ̦ŸËsÆ‘º5ü˜Y¿¹lÈea=– ¼eð!KÔ_æÑ\./RY^gòk*Sê(o·ԺȤhnZ‘ob½TÒñ‹ñì#.JD#i˜±ùqß´‚±ÃŽfZÑÔ#MåXò(.|çÇŠCJŒi›$Ì%=ðÓҷ‚lzbp–HCò9¡ZüšõÔ†Þÿ¡è@¹Ó…dêUŽ‰b¶¬%ÎÂ.¤E¯‹™Xi6Ex»Xô0?ÌuÞMdÓ3m‘ˆ‰¥ˆ€w‹;)]¨ ¯½´®‰Æbуƒ¹Ó BwJ%“Éü|™[nQú˜"ÆžÉF‡Ú‹?ó"îÅ1òùX¸´ Ê…%²£¿ÔÇ?&Rßý=þKˆâw_Žnª‘"´ß·g"ïzc,'à}ÙxÐtA|BjÚðGÚÿ ¿˜Ænn˜A½ÜÑç@3ioç׺E… œ?¥(2žŒ©õb‰á õ2óu6 AÓ¢JB¿…úJŒÚÕ`4”"¡^2~I£OaO¯~à)× þb/>òáðŸ4+úsƒ¹ÂâËeŽ¶Ð fˆ±P·´ çÇ>˵ Õ,€&r…XŒײ‘Jþ¸‹‹Ý|Qs%õöΚ1 ÑÁ°"à‘Ö6;1~HÚHYË“¾E,ÇE0w¶Eüx;ÊË‹µ þ&éñÀÉ r"]JDÈÐ0—.&†‰ôa°?æù¿³€’Yé|žð’ÑÔ= 6ùÂáß*e^f%¯Þv~Ê0Þúƒ.é݇³ŒÅ¥zø“çÏ nMa¿ÛqÆnåYu§ºµîNºëÞËõK{dO¬AÿW»bù¿V§öp ûÕNÙÇüyº³ƒÿn>{²¡ÿ ¿66¶6¶ÿ´¹µ½½ñlûÙÎÓÍ?mlmn?Ýþ“ù‡äÿQÿþAþ<ƒ}û ö!ì7 û®Ýüßp,psíø´ž‰ç:&¼SŒ.žÛK ;”ÀÃE&‚›SÞð 5<¶î]ýô瓆äèÄSz–ITqâ6J"O>_G{{É%Ì6‘§N_Š ð˜~“$WZÚê,¾@óbž,eÒÜA'Ž2…lÓu¤”;o™Bâî7_¦y‘•–²Li$ÔÄQÎÕ=Æt¡Jž·Dò¢ ´àò$G[ÊâÌ×ÎÙ@Éö¡±["hå1ÿìX½ûB}£-éÈ̱ÄK_öõÈ´ËX…Å 6jbNp/L@rc¨À=Ib’ˆ±2¨®«·$²äk®E:íOî&/öó@å`ô’°¡ñ­–ý&þI§2«e\,½öÙÇ™™¶tbTÆD¢3ž~ìýMæ™.âfTÍÈh›±¿åÓÄ׌Þa·–¸rßv¯&FÓŒëIEÒLƒxóZ~Þ¶L­E'¸ªºP$é|зw¤ãÁ|´KðH1zPKù¹ˆTLA¼Óý"àXʉNãV“@Œo ‘Qzn a"w@a¢[˜o¢÷ÓG ¸½à#Ž·Ã‹f ÄšM54gÎ÷VH‡/#ŽI)§N% Q˜ 4ÿÙYÐËei')CÐÏe*+å]"¨rž„«¢,¬Ý¼`8¹QR”¾ýîñSú`¨K†QZ½|0å¤âË{:†)D´[IÄJ%µå·©û&“_ê|ç‡nˆho3Ù¨–g›6Ó1›zèºeþ›é֦C>ÕúfjB¶é£;K#_©a’"ÉP:ö1XÒ¢ãÍ@tÜ%aáÔ`ɧ„HkÞè,w¸©ñ:KâSƒ#ĦfO²Ÿ›<Ífæ8?sø˜ ÇÅϾ,ÂgB$©7I˜1^©äÛ4±RÄ,_&,“v3å •’ÅÉŠtòl²¬ š/äT<3“vfYµ›Y¯Ê63Ü•-‹ânúcˆ›ÙÈmÖ«•Í ·dË"ž¹f˜ûzl3õýØr(a®Ùå¼ÛL+v-…²åÜ™Y¯Ä6çd—‹Ä;™¤÷ lt"º ùlHëÖæ–šž3·9áÿ¿ÉÜRr+sf¦ó{2¯tÅÜÍay9äs9iÖn]ÆO§èßœÁ~®´Ÿ~C,¢½Þü&LzŽc²˜‚AeÖŒ, J9HÀ¢pʯ·Þü²KvÄ´V1ðdV$-B9hí-)ô7³jô7‰“œ²©¹Íå¨ò7¿Å´—6ÓìJ|wv~«J|l?WÅbA9_i/L‚Kk•Í4]uyú{ê+•ÒKf……__Ÿw§º§îRa\½dVˆøUõy rWZ{ê,¯ç•Ë ]ášw¢°»pŸ¢Še?"J‡šï|Ü¡®^?‘©·F:7ƒn~4r·jzý¸¦ÝB©ˆxzµüæ¶5ôØ×|€d„AþigÒ?øxˆ4¢@Üš‹Üàp0i˜9?Éͤ’OsQz‹3̧¾÷Ds1’x‹³Ë£¾÷Q9s!:w«;3“ú^u“^}OH)½”ž‹Ž×˜†|6¤uksKÍÏ™[F•ÂÌ-%3gf™ô’w2¯tœÆÜ͘^K–|ÞŽú~iÒ}õ}x‡çöÓoˆÜªéL"ÝÒÓùŽÉjéÅa”Y1²$(å ‹Â)§~:‹Xüÿ³÷îmÛÈÂhýüW`ÝÛÖjeÙ’é&Û=G±•Dßúµ–Ò¤gw.%Ñ67’¨%¥Xîãþíwf’à (ÇM™³§‰H ƒ™Á<Ê2LbLÅÍ÷k£GÛ˜T† œµ›0ß'j¿¹¢e‰vìÌ*K›%˜ï=÷±§]ÚLUÍ÷˜8|i™°yV©p«œ(ðÆdi~~˜¾K-ªF’‚¤`=K{ÄV™& ©A¤<_dÙT¢F¤Î”t[2e™#¤å@§cUÀö¦ÿu9©[8–Óxµ÷¶¬ÕTÐæ½^óTxhWK?˜#¤š0¯Ô)©GLBkù"Ð ±! PõP¼²MÕ$²ÀT Ö- È45{Í•‚?%s˜©¯ë®¥åÊl9ikª—ÈKUj“ ©¦u¦äŠJY¥ÇG¥8meªØ¤²Y‘â´´S¡‰ié>9{-5Ô´àÆÓUë Í'›«MI‹-ç$gµÙ¶£ c‹FLûW5[àHáPðQž%ŒA£Lù:xŸH}ÞŠ©ÈcAWJb"4Ï”­ƒ÷e@¦#XCó ¹Ú{[TêB5!7M¦/ËYAZô™'OÛN†\&ÌøŒÒ&£~dÙŽOσ1ƒ}§Ã¨Î¯K1U¾I‡PUž)¾´#=k‘•Îðºl6YŽè,ñÛ„ X‚àœH95ƒ"÷P0³‰JA¸Ô"1mÁ²È|2™ÚŒtXO‘9…eËb;*_ ÔÙ^ºrlùë’É`•f£Ãms„ãÕ†¤ã•’x¼úCËÇÿ«&¯Ôä•’„¼Ê‘W92òJGÄZiJÉ«<1y•#'kC§#)¯²EåU¦¬¬ ™º´¼Ê—WYòrÕT˜WŠ"ó*S–ZeŸc«j¥uv­”d¾|@3{ êܼ,@S%,0U¥›²€L;ñ³×\é˜_)‰Ñ«ÒäèU† ½*G’^é‰Ò+ Yz¥-|æј‚ð©IqÚÂg±Ie³"Åii1¦BÓ’HsöZ¾@ª·ñtìBóÉæÄjSÒbË9R6¯i¿‡ #^# ÔOMcfÍn'¦ë6DÕ¯/ª?ŸîÏÄ {jöÜÝ}Ö8l´ö\g´<Ü3ìÁGÓq-{Ö¸+4Æ>ü9><Ä¿›ÏŽöå¿ñÏÁá³ã/š­ƒƒýgÏáyóøè¨ùû]!RLÆÿûwògïÛ-ö-;±çŽu{·`;£kÁšìÂÙó~b.»WÆèƒáŒÙ©ùÑœØs*íw‚*ãì¡ÎÎW èû¹2©å"©0Ëew¦cØ­cÌæ¸ÎnÓÄŠ£;ù5ëXÃ:`s .øÀ. y3ØàÁþ¨< ôäÚ7‹{dèFf¸®=² è´áÑ…z¸%×e;XPp»'¾Ø®Ñ8cÓ˜`‡Xx^{oÙ½µ¸³— ¬Ï±p¬vCÅ'&K*)轞XSK ‚Ÿª\ìº^º0¸Î¦6ðBüÛ¤ù͗ÉåÞÕÙØÂÞ‡ËôÛ¿¤1EoÝNû;ï\Ÿ¼Ÿí—ݳnÿ§:öõªÛ¿Àž_]^³6»j_÷»'oÏÚ×ìêíõÕe¯@œBÏÝ‹Wè Ù9ï\ô00nl /{9#µ…ˆl âÅh1yhÈ¢Rð܆}ö;û8º8ÄØl9Â?ŸS¸ÙÈ›ìÎZ… ’nO­™íl‹¯Øîx6rìm67œ2ºýÚ Ø‹æ,Ô#Á-¶!R.¾Ÿ;&ZÝ€5FF±\ª€C5Táó¦9Ç)ÈP¢½»°`—ýl:6°;„àp`,À,îyeeâè3óÞ‡€w%Á Šƒ…f læ ®“¥ÉYìÔv0°1„µ]y#±Éк½Æ¶ÖÈ4 ·a\BoÅð ñÖj,Fwл±@fÌëƺ]Ï0F„ßëNûô¼Óúú2c„í´;8oÿ_ Ðg‰¯ºðê0ùÕÉõ%k¡ù‡Ä¤ÏCtUÿnœcbýlî ™ÝMuÅÀLùïàYóèÙÿA<þb¿… *ùïËÍf%ÿUò_%ÿUòßå?,ùì vÉv† IŒnkŠEŠWN¹Ë¥î’¿Éµa'‚’p¹kÍüwúÁ=ïræZ·0ÊÞ·ßîa{ïÆ7öÜžŒ `)\¶Æ>±n@v;ïbXÔô@ÌÀGpËKƒË]I~øÁk‘r›Ž‰Ìû‡,èrt%šX(4gÍbuB7°l%®\¬€ûO¥{Œ Yç’N,Éž³~±ŠìO{ýb5Ù7°~*åÕ³`ÌMÿ•<¬¸ÓX;~‰´Ñ•+kÝäû®Í¬Z¼‚žÞžËNA–F)x)¦µÛŒñïâ„“î½6µÉŒqÑÕÒ^(5ÚÔò”´2i‹RpÖ=¤Š2»H²CýK‘ùi8à¥.kÙ‡W"3,î)¸&d” - td¤átúâ§cÝzB´à`°6)¬K iÉJ´A#¯g2±r£äM÷Q"{x ¢HÎ5º>‹XŸ4Æé!”Ò„D²Pq­ñÎd7–ã.ØÂy@û™5Oè–„…[4˘-\²2šÎÔ7l÷6#ÛqLwŽ&72½EŒ~0ÊÔšYSëg“A×Øxh8Že:n#ÓðQÌä‘TÁ\¦Ö(]H¤›Û\_ðÀ{§€Æ’è3ßý=>˜ž#|†)§%}f†—¥ŒãÇ™)0å¢Ñ<¿Yô©åd\=ù|áRœ¡†ÂŠB<–÷TXäzüIŒÑÉåÄ‹BO¸ÊÆg­°ø¡"N¤¿ÇD;]%¦)ýLÞÈìc€63{•P¡Gž}BøÝf枤÷È3DzmŠäsBÞÖ—Au’ýk™±rXc~<ª[T HU±æhðýÜh΢›%=ºó1·ŽFî”Ëš¥¢y3¢—Ÿ [gÕ5*S)3üg\ú:¯òp•ù¢Z°2J"6ʲVHï#Eù «Â!u¥¢¾’¹'ÃÒ ½/2 ƒ6O·øoË€JYÙçÈMaÜÞËrV0_Q÷úÌÑΡY-õlŽf|Fi“QM„ÆùÒE.ŒéBCŒÊoåÀ˜¦3d@¨[|)"iæ"«ÄVJÐe³Éu+ ÇømÂ\«žpåÔtŠÜC@MéÊ!ªÌš»HLWY*4ŸLf£6#ÖSdN:ºMö¾Êª¶«¿É45¶"SÉd³J³Ñá¹Ù™Wmgr´_³l'Ÿ³ç€—ÎÄSÁSæÚ%€—&Ѥ§(Á”ZÊIž±ª*GwX&,E:–i|›­/'’JMƒûç±v5A2“Šò…HšÒ L%‹(MFƒ¹˜NX†,²{rG­¤)ÇàÏ],î©2 Vš-ÿ®6"¯T$àU%ç‹Àÿ«$¯”eà•Š¼Ê‘‚WÙbðJC¢Zé «Ix•- ëB¦! ¯2¥áU–8¬ •²@¼Ê’ˆW"±þ æ Å+5©x•%=­2²U²µÒ9¼V*^.Œéì=Fež^Œi²M„ŠòL9ð¥ô™‹¬rº¯T$åUY¢ò*]V^•",¯´¤å•º¸¼Ò2sˆ*_ÈÔ#1]!³Ð|2™ÚŒtXO‘9éHžÙû*WðÔÚdš2t‘©d²Y¥ÙèðÜlAÀ=ÛÙÃvïò!›šÆÌšÝNL×mø…¹°2ù‰_ì~gTc­ýýƒÝÖ~³ÉÞ˜÷s±Ø½2F gÌNÍæÄžS°:guvÖ¸òÊÖ_™ÎÔr]Ëž1Ëew¦cØ­cÌæ¸ÎnÓĺ`ê­YÇJ_Л›Ž ØÃ…a!xÌ`#€û£"bГkß,îqèrb¸®=² èëÑÉ«¥ƒ”ì²,;¶Ý_l×hœ±iL°C,O¯½·ìÞZÜÙËæ¿_8Ö»¡ ï“%ó^O¬©%ÁÏ U.ö]/]˜ \gSVÿ6i~óåpb¹wu6¶°÷ár]|82gø_.æš:±L¿rš#5ÃæˆÜ…@ÕI»¿³§áùXÕÍÒ™ÁÀ&}6¶}4î¿ÍÑŸà7ödbßóJl@C85÷¹XÅ>¼7†öG“¦Åébf/j ®È½¸ì³³îy·ýö/iLÑ[·ÓÃþÎ;×'oàgûe÷¬Ûÿ©Ž}½êö/°çW—׬ͮÚ×ýîÉÛ³ö5»z{}uÙë§ÐóE÷âzMuÎ;ý ÏXçGøÁzoÚgg8v×~ Ó¸F@ÙÉåÕO×Ý×oúìÍåÙi¾ì|í—g>Ìîä¬Ý=¯³Óöyûu‡¾º„Žh’Ø’ƒÉÞ½éàSµ ÿ;éw//p>'—ýkøY‡é^÷ý¯ßu{8Я»=ÄÌ«ëËsš)b>º¤~àÓ‹ï1^ h‚¿ßö:~Ÿì´Ó¥ûu?sõÚã"s_2÷è ¦Ã²!œAc†û:¥‚pŠÉ€÷—Rž1O^J&ÁŽàW±Ìø"Ù¨@$Yø‹b…¢ù·5+s±RR©è tdJ¼™ð)l§Œ›X¹%oí2 ¶”¶|¥®`¬6ß&Q¥Ð^&” ùR†N¬¹—·Ž™¥öžæ:Æ*émbUÊâeB™ ž2pV©ð¬O6½‚å­_R]ð’W/¿Èw…eǤ§ÒLjçŒ/~7'`B­æÒ7]NEî,øôLk­6·L¥­PÚâ]µ±ÂL0’£À¦Ê5î}Ò—·üÃ-‘I¿£Z—2ŠÈR‹2Øp´TqU‘án=-šH0­MkSDZ@œAh$‚I#VEF‡,¢±ee²‹G"Žä,5볌HdœîÓ+OIä˜á¦VöÎd7–ã.ØÂy@Kœ5OL²¦†[4˘-\²WšÎÔ7‘ùV[6²Çtçh¼##^Äzâ÷£L­™5µ~6t‡†ãX¦ã6²-(m'I•èÒʦÒ2'dÎ+"š¤×MõIUÏ5CŒ§ç›‘e*Ï9C·hv¢ø\q»Œf9ݺXÇ>ó¤I#fÅY‹:J$uËOq›OJ%‚4²ŽíçIÓHÌBôThDݪ¤¯ÝFjÊ£‰ÏŽÖ§’Ö^YFŽ¨Mº‰Ïäa°¬¯[F0UÉv?ËÜ ™Þq™'cþ<< {žjž‰I_&:)¦6ü”sTñsL¦¸ËcZ»OK«™^“i#ù”*üº¨óÚïMv…l9YÇO9x¿Ô çµ!wºûå]—Ð>ÅÒ$ú©å³h‡Zõñ¤ÖŠ *JrGº7Ø:è(e÷«8øeÜBA¢oܦP âF÷ø(HpFÝòÝVúqGÏÍ퀟Ð2äVô”z&²<ž™ï¤­Æ/Õü´•ŒD:‡B®·sñ½“îý¸;IÃoºlDéž¼%¢ªàÁ“qé¦#æyifI땤/‹?©»¯—Œ#Õƒ»|4<ÅËÈa™‹Cunƒ(I  % ¯@6ËD£Û'™|©óÍÏk™Ð_SÅÏXµðTRÿj€bjju#ASmcå×Ê:tQ¡z*s‘|)ãD¡î”šø¨†Uv\¨>F>VFK1#„ª'U~]Ñôvë"D˜”Ñ‘[:(U<Ñß7 2~)Ž9Fc»d—Ò‘‡µ‰2‘ÎÞ®*eë²–bÄ£ço”SNSÕ”BT bƒ.Ó)Bdº(ÊÇJP=#]˜Q™®u¢©{­ÖÔ¸W+ëÄÍ«å“}Üê^Ã45nÔÊ:< Í°ðUZSù.­œ“°Ðì ^¢5UÕ®RN¶‚”©{}–Wg*‘ïhiïbt&»Ê-C’Å´667eY8gn9u2>ÉÜ¥•œ™eV×ù$óR“(r‰1½êK9Çg9ŧ6®ã«úóëOåjû걎õºùI„ôÛd=ÿš8Ò¶Œ”„¥GÀºx*n·n~ÝEŸ1­eÕ_=Ú†¤r0Tà¬ÝA¿©kÑ_«F“"f•¥ÍrLùÍO1íÒfªoÄÇjW›4⧔—Lm–Už:Çh÷$N«R:ú#˜òÓ 'fµÔEKØt¿&fÏ Ÿ^0«¥.rÂü5‘óXfý´z¤éítÑ"[d×DÊ£÷S l¦6ÓßC¾½uí ôˆ&þ„ª®Êl¦á$™ôËa9kèO,Ì©Æ‚ X‚a¿f´is¿WÁ37šè(Zvl¢¢bDÏn¶îé­€™ˆd¤"$†m-ÃrôfëÁœa±kð9ÊÖ;I78»"ס‘­u&n”2µ®üaÔ¯ˆ?©kÿz"yº%V¥:yÓÚØÜ”%ꜹiš*enŠNÎÌ´ì2/5ù#—Õ­oÅŽÏÍ\ ”f5иˆSxË:A6yki‚¥¼‹m“5ÌÝëãHÛÊR– ëâ© Ý[G….ËàYˆ1¿X=Úæ¨r0Tà¬Ýĵ@¢Nœ+Z–hOÁ¬²´Yµ€§î>ö´K›©êµf°ßDÚ« Xwrµ±p«BáçÇ>¿´V_çÕ #TAª“Ë©§sÕHåîø~H®Ë°Ä*‘+RgJzp¤ru2tÉµÇ B§cUqO†-©JMAÈÔ­réò´•g)¼š š¿×kžºíjé‡xj‘yÿuê”Ô£6¡µ‚,’h†ˆ‘¨z8`Y€¦jY`ª —dš<›½æJ¨ˆ9ÌtÝÚdq¶œ´5תN–EH5­3%ÿ¸PTàòh,³ W!ŠÓV¼ŠM*›)NK‹1š˜–ž”³×²Ê{Ùxº*`¡ùdsbµ)i±åœD¹éÅ×Èsªÿ†Uâxž8þ«š8®R8²FuÞ^ Œ©²P:„ª²O)ð¥ÿY‹¬tÞ甎-âzbvb à´MVDÈV-œ~PäŠÂh6Q)¢Z$¦-„™O&³Q›‘ë)2§°ZlGå Ÿ:ÛKWšV/þ«Æ`•f£ÃmséÕ†$é•’(½ªdiEYúÕd镺0½R’¦Wyâô*Gž^éˆc+M‰z•'R¯rdjmèt¤êU¶X½Ê”«µ!S—¬W™¢õ*K¶.°š ÒõJQ¼^eÊ]«ì3o•"|­´Î¹•’|˜hÆ!¨:ç/ ÐT©( LUI¨, Ó¤ƒì5W VJ"÷ª4™{•!t¯Ê‘ºWzb÷JCî^i ªy4¦ ¨jRœ¶ ZlRÙ¬HqZZŒ©ÐÄ´¤×œ½–/¼êm<]a¼Ð|²9±Ú”´ØrŽDäžíìaÈç “MMcfÍn'¦ë6üÊn[ì[vbÏëönÁvF5ÖÚß?Ømí7›ìy?1‹Ý+côÁpÆìÔühNì9U;A©uöPgg«t‚ý\™ÎÔr]Ëž1Ëew¦cØ­cÌæ¸ÎnÓÄÂr£;ù5ëX*:`sÓqá{¸0,lð`T…zrí›Å=νi ×µG–]‚l>Z"0 ÿC7 g»lëÖm÷ÄÛ5glìëÛÁkï-»·wö’*),k„ÝPnÿÉ’*×y¯'ÖÔƒàç„*ûƒ®—.L®³© Ë›4¿ùr8±Ü»:[Øûp¹€‡.>™3üŠ/sÍ X¦_zσ‘šá@sDîB ‹ íÝßÙÓð|,‚êféÌ``“>Û€>÷ßæhOð‹{2±ïy)? "œšû\¬bÞCû£IÓât1³5Wd¬´xåÞ … M>ÜšaoøÔ›™ƒ`¸  ˘°9,Ž±GMý7Ö»|Õ×¾î°n]]_þØ=휲ív~o×Ù»nÿÍåÛ>ƒ×í‹þOìòk_üÄþÖ½8­3P·®;½»¼ÆÞºçWgÝ<î^œœ½=EG­—ðéÅeŸuÏ»}è·IcŠÞºöwÞ¹>y?Û/»gÝþOuìëU·=¿º¼fmvÕ¾îwOÞžµ¯ÙÕÛë«Ë^€8…ž/º¯Ð#¬sÞ¹è7``xÆ:?ÂÖ{Ó>;ÃÑ°»ö[˜Æ5ÊN.¯~ºî¾~Ógo.ÏN;ððeàk¿<ëðÑ`v'gíîy¶ÏÛ¯;ôÕ%tD“Ä–LöîMŸâ¨møßI¿{yó9¹¼è_ÃÏ:L÷ºïý®ÛëÀ9Ýí!f^]_žÓL»ðÑ%õŸ^txGˆùðAüý¶×ñûd§6èî¯{ø±˜«×™ûÉY³¸ Ìv†pîê”Õ)–ì-¥ºgž•H‚!¯ƒšÚ>n’ˆZ" ÔÏ*jš3é’ §Î7SÈÍ€M!š=qÌÄš<ÙË’Z†g•YqbõË_•JŠ*dcH6±œbö¥VPü¤K+Xþ©2Ì€07š=qЬjðé”»8k.MRY÷R&¿@{&ádGʧBjÕíÔöOé´I¨š]òVÉ)ž›îZh,CY+°òÓð^ Õk¹R$džöá‘Ã¥4nRb+WÒA’ȵŠßð¬·ÈUqôŸb/¥-ÐesÀ­O·Ü ¶ŸµW{ÍÅN eÓYkT0‰0ÄJܨ¯x4¬„M¾uOÎA³þF_{õÇé~±ÁtDÞndïLvc9î‚-œ4YÓùÄ$ã_¸õGñŒÙÂ%óšéL}‹Žodd#ÛqLwŽ¶&²9EÔ}¿ejͬ©õ³É kl<4Ç2·‘¥òRö“êâ%•y ˆ2!Q^þÙŸ\ÆUÏÅ@׳ Ý6Qž_n!ïdær¢¢f:¾i ¬n5x2k3)¬µÌ¥­´ª¢¨"¥>¡Îb«ÛžÌbÇŒOc±U º*Z¤@œÆâþŽuýÅ,eÄhQÙ¤ ÖŒýöÿIß“º•ýRÎêlÏ£ BÎôŒÊ8lòæ—à_ö˜óSóH‹—è™–ÒìSÍMŧ-iÅã¾mÉ­>MfzÅ%â{Çå³Õ¢.HOEä5c9Y[N<xô)çŒ!G§³ä•pÙ‰.Cy •ð VÚ;•µ¢RÂ1Ÿî‡S %ì\ߪÔ#uOtDÚÄÄU¼•sâ v¾‹àcN:îF·Ïñµ[WfÔÉs¨cÂÉæ€ùN°*ÜOÍ VÁâ¡ÎÚsýG‹íŽtoÒÇÛ+Þ§e¢GïÌ, A…Œ«uQ,ϳµ«Y¯{|GÝ×·D̨¹e#§Ðù[FÃÌåªLCE½(hQR&X }Ò%Î3?a¬·f¾Ó¥jM£xß*‡·bfbU¥»©²yò«¥,zP;Ž U@È;„1¡PµHEÌSA†{-T,!«*"£ˆÂ¯æ“_®2­ÕzhÈ«Ÿ6ªîæÈ÷È­²˜ÒhÝ=‘Y >eÌB¬¡!dT Êk] ³(B ÊU‡”E3 î¡F8Eó +‰$zÌDŸ ô“‡‹ öAšè¡6=K@Sïú¨©|TÎY™W‘%ë Ô»~h*ß•sð˜YÁ+£¦âQçXYº,jª©>%œL…(Pïš(¯P/ÑЖ•…Û ”[" mdFŠjæŒr*<òŒ”äŠÌùd3yäÙ¨œý9ä–^Pcý#¯œ*?Õ£U áùõ}r4jÕÅ/nçm>ºÀ¬½Ö1€¯…M›C)¸Ñfãëa§¨…·ùÈÚƒ.ÃYÃê½R4 3eàEû”܈Á»©gñ^«t>%Á2LÝÍÇžnI3Ô5rcÑŸM¹S ð¥4ʪô›iÔöQÓjü¦ ¸a wzõ¸ôvz8[´‹ áqÌÛéÐÒÛéa"lÎ.‚‰Ç°m§Õ\Lk¥‡ƒÄÂéظa;¥N`J#Ý­¯~®µɪPR‘5!‰$+ölâñLÚ‰UØFÒI0a¯Á@6iÏöJf!Bkîŧ«¡û‡¤€|a=zl²õÎ\4( Ï:85 ¨Ñc­wnhfEÌÝჭs´mhVúæîÐiÅÖ8¯6FænUswN±ñâ’nšýQ¥æq:ÚÈŒ%ÖÌi)òŸ‘’À‘9 +ßÆg£"䛪õ©È‘· swIµ²¹[©œ}Žz­ºøºJUI&Ý"¡°Aw]Ìh JÁ6_;…,»êÊh9&¾ §¨¹{M¤hjÊÀ‹ö)Y¾¹;·D}BóÒì¿åéóÁÐ7w'•¦ßôtKš¡š¹;£$}áT:yåèå6 ±½)õy~ÿ9srËÌˈʕ±òJÌ{m2 éååCK–w ^ZÞk¡ü§—•/•ºŸZP>ôr}ˆTõï´Bòò»2V-WwÎ/ /ZÕÒŽÕÔŠÍâeÊ4Tcåò «€—zÔ§ƒ§ŽUx)R}:pj˜e€–,9f­ªBˆ_^aøè²­£S&…OÙKú*¤rAøTîŸÇÚ•”¡l*Ê,+£MSšJL‘©d±¥Éh0—ÓÑÐ92÷PVÝ ¥§D˜EU™ˆCÍLg™^š²°ˆ›S•RjòGpUpU*M†Pž."¥×˜ ¿M 7µz„án„¶ôº’á·ëB¤.Ö¦Õ’”ß­ ªH›R?RzµþJ劳¹5#y£T™'­D—<ÕÃ&§¬a>d©,8 2Už»6d)²G\j²ÆÚP%¼é˨pÒæÔ}Œ,Ô:‚kbÅÇä-£/¶ªÖzLcé9 [IÐË"›\!Oƒˆ4<ýYd0 •y¨³ý™ä–RÏÙ)y‚ú¶Ñ“OÕK6æ³F…9¨óÉLÑtµÙt¥ œ®*é4¿ºŒ¨\¾ROWÙê*SB]© >+-u•-¤®2¥TM¨ÔåÔU– ºÊT5!R•UWÂê*]ZÕ^µ\yu¥$°®2äœUÖ ´JvV§ÎJA Ë/•9§ƒ§Ê‘Ë/E INMò(´äs9kUã•‚»*IŠ]¥Š±«2äØ•Ž »R–dWšB`6å Z4¥)™J;QšŒs)0 É0så †:JO¼-0‹,ª2 †š)ãV…È«BäU!òªùïªyyEÈ  ×)>žSxZ,<µžþ­^Žšg¿Û|¡qý"ãÅ ŒkÏ/,¾æ‹#¿ÜBâ…Šˆ/ ®Y<<¿pø'Y‚r …*^´@¸Vqð¼Âàë ¿ êË,^ xÁà:Å¿s ?>·/±Ð·~‘oýßŠÅ½Ó {Ãp1ä/ä­UÄ{ÝÞ…Šw«î–ð­aó­ÌšŒü“ê^£H÷šº‹çV,Ì]h=KYÎO[ˆ»xîõ p,¾­^x»Ø&-i]ŸB¡m"Û¿ãÛÚŠl^am\rþ « vìÌ Wüó¨(ÿFšw¤wýÔŠgkÎ.¢ +ToL[¸|-ø“®Ý“(Š­_»ˆ2­P;móõèOºˆO¢Øµ~¡k5%£ÀuÊ¢=ÑÅú4E¬Õ‹ª¯V*\]NÑjíâÀEŠU+ª.§HõšóQóR(L]FQê5ç¢âq”_ˆº„"ÔkÓX¦¯’Fáérê ?¶È"—ÞLaií¢Ò›@d¢kGI…¤uŠH( ­ZUWwÂkî4_õòÁÅ&™èRæ$U¼G6=É«2§˜ï€µé Æ•Ê¥ÓO¦¢2ֺŞó =—Pä¹@gÝâÎÅ*ëQøšõŠ×¢w ?½2P¡~N•‚ m&®S´¹PYb-Ö°^-Úuø„ºßc XÈ?æÊD„ö™WF².õBÌåÖ#.\€yíâË™…—78É’æ•Ÿ˜K­Ð²^ý‰ÜÂPkWÖ*¬¬YTY»Ü„Ja£õ‹CêQÖ/ ¬]]B¥>Ïúµ#u &ëKÖ,&‘_âkÝÂ’zÅ‘u #ëÕŽÈ­LµfÉI­BÈšE –ŠP/~\V­²bE‹<.VB¹ÐqIå¸ 8.XÜX¹DVQ㴪Ō5ª:j1V+`\òù”—G¿PÑbµ‚Å%8š3)puÐT¸;X÷ Ñœ…ö¥A3_XódЦ(õ낼Š Ê¥`õÁ&‘›º[£˜mQ褹TèsòH?ô¹gu*ì™ åò¼ó4ƒdÒ“š?ZÊ©ž°}0Ïš_1A»8pÁò·ÚC9‚¤15 Æ‚†ž¼6´ØiqL±6I‚Öa­¦E a8XZ'SéÓ¦ºÅt­4ÿ… ø®_¼7»p簾WÂŒtŒ¤Y…z‹ISÊ içM/Ì‹$i55 ò®aM¯ƒ£_„7³¯Æt7kM¯ã¢_l7³Ð®ÆŒ7iM«¥[T7£ ®ÆL7fM©Y¤Y<7½p®ýnØšW(·h‘\…¹úÛxó¦Ïœ‚¸‹áæÂÕßà›°yÆ ßª½M,x«>-E5·È­ZÛõ‹Ûj•-TÔV­ íúÅl×™‰®94½€íºÅk×™…ž94µ`íšÅj×£(Es¨BZåR¡ú’_’mK¥’¡F±Ó¢Ð+Hq©Ð++ƒ>÷àN…]Ñ‚´1ÈóÎØ ’Q±vè-e›CKÐü”Ì¡Jdµ‹Ç,ª­0”`Ô%æBFÀu° ¡¯-vZÚÖ@5Åj}³‘&ƒ(b]ƒuq u2•kÍ-ôZ^ÕÓB^×/îš]ØuSÓ+aFùæÐŒB®Ú)ò ¸Æ‹·Æâå"U~ßùr µ*iÍ+КQœ5½0«byOõ‚¬ÅXÓ ±j@¡¦¦_M+¼ªŠî˜Vl5¥ÐªÖ*dê}ùÅUÓêo¦VAŒ—ÞT­w˜W4 ”Ä#3•°‰u@If“ÉpZŒ¸•¶29á4yÅPË(„š\uí¨ÊÅOÕ ŸêT M§„ÌõÊt¡!”낶­sWÜäš +ÊЩ4Ÿ•|^u¨+š§ñ­< ™XjJ°ôBPÚâ[Ný§Xé§Ï[xË-BªRá)§¸Sz]§Ô’Nju” 9¥×pJ-ߤ šÈ–V¯)¥T“òè*âZJm¦ä²L˜ÏÕrë0¥TêI+—+Ñ£X%§hP:‰¬. ÞVŠ„39 †ü3¸0ñC*y)rN¥œI%”GJ¬Œ´nQ$ÕzHJ¥4J¥-}¦P£HÄ)7fµm¬un¡ÎÊÎdÔÈ\]öR/Z”ÎŽràUãM©bתD¹+¯ðæê&yåØT*®™WX3£¨fzAMŲŒê…43Šh¦ÐÔ€BMK-š™V0S9,­HfJL­UÈ”Åò‹b¦ÕML­^/™¨Z§.¯Œc(‰L0η( §s2 ù'ò:`ÄÏ°´•É9¸òŠX–QÀ2¹xåÚ…+•‹Vª¬Ô©ð˜N ™B2]h=º`§më\À7¹&芒P*Íg Bª@]tÓ„8oå­ÈÄRå7ýâ’_<…?kh,ì©5Øsw÷Yã°ÑÚsÑ^ðpïÖœ™Ž1±~6w…Æ؇?LJ‡øwóÙѾü7¾9>:8ü¢Ù:8Øvðìð¸õÅ~óøèpÿ öÅïéŸÌ¾ÿ÷ïäOUá´ªpZU8­*œ~º §øðµÄ0~ð0ÌàÔqdG»uû4{ ½ÉáÐ-& ½ƒ“×ø`B;èbaNç Î èX‡‹ç±4n“ÑpZ.ýz oðÄSÄý!î Ø+ÆÄÅÆn ‡ÍL8éG ±ùh®=îtîÀ0÷wÖ迆݉s0æs¾›XÌ Ýx A×™Ù¸m0wa"†Ä$ˆ5$bøÕrü- {ù!#î95ÖÔt<-îqËsŽ!¶ Û• æ<Áû„™«9ð-à?£;sôØϱ`÷& 78ÇœOŒ0Úó3Ó™DR_ ÷tgLHÈ,á˱éZŽ1œPÿÆ ù á^àÃëĵCãѧ®QÈ?¦Ò¢Û3xE+ï7&óEo™ÍÕÈDZÀN ¤)ÔïM±ZÄÛ%5¨4'Q&_'^‚¼ˆg"1WÛõÏšŠ·80ÿË,-€¢§œ®‰8G…ÿ-gmFöÚíºssdÝX#b츢ӥ»$Ó°žØV IÏ„ëe»yÞ=\^õoÐpá80n@nÞF’d\¾M€m8.¹µÎ\šWG+ÌÌÁv2œ:&æ6°² ¡M ãfL¾—ûJβM!¬8Ô^!(7Òv¼_lê54‰r:Óåq“Tx¤Æ>ZFFmÅZÃGÓ.-©\[2^X­h}ÉXy´À\RIn¦eùµ$™g_`ÅJ^ëÕ¼VD¡jÝë5ð¨QÚší°ßApdÓi׸VEs‰u®×X ­:×E#jw×ZÓÔ.x­º%½^c=´Š^]èm _hÊÂõ ßô#ÝÀ£“ËsÐ:нwí«Á«·gg;FÝ®ÏýùQuNcÔ 퓿¿í^wJ×'|Õ¡¯;gv¯Œ¡ý5VÚ2­Ã £Èròît3ýRs£«ôi¨ÌµQZ–`]’ÌÀɧ·?›_¥ü}šØEê>«Eù!äÇöÙÀç‹11Ä¡µà‰a¾&&–NZÅ°L×Þ^§_ ¸ZÀ½vÞ=<…#%6ƒ2x_l:ÞrÈŸ‰ÈâºH‘%ó„VÍïJsá’„‹kçoä'±|1"sEÛâ‹èI%,¢ß•æ"&I$Ñç‹Ob#²Gæ"Š¶…±„ÅÓ]´5ëi,’ÊâÂï·º°Ùܱl‡¬+dBn¼¨Ê {žjA™Ù󸧗0Vîà¿kì—§'x›é†·t$ê ¾7BŠ³™ïA@Èe´´ãåtúÀkÂïîE·ßmŸuÿ§sý"ý4ýš>JsæòÌœœdÙ­ùV±°Å—,rÜDüœí™gtkdeN’ìñ~½­˜×ojÇÙ‹¿«÷žîÔÂ…“q Ý.B‚†ÿX ˆpM* ü¾´úi’1b™D+cÈă…c'¸Ê„8ZZZd¶®¸)Ë™jZ}R‰CëKFò§^BEJã¨Y«:i²€£ÅÙRÜÓh‚©QE"óJÁÏ:âUàKñúL\¹µáSs }’èo±>l*¢q›ö²úiÖZÓL×ÑX·é>¤¹\@™¥L-'LXÚÉðàÒƒ6ÑKÚœ|%‚6áÄS€53ÙІ ‹J$ž' Î|v»®ck"ïNÙ¶Esc¥ÓUÞžïòš´ÃrHuH.1TaÔp-]fÊRWæÜ4ØVÑÙ)ú£j쿤 ?E7£ºoíÚ“ÊeÖ*óÒàÜeä™JŸt–P4 “|Ÿ•—\ù¡@ž©Ð¡?½ÄCb 8s²G}é9m>Ç»îÔ˜LwÛ)¯ عwSz¿÷-wJ…qÇör8‘¬`ü7Â^3{ÆÄû¨A¦!yªŠ¢é^¾}yÖ\õ¯½þåuûu'Ý)Ý*Ý»&ƒLæªØå«tS’üYH5M¼‹Ø-ezõîE›áËÛ–NâÖµöuhѼ„-O‡¸ŽßyÏ©MÞb¿Ì¿½m&¼n¯[â5õ$}í˜ðº¼ö¾¬)k-Ý:ßó;ç{®Ê’Å0åV9yÃ*Œ"­©;·$ªêê’ñõúÄW *¢oUN#ÅTZÌ#Æ ÖRXçïgqƒë#mÐ$[cED°r ‘(ÊyÊGOòy‘€â¨à›`c]c»ëËÄùw:j,;÷.¤l”^ä©p›—ÇÁîJ\©ø-í|/ÊC%³ã„„-O„7«ß¯= b ÈT›ÀmiVw|:ˆ×Ó ‹pf!oÝÅ( Q¸(Ì»…Ú,Žtеa å¸9‰ØÕ¬×1¹vM¹¬˜¥ú±LÔ¶L§›¤Ë4G¯a‡ÞŒZKhÉ“,”ð<¼û}ÕÔQ©ah.baÖ4-F•J8d’þ“ϸֳ'k’óÎò'0=ë±–Ù8[Åys×±ë‰3Åã'AóJ–áb&a};Ó:ÜW­ÚlI™é*©*ë£%SÙZ’¹ÕSCK†ùfHIbbO %é&ÍìžwÓFˆ– R®VÝ«À…% ªK{)MCêS7¥®kå+¾ûR¬zŸl/°ã•¼"jF‰è[óØ+š†ºÂ|.Ùlò©˜ž¾³d¼éHå£nM±¢L3fû¥ªQ®¥P™²œ¿†½RÑPùÈØÈüý0ø{öÑœYæld²›ål¤Æõ vLt¿ ÝïRz ‘]ôanº^Ynè ‡ppD̬jÍà³±Ÿ¤SùϺ®ºR H6g¦9ß6cF¿½ìŒ!§o‘=î—­°ãµŠ½ZÙ*÷<Âë‘>¿â §ðƒVZþŒÜ®áª³5Íy]JB¨N‰YŠFÁlˆ,ÂR†¹¼<)DJpVH×›6xöHÎWOšTB’ÈgB*kûôçfjN'Rc¬ÍO@FXB6ÊI< æ³a#a}££TÊF-ÒàjîšÜcƒÄ!©áŸ uÄÔø’Æte’B䶎¬C6›M>CÚI5•ã¹¥+«9‹Bzë% ¸nýyI-ëžPy6ÿÌØn=r)! {ƒ„\M|&"ßpüê¿)Ôÿsܱ ¯UïÙ³£”ú¼\¯ÿw¸ptøÅ~óèÙ³Ö쨪ÿ÷”ÖßNG{›_ªÿøl¿Zÿ'¹þsûÞtæ#­J Ùõ?÷Ÿ=Û—ê>ûb¿µø츪ÿù8õ?Ù«îûóNƒñš`ð?ªf`²‘yG«éÐ=%kwßÓ-ˆN#z]ull›îì›»·Ð䊧šÎžá,¬ÑÄt᣻ۥ56w‹é„®FvàäN-*µ¡cú»†kˆ®úXUºóJÉÍlfME=ÛÌcΡ¹¸7ÍÕJý`¬öM*xhÎÃX‚nÊñæ˜7ÐýldºªW;¼«6 T£Èo&3g°ðÐ…¨]èäeÑÙ³…cc½@>úÈlÈĀɭ>Ìì{¼Â£b{#ª6wgNæ ¨N…±Ìqbã ÕƒÜ.Í7ºzé¿ð«œ¸ª3Ó2-wÖ8Ú˜h+ Â'‘®–³‘1Â*«碪#¤‰»Ë9–8ź‡|_P•=‚ULÁïêƱ§,Ô›öóéʘ} ‚:7n¡»s€É0Ab?µ—·ìÌ4xAÙkûÀxcøþÆ5ÁÕ…½®Ž1ú _TâÛ÷3ú~d;X!¿˜Â6µÜ%`ËÁÚ®X9¨n÷ÍK*)s[£±gL&cbÝ‚Â3Ç bc@%.)‘›—¿Þ}˜xÚø[_Îãvj°éh€÷ŸÞkö Û~6†{hŒ¶AP÷.Øx¿~ö®÷ÓÅÉ`ß'÷ôø^Ü13?g>1ªøžÆmùãú÷û©™ÏEÇ5¹I$íyôë w{æǤŒâz½ Êt ç…#ˆÔüœöTVí™Bê̵ðR¶¹¿ôÖÖ»äƉR™bî@TíÔ`gÐw»“Š\†2”R|?epv€ƒ¸ –P.¬¶õ‹H<ÄЋü±‡ü éø-†$yÈ­­H‘$!ÅË@!\š>d2Ô @¤I „†Õ缺î¼ê\^w.:×Tùà”ïb~»ÖÔšŽW¶ïê½"Ö·†3„Ï&XlÖFܟ´'%†@û×ýÎøˆ¯àlÀq½­Ÿ‘¿ë‰V¦¸'>=wì¡1J]‘h0²aÉ–Ð%QXSsŒå¸.wá,G¢Ök6›JN5¯X„ýâ—V á…uáÐ4§üøK@¾Ü'²#¥Áó²Ü3Aîué61ãº"ô9…oØ/©ð¤€ŸžOÚjàeUÅJÁl"7Šrɘã…Æw« Œ3º”ú§ÚUA5‰=yØÙg€XfYM›L”«kWŠ-²¬ÙÕ@M‰.SP“¼#uQ¤Œ‚ä}›…ÅÚ¶[ëÐEÎ^ÿdCÎçËÓËçÒVô¦!þ½g;{+غ~=mqþí?!Ö¸XîÀ° KPŽýç ypØž|±ßjWöŸG²ÿ`]ù{þàX·w ¶3ª1ÔjØóDÉÅ†3É’LDì?…÷¬q…籋+Ó%ÐÙÅV´m Ø­c Ñ¦B¦I:$Ö‡»Å ÷6™3æ 1ÂöpaX3”M .çØŸ§pºöÍâÞš‹áºöeͱo2PܤRö.ÛA±x»'¾Ø®Ñ8cÓ˜`‡BjöÞ²{kqg/‰á,‹¤Ö:ãz*B⽞€.ÁÏ K.ö]/Q}B€ëh§] þ6i~óåpb¹wuØ÷Øûp¹@E ŽÌ~ÅYsÍ X0št#×Ôa 9"w!ÐEºýýHí¡ùXÕ °5ؤÏÆ6 Æý·‰*×!n@_°ïqŽ }-ò$~.V±ïEF>IÌì@ÍAÁ™+-^¹w Ó£ýJ¨ù Ì°7|êÍÌA0Ð<°°Œ C»y0GfìQSÿM‡õ._õßµ¯Aà鱫ëË»§ lm·{ð{»ÎÞuûo.ßö´¸n_ôb—¯Xûâ'ö·îÅiuÞƒ Öë±Ëkì­{~uÖíÀãîÅÉÙÛSÌåð>½¸ì³³îy·ýö/iLÑ[·ÓÃþÎ;×'oàgûe÷¬Ûÿ©Ž}½êö/°çW—׬ͮÚ×ýîÉÛ³ö5»z{}uÙƒÓóâz¾è^¼B¿þÎyç¢ß€áëü?XïMûì GÃîÚoa×(;¹¼úéºûúMŸ½¹<;íÀ×€¯ýò¬ÃGƒÙœµ»çuvÚ>o¿îÐW—ÐM[r0Ù»7|Š£¶á'ýîåÎçäò¢ ?ë0Ýë¾ÿõ»n¯çÕu·‡˜yu}yN3EìÂG—Ô|zÑá!æà Mð÷Û^Çï“v@<¾xÝÃÅ\½ö¸È$3 ŠsM²åÁa;ÅÔüx[»!Y$Ñ8íyµËÕg_Yc s­wÎ.Wpÿ³D¢[XhÞ#A¦Þm®«“ ˜ëÑëϦccKNîÐú¶åz° âl$,Ö8DÚ\4ø„`ŒŒî‡%ÚÑô)±C¦–§s¡ç>Z ÌÙrÊ~áRоWÔ»ü5?©Œù—¡zË\‰ò_GÞRåK&uyßëôƒ‘¶"/\X”ŸzµE›[_T>§û?²ÛŠÇ@ÿdUSºÌ‘ÿZÏB÷$ÿµ[•üWÉ•üWÉ•ü÷ÙÊÀTÜì OL–òPº¨³åÌ¥ëBbÒOù–ý’âÆo…ïŠéìâ2%æÌv°²Ô›˜·@‘RWt9‰¼Å-p +ÝrHמ^íI7žx×™Ô„Š¨+´£)«4ÿxì±^®£ûš=y”]Ÿ³kÐ>Zæ=ëÛö˜Ÿ5“i¼ð&¯*’È!×™¯<í±ƒFÓo ÿó]“ðùn9É6î`BØEæÚüóŸ›»ðŸCœð{ÐýWÐÀñÄ×ØisMèè;ú3vÔ³@Ð(^;ÆÎ1W¯Ÿ?ï `?Q!\Þ´ÞüÿÁ‘ RÓy»ß¹î¶ÏB P\~b헽˳·ýÎÙO(žø¢”ž:§$\{òÎd<æ¡ÃvŸýtùŽûw D‡¿©(BhFiåK!O:6¼ž’ôŠg3êKX“ñåG %ÊÀ]‹ üLwLÔø’Òf#ŒÊåóÀ‡BÖxÎ[X(d…ë+/Ø™"\þ0<¹˜|fü!ï ’ÐýqÈÉLÈËDÛ‹Tá[à6êI•v#³·ÕWžïÈÝ6ìGvü¤xƒA¿}ýºÓ´AÀàü ;Þ:µg Z‚ŸJhßrÉÞ…ט±ÇÂw*dü99Âœ¼éœümàë ¢ø{.¹äµB±%Ò&æG³GlGpDi°w5^ÀŠW-TbpœOÁ’†d9î"$’ @¥Ixõ­ºè­i²³³½Þ g€ccax>˜Â%ŠM—h"*1,äN-ƒ\5ÈàI¾§®i†õÙš·™¬gŒø ìü……i>€l9´@¶ìÎ@G‡ã÷ˆ°í/I¥&¢ C´szþ²Ö`×ðò‚¥AÏwaÁv".j Â9A¿DdI€ìÐÂ9»…E½tœìïUA€_.„Kët bü–ÖèƒG8÷¦7ˆå]Ÿ’ X"KèØäyMhêKv†;e¿°ñtÈ~óæéa FNËØzB«[Ó%,¶Ž£¢Q6 ²·]à‰Hh\ID¼ÂŒ.š0!âÆ{áxA@u_:ÜLDWd,M»ö­ðœÊüœjäJH^ÓWxpøÒYÆ°¯ØçùŠÑ½V9V"qí|0A8 œsáÌ-è,6D¦€Qô64olÏœr³ EA§oïh®)*7ø×`@‹ºéŸŽ6oÕ÷ë8‹úèY}Ôܯ…Úüö]Z¸ß¥ŸR}ÊbVxIï%Áù-ÑçÑ¿ˆ—ö°2¶IéÙf»¸~€áÔŠü,l4Zp¡Œ9w&'!׸ANý€_ eý£áXÀEMáñÈ ú3¾ãÀ–c“ª(ä~ÍÏÈvzãÆ7Gö팬ý|‰ïÉûù+viÃshí­ë‘õ›—Ïwe´ž˜ÿY¢ù -Ø,.¬º8‹ÙÜyÜe†»ü›wÎd†!@„:’ñRvćH]tJÑ…‰³œ#G™a)\Ï·š;Æ=,qqÓŽúwæƒØÍuâG Þ»pG†»ðŽAÙ£¥ãÀœ™^±VçaKÚ)Ž¢QÊvLŠÆলwí+äÉHTÓ)÷Qªò~¾…]o·çó šÜ6kÍ&J´¦ëۇ庽}]…Îø{dúë÷ÑáïÅ,ºÀ’&ÏiûE²‚OÐßæ6ˆõ3ßpÒPp^ôÆ=^Ž$`'6cÊYE,‹ï,ΘaŽÜJXw¾†Ù€–|7ù\ y?< „|ôM?¶‚{?‹Á"½ãÍ![Ι¹‚-2)j¸tÙNûÍËzû}·t àÝ[cÔQÐ=ÞÀ鎊~\‚@ì3 _s6Bi•^wÞ×{}ø/ÎÅïrŠÛõfb®ðܯ !#Ñ»gŒÎ…÷H€ˆ^Å”D![<{W†òºî¹[’—— BÝNfìËäW8»XóEÞ®ådo\èkÝmÌN¸‘yËv'Mw±>cQž6 é(“ŸÕáÿ[/¶Bžužk[Îx;@É<ÀÀàG¯‹fI(mÕ·œ'"´U£yŽyc¹(mÆpúéé5ø²ùÔÐØÌÆ#ˆŸÁ“Ç#bIÍY\b½Á«A»w>xyyy68i÷¶HR¿6¹25³gè•Âcè¼4–KB!ðusD¾‘`®PþEß ÝKí ­e]ÈRÏ`0ðvj˜«ÖÚʵBìX€Cé4ó‚»wËép0ð× ¤úcþG4亃DЧ‚˜Sʨ1òú/<"ùMNrñ§þÅש¹"R2)zT’BLÇe¿HTAØ›ú5EÓ¸Œ,­h°¦ü¼lŶp¨¯”³6Ô¦„E–™ J^ãèQß”Âÿ$r‚# V÷'iÃ+1Ò2”»·³oýö”àç\z;E9­KPTœH·fÒqn Ïa™Ý@ðÞ†gæÂvЀq»£»¼½iÄ×У£áÛqvþï:míï_£eÎÅXÂn6_8¤ž`ЙÈg®bøÂ)fj则9ûu§Yÿ‡³ÿ/@bx,‹;Óóx9èÝSéšv<\m4’}a´ƒº7`+ „óËiaáÍBÚj^Ÿ[Á¿qºùsõüÇþ±çqÌ,sgOLÊàaÑXÊ=r$xd¨‘×ç'£];ÏPšaþÒÒ xi†9RKfI '†a?¤³³ÿ¬æAÇþòvЪ±_}ð_dRF‚"d/ÉtC@g³1 Þ’²¶á?ÖÍ6ýÓLµ¯Ù!ÇÀø;$À§‡Ê:KñO¼š<’„‹ß.§R±tœÅïþú;æBä7:èö€jû•ƒèïÏÿÓÏÆóèyì$Ó /þ=ÂþŸÏŽªûÿÊÿ³òÿ¬ü?+ÿÏ?²ÿgH­9‚†“ñˆW9Ž ^þÓa˜‰tÄ!·'9ؤS$Û‘›æ;šä0šêÿ™z‚f9ƒj~$1ßXÉç“<“:¢]Ôv°“”i½dÎ+t·-æ—žk;Nø"6Ûx1krÏÈ[Ï„¯SñÏ-Ý`3:‚$wqÔqØÔGbS‹M ‘ôáŽÖ¦HèAxµ¯‰‚à“ øtQ|X~™(À–ÙüÁo›¦÷&—7ø ×à ^™³±œÉx bs/r§âµ[c&¢‹Ì‰¬rg²JÊJu.«&³R™MJª5õý–üiʾKldŽ ²ÆÉ%Òã»0¹›Yº‡]€)@µ[æöNM¯€½ î±^ßYÅvKÃsüfbö³·ÿÜš3täÁ|q‡îØê!ÀÙöŸÖѳãƒHýøuXÙ>¥ý'3ú4#ü´2U& ÊT™€ôL@ý9ò˜Í›%‡cM Çš<ÐÍÛØ.oo‰=Ì"¿á›€Þ™ÞÉ¡{6æ©%ŽÄï¹8«¹ØC¤E~®Ö$ â1nÂñŠ€óbV b zø¦@Ͷ3yàp"ÄUt54½‚l9›`P)£¢xBÊf€&áEß5Rë{¼#ßO˜:·‹áÞò —¦ˆ&²‰õк„á˜Q×+A³ó£†&–ùQt&⟩öÉÂÛ“¼Ž„5∮e&ºù‹/üU¾þL T÷Å5©äÀÅx%¾ôRè³&?ƒ¡Û[‘êĔ pù’Bm—‚€yP&FzN°rÉ C¾f÷ƃ_½&LHJqéÞRdèl!REŽì%bŒÑ%#Éɘxap®ÉƒÝõö=rã$"q.á1ÔH‰¹åhÞr¦pš¬x Æ9ÚüF^("³HøåÎ×A/ä8nDo”™›R÷ƒàP/úñB Öx…èUë†Dç.’“ ÝwµW˜…TC¤ð@É ‡Ü&ÈI R$Ô\^™ð‹'±Dá™$­µHZ¬„iFúVŒ€›¸˜Âiß¿³É\HôbJZFÙ?ý“.bhIK\â¤, ?ÅzøÙc/^Ð2ŠÚl¥µÑY±©‹Úη¾Ÿ¿7i?g³òªbœ³ØñFº`¿þÊ¢)[tÑR:yѺ‰§i< Z;¡ˆ úá#Ð!á C4¼‡ßQçºûÀ‡ 'ºVñ8ÎÂD䨚GÏ©7áçOI)³V9ô”p%ƒyì$HÀñ¤Ñ•6ó¼sE WÄw禛€'|ü¤±”<㤳ßgñ)ŒÊ¡3g_ûåÿ :DIÐÚN¹Àþº.° $XWeû¿ë»Ê€–;XÏtYîã“GÐÔ™Äp_úD~-e"y+²ÚüDþ·”‰dÑ–ðßéŸQO^aXÓg“¾.åMæ×r&“»2«Ç˜Ìÿ–3™,:ó\`RæšÅãS– ]ôé ±ð¿–|æW›þË>‰n>i…ÇP 5\HŸÈV ë†í„^‘ô›§ tÅÌBÉ>´´½Ì'Y(•\µÀ"Ÿ†V/üêsYƼåP×GUWS¶Rªù+%ë©Å>N^RþîsYÓÜUIZÔ­l?Á4±Vê¬ÿQòš|.«‘ƒTºm};£ÛjrŽ¦Ì͢ὸÙZvyªMÌ“å]ÄÒ­¶_3O$Öý%œ„þÎý"=mìrZœi™wÂõîN/ß¾<ë`R“‹n¿Ky¼®Ù/£pßs-ÜgŠ)†Ò®H5ò )Û“°òØéî_%ô„Z´"-ZåÝD§ž$d‰6)7®‘4F¡Gz"W L_ )!D´ Ki±éi§uÊEŠª[¬'ßIÉZz ‘2;µ”q,Š¸Ðî_™¿Ħšè‚~Õ¯Zœ}y›<ö=Aó"ñm‹¿õ³T*QsEµ‡nG£=Ë8>„nºüVÙ1I5Çm ÿ­™¾—¬\Ž½”fî2gy‡ÿAÏ3kö“”‰û_P0Ùí/±‚að"Ó>È;ßØ­°žŠÉ0˜i%†}fòŸ—ž6°fJyòþ;ÿݬòVò_%ÿUò_%ÿUò_(uy4UvÎd®/nLþK¯÷°N©‡¸(ÚhË€R÷Ì‚ÀZG,ŠŒ}dã ™ø„EÏ+)Ü >ûíˆÙ‡&M°Õ¨ÌµÓ-#‘WAB¹xD¦°½ILïìd"$¼Ž²ËJl•*ÿyùøÙb‹ÚÿšGûGÏ"òßaó¨ºÿý”ò_•ÿ§’+9°’?AþŸ ¨4”†'!n–ŸØxB³æÖ²ÙéÓ)©ûN­îSê+!ûOBœ«u®ØgÅ>+öY±Ï§Ã>e»»ÌȤçå1Pù:#“ƒ&Œ^±ÐŠ…V,´b¡O…‘­2óŸ–Ç>ƒhàLæ¹bë¬XgÅ:Ÿ ô—;K–8dÍŠUV¬²b•«|Ú¬2t='3±P9øÒgè4“&ÿ™d;¯þ”ÿ¡š>7ÿûA3ÿq|pPåÿû¤÷¿Uþ÷J(ª„¢J(ªò¿Wùß«üïUþ÷ò¿“ÔA©f€—"¢â)àùË'”>>·œ0°ì,ðêá`Ÿ2|Òín¥Z}¾úåW.ÿ•«ÿíFó¿={¶_é•þWé•þWé•þWé•þWé¿cýÏ«} ¢ô%ézOIÅ‹Î#³ÎCºz—UïáS*sqo³JKªô¿¤ú”úwaNç@Šæùßö¢ùŸµ*ý¯ÊÿQ©~•êW©~Uþßþß÷'ýŸ®:øà}¯û?Ä̼MV²_þí!Û¯‡‹Ô¿+ñôñå¿4Û²0˜oÿoEä¿ãÃgUþÊþ_ •X •ý¿²ÿWöÿÊþÿ{´ÿ'é=iöÿ¨þü'OÈöŸE’õŸ·J±ÿËÓ¬{¿žˆí?ðJ½ªô¿¬ú E së¿<‹ÚÿŽªøŸÊþ_©~•êW©~•ýÿó©ÿ"eœÌ)÷W?ÏÌG½‰B€áÚ/RÕ½l)RÊàY XŸ£üçåÿ¦'¹é¿óóEüÿžTõÿ>©ý¿Ê‹SÉ•XÉŸ(ÿ7]ì“ÕËÿ9pLcŒÿ?¹f~ý˸,ˆßþ‘<ý2dB?T»âGþ»›ö ‹FÏž¥ÉûÿßáþÁQë‹ýæñÑaë vTÉOmýÑßDÅä«!ÿ7›Ç-)ÿ÷ñ3Xÿg‡UýÏOîÿÙlVJ@¥TJ@¥lT àç¹€ºssdÝ ±?ät9eswHþ\G€ýxO¾¹ò½õ°Ÿå ß\í½}’æ;“ƒ èX OŽÐeÔ]˜Ü3¿¶f”(Q|žÉŸpl ½¡ÿ!åßSsÂfÛÆPµlóÊ`l'5K–ˆ¶^À¸æb°X.åž ·ûËÔ‰|fâ±¼Ç'иû«‹>œ]¡ìþàUï¯þý?ƒÓÈKþŠ¿>©ß¾Kûö]‚÷Ÿç!‡·î7ËÉ„û ’ÿÛ íNÓt|‹‹ö^û¿$ìåWëÁëÎEç¨ê@÷‰Û×oÌÅèŽPjCÓC=‹zåÍ9Bé XèKøhGšsfÖ9ÝëïÀÌë¬YOó1œ¾é^ô°åñ£ÓËwƒsøòUç⤓8Åd@·ò§äy¯7¥ëΙޔÞ^éMÈó‘Èœe¯ÑîfI†TaNå.Òî&VI†Sl]Ôãÿ”¸ÓRn³xoÈ€áÔæ½ÞsßÏ7ÝÖžŒÑ=µ¾•oG‰»ÎrÖa,ìáì à0y=89ù±îw›°¸a¤¦óÕèîvÇga2œ) @ê…‰) YèÍ÷4Þ8z#t¦†\"ç"ÈŒ¦ŽÛ&ä–ðdõ+r¨rèkò\$‡?ò‘~¼) Ç£ùeéÔVôCƵÖ!FñOh”¶‚¼ Ü 8L\ƒHDºönBÔUxNd9ø×<+ñûßýRÁý«—¾‡~—«÷”¶ ÞU&ECëö`aûîS¬iÿ½›Ï²í¿û¡úÜþ{¼_Ù?müOeú­L¿•é·2ýnÈô‹¿OMÇúˆaÌŽ å‘íÀnœ#UuÞ™ZsoÀ JÖsá]õɉDdöaP4{Ø6¶gß,ﳇEùÏÒä $ ºFÍÙ蟢ú!¢Kœb€—ŒïFì#–)>ÿviÐÉgYûþD”dÀÄóï%nì%, =ú€ÑýcWò?N ±loWŒa?¦å´Áz¢ÿ[âF¬Õ8h´¢h—«Åå—EžK ¿±·[3@¤5OLÿ m¤ p9"7í¹1Dëw¦‡"Ä#—m<>ç3¸z˜ÒlÑÚúÍ{vç°O€È]6]¢cþϦc£0‚ vLÜKNÜÜá@94>\U$Yì…R­“æõÀÞÆ>IOÆ£û(ý£ãÙü3(ÐèÀcšÇ»Ã‡…éí¥†"[²ÔÃ0;FNu úâÉ»÷;û¼bÈØ\ÁuF?]ú§Á(…Ìáw„ü—æÈ@t`vgØG´>ãpÙ÷œÄ<(Ûµý†»2ÖCR „ÏnŒ‰[ðX/Õ Ý‡ÂAB·¤!lù=!ÞE>•”:Ó”„J2ó»Ü¶= !³ùæq­VÛöärrꛣ‰áxœ¨²«w~ñ«\ÃãÀî}•ö²ãà‘sÃYª…É<¢Aå]qïQ@ØøafLE.‰ÝF„x›/¡ð‘<¨¼A|*kß/HÍF“– þÙjì3÷N÷)n¨ðM‰Çñièþ\\8w$tÞ|Ë‚D3Žy‹"ƒ  ×öç‹Ä—ˆ9 ÀX™ «Bùj"¼B2RíHp×h¼¸Q)6—¤‹uïÌÌžg’‡1L#îx: ”\ª°tôYç}ˆøð•ƒíçãÿ9uo…<€õüÐþGù?+ÿß'¸þ«ïš>À9ößÃÖÑ~$ÿ?<<¬ì¿•ÿoe®ŒÀ•øóNþõ–åjWŠs-è×°•Ùûï#–+×3‰j˜2a/˜3PâFhyS‡æâÞm6jíp‘žN:W}n®0&;tX`«5Ædá{ò¢Rª)ø³.§‹8^šÞüh¹ÖpbF¡ÂÆ6G¦,Êþ8\ÞÜÀ®ohÛjßÁn¼Ù·Þ¤â\ϵon,²d£šîævåšæT$°.É6K¶ÝâÈ^ÖÛ…mÓ Ñpé¢1OŠ¢Œ­¸—IÒ\Ìùbpï9;ûa½óÁûãÃAûÇv÷ 7ÆD*yL{žÌÙ­ {°à­¹ïr`åÞ8¶ï]4ïzУ±ÑD” ?:»,´çg'¼~ãKôž÷N/€"0+-ôë¯:ú]µqst˜¡mÆCQãON´!“{ãÁÅÃáfW˜;s•ˆŸms»øà¼w2øöÛ_A?;Üß²ÿÂýß¹“øÜ1n§FàÏv]8œ´˜ãÎ °7»5Ûãq-¯í wtð>9>¬åykÃbdwÙÚÐØY^ãSS£±414ÇËšôí¸ó®ð®Ä:a?Þ´‘vvÎ./^ãÿ:ø·5èÇ^£Îrý©c€çðd¸S•ž*E +¸{çÃGþÆšðIkœ ßwyðù—ìå³/óÁ;àJF¢E-sË%#EÏ‘+ Eß*x$&¡ãÏ¥Ù¶æE¿Çi;Ál‰¶8Üs¡ª{c&²ëR÷Z2LÙç7”%z³rZà‹™3QîÃ:z¢ò©2º_cl00Ü)ýë±´Sû#ÃÕÂvÒ#g¸yC< ³÷ sš“I{¾pØ? Á¿@§˜P“߶ðÿcÙ.S€O™4w@¤W²+\δ…Û¡$½‰3E!Šò€Ðtz–Ïõfø˜oéu"ŽÚf¸2@‹Ÿl@ÜŠ<ŒO fsMµ þÑú‘[ôñþ¿Ø>X/xö{±O£m›RÛµ½³nïDã„#5Žé†Ñƒ3Mäð¦% S÷§ÀYBÉÏèPÝ ~*å/ó•­*`$m³š‰ ¶Ù% ØÐ{+ ÖldáGTNÅc›ÐnKô7Ï÷\o䙆& ¤‘¯Úî;€…y|˜ÏǸøxUÿû»ËëSvÕ¿fÿðàùWœ›'ñ/›*_ŽB_zà«|9Lú2kL’eDHCóxÈþKö¯8^ã_¹ó³˜gæŠ_þV|牌R©gÛ×_k÷Ί¿ÐQQ㧈ü]Ò™‡­ª›Ú'rÿg8SÝœüŸ‡Ïö[áû¿æ³gÇÇÕý_ÿQ]ýUWÕÕßç[÷eæ›×zoÏ;ƒw°v—ïzþ^¤¥„µÆšŠü"ÄøhX¼OâUî %ö±¸Ì .šxyÀƒÖ>rQ¬ÂNí9ÇŠV$˜sGqFª´0Äo¸ÿŠ\íÐ}hÕ'dKÀ³ŒÜwÄцÈE¬E£¦RP鲊KJq£ Ùqx@lÁ¥‹ÃYCzÁ/íësæN¬1E¾ÔQ¯~ƒáC¼ å·›^ð¼‰aM]~—xFÉY=‡Xd-¨ß<0‘ˆÕ ¸ÿ Ö£ÛLdVâÞ_y¨Â;¿ÒewAkO\c>Ò;~%‡:é8Ë98O°.#w¤GNrv¶×;a7ãÖïêíÌóåõ,i¾AÎ÷•öŠsr¹§‘¢tW j#¹d„p;‘‚sprè½î9`Kôüö¢ ìÓ½^^7¼‘=›ü2füË0ý¥:ufYíø*¢¹ßs%d#ŠAÿšíF$º¿þÀŽ‰¢¯Ï?cÇtDYf¤•²s-:™…¥’û²“y‹/zçè/T{/‰ŠnúF2Æ[ìÞãNʦîÀ@À}¤’Õ÷ÇAMIŽ#ĘÏ_ر_Ø6ÒwŽúzï®ð5¢H§_&DŒ?²üá¥eÄGüÿšÇGÍJþ¯üÿ*% R*%àSÿ]¸9¹p¾ÉY?Ñ/Š®%<ùî;­Éb6r`„²–3qãÊ)½|µA?hí­°pá6Äb)'© ì“6„a»"aéHWúã`²]¯ƒ‡vçúìòäoSü7H¯{Ò£«4I‘ ëòH÷5’b¥ù¹Jì™H—j°r[>á°ÚB…Øï-_¶¥·%,Þ õU뢌*c8-Oó m(h@¿ÿ»/åËÏ¿°æAsŸýú+û“tõ”¾Üt%¤¹D—,1PÒ«ä/}g©ø—þ«ä/%¿™è—Ò«äo#w^,ýÕVHѱòãåY»ß·÷mH¢¦‹¼Ðõ2¢8ùâùpŸ_ê‰$K@€ £¾;éÐÓà²Oò†Äž>Â’ÇüKàNɘ—`w4Ÿ,]üNMæ fðá-à«gÙ¾¼²ÿfÌÀ™(=ج«oÔÙ—ñ#(òÿ ×ÿé,,4œ\žƒ†ÑtÞ£òº#†QuÞQw¾úñ²{š±DšžÅÔäVÌ>Åts ã†&”Cr<¥#^ÒÑÙˆ³?Á¨šå.ñ ŒHÐõ~(ÿ[îý³ùìÙ~ôþÿø ªÿYÝÿW¦¿ÊôW™þ>cÓ_÷&Ùfäzþ»t=*²ÿy׿ÐÀ¦Dí¦ÓLP¡®~ìöúíœnz¦óÑtˆÙÕÙ°M ?…£Ãƒ{×J˜X ¸Y½PÄ¿9˜s Ý,ótÚ|× Ù7#݆Åo†ÓŒ–; ¢¥šðŸ÷£»[ 0Pd¹É2Ç¡#cÄ|׎§¨C~ðÉb9Ú‚þDä &ôÄôk”©9÷I ,•»WžÁ+Ó@ÛõE‹/v®^ÅŒ–ÀM /·‡¼*.%Í„]`à‚1$8š“µø¯ª‘®ÖðµîÛóCXª^ÿºWS- "Ê,Eª‚ˆj‘ESÂQ†ÌùÒG²7¾6a \w…w‡‹Þ)ŽœàÎàç: k,'‹h¸Œõ»¸§L„K)k'&˜ÄCšÅ8Úàœ´pѧ¼·üĤÁíh^‡êöééS;4óâÍhÜ!¬àé æ¶Ës!l“h²‰ÐA·ZšÛ dƒÏ ìaŒùŸI袙ºhFC7ƒ»ÔèÇ°µE¢ÆxÈ´n>¾ M]vTŸ xÛ_ÝÜÄb„Ú,Âý¤;ÿËQ~fJ”_q¼`JIþ¼:~p&’¹ÛqlÌ$BÙ¥KK™O„­\$ DR_d8ñœ*¤ôØb á<øç‹W\î#ò1ƒo€ si‡œ*wDNk8iAµ2©î8¨Ž ,§5ér-$¤ðÒçêpõóð$ƒ$ß^ J¢œEp¾»3gxÚ"ßv–3>9 ú7º.‰žIx$oPbí#ÓAmUš²w_º^µxMë=屋‡T‡—–3ʬk݈´ÑØÞBýÚ]‚`‚ÒKè&4DƤ°°|¨~ü˜ü‘_ÆE~2‹Êö@Ñö%­¡qkædEP·èyŒ…³' 0ÐÈ'ü QºÝRîH Äï¨Æ~ø!ö0Å_3kÕm‹\=Js(ÌJ²Tgou¦ÎW½ ž? Ç‘‚¢ÐØê¨jj᪙ƒ¬¦G¾ÙÑ¢äðÇŠ3Åõ™R댙â{Ý™Ò7EgŠgÎ¥ï]|› <ÌÝ·Øf] Ÿgm;é0ûȶ“ 14Y`Pé²à]e¼J‚x¥òj=˜W9@'G”¨í…ØW){"ÚNÌÙžŒýL¾òävH¬‡™§‡D'À¨VæÖ‹B•‰h]ç#W­MmИ†ÀJŸ¬ôÉJŸ¬ôÉJŸTÒ'ÉG+[©äM5Kî—§¬^òæEuLÙ,CÑÌ™‘Ô&Yå 攫wŠù¬©|æÏ+î­¥Z¥Ì6ÁÓ¼¨BšƒˆÍk¥š8lê#±©‚ŦƆHúpuU~=Å5A~†*ìz(ˆffHUfsøƒß"I­Uã ~ÃõÜüÙØNÎd¼ ú®ÚT¼vki¾ùYåÎd•:••ê\V%Lf¥2›ŒL Å”ãÌ}—ì+¿¶š\:K/OWÎ_B¸WÄz|gèÏåá¹%:„ÙJ“®4éJ“®4éJ“VÓ¤Eæ(Ó^«d}Z¼ÕP©½/ kÕ¢Å:w‚áf)êµ<Å| ÛŸÞºJ¶Ê4Ã*¥?]U;uò‰ÍŠ+ܹxy[¥ÍB8m*"µ©·{R¾]K×é¬Ú }•§‹ÄHèÛµ4rŒúòx‹Ü(Q5Wå+rÛ5t•É˜;7©M’¦®:3©ézúºÊ¼V*[eÍl¥1µU9s[)N.EïÔÚ«©_«êñaܬ£Êoà°(Q›WY¢K¡¾ÑŸ¥Ù—‰ö2”û¢+ý¾Òï+ý¾Òï+ý^M¿wLÌ”§ß{­’õ{ñVC¿÷¾(¬ß‹ôûÜ †›¥è÷òóõ{zëê÷*Ó «¯þtuôûÔÉ'6+®ßçâåô{m”6 á´©ˆÔ¦ÞîIùv-ý^#¤kc$ôUž~_#¡o×ÒïU0‚sy‹Ü(Q¿Wå+rÛ5õ{•ÉF™;7©M’~¯:3©ézú½Ê¼V*[eÍl¥1µU9s[)N.EÕÚ«©_«ê÷aܬ£ßoà°(Q¿WY¢K¡¾ÑŸ¥ß—‰ö2ôû¢+ý¾Òï+ý¾Òï+ý^M¿§4ž9Ú=o“¬ÛÓ; Íž·/¬×Óç Z}δäF)}0±|}^Lj]m>raUULRG“O™rB£âZ|6A‡×Dd³&›J¨lêìÄ/×ÒÜuð@Š­&¤oòtöBx¾\K_ÏÇ6ÍáA“DM]_-×ÔÒó§ZaÎŒüIú¹Ú|ü†ëéæù³YåOg•>Ÿ•ò„VeÌh¥4¥ÍQc¦|«ª‹ËYG/á—¨‡ç/C±PE}!¤géßå!» í;„ÞJ÷®tïJ÷®tïJ÷V½[ÏKmÆ›¤Ýªë$9ãÍ׸OWIw–3#©Mê5º1V¾C7Æe\ c­Ûsc¬{unŒóïÍñ:—æÆøߘë఩Ħ ›"éÃ5¯È•Q .uP|’3®‚àÃ5ïÄsPÀï–qÞm¸1N» 7ÆŠ÷àÆxýKpcœž5¯AòÝ·ÂT¼vëÞzçLd•;“UêTVªsY•0™•ÊlRocU÷[ò§ê·Û>2Ö»Ú.—¥—z¯³…p¯ˆõ"øξË. Ïå\d˜­*dTõ?Dþk4Ú+œÿÙ³£Ôú˜.Ÿçÿ?Ü?8âõ?ZÇ_°£*ÿÿS[Ë8>Ô+þ[ÿ¡yxxÐ’ê?<ƒõBhVõ>eý¬kµ“ ÛhŽ°ÉD˜ Ñƈ¦‡qe,­Œ¥•±´2–1–rŠóM¤¼°KÈÄš.§lîàî³>Â3¬Ùûö%‘ –‚ž°s4ªñÄkL—zgRK¿ž6šYÝÖÔfÍ&( 71§XYwdMÁ°«Ûш p†Šê¦ÃÝŽ4 x§êIÈùÂíþ‚‡*²q÷W2Óöãá¢L¸•‹˜â¦Ñ^ñ54ÆÃJÙXmýæ¹3ìP¿gDj,ã á,ÿ3°…Ù7 ªðüÀ"¼b¥,Á)l@†ƒµÅ¥c]®Qù á¿¥‹ÿ„ÁvÎVR>§4äcØ’Q¨ƒúX¨ÄÇC;ÓæQ?¡üPåñÐÎØf¶H ˆ¼Á¦7;‰=zÉZ7ƒ—øijWëÁëÎEç…ÿéœ&°ù”\A™¬~À¿‚§÷q#,û§ßL5%¯P>hiG@*h´*k€–°8qÐBù„ÊÀÚnl¡äCù°•‰65ØÂÁ:¸ùÿ”H$—¤ÁŸšr$2n¦Û“1Úbë ]jïÙnCˆ@‘יأæø„ƒÐYbf·æ1g?|@ñmÝ4/©ÉJÔçž²†:w$‹õç®,[©RAD8!UMúáo5P˜ðµ&B¿×¥%¤FjžÄ÷ûAª&‘* EEÕ¦U!Êiá5úµ.f£ßkâ¶y¬K±*¸Y»¹‚òï »š¤«‚›<9^›nIÖÁkèKMœ†¾Õħ.­*äp+†Ë½âwKMÊTˆ—¯î#÷d"4ÇÚ×9÷û­£gÍàþïÞÿ>;jU÷Ÿöþ¯ ’¨îýª{¿êÞo£A@n.P–ƒä6AÑ1ÍI’nú gtg-€x—Ž21wìÖØô.¡àçȶà0q>ÁœÚ΃ÒíTøZOt00W#s¾Üó{:%«§ðéËÇÁÐpËtrŒ ¿¿ó7aÆ6ð2s°PrÎÿ£Ãùü?øb¿ÕjìWçÿ'<ÿ«HÉJ¨„€Jx!àÅñáîhŽš…9uëìÞdæjaµ™ŒŸ6lñ07‘~ï@³g‹{›Ñ­Ï7nÃ÷HY}¼{|Èvø NÄê U{Ž·’ÍÖ÷^Àú]ïD€ã4þóX>ÃN3 ¿+èÎØŽ âl`¦âXœ ¬Ã¤ð©1›TÞH bü+Ž¿Û‰cÁ‰3øvàì€3†¼qàèûø¬q`LæwÆAh¿0'&‰'Q°=Q‚cæ<5>Шõ}ò»ý.Ýú^ÓÑd ¹³[¬«¡92гУb_iò#²‚Ð\9ûŠt…üD,*h8Œ4ÇxØûGµíä0 芖ÛÆ_Ä´ ï ñÙÓåtúÀŽ€pY†ø àm» kÊ]!.L,Rß̵~Fæc ”^ð%¬$ô:ð.½Ò Ùþ¶±ov¤Ïjì‡X ΄à<û/ÖdÏÙnó_ >½ù&®Ô/ðüË}/àivÁo¡/?“¦¿1´"¯[á×­?Jà“†þG.¯ârI®¯…õ¿ƒýÖ‘ÿúßáþ³V¥ÿ}Jý¯Rý*Õ¯Rý*Õo³ªß©éŽ`w J2ôiq• Ïóˆ+·ôSÖŒÈ×€o˜ÐE2Q.=¦sÊ%k3?¾lKjòÀP+@ ‰w…\gi¡ü÷ÀÄ×X7ž¡}rT38yÓ9ùÛ0óú¢sŠcÜ™£$l‘¨D2¢…bl±™=¥8ì+Þw®wo…Ý‘6¾½;5†¥ ‹®â¿ãòßíãÄVñßOwýÝ;}÷<ù¿ùìP–ÿÑÿ£uTÝÿ|JùÿÏh´ì ÷Îb?]öÞt»Œ¨o.²œvÞîw®A5Él$²q‰µ_ö.ÏÞö;g?¡@ä oB^ƒã kObÃ`FzP°€Û}å-ï.+SQ=„˜Žò'J´B‚ulx=%yM.¨‰,¹‚¹w¿Ì-Ï\æb.uŒµœIòm#Ú—H#æã±é‰òBÀ[X(ÖPÜ©ë«KØ™"\â1!yQóÖ5[oÛÇ)m]OB9£A}Þ[\*e¼ƒ¸0ZLtŒ©ä+øcðjÐî^^^ž NÚ=î².h#ÓÒfÇò×#QúLø|„hÄÐ÷Æ„ýÀö_Äßû4Ÿ«‘+‚ªÇ êA¨zF¶ˆ·Kšñv‰»¥¹]‹ 8œ™AG‡uÖºIŒo,Ñî }î(°¬s:©íJÑ_s˜Þnb‰q[Ð.©¿ÖóŒk´°Õ%mËâ/|åS[Ì(ãQiÿÄüÈrygû{Ûï ŸþwÚ‹n—ÈæLÙzZEôv`ì ¡NM ƒýƒ6´{‚­úSGÒ›ÖóØÑ$-–Æù$öÿPv–è¢ ÕÌ(¤x†tÔ䘠mq‘=âx‹Ý{ ß’óÞ0ã#(}èpÙð\p§H‡ ™,„î\÷s"¢éU)9"HÄð^Þ®13– ¢£w"™ vð3©NŽ4 }-y_a´x¼hj¸ÁýCn4– (cbýÌ]„æ†ëÖ$Ë+ù·s J`T`¾±û„uóþ ÛÃ$][Oñþ¦kvÝ)`²Ä Ã\ïþïðàXŠÿ:>Âø¯g‡Õýß'³ÿ6ÿüçæ.üç/ß›Ž½‚ÎÜö‹I¥\Æ»9Ænè.±gM¬l׎1¿ƒ}ªÜKá²}Ÿ‘]º2K{fé­ˆôôþ¤ÿÓU¼ï¡ …vÖh¶GÞ&¬Œ‹„r²åv&ò‡ íþåy÷dpÝ9k¿ïœ&Ú¢‚Ñò IËAYªöÉßßv¯;9Paà’Óa‰Ëê[€v'D™.qá<3[¹6_<é<”º" 3tå‘ Ý`“FZ(˜$°¤0 èP°À½âzO6 f»Ä‰ÂÔàÙW¥®w^÷~ø³4} ,Ç;i”ZšZTAßç€ϹSxv¯“^Rö¥(õæi$!ˆssüˆÖ^N ïwbžŸZ”ñq|t¿ÄïE|®–aˆ–Å22t5EJ›ï*ÊÀW†(ÌåÛöxLÒª·çön÷ˆTá²±–m†SÆjä­D`Ç‘WchÛ%/GîŠ$*ÝÉxPW½+—Ïuäÿ ÔÁÿ°õÿ8xvTÉÿŸ2ÿS•ÿ¡ ª‚€ª  M)ªBÍÖp£‘J°Û O\Àoå„•îÍÕÞÛ÷¤±6ÿ“;Ë ÒBÌm ³Q²m÷Þúùç ì¤mÐG®øS$!¾û†˜ÈøäØËá…}2Èji½ãñüJÔ`|5yƒ.SÀa<Ÿ't¸r1ù„äXãÐ@°ý®c×)®é4oçì½ñG.‹Yg ¶}¸Í»g S%WQÞƒ ]‚Î?Ÿ›†Cåd€Ÿ¬¸\ƒkÒcw*Mšc“uo~˜Ëhb‡”±k¼¤¼>&)ÿeã 4bóYÈH8ûx£QÍ›†¦HLJÅ3JÜÀ³j’Ó¡=á6àzЕPrïMQ‡<•äk„ø"ÿ‡å±y¸-x]a½ ƒF“ãÿÁ^ w9ìthzé8f”»ƒñÄ#0ôŒoÏä vÛ@*k—¹ª‚l¹›R»÷7Æo/)¾,p¥"{ èGÀpòÇù„ºòVÜ+ toa]"ܤ^Α¹GÿDÑè#§ Xvkî ÝÕ1¼Kìq4ÁPê Ú؃¿ËHÍÅ5B;*E¶•\¾©Î@D™á•'2w9GÚoxxÞ42w@÷bÐ>=½fÛÍmáÍ-¿–È_×É<¡Eï]÷þö6ßÒ_5دÕ|ñ‚Èd×1X“9º‹%ÞÁmÿ¼ZÐ×_5·¹Ï9o ÿÞçÿ¬%ø£Ñöý~;yBNÖ„’毯¸…]8'M±Ê¨z½mOo¶Ñ̯SÁ’.[ýô~X Üt±æa-õ:Û+a±í/•“ùjÿ‡|ÕüW:ýÛ$o(yÝžËKü<éÎOÑÑ©@¥“O…4þÉ M»ËS ´ÝOˆµbÕaž©}r¬}º5IÞ&ô$âeâè‰i•¿ÛSû£!~øêÐٿ؋^"5oyR?ÑúWÿ@ÿ«Î;ÜNûN³²+Fè„Lý,Xà:óGÃã6ðÏ 9à£óQ€ò(ä­±©>¿/:wF=£XÍzV!ð«eiRR&559…&eèQ÷ÍJ¢‹Bôðôë1}:¢È£ M¾¡Ë0Ê¢‹ò ãÉÔ”ŠW;ªgV0Š¼Û$y´tÅ‹ßyü>ªb=iúø¬Ù‡Z]¯°u=dHò}\åPô£ðz¾Ä~§"´g©v¦‘áziÈ5¡aY¦5Hv®ÕÈb,T%+½Úl¼:Và3zÄ ¦Yº>1>a4ú%¦bRRÅõ& 6ÆË ÖSŠ&®aäàO½…Î÷élï¯Zy¦„ÄÃ=«±|²‡ôœ³<—4"3Ϥt¹¯0 ”XgòS“@H¼ûÃ@‚ñYºñK䢜Î\<õ<Þ SŒƃM"îá~Dy8s]Mû)]Ð "ïn¼ò÷,Ùÿszüý‡’ý?÷[ÍXþÇÃæqåÿYÅñ^þ¼KI¡—¨?ªðA­RSþ1ãÀ„wÓÈpCns"›”‰À–ᶠtç›ø ³¼/Š1Ù¶HæåyQôÐÚ7Ðú«Ðꈑ“’2ÌHꂸ&'$•¥Ìq8ÉM,m@XDÌ~+ žÿë羃®çµéoTo2Å3ãM¯©Lh7ûÙD—Å¿›áX.à.G#öÞ˜tÃS ©lâ$”¯qd]xÓ TŽÇI ú 9Ô¿:¬ÓJšÿÉ\I)÷•êJB[AÞ?%]HÅø»›îŒ’ˆUIò·älFÉJD#^áq3TÖÉÿk9ÒUòêÿîÇó¿?;¬òÿVò%ÿWòžüŸ”úü™ ÈõßáU`‰o6d Ó…=Û5f# «ÞUûúÄõkË‹C ^wñÐJ4\£Ö`:1K$ÆÞ7Ÿ5é%ýÞåó¼pœ±:R–ç.‰N xŒ /w¥Æ5fÛoäõ¾yÙ\þZÐSŒ®“±»X1ÁV’`1¨†$Ý4ñ($&‰F1i('¿¢ *Å\\h?þù‘å×41•IbêâEªS4ba¾ì!ážaúŽ_Ù—ø7þÿ?gÿ\`(IòŸp1]©–nª‡4l£ûÇW­Áₜݽ(±›ÕY´/)„ï£é¿£Øž”(Asjÿ‰˜¡ô|:tÓ9“&™ÚnhÖ ¶“Ó ¯"pGP3,g;Ã@[w&’ =SkŠÌ3Wæh‰'ŒTl6ßÄa¢¿ôFûϳW— ? cªº‘T'£Ž±L,ÓVÚªÐz4 g³ƒýR#ߤ¶ö¶—özøêx%Ëã©Ã9ÿÇïé üøg¶óã÷<¬+¢`÷u]à“v¯.Ž%aÁÿâs, ¦£õ5"!ýÕñ«6Ûáô^£AÂw(ðþ=4à±y5ÙFæ¢9„§pÿñÏÙe†«;”Jÿóõ¿»ùÜ(ûþt½˜þwô¬Êÿ÷IóT©?ªÔUê*õǧOýrLÏžš¡ ÁxÍ‹ÏEaÑ—;7GH`ÛBkÞf\tôD¢ í0p@L‘ÊÀ»6ÂL &æ=œÙ AS9£[&Ý04]…‰®Dú _›Ü/€Æ© å§5@ÁmòÀM7K‚\ê0Ôî­É¤hž¦rc¼>9¡q¨HÐíÒ ÖÌo¸èf‘8;àSnÔÉ0uc/´+|À Ÿ±+ùæ`5esB<…´Z‡W(ðª%c1åå´Áz¢ÿ[2F¬Õ8h´¢Y 'Öl¹ZÜQ2IßZƒßØÀ|¬¬d¸†S#eæ\²EA~n (•ú-˜Wû+<ÿãð_ )¼Ø’.qûx÷ÐíwÉÉñ:t/†ŒôŽ#M¥NØ/Í:ýßoD½p”`õ+Ó #8R/âºþla'@=Fä•’f^jžëLHðuèÄ»¶6gË)û½=Û8„ë¶O†þ„þkþ<#ûHxîܶ#·ˆ4àÅ ÃÝFšô:}&Câ_ï£Ìé¡Æ%ÅW †ˆñ(ì™b§û[¼¦4/3©‡u›÷ìέ¹Ë¦h6CÂ'“ &¤jæ†ÒpTø)à è€æê%ðÁ^(7 åò¹³û˜A~•Éxt¥L\>¿Ã *4:œ¡Íã]4ÜéT'Çav L’¾àE­ÒìlÍþÎW­ÖøÙöË_åéøü"rǨÕ|E¾V£Åzi’çÃÜà°ïhÉ|Fã²ï¥y³A¼ð¶ßË0ê!ƒ K©*€G¡tâÖ+ÿfáu5äŒ0Ïl½výA¯£Bð^™{3´Xx¸=lK¾gÇNó¸V«m{‚&åš›£‰áß›ôìºÏñÉ ò®à/ Šù20¦Îq JXC,ØB ˆdP…ÁB„fÆT丗Øs„ ¸¬#ÄG>’•7ˆO•‚çP@°ŸÏNOÞñòó( ©,›èzåŸbKÅú`qÈ’dpjï @-Õ ã¼5ŽG#(kæ” ¬í” «í¬ªí¤Bº*ÔÕº°B[®xðgƒfra9å_‹ðáà’8o–ʉs ß /öaJ8ņw çA”íªtpWkÃ[1åŠ)&Ly+)cÒzxŸm†ïÆIb Ø(‘çÆ`Ü ‡㧖Į4 [ƒ7ñÑÓàZ­ ØjMÈ*žYñÌß9ÏL¬t”s¹™ËC¼1Ófxb ?´B¬Ái’ùߪ ëð¼ŠßUüîa.{`YÆãMÀžo– zV¦ñx ¯Ö…]¬âáÿC37â=xSwbÙÆãuf²^ƒ-Óx¼ø×à‰QȲǛµ6üS¯˜úÂxœ^ƒ·LàÔÝ– P–ñXæÍpèÆã2 ]ƒ—…¡È2—èjMH+ž[ñÜÏÚxÛd¥z§î-eþšÈ[Ëõ(N2‡Ÿ&±¨R=ŒSË柫5[‡gVü²â—,ãq8ãéæ-ǽÎß'½¾ªå8-‰šo-qŽ›;ª,ƒqéPçð¼\ L™¦âÒ^­ µUÅ«+^ý‡0§oÁMYˆ³ö`„ÙæáÂsØ Ï–iÞäkpÀXÙ&á ¾ZòŠyWÌûó7'o½ò,ÁYû,š,3°"´›áÄ2àµa\ƒsI d™~×qµ&Œo­xëçkôÍ©Ó½^ªÆGã<´D[oxY|3Æʳòf”Á'W뀴oôùâÓÏÿ¬W&;ÿssÿø`?’ÿy¿uتò?WùŸ«3¸:ƒÎ`Q2(d®Jõþ¦V™; 1>©Cãg04,ŽWh6RGÌ' ‘“\„ÿ"Š†äÜcc±Ô‚<_2sÛpKo `å÷a6¢ÿÜ9öÌúÙÜ© òðÊú`¥Z€O^ç\àá({A¿$°?Ei4\Ê«Váb•QQãÉ_`î¯:׃׋Î5•í=ÅÕŠ~êºØcI®ÓÈKùHõ¢êòz‚ “ )¸‘{âRdBB²D ÉŸjÀ›W*Ü9û% ø“<2ÊÆ»¿­òà÷½GÔáO©ìYð9Û*^ª3¼¿âû$rÈP/§—o_žuWýëA¯yÝ~ÝI`~c{Ékgãûƒ‰— ïÔN&`'LÆ×:ÀRÀ#å× Y.' *‘Å‘ˆ?ÐâþΆž~x•Ÿí|ýíþÕk‘²ù¤ñFHe¸ò¬}–›… èàÈßÄOWò†/ˆ+ ¹8£~ç©Ül'1õÐ#¡ã'ž½ÔSÒüé£F.ídMOFmÎ>¯Q›{"Ÿ|TäÉ&‰“ËÅE¬ZX©/ŒÌ¢}„äU‚–¿°'c,öF¢_ØOF£\ÞÍG©–¹cv›„]…ºÔ_ (‚ Œ|ÎÍ*Ÿßî©ô" u26]ËQîa?±ÜÁ½i|xÎn Á¿ŒîìÈ]ŽP“X£‡Pî– @1’’de_7kÇŒ·g'íóÖž Ü= µM@¹;Æÿ95þm;ÀåþÊ¢@$5ûáv€ýúÏ­ÿž×$ÌÑrê=M ÜóïØ^wÞîˆç7ÖíÞ/=¦ âÞ†ßΈµséE‘:—XïmçƒàâîÂp(uÜ8ö”/,Û1W#s¾uu#n\‡ % |sþ ¿0¥›ÑœÒA£Åvði8 d—@Ð’»9× Ó—qØÜ°—†ˆNï_Ê¡é‚ø Wx‚bØf0»œÏÑÓ|û«7qþºÍ/pQž››#[G¤Õ¡Ÿ¾÷O¦3–W—Õöÿuýï+°Ð‰Xpýüë^ís{öIF<9UNdÕ½wW1ã ÊöÂ|îmy  .è—&ë3I¼(o+êª=qí:ƒq°{èÚ BG¸ÚØÿ÷ß5RäÚ˜hÓ²MuY»,—t¢ ßÙ0w2“-,´€qåã1‰w("ÒÐ-µÛé· ®(¡Kä¾Ú™+ÛÁa`Æ׆å’kÇ‚}´ vrÕdÀ§‰-%^ás,†›èÁ€jŒš#'QD÷ñ!ZPÐ2Û³€«¡M äŒN5\#‘AogdgIt›" v(êÜ. ²ðq³äÐóYk¤Ø†Ú'8ÁÉ›ÎÉßí³îë rŸ‰5àÑt¹Í0,$ÚH¶í”ç;}ÃL÷ÃÂ'¦µü¨-oûkóÆtйHøðmÃy-œøÚ£ÈØ®ñà6ICüœß%{¬ðÚ ÎüÒÐÀ:|ÁÓ{Z§G²ïŒÉ œQ®±ÞÃ]o!Hzåæ?ƒjÒ^WðaòGª‡QUmÐ$<…ýG&]Ðs"ÇÓü’qkeà¶øLÙܺ¾D X»‚Œ{€"ÍÉ ÄyؽÞ¢pO»3k¶\–.€E=TFe‡IÔ^BQ5Ü@ ô=†ùðd¡7f\V¼ì1q…+îl™Ï™_^_þ­s1è·{ódÑq ü÷8IŒ#‘o&Æ­ï…“~ SïÁ)švÃ1Üäw2ṽ#˜ýã«Ö¿ä/½ƒ^´øê ½ÕÂüµùr?éí8{s˜WÂùîŸðl§ ´µýÝ~H®J¢6¡‡uþo yyÀh´uçÏ]n„Q)ñ~ù&U"kL¹>" íËuRÈw¡ þâ£,  “$T"Ä2L¤–½ S &L2ð'N5Yt“G9Š´£B=ªôãQPŒ†Do¥’ †ÒhEÎv B,Ñ/Ë  ÂBôr§B/w½tdL‡Í‚ ¼‡kLܲdŒ’0õ²'ûå¡lèí(]sQÎ ¹x?Ž÷äð¾qç«.,¤»¤x¤ˆ?ž´ Òáäy¨"À¦7)Pbí…;VøjÒ1çƒ| LÖ{×¾BA%Î)œôcnzä>GÜl·çó‰ER9Ù&›M”MW,[Ä—Û;ÑÑUH&"qV²A‘»Š¡?3´ ‚,b-Õ¾«_0¾ðøÀ^gæ=~ÄPp1Löh0 s ¬ª2 ÉŒ—èrñ hÌñ7¤ý‘‚Ïåq_‹¸¿³Fw,ˆCò¸ ÓОÇùB>3!«ñVvh.îM“qp¬Hߢ¿bs9gæ ÄPÐ4Ùpé²ö›— í¼ïÖØ`»·Æ€,†¡g³(§U¬}xöÒOé´ÖtPKçôN³¶¥s< 7ìïyAUaÃ^˜Ö²CDuÁy,+ýäa°e§s*D é„ÉÃw$SÁ®¯|×v Àv¬[ yyÄ6¸R9´ê\ª; :!¯í)žgõÉ]„(­†» Á6í4n¡Î&Ãt"L'Aù Ä~ÀªøÄ8¯!ŒûÆ'IZPN’Ð$çôpØh=ä“n$ž&'%H.]6c„Y.56õÉñ0“ÓÈ°ÉÉðËfˆ IΠ<i´‡äÛ ¦½4Škmˆâ‘ÅÙß¼&‘™ÿ£lŠif“Œ»n”d°ÿ “ ‘E2c³" ’ÁKÉ9”væIItè7€_—CÓé:-Ha¦1 3¯¢-üµÞ­uò²î—´¬L^H&-2·UÈ‹é™%„ByiS4%gg*õl§ŒÅ³§Zéiª¼;¡U®ù p|Ŷ’)Ž§g,9Axú‡LtrJð©.-²»+…ìî*² ­s6Ý%¬Y8~:ù¢$0ÛtÐî^^^ž NÚ=n¼&ˆÐÑ{ö³éØhäщùm¹öŒÇœ›cÓËb5üñÄÂÍ65Ÿ@øÊ_NÊ à[#ÚS7 ­JÔSûcpv¶"zWb ÚY‹×Ä?Ü›¾Y0[åJ&oÙT$|dL\„©!¾7=?ô§í-é †ß™XSn~7ÎÌšÝ>Çû—!^U ‡ò RЬ|o½ðɹ<…I÷ csî˜#Cø†cy#Õ%'þñ†o,<œPæ…4„zl”_ˆ÷Ä/¢F'èx9#â07z±;æÜ4¤ [m²šoª;Aü eÉÐd*0|ݪ½ó¢­;æS¢6@pxÊöùä’N¹XʇP–ÂK2­¾ëó_D§Mj£mQIãY|:Håùü!×(“ÎR9D HßÁnÌß‹J»1{/æïD¥½˜o Ù¨%rIØ:{QÃP¢Ñ4kQl›¥ê5Q'`wßÎãú½ì::NÀüêr·½wÍ̱…Ü^r –¯ã.½޿ö¦Xr'àwȧá‹ËÐÑ‚)îdg^:zdä$oÔ!wâãÃÝ!P¸É]](~ Φ”RzaÅ,^²ÀkTƺ<À‡~ÀžŸƒV¹N1D.g¨=%ìu OG­øc÷~ÎO¸V\”ß.ù‚RÕˆmÁ®$K OZb¹!ž¾’§BX")ãÛñÒS—Wø¡°‹dÜÔÖÄwÍèµ(i}ÏȤÌá±Fÿ VÿBVaoœJÉÊÝpžþÖÕŸ§”ÿÕ=øó¾vØìü¯ûGû¡úOǘÿõ uPå­ò¿Vù_«ü¯Ùu ^uߟwžƒHçL\¨PÑTú$NÌ0Ãpú€@ƒ)1Òº¸[,æÏ÷öæ 8ZßCÔ;@›±†ÓO{&¼p÷æ㛽ñÏþÙbnÀp"LfŽF£Ý?£ Ûž£@>­å¹ÒDvÙ9צüìˆT/•“+Q¡æe¡¢ F9-PÖåI:C*. ò·§SÀŽœÑ6€‚EîS1ן]D`-Äð™ó…X´6{v¶x˜“…ù]‡½º¼<ëöÞÀVm÷zoÏ;’ZìuáI­"SÇÂé6ôÒ½³"/ºÅ*K]Ü;ö춎Iyg&ÝOP<1\לb.a"d’í.I õ=J¥.¼8ýFQ=z—µ…FÖð ?õËr&Tz\Iú诉ÅÔxàÈ&Æm’KTî-à>˜põ›,×34âPø‰C v‹Aǘʸ óÞE•‘íœôjòò7]ZO5@ x&ÁÁ½o’šüYâ]WÄÖ^‚Ž±Mä¾ëR>ìƒOÅ\üW¸ ›” ȳ*̽ŒÒ€W9™ω2yh¤ZBDŽ öòä:¼U(451A£-‚.®PwÒp¨J}ƒ¸¿39åq ò¤÷_ÙõäBöß$—•ô’§[Šäê]c']ascîB¨IÛ Â‰3Wâ.—+q#—Lô Áíï|uPã—¹"]SÐæ6¡¸îåM¬ù4A®ÿñ'®3AÝ°õ=HêÕ˜niÞå阛þküõ80]â[Cº³ávËzX—òïj°?LܹŸt9š¸ú$ÆR¯õÑÚA}Š]ò} ù×WwüšÓHf‹J3ªô¿ôú¿^Y<ÌUÚké­£ƒV¤þïA³YÕÿ­ô¿ªþoUÿ7Iï ¤™÷'ýŸ®:øà}]óB΃÷/Û×LÃÛz. âWy-Îi¿—èj<õ±¥TÍìýë“è>1¤# –¤0Þ[)@›^x;È*<Ÿ®B:¶³Œ¶³&ˆ€tW낸ZF„­Ïòü7ðòãøPÏœ}þ7›G­pý/àùÇûÕù_ÿ•ý·²ÿ®]ÿ+Ò.ÕX Š”ÐI•^nô/ƒ4gžNÿot;øh:´˜¼äüãÆZ¡ OV÷1¯HznÍðV»áUM ^_¼=áeD·Ëû6Ñ%T”‡>Bý÷Wrþ1ËÁB¡ÅSdï?;ýGû_ïéfÛÄœ<šw–³‰õÁôµ%ÃGûú¼ÖH¾‚—ü “×so/ßx5—ƒgÙ÷Z|uïÅ R« gaEšÑØdñ¼sD ºù»ïŽªãRº¦‹qiªÖ¤&íuó€IZ?ãµ€~¹í2}Åý¬™kxŠç/dÄ ¼Ð<ä¡? (ùÛ†W0ü"¾„å|û‡¿GÂå$r×ч­šïŒ%Š¸Éwì9ZQ9ÞÀ6,ržã›oF£ox”¯[ó“üËÕŽ„G˜Ä\ÛLJ^]?J?_àíúÉQ°Œ1ñ’¢ (º*ß?=™âŠ—.ß<åy°£ÀÉï‡ËXl¿ªû“ J_*G#ä“ŠZ Aˆ^Zr9EIœ‚‡­}ìððC ¼>"!ôè×_™Ôa¼Ek͘"yáIQÍÄ™J‘ÅO ª‘¢d?Î'áÌ`½8-Êö¥¡Âþä)=.c¥KYÉÿI>YvÌ%}…3ý÷Nú1ÑàÇì'Ÿ7é’gâÞ6útÿt‰>šñdöŸ9ÉGB=BÖĈ]Vø‹ }µòµùŒüÜ©1™¨ÞfßÿµZÍgûÿŸæÁQåÿSÝÿUþ?•ÿO¶ÿ—NpïÛo©°Ð–—`4é¾*ÚØ»fHòþ!“øLxøî׳öûÎi¢û‡?¬2|i7!ëÃÙ>ùûÛîu'Î@kCs°ÿ”œÜqåyعÆóº,~Œƒç _Ç(åhäEÐOb”œJè›4ÒB‚rR(êÇòj³Àô {ðãÄø±¬±ª0¹xÞBYEûÂX¯ÇŸKÞCƒPa*¢^C¹d#ìàY€ÆµåÍÜi÷:9ºÁçeÄK™M®"ûÎ×…boB! þF \ø8Çߟø\Í$áW¨¦‰±âH´à³<©K VÓ2¤…<ú1é ·u÷Ä ìÑÏØ ë£([ª– 5))ÂRîJY%Om ¯ÔжK^ªÜÕJOŠ\—Ðe"J!xüo+Dö;×Ò÷€LÛÅ+Îe7¯â¦&Õ¶ äÊ_¡àÃý[yAvòS`×9{,TNý—HrŽÈ6 sðø.3ÿ³ä'a¬ãœ}Æi¯NeŸ3‹B…6Zú¹p䙳ÑBçlµœêŠÎ=*¶Õ¨"£ëÖ¥°Ó¤é¶¤¥ö#&=ò¡Í¡L®8.9‰YÜÃñ“Rc/ Üé¥F>¥§]C>Ø{Oò$‹‹ZY{Lï$óQ“°ÍôN²ÃO}’me숤ã(¶‚JïÑ]º äÓ) "ïUe·Ï$ÿïGç ¥[.'ÿÿáqó(œÿÞ>«òÿ~šøߺsÿ3{éã‰ùÀzS46ýe?ÿÿ³ëâƒÆÈn,?üUÁˆ,×1MÊ$wg8·f8YíLÇÅú£C4†¡‘ÁÀ®ÈÐgßp[Ÿkß,¨ÐÙÉ\×YTŠ3\¤ëÎ.—í,îLì`»'>Ú®ÑPcÅú‹¼Wd@ÊOÀgŽ5âió¸ý Án¼4ðq¨†,wXà†É:A[ÖBøÛ¤ùQ0÷Ž,Å°r<™3ü&´g; `øVH>éƺ0:’=ñ»£ÑïïìixJ€®`Ï007œŽm@ úos´á¼Œ·êˆ#Ë}î9L¤Ú94d€ [¼rïÐ^†u„»²d+ZÛL½»°Ðêd; Ï:'Ï¢á;ntXïòUÿ]ûº2Go“=z›¤/ßö+ôå+27ÿ­{qZ÷LÒaƒtu/NÎÞžv/^³—ðéÅeŸuÏ»}è·IcŠÞºô‡_Ÿw®OÞÀ“öËîY·ÿS½êö/ gö úm³«öu¿{òö¬}Í®Þ^_]ö@z»8…ž/º¯®a Îyç¢OæîÍ;?ÂoÖ{Ó>;£Ûoa×=„òäòê§ëîë7}öæòìK²¾ì|í—g>ÚÅO´UÏÚÝó:;mŸ·_wèÃKèèšZ ß½éÐ#² ÿ;éw//?'—ýkøI”Ù¿¼îû_¿ëö: 6^w{ˆœW×—0b>º¤~àÓ‹à#ìÄ_#h…ÓAc¿ÑiDÝ‹×=ü^^ДüÍd¡V./˜g‰ù-yUï¹c£v3ÚꥌÎ2Y–\›«¢\òĆ­ ²–HÅ“ŸwÆÏ?³Ýݲ¯þÁųÕ០ÁÑßÜ4÷¯xÕãçÌk.l0p-©ö$7¼.E©á„O$“µ4ɸƒ¦Z¨¾pŠ•#lÀЪu–YÄ,o™”V t+æºdƒ©1ÛÃÏéOs !Ó˜ Ʀ ¢ÇÍ||ãqAæ)_²#ÍžíÀ”éõI»'&ÈâDin\•z.J5 uÄF¤4W€*i†~T ÷¸°'ð.þÖ^{å%ã­E#!4"Í"S)*)Pðµ5Ÿ´'Öl¹ZÜ¡÷ ¢0¸7_ìN @Ý ¶„wSá+I~0iK¢ t¬òɽün€ÆËéô‹±Ï—Ä&œ¡¹B?jL•‘ˆbMOtçÂ<ÞgÈà Ó9û–Öè[þ‘ 8Æå˜Â7fsÃ]¼§!Ý=&{d&¦á$iM!…gž.²ÛÀøËÆýã«Ö¿êX:¯½±RêÓ„>¿:¨c·ùí‡÷7l˜ßŽÏ:³”Ï–'³Æ“Ù&½"Ý‹QŽ[å>äZZrµí<— ®»U÷?Zúßýûæ£2ý¿[ÏžÅü¿Z•þWå­@+¿ö¤PÎù‘ý˜ß}ÀXB ¼¿¿ßmî7¬á”Kƒž€ˆb§»ø9sâsö ÐIá¸s÷P¼]ÂLw‹é„f³Cç  òQº·÷Þ·ŠCÇôÙ* ×] d0Ãñ´P%PD´FHG¨o 434÷¦9#’ù`¬öM,Á0ps†Ûž¨ä˜7Ðýld*:³{]µeÃœ©âê£`*d¸œaÃ/ƒAùèäÍïwÕEÇÒoìÃ̾Gé–è„‹ÂwædÞЀêÔX»ÁQcá$iLî—yº™BW/=à: pUg¦eZ6'ÚŽ6¦ÝJ»yíj9d M8ÎëB»7ÅÄ…žÆ•Ù±mr/'‚ULÁðPoªËÆXŽf[FPˆäÈÄÉVV±h‡ÀZLÐ?\  PXg%B‘-7êýG]M ¤SRF¡›{${d ³E·9Æq,<³ž¨é9‚ÕóilÝð ýà‹É=~'ëâ´á‰F0æ抔ƒõËgèß&ô–FFÜïÙûKëo'ƒ‹ËÁÙ»ÞO'ƒî\¾DïµÔø€‰ŸQIÚßBWA5Ü  ­%b‹W¶~ª¥ÂÇØŒPýÎDX!š<ææO698¾Žå`áü±¸¥hŠ{ÓðÈ‘1ó7WDñvLÄ0ì,¯kÌ'|‡&jé‘-O't ›ØšHX\±Ôâ¬;ŸôùrÉÏE³»cØæ^0½´…ˆ5‚v lŽlnG3ð“Pï(n Š-å%Ò†i}µgcaŒ­çè;bXÔã¡Ô;´-äp<áø§hι }F]Íç£ãCd.›Œ‰õMîS‘ ôÛóÒÅjÇ"$lg0Çìñá`PÃ"0қħLJ/»}xº•b`üzw{2þêmó«÷M,m”zÙMç÷ôhß4œ™»¬éð6˜ÖË{€ª´äÖ¼½ø GŒœ}y#Îw¦Ewk.(ntád22xR™žÝÝ·â ÞKž¨Üxƒ«ÚõÐ[XmÜB J'ôˆŒ í-¶1ƒðÑõÙ7t¤·¶¥¶ %ÒÈÁõýÏŸÙ#‰ûÅÜÁòt$s¬P†‰eÁ¼7 o!–Ü#±CÅãmSƒáyBKäPI;W ¤µX4Ú\¸‰îÞB!‡E¶g IÈ®]9Yˆ¯=ˆÓþÖp†Æ->›L@%#ñ) @ÁŠ¾8žwg|ÄW?ú0ƒ\JÂ¥ªÈ½°Mƒ®3$S®zº”γt‘‰“_útjŽñ:à_Ž„~¬Z TýRGÅ„exÎI· xBÜûìoH( ü¹Ô¦«DDê0Q8læ |ÂÏætNt·•` –Cç\¥ž~ñÎÒî¾4‚»zw_œ.Á…E€"ᚊuIÅ£wuÒ÷AD]ô<¡æ/â‡w®“Ž*ôIREô 𤀟^rš¬â· qÌ&bp£(Ww{UîÝxtoVlï—(ÆnÀZ²p;MyoÈ/sÜ)ÃÒZÂ"x›»>îÀP]½ÿaõ'ušË„PÌË_ðJ¨qE‡…äNÏ+ƒL°†‰ ‹GÁ,‰g‡Ât˜AÉ®ãaV¬kÎeÈ»4ˆAƒàúqš:éèÄT\¶eQQ|*¤råðdæTÒd;ÛèS÷‚­HÙE;wÈ4Õ”òµö£Äçäe½¿Í¸Vè~ÏÓ£¾ÓC¾3.²ŠÊùñªÀ”ˆ²ÊÁßÙ8}BÈ? Ê—„ŸK¨ÏEüP óÿÙæs•« %bÎ%‡ôGú‡"^©m±üQfù ÔÞ:¢ÎEm–òWªóœäà GËä%~­‹_òYŽ÷U¼Ÿd «ˆo>„>Zƒ7­”éÚNy³$ÚɊɤÍuUædWŸ|¶+iº(xÁ.4ÅÄ`¾±å˜#<×yÌ%TݦhMk!Ç7ùËÕvM¬"fq¹ÀpCA€ÜT ’F\ðìl¾„ºŽ$²@â“„š–”{–õŠM8«‚{‘Ïç9û⨓¦8£Ðò9ÑÉ6&¡º±VYq_Ô—Îes’MZ!‡ŒàÓ;¡YÕöW77ŠIh’9wŸð8ÿN¯ÑCLBŒÎÂ~3‡+?Å;&ºaÐ2D ׅEeS´Â(Àó´!Þm©È¸ˆþ ½¾ì³¹™€ð" °®»tSÀFHô‡.yÂJ¤K¼ÌG+ПhÙËÆ ¸v R <88`ÕÄjÊ0àÌXˆ­^Ì»ÜÙ|éÞÑD0ñÌØÂï=̲û=›@üòtMôo€LL‘‚[8Ò¦˜øBŒhÜš5O- ¥8EÊ®‚¯wà!·*˜ÍÒ~¨3JÌp‰xÈ$4ò;#¿éÃåíí{}rLø!ˆzа]mGhp&*’™/Ä0ºŸ1áô ^ˆDrgÖŒ®Z ×5§øoÜ ¯ALÖ”sQ}ɘD’—Wýî9J ƒìR˜¼“}õ Ž¶åä$Š@2B|%H…a-°Àõ£¯`1ýïaŽ˜‰Q‚º`Së yVçù½‘”ODù ɇö÷C¶C°ÕrŽzã·¢ãK{)ôõDUO\ð9ˆºð:䇖$½ÒjYÌp{ˆ-OÖðÐ9>â5\Ñ‚S¡$ùsœ$®»0º#åÇãE6buG€}‹ûÍš}´?xö ¿+²Zì^î‹{I˜"fÙÅí¸wÑÝÅdgxÕiÍÆ\z𓇻B"ÀžcßézpÝyÝûFmËI]É,l½PÛpc‹{ç‡6L^m‹<­ ûýïzÃRQ„ø]¨¬Éš{>koF¸A„?–>5ˆ¤hãûŸTŒˆ `çPÇ4(aúÌ:÷<ñ}Çó¦KÉ&É?cÏå¡9o ÜÑ5´…p9DÈN¬<„'Ôq̺¶IFÞ–£;ΑðÐ÷`«id§T·h|?|L{FyK>T=¤ Xåi¶•"ÿ2”‡­dWEô<ùqtÏ®ZÂ2I{}šŠéN† Vk°GÔ&ß´(í—ø½¬¡´MÄQt¾ÅäLû玬ÐùS&ǘÈGOøxˆˆ÷b¯Dw ×UŸ{«‰ÒØ3‰óæ@:LÅU4Ì·œék¬òGr`©ÿ0Ž‹:#i9®qcz.{Ü‚†U@5±&‹]+ä¬â—AÍmÉ6î¯òÝ¿÷wöÄTW—ô ÿKtÿ‰rWyVòöµD|Pƒ ãI˜||B€(z`ÐtÈ„½ZB¯ô¼[&J—OÉžy7Ou{IFà–·ƒMa,CÐ>? 'w¾âž¨S`çÜ„Æ€5ƒFí`—ÉC(á£ì9ù¼¨‡"uµËNίޟ¼yÝ<~Évx>Uvvyò7qSX#ç-ÊKgzµ±ÐcŒ5w)Í°Äà‰§úX(N ÒCÑBt>2tWåGG,2'HŠé sk/Öœ`¯× {˜ñô®&Ïñ:Á*i÷¶“Ž·‰õAžàùå§o×(Qrä*›‹c¼’ÎÄŒ:£½H€JÂ1 ˜Ò²b6Ù°k¼kÏI63W#“«|”õ“Ö€Ð(uÕl}Ï‘Œ¹Ù̶šnCWè1Xüí¸»÷[)/l©à"îÖ]*3'x©?1ÌÆÞ®SÀ¸"ÊÅ _—IO ðCƒŒ>zÎRÞsôõåN¼Tm÷W¦Ñ“kÞñƒ´y<…ž‚›š`¼AûÇv÷ k}q£¦š@Äï,;'쬳Ûí?öAÜÊ—h(÷¼Éõ›Ê‘RMU)Ž+èê’¬b®ïOí²^÷u÷ì Ö˜x[Ü9ö}FŠË «SŸ½ë´ÿ68½| s£ ‰ÎùÛ³6U|q§j¼o]N¨®ß.d¸+r*­yõ’ä°=åºzóò9Þ"ÌnMQÌ@@S¤à›¦E@ˆþ­Üj+ y…»2gTèÊÇw¢·'h¡¶ñT‰¶ ¦}È •ç)ŽFO)I3lj0 Ãñ…Èð|Ø—.& p–îX*MоÇDã õ"ãÄA¬[@.-ä Š&ÁñÐÔà6RpË÷F¡´;…ü[… ³âõxD—ÄõÔP&Cº¤š*ùD4ÉøÍzY¿ß*¦E†Æ,ŽQÓfŽ¤¦`Âk´BÌÜšá¾êÁ&V}¤[°µ‚¸Æˆ_÷ø9‚Çœ‹`iQw“˜ r)¥sЕ¸  €Ë¹(ÒÉËÊa)ª¹œƒLÀ‹ƒ%4X¶ø8Û¸î•#™Àð=Ó‘5±tãj`ï{ü_teñ¢Å9+æckGׇ•ÄÊåù,Bè@~Ï£•KjÓ ¦áÏ@‚HÂüZ|EøX×Ït!}'RD1.®ùÝq? ›–ÃÁÞ­ëYâ2™jx‰œÉØ«TòΚÜYsh$Ghñr?Tð×Ö‰—ù‘/4Å0÷'«>W#‚®„'7¦ÿ%iŽ·,(  ;¯‡X'AU”´/M/×úGK8¤‰J ’4Ë…çáò憗ÐA=‹º°E”Ÿ‡ QaXNoOœî«ÃÈ媨$┦Kª«c|€™‘¥ô§%M $2zá•{uqÞ·à%Tqð•ÜS`ZUÿã¿PSJý÷ƒƒc)þûYë‹ýVóx¿ªÿ÷)ë¿gG[g„[Wuà«:ðUøª¼jø=© ¹ËÍ,ñ"(òqªä©$ã´0™ .pö$†Á©¸œäIc¢˜–$¡®DÒ‘Aä’‘€Û‘|·ŠËw²âUëÆK·Xì:âJåà|I°{Ú—D@¿0 —bÁ¡æÓ*Ûñ lAi;.úúo¢ÁÚw*t)z½á”j±5üë9q]ï D(O­ƒ˜ˆ›–uù…0e” =wÞbËy÷ƾÍL\2¼—•b¦=ûô%Ë¿eÖ“ó±\®z" ýrh9þÌå¹ Ê¨æ F†«(Gþ;>l5¥ü?‡˜ÿçþªä¿Jþ«ä¿Jþ«ä¿?‚ü×™¹K¤t¼v]ÅxÅ&ë\bK T­ ’—ïû¡ë³ ˜ÝиË-kèbLvñZ­N± ´›ïèVÏÂûøwŒâmO£ÕõÙíä6üj”‚/øU¦ã•[7ÓVç'h½20—=ßнwéêï&Ja5‡I¡ÃîŸë*8«9ÿ#.wƒb§cÏd“"¬‚@ºîüým÷š¬ È¡Åµ /q+ÅáâÌR í…Ʀh\ÂŒ³aÜÜPU@ÜÂa!S°p~=!î;ø…Fà<æ6<–Pyî-!ìÓµ¿Äÿþý{î¶ _‡çØ«Ìüú[LQpQAKѯBA) ›àžó5åY¹ÂE"©”*y3lE«/µû—çÝ“ÁåUoð­ÐD}Ÿ^B8Ž#¸!'˜òº”}®²+aÚõ—×™÷ÓcQË})9º“BS_lmé^-ý~oŠPõ 'šPB±ÀStÁ³bAeW¯¬@ãp =Äþ¹•0­\‰w”–e)+’:>Iµ«œ` •;7V~ÅÔª'Ì9ïŸdÓ›mKÆ›ö•Øš°$ÂSÌgÛ_†¥· D«Òï fo´‘д“šÆ^…‹þ&~l›ä/ø›`ÖÁSf¢ï´ý4I)QLÝWúšþï.g£½¢ªñ³gGiú?©Ë\ÿ?ÄlÀ ÿ?;l}ÁŽ*ýÿÉ­¿ f¤iÊ»ÿÛ&Ùž|±ßÚoµ*ûÏ'´ÿÆŒ?§ !Mì9ùÚ CP5®*»Oe÷©ì>•ÝGßîO"ç9Xõ×'ï³f%Hýä? öë¶q×°f¥ˆF˜Ð+ÅÿE@?þwÿ°ùÅ~óCB+ùïQä?YnЮ^‹l6Âi’¿öÛ0Fè…k,öè¥äþ(´èn´x.°#^˜¼#~<Ùã¾…5ÒÙüà~¼z|(™¼¸3ù\‚j9¶ï]ÖC^‡Ò’ÕÙ P(Npýxòä"4JlˆÞÛóÎàÇn¯ß–{î<¾çZvéïRn—›åŒÄAƒòåû‰yÈoOmY#¾Iäò]ïÏßË£ŠD²´(HÖ:r¹sIDW¢‘p‹×tD[9’Mx÷Þ]…L~øo´)€àuvzÝy¿×ëÃÅ †3ÅY}<þ.20È'^WþÝ•4b,/Npz³–Á’¯¶Â}§];oÑ->›/îÐâ‚$>¤êÔÁ‚„º¹¸\õß\wÚ§½t„SøûøçïÄ„éw-ÖÅ~ü³Ü‘1ãUsÏ{ìÇÒ&–å£]àäDìÕ“ ĺA¯ÿÓYmïk¬¸Ô9œ\žÃpAç= ›¯ù‚^9æ 7Ï+5!QFŒÈ[ù;n×ó-(4h‚ó9;;ƈNø)È3öh44¼«ƒÙ Ø56‡Ë[rmŠL%ÈÎàdØË?haž˜»#´…v¥ÀI¤›·]êñ‚dôð¦Ä0¨ƒ¶Q˜S(JZ{¬Ð>Õ ¤­QxÈ«Æ8üdó^÷„SÊ[Ø&3cf»ÓœïÔä-ú žñ(9å°’ÒÊeãˆ^£Z|ì‹öÅeï¬Óá;ç” ¡´b" Õ&‹í’õÆ*î¾¾hŸsôÒ±²o¸Ûô7áËï$ôuóÆ.;|ðèpç£o´ÐÙf£]‘lMT1{šŠvÙ$.˜Ø̃ÓΫž¼%°¢¬_t‘’˜dOnŒ@½°tÑrî>ϾQSÝûGœÍŸûéâ„*E¼|Û=ëw/|,rímŠVàÔ8h…9™‡hnòÞ½·Æ‹;š9â9‚J¿†44³ƒCN¸úãà¼`òõ´bSèRKhpªæ*0¦&NýÁ^ò€ ìû/ãÉÍhÖ¸û«`˜d®iH½“¥ÿôìÕÉÅàMnoÿ/°–¹qk¢‚÷XǺ{Ýé_¡’ /@ !ÔÔÜ<sôºêôÀü 7õçõxÞ9¿¼þ)§?ƒÜKqyÿßéÔ˜ÃÜ »)ñëxçí«|èÜÅ&]¯ SV™-ô´BgÝ—jýὉ›ß!ZYzê=ªu¨Ô߃»‡aøÓÜ.ê à„oŸ«öŠu6U:‰¶¯Ú§yc§Êô½œ(>ÎëÎyXôX”x|9ÜåR ^‰ÝS= !*¢Ç3v#B Tb—ÿ0¢Mã¬?¸|ùO»×‘þÇ–+Ä×txUó;“8¤üõÅiçåÛ×\Ò4x4ÙíÝ·²lyÕ>ù[ûu'axùŠ5;9è(/9&rYn¸âÆRÑ]‚Ô…S¸ïΙ×׫Ëë~Â@t!>3¼x· ß¤Ž.ÚçÌ>ðTöŠ)*ôÇwDBXVÍ}˜q¹(D@Â~û:È;¼gEæÃ`R?o¯ÏúИÚëžÊÖa‘Èt"B ð“Á8¯;B4úQ€0[N‡¦“LVòØÝÙØ‘õG[òãÛW|v.ÌÅËÞiM2,!\so´±wyðó°W—½î{&: }Ýé 1ø¢_™õ*û_Üþwn|0‰ŸOÝ›Eö¿ŒûßãƒgÁýïÑ3´ÿ5«üÿòçË­/²ÿcÀý‘Æ0ö‚W‡"f­xËwªÒÞ'ß}Ç|zb™!Š°H5ër¡'/Óó«P³ÊÈŒfG¿õD‚чŒKµrïq`ŠÃAy¤ kÿH\L6îèð ¬*».š?wuèŠg³æá¯ß,ü.]òÆøß{TÁðÕÐýRº·fÐ…Rk‘”ƒ·Þ{vk:uæÚÞA#Ýž¦¸°² ]ñcÎY{é`€=¿*÷,³t#t?qxìm´ YÙ³¶ûѺyÁ{¾÷“Æ@…ñäáöUgËqˆT®âŽ&hïrùrP  ÜÞ6tXËÇ!R€Í„´ÆoÅåõ½óïÔ$Ï’F£´bÒ¡û€¡ù¤¼S"Y _@llm}yþÓàäêíï¿?Þúÿñÿìð'µ­/ÿä}ð—ق讓üëÖÖÉ«³öëÞ»—-¶ûî€íž&hQ)9²÷ƒ²=ü·LsÜN}J”ˆ·¶àýs⧃Ûù¤Oà]¨Ûç[ÿg4aÿχ­ÆvG¡­ 7ÈüH4 @œý­h'Bÿ>ôðSÛú?ð„íÙËÅóÄÆ¡¶[ÒyÎâo÷ŸÒSØ÷Iƒ ¼ÛHëgï•Ý…FÜÿùhˆt„ÔÇÇ! ÁÑñ=´§ÐLÞÄýσù#öÏ­ÿC—’I‘Z¹D4Tïëz’ 1¡ç23e2yjA¿[ÿç¿ÍÑpºpÖª™0wУ|b/È¿ä›sáþ ìæ6ŪS·¦»½õ¢‹•Û#yªt'~p ÅõÞÁÏ`?ŽÍ û¶a®@% ž’ŒŸ'àÿ§îISþ;<<:>ŽÊ‡­ýJþû„þ(6›•`åX9VN€MœR7G •ŸKþþ’"aØaõC‡ÿ´†ÀÈ÷1dŸãœŠØnŠhSJWx¨“³!(›c/·üŽÛuI »xV°¿p£tãî¯Ò3w1†)ã3h!€•Œì¥›p—hûÑ$*¾ÑX QP&êÞÀÒ}o12e±œÿÄjN<$Ì¥Ëç Ù ÇAÇxD‡kR¹T˜%þ%ªÁ×CÒJ)u› …¾€T”u½tW¤R¡-yf hK]DøÆXL€…tñŽ’]{þ×Á_DÇ噑çÈ]Ì'Æ’ÇÄpH ŸïHsó;jDÐIœðð=Õ5EÜ’ËQ?E ðzfc®æÛå¹Ãü.ø9Ä‘d-ê8ϪívP? Ã…>ò5H À‰9Çfñ µýæ`v~.¯:þ3ˆ,ZÂŒ¡ÉH¤·óë¬5”ÀÖúû¸\:<µÞ\œªÖ]óÖrƒè!‘ qŠ!O–¿¦^6'Q‚=6<žÝ#&ZÔ0ñI]Ð@¼€ÛÒ 1qè Åa†;žõ%ÖˆNäßöÀ¶AVPœô° ¸ùÈ|âu„UÓ¼.„TaÌi"•z×öX•mÆW/õ] à0.¬ÙG{òQä7WËÎ@î cSuÜ¿F¸ ‰vœ|Ï©LÛ#Ðʼn=ûˆn*(Žìbv»5ÛNö¾ Žå/vȤ%òyˆ¥Ýå &†Ò#]s ¶*®lHëaŽË×£/yfÌçšñ*$=g÷'ÍEâ¾ Jè'…$g-rƈn†ž³3r—Lè`Š‚žq'œX¼ÏCPãç0‘¡kþgÉÍ™x+5Åìø\Œä§HxÏ%ÐÅö•9¹5Ǫᇠy 0Á# E—~8¢ Üo”ßÐ]JqÍ.E‰qbäD$Áš ðb4ƒ`bï… B? Ó£ 'ià„£EC\Ë£ ±¸i=1¨2˜åmv?SdpŠÓ>¬£ˆ­,)w!Òr:Ÿ‰EÒÈz¢Çó(<çèZ.0ÑÈš]ðàܵºyï *œ‡š^¡<Å uÑ\³ ЋuìÿÂè´¶n«Â}ø]ÄC‹¢³HG¥möèµúÖû1?›?kÌ<ïI⦡.án+KL þW„0AùdCEŽÒÊÒî ×££®:†’M¤ ý‘î° <ˆÂ±ðs6æRB(ÊgÁbÁü(¯Ý`ì¾WE†"÷aâdð€¯<ÅÊôߎ™kMA“0f&¨IЂîõð‰"œç¹Ám@èoG´'ºÚ®ß ?͇ä(ˆxÏɳ“gvv1Æ>‚ ÿc² Rñ›À[Iæ„â$È»xcß››ÁK Ë‹àe@ щ{Îûx¡Ó¤ÂÏ‚2VRdW°@~váºt8„h"œ¡)r&„š¨ËP’žjaPɘ&#Gctv=ƒ£u;C©=å°.m$mö…ñàð½Í¤é#ÊÝ= M„‚EæuóÞ£t|àˆ¬WF,è&~¶Kù¯¸6(7’AšJ,µ_q–“;Q'c•É,„ÛAо!éì¦$ú“ ×ìYÀhÈý9ŠÍ:A_Ý Q?€‹ƒ”Òè"T¢*ŠÁºœgÍ1AûAÂÅTmááÑžqôÁ¾†äã.}Qg~kˆÁÑ–CÈ|‰+‹.xTêÔ9v]ÄòÎ0¥9BO…½¢Õc9"JEù©»¹Â]T¡ÚÅÅQV<"øÅï$͘×A¨ טùƒ0!Þ€*†l1œR5}é(²§²¦Ï%–:;êžè0¶åÕ¥øVt-v„¼|cu¼‰s…}n£ŠTÞªÕ%(†Ë‚œVÌÇ?<…—§cÝ[œ46Iàï¼È•¸‰å’þqë.1’]qðœYXÓÄZle‹(R´ìÜ{6lDil àMD$ccað Ê &YZS À¯+ö^T¿à¿¼_èy£Àµ¢[‘kœ;_cg˜F¨ÎšµHtèz°‡m.tMLƸ¡XÎ;Â…а#4¬ÞšG­æONl3Îöñè~µt` Ñ–o!èøæ×èÌ»öÈ̘Ȧ±±U¡,ÀehˆÎWßË&!#¹Hx€pù)pç{L5© Ë,`þhˆÆ$ŸFÃÏ„¥»ä\ØëÕ¢æ .Yh=›1®%¹p <â=ð ga–C271®`ûP„‚jCŸxˆÅÓËsÙ÷;—žl{Ž½‰ü¨ê;“û¶Ý™ÆÇÏ‘Ú»µÀkÙdŠeqÂB+â ݉‹j¼‚Æ*‚_ß.‰ðèõ?Š5K# *„³\X<\y6ö«H· £ ¥EÊÕ£ÏQ{B¿>ùçù]ø‹™táE<‘®Dì«o£–w;Ź¥’^Ò»hq>H÷üBfñõ;Ç™7Š¯°¤Î.áÕo7˜šðiÝ :݇Ò.ò©\ ¦¡sáX\Æ5›ïÒrѶ ¬‘î¸dn»žnæÐ=AÍ} ‹G)R`8ñâLÀO^!Þ¢šá¡±‘+Юž¡0´0§s<ìülFæAyˆ½tzž–ysãÉH0j— ±aÐd8ÑwÝ.oAæ¹ÝÃ\"re\ZG*ûˆ «¡ ßÍ(ʈµÙ4°çù mó‘Ï ÚŠ¾¢ÓÚ^6Q™hhÔ9F Æ@™äκŵDã¿#—(º§o\àwxïkÆЉiô8³ cÍ…u™'ùY3¨“D©P­1Á½ÆÐøáp¼‡¬Áõ}àݸkèð_â|AÞ dzÿ%ˆŠŽˆšÉCi„Êä.è ,|¾2¥ú¦Y‰–ñHÚ“¬o-¼#¯ƒpk‘î½+I‚§*7ëuv€:5øžâ¬Ù€«@ô¸ÎöEݶ¼@]&ß Ö6w̱åyfx²›xÿÃlŸ‡{Å&’ÿK®àÏIøè°8a„ ÍEˆ 4¢wˆ„â´SKL†»³+ã]×dL¢¬——×gí‹Sz‘BñQæàMûüôø0Jú˜¦†y@àr7÷÷y’fésÁÿîè Pù%Wa<7ŸÑtöÿ³÷¦iÙÂðýªþÌPI–9Â2¶u£í’ãŒåà´¤ÍР%–ßßþž¥Öî!Ûɽó<ñLlº–Sû©Sgeh7+=ÞgÑKÔÔÕ¸í¿G$Uõ/ú¾ñ‚Pl£Sÿ_ñ¡öœç»”ð«›µÉ:EãÒ—/`‘¨\>E¿›ÐÓK"2\%CJ¢VWm“Þ×èTw2 e³Õ  ¹£Å;L|Ÿ“)tâ–,ô!qY ƒÕ¢JÆ8ø¶MŽ¼ÎP‘…ìž(r)ÒŽRk…:K˜À\>H|VLÒܭщÏÎÛ½f]G‘ÔùYì4Ö×ÊÈýY¢»w¯OÞ¶['GÛÍä¡i‡>ÇcùOR =ÈV±ªí;{L À 1EÌ ]U,©U·»-ʤ%^ü8ˆ®Å%ê!º+îQâî±j›/.&AW÷æh7dþ¹Fu¯Tæº)ñy]håh£‘ƒhw'ýþíÆýCå —ÅdM±™V²wŒºrð/ùàÒjSFp®®… òž#îX£×ùcî£Zn‡´t‘?E£ÊC.÷ìV8’€åK3£„Zn_J–X.Ã#1¡H“”9ê~š;,ž¾Í,:g{»Ý8ÚKܲ¦JÌÝÇ7J‚¾xhïýQ¿ÓÁ¿ÛWëÔukî,ŸXÇ¿îl73g,û.ÎêIF‡³0M*Ô Þæ `ãG7þkÒMÜ7O×wž²átC¨ªïÓ”AT”&iztYBùEWì…ðö+÷‘‚/%@á^55Ã|4n"DÆÃÕŒû/VÚê–*öž³wYG†=ÏÙŽæÕ1gæØ­Ó̽4$¢XÃf€P[Ãu‘ {;ûGLJ®”,Ê%c“3¯¿æÑ‘§%é(âÛA‡œißI‘Œë`¿Œ*Öœˆ{–:A‡|ɪ™Ê˜D¼NôÞË2l1ó 9«çOiør8ôçm˦Þnì“s$òbç4Ê°3õ{Ã˹[¥Â¯l!£íxõÇåy›Æ²©UdYÑ»ÞÜ ±ðC&SBÏh·¿þôã¼ÍbÙÔˆ@ä!|vRÏaFÚá¡ýúp‹3Úá)@óï{ &Õ}Ýˬ†Ç}þ&dñ‡¬‹n!«u¸íæmyÔP«9£ÅÎ(Œ³¼}´Óš¯Xyþƒ–Ú†á0ž{b¬õÔ6$Yë21¤Öëµ9OÙ僎Øeö*^à…;ï:bakh)|ÜøÑ`n”ËÅ€V嵊÷åœàÎó ö&~ p.ôÁéÙH% HÜâr( ÑMjm¿æÔ œùëÑýÓžõ¸f¾ÓI²&¹…Âyé‚ðÁtA²%¹ÔŠÔD¤=²zÅG 2³Ñ%é7IÚG)±¢'³(i—¡s/$¦›b¹©Nwžð¬ÕjË¥ùÉG’꜃þ³)À/›KÎØ<6ûaʹü’ítÿfº>d3)þÔ}秳§ãpC‹YìPœD“¾Œhpné½#G‡RÊõ¨Äâ.ÿ³½ó}ÐZ Ñ'íüp³&ù©G?$´çm%“6y "L‰(°‰­×øº#§6©»ZkM”æײŒÏ¸ÆíW²^^«‰éW'4‘è÷»ó¬7Œ3ùøsf${üzcJÝNËœöØ0Ô?ëñ1í$f³¬Žšÿçdçˆâ¦Ö-3<ó”^Ï<«FfÐà‡7qoµT©‡õM©šî¶KL÷ýÛ ý·;¾"š%Î%®¥ØfÍqcl9-èx6$ƒ°tWZ‘—™SCêg–~ÉÀ¥ŒZZrì?[þ›TÒg–n0 ó<_t0Lsꮘe†Xè8ŠKb¡H|ì (©Hq%SúÅ¢k/–Š2ô¤%‡ÖŒ]Ù¨ óàfÑGÈ—µ­æ]+Hío=]rRìþ$Q·s&·æ_uçcóhaž”E÷µv6; †ô÷nõIš®t!µûdíO¦éÑYŒ7”Xœ ®ÐµI,6}AîóZ¸v•³S­¿Æ¤Æ8OI"擲dxœÒùœ7Çzê%˜¶dÙñE­ŠÅÔâÉ*¨—JÔ´´K¥¹ü*Ђ Ò,ŸÒ«ŠÑ•%}É}ŽqB+o{¦"â8Žä<çD•OõOÉÍ8Ê»™á_ø¡ô¾þrHbU5Hõ2ŸÖ|ö@Üm`‰—h$Ÿf¬êDúÒÊïÇreÍÊZ›ÍQº9VZrÎaLJÓE*„ó”›~;‚*Jb:ž-Ð%Å•‰hg¬(}ß­OÜš2¹%WYH× ‡ÒËÉ@Á2~Ô4iK´'¬ÕËWí×ûC…ùËMáIq7Ûìùy 'Ê–šÁ€Ñ¯$¯ªE’ûþvO S_ hÅÑÒGù¦·¿>m²“뙡]”ˆq•ÊÒ!·fè¹±–îíÌæU#:Z’Å.È|ÂÀ"Z¼aœ ð^ÒïÒÌ^—e¸ÇëWÆ%2Ò,_›ù™œí‰Ï¥gvÏOZÍê™=©S‚ŽYõØÀ Q-3<šTÒ„-"UƒbѦíã=D†çÏj*Îۆܠi(©êdä0ƒ³ß®w-Öå3ìâîë~•ÈÌ.Iö”“Éá¦L¦ý|ßÇÀ„û´ ÔYžsªJâ9´‹¡æ,´g±Tl¦QÖ^ª~»´Ì ÇŽÛÉnS(®ëÞÉqó­m±°aõ….• YÌfŸŽ]…ŠhÈF¡x%ÄÁX¿rœÅ‚³)Ò¹4›¡†á9¹q§#ë)^aOñ<8GC@:“aµ™¸!D?Õ;BM@ОIw{#4¾ŽÈçBÂÆa_è–uC¤]|éÇ—:ø:ÃòK¤Ì¯‚ ”¹Ô|R6"_’ ®!ÈSn.iÅÊ €ÆíRäôXÆZ*’Š6È~O®ÍH]×Yš;xqP‡ZM¶›Ë7c™vý>ǘ[T†U:¤‚r6ÆNmËš Dƒ4¾Å¬7õëFëuc·‰Úº—Ì(Þ”D±XtìTK˜ø왨­&ED¹Vü¦¸‡dI ½{gyÛ÷“'ÒÆ6K_œôÿ´Ïž‡ŠÌ:hG1ŒKB;ïD 6t‹€×šÖœ9ha;ŠzE­G­y¼½’‡ ‚zÕ!†D‡&„Ü·Å„£+%R(öÈðE{º`ѽîÓ?„¥ ï3íiÍ£;1£l|îXÍÌÛ>w@²—Ùüd0»š7.«O¿rµV: ìÖß^müØðÒëÒ=†!¼i’3˱!U˜>µhu£§mÙD;EݯŨץŽÁí1ÂYúäY†þÎ\—°ü/~ïûó’2mšÉïuOKžñ ð]OËÀ¡ça®çqñ{5[ºš\š €)ÁÈ÷ W\Oæpuú~ü±kÕ~Žah—„noI8Ó±a›™ì3~´a »}C:¥ú®-/ÿ#ËâÆõ¼€$Yݲ€J²<ÛhÇq¦œR‘~13'’É!á;Ñ`¹$Æ02@ Ln´¿«,ö±GÐ¥qŠ®QVýS"w"Ž=¢kCzÉíJXd.J±ìà. #î‰ âÚæwðËÜöª¸\®°{| 9Ò¡œê<©­/Ý¢{ŒQ¶Ä¿q/]ù½¥¹í€¸Ú ¸Æjç0êßZGžI«ô-LB¸ O .Ô6`[–BSÂ`(µóyÓ§QÆ÷ª@iC ä9—}£XC_i:6$òv²6Õô0 ‚PA«È3o€ß?çpÞßk´ðx«ž/‰ý“Ý]§ÿlDìN öÐUg‹¤¦lEù˽à=Ô뀽wjîVZùBhrV4ù¹òE[,$¿³è¥ì¯ß\¸‹h£”Ÿa‹8$k'Õðáíf¯XÙ+î •‚£gi#³ÄŠ)±¢JHom›¢fnm§3—ÿêݬ–ç³!ùŽDiö\¨ëKñOjÅÔ¹žv¦‘ŒÂc5ªA#¨Ý×3Ä}Ébx)P"\w†eWÇÅ÷ªÅHÀU»ÁÛJ¢A›zÒvßå(¢UNÚá Íq×â O?«%ÍÆn †PDYÂ!? Ã]!¬,.¢» pÌÁ@mZ— Š!é.zÆâ_jòÑá’®O%Rç+⧟ÄÀ&ÑÃrYòQ־ĎTo+,4fAÛ$\ϪúV•œC”Åñ›V«!3Lw,>p³¼p'¶ØëˈñìÏ©ÜÒüôÿ÷Î?v¼üº£1CÿgíIm=qþ?~²þ÷ùÿëÎÿq*ÆÒÉE“1¹ãëqgžÁá&Ë~Ò½¢ 2JÔ«Ã]ƒ¬ÐÀEò‰T…©ÛÊ)e¤Çë!ý­‡ô·ÒßzHª’h°»Bd” Eìî¼< Ÿ"(b„£C®H苮ĸTI Ë[Çí_Üè…*išHZyýajéóÖœC^Mq9»{­ã6Ê-Ú/šMÛÑÎ9²ÄI°;ˆÒâ|ãX6K"téM,჈½WàŒÃrD‡ \FË£{%dË’u¿ä‚ Ç…ýûCd0ï϶ԟ¥ÿ0Å/äNË™[«á˜Ü gÇã‰ÐF]4[Œ.Ì]tvTm0ÒnÈ!&$ nÆèÀžÜ2£#œÞ­…)©þÎX…ÊP¢;!†Ó(èLF1{­„AŽºvG~´ÚÈ€^éBB-‚^‹£P;(ú|—%ñ>:PÕ¡ a8phì:èÔUGú,¥›­ÂCGÍ #F»'«I3×K)ß¡W¶õÇu‘‘¤£Nê¦?¹>^ÐUûÇv“ƒÕ)8 ª”Àncþ¤®Æ< TPóû$6êõ'°úî@„€‹G!`{á:9–zƒ°®;·§aûlLaE$¡IQQhÊ2;a)Ác\’©€ŸÎkMX¤;ö4ùLãÙžqT+ªpC- Úí·Ÿï·Êñ)’ úì#»Ãˆ¤n3‡k AaEð–6±ø4Ô ÙÛ*‹U}â“FŽ%¬v#©ðƒìdë % Wd~ê+_‡Ýñ%4ÓFÊq~´/cóª´x})ä' ̤½é©)‘Cá©áè›ÔkŠÕ)U•T 'í}§­vwÓÞd0ÍMùugmv¥K/üʪè™fU¾Ñ ÜceÔcp Ü«–Åe*sEKô ym%ˆb‘8tºB‰Ø‡'×G1 nw…hD†l(¬†þ¿'B|èr¶ƒÒ3AZˆLRUÑ~z¤……7¤`ÏýA‚Ñ’¹Î%r‡©PÓŠ£Yje<ÉËT«Ø8‚k!¼ÐPÐC0¶+¹§PÒš äW»r=Sg½wêû ï³3‰Ú’’’‡='ÆÌ®a§•Ì]ïè7 6ç#ßjçaÐëÒ™Dð \’'(qD‰€q‰ïDÕäÜ>Êàw-˜—WG/Q! l1Oú£¼6RÜyä”ÃG¶Q³§Cš)Š€âúàf"±X2 IžTDjß3V¶·4t»Ôe nhšŽùãYZäáP¦íýæÛãöáñéµÉžñã{ñÿYG§¤×Ò¼šÆבy£ËCºã íõ„OTr™¯‚¸~Õa}qrDzÞ+Wè#ºÒ)ô,:VçÉS-tû D‹rÉÛ“Xˆ÷ Ÿãk @$Ù<3òJk<]y8‰/ÛJAi}›„¯H)D\¼™G\íôo±´!U/­¶£¡Û´R@šÖtžt2Š®Iu¦ñ1O»6. £™‘añBš†²ñÂp<ÚðCÄèBˆ ,ì@’ô}kùÿ´¼ôéÓòçÏi5 euEkx4(^{$\¤¸¹ “T´úañ6t¨b£±å÷FÐ3£XM³|Â’’+âYcP„â'«5•¦Øtø¡¯4La˜[ÎýìépÅ(ÎØ‹LG‘’Ñaðg¾±ä•˜ña“Èä5ª`Kd’B0XáQ”œÅ·Ž›:a½%ØÞbæ8”ß‹½Rù™lê/ “‘ãnkòÂÛ3ÝpV¿¢¡­c™Õ§i‡5Ù¥9ûcôä>C‚é)9"7ø„Dq0Y,iÚ./ ¢…Us€§ªö!¶ ÛçÒÙŽ§æ:(Œ2Ÿ¼–>5»b½öÙ)¼õîå ‹)…H! Š‹;î²ùÄ6(þ|¯Ùø} [eª'Ùè‡MÀIn`I/iÍŠ3¤.w‘‹ÆXøâàäùníÊMúà/çÐKMBMnòŠF³Ž¡}§WdÅÒ|TÀMÉÖ¦IÒd×Õˆ*C ˆûþCÇÕ²\j~6æ:6Z×ñWuh#&­Õ¦w*Û¡Ž)çò©LºD]3КS1ušÁXö8gö1fv1"›‚ݦv-šž9j¤’Ãøe~¦Éÿö€Â£ØFáà›ˆÆÖקÈÿjËO–Ÿ<–ò¿5(¸ŒöÿµÕµ¿åÅŸGÂZiÏ$uþ6>j•ÚZ¥ÆÁ‚ti¿~’¶´á& Òád¼…×¥%ÀÛ.‰Ú?®¡7Uñ¹5ZDô2šÀ-Â÷ÚΠSÁšô‚³;„ï{ Ÿ&km¹4 @Žî$)ƒqXò!t¼=SÒ.# ƒ{o ªß 2”°¤haG9°ñc­0N’')nÂK £ŸŽ®¹¥Æ0E#¿OÁét;úÉx [—˜ÝüJÚ;‚ E%QB9‹’*-)ZÕc)ˆ“«Õó¯7TבdANãXŠuCdëú#äGßâ»O“¸ÛxÕâ|¸òÅĬ—68ì&·–†`U'ª–ËÉ Õðí™\<=}w*NÞ/Ú”÷Y¼yzj*ÑÔ‡áfó\þŸ "gw§óN w"Wóù³ÿ{‡ ü š¬V/rôBš©:å} ‡mäÀ˜IƒÃ6lc÷Ì¥(r§?I罋Œ®AjÎîH­²˜ÏW«Ð2Uû,ÛD½ œ›|Þîr§¹ÚÕ¯:[ö0ì÷O‰Þ¢x L§}Þp×A¶¢W`sñ®\†é×5ì‰//î”’£.ì6¬Ö V¨ðóbfìAºÌÁL°Y`’`{é2½™`{Y`{6Øò»nóEÿ}i:wÿ}<5Û쪩 Ï;Çú£Î*g£Àÿ˜žVÿ’»BÖâ=a0]wt ø•€f6ò€OCYð€ÕÙƒ`xá£1çãp†/ð ˜êç‹òw©ºuÔeã |(¡T*d!ó™(T¥*Ã?ÓùÁMбÊÈO»v¸ƒf‰Û/ðªÙ„ƒú韭×衵s°ÿCås¾ˆíVn«ÆñÁQ)‡ç¬Óõ0 z\¶_4Ž²³*­$ÊQî‹õµ5»äáÑÁ«£Æ^Fa»Tkûhçð8«ÐÎ>Pâ»üòƒ·(–PI؉’»w“*$æI¡­SÛ¿O“ýƒ£=x ʪP´î5Ýo”GÙ ²ÎÉ~²V"ë¹I ¤ÛÆÃÕ p_nQ–wÅc;¿·<¹­¬tNÙòâ‰\q ¼pÇ£ë齃}*S%ûQ‘• ôÒ©·`2”·.>†g’ÊéC”é™-('\’„A„òý6 ú+ fu¦×ØÞ=؆‰Ú[£~Ù ýŠ=z•þm<ùÙ‘ç‘*Þ_«Â®GÖàF“ÙcÀ däÆ“ 4½²ä†L©üÿEgq„Ú™4Q^ñ;|Œ4•®“1È$³Û˜Ø:/š‡ÍýÍýí¦šV3}%¯ÿQnh1N‡®§ШӠVSe Qó~i–Øt‰´ÔYØÓ«¡ÈÊïþ í­'CÞgØ2nÅÍLÜé£.óB|Wÿ]>l¸P°;Œé‡Ï›øý\Í mp÷;Üì¦áêÝEP-(nÓuÔ,ß]|<\l™¡–ìçï•E€¦:ª¦²ïcüöµeJ”›š¡©i ’g®©¨¾{_yý?=]¼{_=…?ßWafR %Pò´ò|ˆÂ13²Aw›LMjflÈÄ5SÛ.=ÒÆým §]7¯‰H´,î6rQ•ÅÓjõ»ÀU 1–N‹˜Zª¾û½ú.õ¥ÓÚRAƒÝýë/%QxÞ|µ³´)q¾ËUr( ÈåÄg–ϯ`šõ‘ƒÿÕ¨6ýðÃ@T£¶ÖÔŠìôI5 ÕW–,BUG9†Ó.õå³'û…2Ü_¡T>-I¨¦ ÂÏ÷â3?¯ì%Q o˜ïö7fÿWOU»ÆZ€ÂÌ‚ÔÜd ÆN]i##A‡O†:*ÿA¤8–ÈEŸ8ó;À(˜ µrúí‰çY‰#•¸¡ç‰ ñVE °ÛP‚Þ¡p—ÏqYo7WÊ95^½N·d7EuTMÀ¶¯Ä‹p_4[Ç/vŽJšʹ©…#_p2åF™ÞîñîÎó£Æª„J©m¥•<‡×îùðÜ~ÞxñBbÑT.û-jµñ€¶ÓO‘eämí7›/ÚÖ{gب) Ïÿ»¹}Üráõ"«îñÑɃªÂ¤$*/dôš˜–qZ>P{í7ížÁQWðÑÞÂÔ-¦±)!ý¢ù²q²{ì[†rårbÐ^“Š"„¬Úÿ…ÀÂJìâ%,;×hyì_lnoËëw¯- Ñ;ºd*Éïrcl’¨®òíÝ%]s[×1¿Òya «Ÿ  ÷ÕV¢ëÃ^reÈZRiRB k¯dŸTuÒ ™•±˜n™Ò´Þþo™lÕ!k–­9ç §žZ{î0±#Û©Ìô~<¤íx\¥Ôˆö'ø¯šûøJ´)Òí`¶´%Ѭ@ÈÄ,ƒ±lX…èPÛ¾}ÞüäyóóæO;o>Ÿ·-óI ¨‚¬eOøÒSÏ„ÚzÝÜ¥õÏxW(øÍ×Uß¿=Cn¦Jà'÷¤À_åsoûð°Ñ’vô6y‰G$þRýët¥D/Cõ[ï™ÃC³k¬ß˜Mžþ€ë ÕvÖÆÎØ̼ݲö³´µK ƒjÌÉŒaèAN õ•c-9}'6§eJo Îs6%·ánJ.F»Æ]Æù11tnr“8—ïž•Ó(é‹—ð›/`j¼tÛö’l'm»ÎÎX®íÄZm‹2¼P€oÕ*yó¡õÍ¡ƒÖ§àt}OdÜš×]U#Ø}‘šHÊ*’5G•˜%Ÿš%(Eó$)jvv©À[–´ù L͇à—5½’Ãœ JþÌIùSó¾(C‰×$³…;á.~éƒ×Äí ½  {±·-¿:ô…8@2ðð2 á’ú´Eó-žmúÝ|{|Ô`¢ØµˆíäOD©Ç#JÁ„b5–l=?h¡@›²ÓéPš«b½“ãd:Ò·üÍ©šc¹e¾8E˜*Åà°û)á×_¶<º·¶·ñÑ1[ø/½hî¼hªDùÉy,q•9ôéN SÞV%éóð~›|ùR{EüÔ_)Y}ly$’ð_ü:DÔJßø Rvwñ^¤$þ i­ßöNŽw8Qþ†Ô“½Ãç;û”È?·¼æöëƒ6Íÿ’)û:E•9Ö)Çòê¨Iã¡ðý¶ ‚è×–÷R•xÉ%Ô'ÑÆ–ü©Ó”$hËþ6¹Fú³•H2e´ìgËM±JÃw,'cË#Š`k÷þÒK&BÚÎsxÇrÿ¤4•À_jmäOL;<à„ÃøÚosyøw‹G汆º×ÀØ;F?ðû—&ENâߘº¿ó² gVµé$@þ/°a襺%nyû4üý=üÕ|±sÌ_øk˃¶qŸ`’üIir¥ù¤¨Ö¸úg}M§¬¯myRXˆiZn(´ŸŸàž@Ûb“kM¹ýÆž €¾M..Üþ+;ŸSL @CI2É”99ÚµóáÓäIy¦/“°Œ-ßä"v ”Ø!L@YüsË;jìà cÿÚòZMÚpðþf%NP =ô¦$ü߸aélyì: ܇ö÷–gA÷Ý?‹Û$MdVï–ý͹|ç¨<­G¿ñQž¬k§™R. “%:íθÍ_ýV©Œ«Õo•já1'Aê6I•hÌ5Ÿœ×¢ eêÝh¬ò­$.óïI4ÖµécKÒŽ#• ?·$¡e¥ÒÇ–wäHù× o-¡- sý^èÇ:•?U^g819ð¡Ò#«B¤K_ƒn429ü-sU_ôŠõ-ù“ÓFQ4¶Òå'äEjåø¤\…*…~my¨7PJ7ôæ1Ÿ,¢6¢iXë¡›/™#®~ËÔÈŽTI3hëòÆýžìœü¹å9ê[æ sÎ#L?·,%NV_ÄY•…ù¥‰-ó9(±UMꙎþüœ<•°åõ}µ{ø¤|„ÚCJâŸ[^så$lyÃî¹Ìà_¢G­K¶b—ÈʱÌØlõXíu¦ºíº)PBc…âÛßV*U)E[Aª6èdë\¹‹Ì—ΉìJ‘©av““ù ›YÛ;™f•’cpq ‹ÿlܧùν`qwPB±ÃÌO¯„Šß:U½PŸ#ñvÅ3—iƾ“$™ú—^BXPî@¥ç‹»S2§i|‡„+)2š³Z¶Ükš¤§Q¹” NC­¾Z_åAT¦H0hàÍb‚dÉE:Ó×ñfÉæê†yYAq­tƒ­E†‘Þî@ÔAhfØÅ2¼gÇ—ý <ÌÑÏ[poy2¿§xVxÊùj`Œyj,ìÌ׳¬Šé"zE%×£UiÁ¡ìLÚÊøéá€8¾´.}<¸21‚.µ·Ñ&ü‹AÐ׃`Ø®ö<ïùÉÎîqæÉØ{—snºËùwÛ僷ÙåC÷×åWo¬Ë/ÙQ—_´•æ®Ea›¿¾Ç æKºm×|`ßaá¿A× Ê—ôܪøÀŽgÜ˯9±sW¦H ß`Î$œ/™5§ªœ7Ïó2—^¼f_ÙžQ£A†ä'CÓ~®zÙŒ}ívP™—Žý”hÄN™|ÑAh¶ÅP)Á a®ù^»G1’ìÙÍØ_Ó«U5ÜNéͬ…VÎíŽß_RâѶGw_¹Çç.Øn:ÁpܾÝ_…âžÌÝ@¶åô}µœXCtGá]õ%õ;:õî[ÊQ..ø»}µþzxÝùp—_®¯Í±žX¸7¼ôç,:êÏYðj´º2_ÑÎ(Œç+)7ß|…/ƒÿbÆp ‡sÎ@èÏ;­ýõ§ç,çœatŒ†sÎ@¼úãòœ%/ç,G4â\Eož>hÓ^ç],™Z„{ê„gýì¹»¯^çám™ëQ9œ‰Åï†/Ä9íDý~4X]A gjÚœ³ôõ+¥&Q[ÖBTóùó¯[Œd+¹)­äôölLØ 5Ýes&Rs›3(:ÌX<ÛQ'fmÆLP:ÎÚøsAõ"#ßߥ=ç]ånCÄwʼóŽ¾àßjµu$ö»‚ƒ‘•'Rçz“:îÊêïæ*b4#vlR´YÏÒ¿VÆJYy®ùµÒ‹¼§˜THgóR–×Îþ/°-Fhmœ3<´olô%·,­—%·­OÓ*Ÿ YæÏ3òÌ¢³Go™€Í1sö55B¢wˇGÚa˜ët±’/²v[ɾr3Êý³JÇó¶{0D¦¥#[‰¨RÅãŒ:›%+lSå°ÙšF_JÉ ¿!DtK€RTŸ ÏîJT÷(éÜÇPµl¥©Ú.hÿS"kmL[dïÉÊòÞ øïþ{)LËùÅÊñ0"?"hè!ò?ÝÓ†?.I,W¥4'á0JÏ„ —µ Üγ¢: ן "¢;ð{« ¤ŠÍA$æóÆö/­ÝFëõÖ\p·6uÿ¤Õ–ÔGÆOi2WÊ€?GÇ·Ø”ØJ/€5¹´Žgÿú VòÔV:ÒHÓýTøð÷ÒþiK›5Û¸Ö½¹­kù?yl{Ââ¢ë°ÿ€ÕM-‚st;iœXËmÜ!ßfÿœ³™œ‚ío|,g.Û,Zª¿‰Ó8u¡Ò8ö›-Õý˜õïµû¢µËF¢ $š±–Úùîàõ¾íê=gþÅËgÏ·}ø쇃‰ý €9ò23Gç¢I±ÀRì³W"¥.K=âõö\²¸Ë8q\Ö8ÌÍ(¶YÎfÃÝÃ6³àÞË:KöÁbŸIFÞi<㦜oŒs‹è2îpªwÉEÁjÌÅûYõÎh‚¡ïb‹ÜÐNŒMÙwpaAÉO«è&·»}€&åbakñ’ö“+½äÊJRdšµ“Í™§hgPQ@GœÒÕs(_býÓ›Âz‡iHX¯[uêÊ™Åó'‡¯¨Bû5aîÃFŠ2Eo³f2\"U/`ãÌr¢Œ!ÐDÑbQ~²¼ ÍÞѹìG]1ùat}#>}§ºm=8wx ÒV;º…q‹ï,ïêÉÎu†0Ïã4«Ã ¯¶ñŒM÷K¯Û=²qšÁŠéÎÉ"P›Ni$£¸Óš…½ÎeÐùH·‰Tꥄ´Vðte`ÁcF¥Æ–„í5L+‰Y΄ë|ĤŸç‡úžúú3ÇÓz#©Ep^.ò…¢fFví!S¡^ 0ê'nœº°¿ì\tarñ s5i^æ‚÷¿ù­— _!³;#ÛLµ¢ É·¿ì.¶®;43Ü%¤âDo}(§õ#án ŠL¯A%½_ÓA+fUJk]m–csÐ%0Æåú˜ý¯ìl.Ñz»¹ÿf“Jb¦™öœ3* Èmîª4á©+†ªù6„ŽNsžÒ‘ \§Œ| Â®À Yr'¦¶¢Ìo—ò¼¾Æð_0*' EÊàØ}ôþîï0ÖÕñjLõcŒMb ³UEÀ‹ÝCMÄü®æÀe}ÿVŒ2LäHW~#š÷¨þ( ª¥’s§ÏÅÎЄÆÔ= …{ùK¥Éá‰,-5áðÉqØ«Ðô:×…YrÄš£n”L4µ«õ÷í*¦"¥Ï#RÛ‰y–¦­pIk=à@Ÿ®Bî&ý ûÎÔþMéòGÝ#73ˆ™Î#‰°èGÝó¸Ì P—Ã+f²p,0Ø-ëÃA¶º› „jj¸ëc ò¸ì/°=NãÌÓ‹·“`U€Ýn} »ç¦6|8•ùÛ.[…c·lìÕ4Bú ÖEêhνÑ2jºVL;öŽ8 ºØÿî·›¯6oÆL%yÂ<æUͧžGœ?9oj¾ìÛÚ¾»»ršº/vඣçUð¶¢ëŸ)/µ†ñ!œ»ª¾>Øÿ­.Ø…%?gé/¬&«0,µÒ|ìEjzæÀG‚YBTSr…Ì-FQ º8FH"± Õ¦ÓKÈEaB( «dMr-“¤œlL‘ÀvUz2L#¨? D`Wž‚ÇdÏt`WK¬Œ…&ìR™;ËF $b×Æ.Òp÷šCEZÕô¾²ƒ‡$O7¿)'Þ>¯™ç9qv3ªé ƒ”ƒÑð(Ý‚»GíR£RnŸééGÚ9¹‰U¸÷H{3ݺÔçr5„¼qzúÇõ·­6ëh _¿)ÛÇ¿6ë“ALΪ‹‹U™ÿY¯C+«éöÛç£zöd`Îù^¼ÙÆlé'dF éAdF‰kXÌÙüî}óå©þÅ~»²æ‡ûój{¿š»·ÍŒ Êo°ñØÌWìжôЭü0ðÁ-îvsÀ7¶ÿÏÉÎQók–ã[´ö5xãKÚ{0šù‚FºBæ¸'7@³Ñúæ+ôÐÖ¾v…ÚÞ­Ðyè IŒîÀn5ÿO{»uü­—çAM}íÚ<¨±/Z˜‡´ðE·y†Ç¾ú—úü—&ší¤®þ \SþM×?„®ŸÓ`ý[8üü{e¾ne¦ûý«3§´îý=¾ÇûçŸ×ín-ï+ü€þ‰ƒ¸wƒÞß÷û¬±/Ð$œUëpo¢ZÞ(8 øÍ––;…¾,2¸p@…ã%ÄF‚ØŠþ­Àè£Ð~<éàM[ 7ÝÅ%u`ÜŒPÃuG7º×£ÖKˆ8!qÔ›Po(o,ë g%ê|,ŸÃ¹ã½ŽM¯bqEÐ䀚ÃM…ä ìÂK_N׆ý QñðΑEDÈ$u‚¯¨3<Æ8ÉÔçIÿ zÓ6 :8£PÍ 0J ®k¼;KP Ž »4¦õ£Ù?G; =vœ}_œõ`3QÙôUU•+¿7QÚ° ô Ãýöùáj‚~„“…ظ°Ž„>%(šiSâMÞTqç'é:šô`&4ÑÖ…¥–0Gõ ›G]×¼ñŒ‡¨>húȉaôè¢ÄcDã9ÄY ÝjK~JèÂ2‡ã˜û££+#¶‡Ý@ý¸öÃqbÚÖöhBz¡ÑÆ&”\‡Å€#3;“ž?‚Ÿ]Ü jJoD1¬ýmíÑÞ$†aB?F±÷ Ǫƞ•`ë`__áw@³oõ4¢¢kdP†ÖæóŽ ±šŒN £†mþä&ì…Ø©8›tÆ“QP±GxŒ¢ØX°{FZ]˜_šæ|„à:òª½`pC”Xü/ùàžÃ^áA^rôÚÞ¦¨LJD"7„Ö&£³ ›S]†Jkàà†˜î-xÀôÓ”‹\4Ê©É¥:+RIö Q¡¨—Ðu{8‰/Ûð:{)„7ÖäF±™ŠŠÍ„h bIþ¾Yòæ˜Ý@‹~Éûä pÓ¦ŽoŠ"~–n6T"Ä ¼`¼pTF&]û°‚nÕ 0RªöäUúÆ;ë Ž\9:?ñ%‘x„#ÿÂGmYš¶Q_cdù©^ù1uÞ4þ¤‡÷Ϭ-Ø*Ò~‚HIчüˆñtFÑšÂq@4N,iNý¨8Ř/TÕÕU–èéŽOØA8Æù–êöpùôpH¢Ät/|Yß ÒŠ€ *Ž+%Q¯ŸÓ#S>ÜÚípõéz» »^¾ÿ0vÆëæö/E¿$ð?<ÖâûïᑉØ.«˜~2É`QÑÐ%8¤|k*ÁaBRŠ5˸‘쿱*:‚¶¬þZäïöpW' {JO‰yéE¦ßŸñ(h—¶-ì®MnÖö{xÌ\âØ¥idXo÷E)ö3ì›Êý½²/­ QrpNŒYðÄõ.|o£ý,„¥ÖÝ/?³*þ.‰å%9Ù‡žñÔ=nX€ëôÙ¦=E¦š}†j‹XbþÃ?ü«d2>kôËŒ¢{[SI™“1j³SäyÉ;#V¯L³`Î&Ùn]ËÈUKlÀø‚£íI”ŒxhãksÌËLJ—0 ¢ž]P@KãÝÍE Í!M]y(IŒ ­\Džsß‘@=æU}ÏQP ,– IO]ò­t®f1#s‘®jnEŠæ7z_**Aò 6̲m'§½‡Ó}«gÊÌ;¿™ÝQr*©Ò³A1ðÚm ³×n“Oø|µ²ÝnãæY+iRGø])•¦>¾p£ÑGD ›69¬‡D·p›ÀÖ¸€Y€¦PX¨‹N§¼VY¯¬rH@bj!Æ¡X†´ãŹöø!N”¤¯&]¢eÊ`JiõÉÓïÆÈ(šâ“³bæ…C sYÉO!AÐm+:M‰Â8½æJx ‘„œÿeNº|Í%‘uÉÁbŒ¿¦¢/¼—hÇÏF]û¨ÒÓ©Ü¿Õ1ÿ7êÊèo?Iÿ~®ÚúŸ«¨ÿùduíoýÏ¿õ?ÿÖÿüOÕÿ|€ §Ä/¬Ã™RUT‘¼çñÞK’2Æñ¤t¥æÌ]…¥‰ój™j}Ñã£Æv³½×Ø…ËÈ#ªoÒ†,¡T­ë ¹æÝþº³¿ºÒþu»YBÃÒ݃Yþuuj—ˆ¯ûÊóϢѸdä™ô],‰6ú¤-–k%Áª£°8$ü×`) ÛtuªÎðyÚ›_®“¡|˜.šbæ+ ×Fä J¶‘ÃèšÕ+Ç×É©ÃÁ$&&$< º òc )‘±P•@e &fIQcqø>m›ø›3À¥O%,FÀ¢Á’@a•è\Ò!ZŠs2ÏRRõ%ÃË/ØbyÂ1ƒþ BÞY8`Á …R¸Ô/œ´³[tfYdi´ì}ÉaW(úRTÞ#½Ýí×'û¿°LŽFÜóGz*Œ µR +û’^Gè§û\ôûþ°Ì*ÄÖª g2D{@Ï·ß /Ij•õlHVj`æ¹Ö¾x8  „€Ãd5ZŸDCǤ(ø©´JrÁÎx‹Q¼ »ÝP!kºEçJ´¯&“‘sE«&EQÄñÕð5¾à©Ú=xê-Í“ÙÙvª¨­Ûz^8\:ÏÜ·•ÅE§0)UÚË0ô/¹Ñ¬Ý¯šoìî¼ÚßkuR¢á†Ä"¬©ìž„½!+ŽD-áÌ~Åšøé'g%«KíýãÅ`9T3# ¢Le‹âÊbÑ÷C­´hí?Ý4¾Còlµ/ø. â{xéÀZŽá>pìšmëSJ@Ýȸöö‡%wßÆUt'´þ!wSÏ;ƒq/]ýÔ*4­›ƒ†ÚýƒýßöNZ~U9ÅGÆžJ·w®†Î|¹ó¶ùÂTzµ-“ÑÛ±(êâNàïã7ãfÉÞ@pçöÉëí-é÷ž1—^ê+ùÈÜ€ÃÙ‚Ù €’(µNò‘± '}/72ÕC\Gý€–X«†%€?†ˆ<ä îvY­‚ö¦£ãÆêÿÔÙà©’ Ug¶‰)ᢢg¦JÉ.Ì.¬E‡‰;…—u73·,âÑv0À©ê²’…Ö2fŠBf¶±`³˜_ìZãÉ ”-»üÞ†¿¤•Y³¥Þd79ˆíí„LZͧæà³ ãÅ‹`L}†"‚¡Æ0WƒóQ˜pC/TrùôÜÿŒ¢öyW”kŽð(x™c:a$°ßã?Ä÷¢h!¶2ô·¤õ’¾³‡R²y¸Ø©AºWXJug(ï`PÌU»ÁUsKèÄû»¿Y:úø& @9Ó’‘>ó|XZéå%˜¯%qxtpŒ’x<ºôûW¸›i.”{Hîœ-¸¤º¼$–Éøƒˆ•ÅªØO&é]«Þ—ìŽâ¨Tg7é0¼lìì6_¨I”ÃX¶$…j­I“R4˜`H`$oþsI¦ ú¬Hÿ’N~f]PÇÐãEÔå1ôMIn+qu±nW«Ì~:[×:|D%6pbÿ iAÁÍð; :ÑAz‡$0pÛ7ÑmKÂhÅ QЛ¦4ƒ?¢ã‰š=™$œ[î<";Ãÿ—< žY.û¼þ9î2»¬=™žèiQ± 9»ô®\{¯¯àøª—Ü)2ÎCR\Nºœæ¡eüÀ£S­ ©užû“ž›! L÷iIÈ¥ƒÖK¨Ž!õ©åÓcƒà!ªôùý>¬‰Hö@ÜìÜ:e¶Ò*³`¯¾J¥"%}Fî" ê!+äß¿å -} eÉ’d]s)E²IJŽ ?:Ií•$ÜnÕ+òÆ)ÙP€Í©&Ý3Ådx„å ¢·áÂV³{‘iÒ w™k¡²Œ2LCþ².–ˆl"  vI50BÕGQŸ'w––hj¦æ¦¦K±Ø¡=Δ“$½x–ýL(ÛR/¥º*•½’ƒÌ\F/g˜Ë»Ý¶ñ'P zé$s7°±uк˜¸†¤sl©–ÓðY™ÚP$±c-l`uÂèÎñRL©½9ËŠÔÉì/_Ã|õ÷ƒL‚I•öR*R;BºÅ{$eH:ŽÆ02º¥á¹òõV™SçÈ{iÌ=yç>ñ½‡šC¸DfŽ8Ö¨‚· É Š£¢#c›._„È´”Ü%!n€ˆ ƒ\¿ƒ2h28Ã&*YdId¡Y9§~Lg.+Ù+­cß‹.ÚŠì•DD„Ü?rT²aåµÍw½¿¹æ†g-ºuy?Û|IK—'¦²sÃÓ˸šÖm™o`»%~Ú”£¯¨ [)R‰Ÿ‹ß;‹Å]}¿¤%†E…ri:à(8ÞŸígB4`µÑÏâwµu¤>Ý[[Â&üÕúÿZæÿ?óÎ8âMŽ«;ŒâP©$ã7™pXæÀiß3Ô)Ý>2>fÃ×/²uÔª¬(ípWl„C2 º‹%i”š´Yδ[æNÆÚh|p¯†¹ÙŸrR5ÝÊ0$½McÊ•" Šh€¶|s~N”R\2V™ˆÂŒ¢#1±Æ£°ó‘DNÜE.ÌyÂX:W~Å+Ê^ÙÑÔʯ ñ=®®0I–#ºÙ†È@«4 ë&XÅÕ•2ΚõbË°;,7°Üøp­¬‘¢±n «ÀÏQÔ´ÉAûbÆSreɆÐ]]±­õ”A;µõéÀžÁI­­gÁ3©IxOgƒ{ší©kJ)'†\{ìZž0Œµ / aÍ\c&‘Nfü>û%Ç8ϹÉw>cýL¢Ýf¡5êáÎÓÎy†gP¼„ð‚Øä Ž¢Ãv×T™Þê¶ÂEÑÆ\?Hô¼aÌÉZI>_äœÙ¨]^ÎLÔZ´U£Ô¤„sKÈëÁjö¡ÝÄåYÔUÔl*JR D¶³ÃL<œ‚1<48Êýã¦næ¶øÞ¤þ1<䲩$r1"Fí8è#+ZWÜࢄ¬ îÕµ’ËÔ°v ZSë£^{òêÚÏ”+X”û0y[eo&Z„¡Zg¯ÐŠ‹ê‚Bø¥/›6êò?†°Éë8u8kÙ34tg31aEÙµg£ýgÕãºäÂË•/¥ø/™Õ5ÐyâD¸œ<}gì2s‹ËIúìý‡êôÃV¿©jēǧé<^]]–úkËËÑÿ×Êú“å¿õ?þŠ?¾Õ³pP/áœlGý>º¡„aÄ Aq\mHfÑÄÞ»ƒt †Ì‰+@›vFáp,(6W–k«åÚryåi¥¶º!‰“ãmZЊ&Û%QûñÇõ2uµ8,Ž%±3èÏB¨¨£ºƒ /Gþ`©auˆBß®øiHÿn…£¨2±Œ‘'SéøÏ–¨± ùPDNì9¹±Á¶cÙöª†H«B£øAN , –[Ä€c£Äò¥,&¥Ãòp€’¡Â’1Òj²„„.ËYÀtU–9ôX þŒ¹L«¬@ùß`õ¤É¼4&ê!š-¡×€áíýK„“‰ ;[3È|¦A„ž· ?]ŽÇÃzµz}}]¹L*Ñè¢Úcqõu¦¿ŠŽ‰4i½Ô{{z–ð¦‚FÁ˜Ùƒc­a…»H*øz}ÙøBéEøP—Õr&#iOBTpä¦1+P5&ãK-Ñ®GÅ-%„U»[îÐØï¦/4ÚñÔ(ÖÈq Ô SMžç©¹ùG¢ü»16®'ƒÔמ}¿"rÇ£[QÈ/‹rù2è f1–Û¨O#Éa ×쇞ÇÁÐkPÉ™r9ŒË=Ä0×þÍ7û#´î ã±ñå¨aÀQ$9¨w~}HSg˜ã+ØS$‡•O’ÓˆFóð„ ¤¯³ eS·–éçÆwg¤$ŒÄsôé@l¸±Ú]¨#ßë!:5¯^fra_{ˆ^°·h—Ì-Ä—áùØnàò®ÌÿôWÿr›ÁõÔƒ}wpx¼s°ÿÙÐ2|®x×8zu‚L Lõ¼£É@2ó K’6dÿ°¦x?øÝ«u÷Ù¸N±_Ewx0¥ û'Q·n‘(¡Aƒtâ:cI.:S}°×†=ÿ–áR22¬p~±ðVHQ …åp¢õôí½bjy-¥^£{ÆÜ°u¿ƒrµ¾:ÔÞ _R2Åý58„z9‹cSPÿ M¨ß·~§#¨÷‚£ ¯ãXVú>lVe›OÎÏÛ€ö¡êš¾A0ø$»ó€>)¦)Ãjà¿bây…‹y[ÎÚx9´?Rñ‚à ³Ý2˜ ™FNµ÷|—Õ¶${VəݜÿÙÞmW°½è¿€þñß±ü'TÿFúÇÀÞˆjäbA6d'JSÛ^´@1¶È/cÑôåRÈ× òBÌ%ËÍ‹U4^Q­±ßADŽ'Ãp@%JÃ3шDŽFÀTÙH¸‰rù­Ü|m þYùkãRrÛ‚k†qÔ+cE´@´ˆ¬‰Gð éÅ¢oÆ¢4ƒ˜ä¢¹öc´²!ûóu zö ˜ `†È ín`.Ixvm„û®Tä[J‚,’c6dŽFaÈŒ‡W°ÐÍ+d$—3oI#ç´‰IÄ[_•jiÚf&ŒaQ:—$@'çHï]"U ¥´1/jÅáý„^eØj²ltÐêIC£[’[’–Ý t5ÉøÕ|YöÃAØŸô ý¤¯+¹0ë«úÂêÇ›¹¡2ž’ø,ç‘9—S§¶òDWz¤Ä†di-BEAÓøqÀ¤ûåF˜ôþt+³?FmAÉ91jÑÉ+äÇO†uSB讬ÝkŸínZ´ ¦ñâ!Ʋsñ»Co:¨ðwTÁ¸ê’h+j9 KÑA*Zän·%&Š’[a.mâõ0þ½S˜HqðTèò€·½-{r}@Fç£ÔsˆŸòÉnWU[ÏÜ’;èE/ŽÌæPЙN"ëk4÷‡0q¸ÛÙí!ú3˜ ækA=»·d­š*¤PglHf™„z§.ª;s}}ÙdÒ%ø ÉÄÕyfó«æoþY!DóÙói·%­"·ß#±xã—êyÀ[Ò‚°áñô T±n[–ÛüÀ­æk9q'u˜0«þŽwsµ ÞJp¿é«ð¯3æ’‰Â?âSÀÒ9ZXŠ<`¸~ñˆHê=hcpÍ\A'TüN )˜GDf±"Ú‰ht‹åôYKD>¹v‹îF±^R¤ÁL>rP²rÎeÉá6¸ä®Í´^†ãŠ*˜ÄÕŸBz‹ó†þÒŽi& púÜŽæÝéžÝ;îFFÿŸ|iïTØ÷ŠßÿÊîa/’cûå3'¯Ò_ûšÎq/ܾ)Œ•Ñ·>qŠè¯û‚ºVdl¹·ìûÜíâ´‚jÃ`=ºòVtÏtbEw:‰Þ_¼Cbÿ §Ô…Êmz_É¥î£?ª8Û 9?§·Æܘ™ºZMÞp³/ÞáýþÝï=¸û/Qr»  ¾µ¿wûªJOŠ"G’}W/¨/î:lRx ƒÎmÎ èrD*b0x4/xຼ–ÝšiÔ@ÔêÈñ©wåW,Íæ˜Wg)uZ‘UÈ݈Ýõ¨„~?ԫчR¿”´üÁÄïeM ѬI9†NÀ0æŸ1WHÞïdO3œŒÂhëÉ!¾‰lœ(Œ³@)ÄhàDz÷ç. é»ßÀpQšÅÆÎÛ%ñâdIìí¼EEƒ²1Â{óV Ñ•¯ ½3ý¥RÇñ!¸žb¿¢R¹`Ì•I`?xöHgA“-:ùË—Uúä…ÉÂ’¨-½×Tû&L ™aã qVü3lŸMÈÈ)¼ ÇáX:(’³­%q2´-  êdÑ:ƒà£ U·4«ä—”Üý±S­M oi ÔðA©)õ¸²éÞʽ´¢Eâ•avj@ÀUmíï쿪‹jÁEö,½²”ÇòFk´ ž}¿‚ï^xÈvñÇq:ßÛÜQd×yÚ( ^‘R#ûP(>—ðùìäJß…Ì!èNˆ¨M¾¬KO? Ú.q¿t(t7\ù½º(úÝnù2Š>Š…†/ãÞ ¸Ça?(CŸûCA˜¯2™‹ÕEΕ åÜBÌyRÿ¨ß–ÿ±¼ÒÇ¿ºøëu¢$ýü#Pøäx;‘ ¨Ò¥Œ óšð·+¯ÿJ*ùbÄñŸ.ÿ­­ÖV?NÈW×kOþ–ÿþåòßÆcÕÑÅF‹B3 ˆ^“‘☙ŒFFF–[ûñÇ•¹ä¸ž[:¶›×Ê+?´¬’)’/ÉB€ùËE²«ª -»‹)9“G_/¢%ßæþE´8³(¦WDûèÏ•Ñn 9<·ˆöÑß2ZÌ4¬}ÅpoêyㄳP 1‰œB9%µß ðõÀÜ»rKÖ¹)æ^î^­æJ¼Ù‡ÐƳ`fó . ïÓ¨ìÇÝböÓÈ™DWHÍÈpŽ+±åþ¥ÞxœUnª‹/oø›g½è¬=ìÁJmœoÚWâÆåÙæk •©;‡d-ŠŽÿFÊJÒæ°èßb7ºv‰À”eA%o¼èõÍX\¶©Îx©²X]ZBžá$Êv3wêະ„ºžwÀ"Pù²¶±5åºH~ú!߈ۈ"IWä`Èò(ÕÎ”È É³4"Ù%mh¡ìËÂL—ï"­ =èáëŸß2y)8õB]]?éôÍTòŽH’‰:öK©V%›Ùs²MOS¤§nU{qE1¯ï¨ÌËý›òK®Ácé,7qÏŧ²Ì…Î*"D©ÀG0fËv²à)\¾Á!_Õc½/Aê03¸¬@¨£À”vÉL‘)V€àbòØ—Q¦U‚µ²ÇÅX,‹ ŽJ’ü8æN~.⯱q¨/Ï…^—£×‹|=›]õ®Rõdfºímlô’Z¼LÕ¤—KV%Áú­q4T’TéQé‰(M 6ÄÒ•EitQú–à%àÜV<;â€.½˜êQÎ}8€§YØU-çkyHŽÞ—ª4‰±5wÁ€±àÓ“ÐŽfÎw›IÅn…œ}¤a”¹Gì´jéãŒGþP8¡XµÇ¤ú·Ý†×~~²³ûgaÂ9ÄVÞœ4Þ®X^¬¥¤—.Rº0e5 z‘$Ñˬå¥÷`N‘N!q–´oK r# $'¹ÇôÌîÀÜHWUKXGQx*Ï‚^t½$=jc7P@¡]HXŽþlBr—K±ßFcR:÷aHU¼×!ú@Bc}°'£À3À@tÝ^£o¼ííBmcÈ“.Ò¶0 :Çòc Ã0⸠iã“<œª/c8_Ìè‹ÐD ‡Êª2ñ0oZZò7Hg+FýNŽ<ùõïnx}s¸¾(¼ß<Íÿ¼!Š£¾(Ÿ‹Ó<4ÃSºòŒ¬û“^oCŒúÐ4çÚ%­êpšWðrˆ*d_TžÖZŽ·Þ*ì>·å§ã½Ã;G›U¨ð’Ä'œ”ÍÅIß?Šå'O°;ý¸9D¹ ûž+T;oéO®d·óKÓ©)9!ZÒ)]•²!>‹»;jKêüÅÁ—†˜fòù²Ì$sœD¿p´´duê—óùÙqºéHÿʆBu¹Ð6 ˆ³¾ìBçÛjÐÂÒÕ=Ÿ԰ЇÊì38²{ ÂL— ;é÷o7±oUú‰+/×z3—§¤JGÈ‘ú1 zò'̯T;±ÏÓR^ž‘%H¦‹fi©dp(’79 ©®ZØðè®Åþv:ƒBtžþ(:?þÈ×Ö›ä;¢ ÿR=ꔄÙ°I¾Ç] ¬k÷ÖÉék œ‡ø/bbüWá⛜3¨œØ7Tä j+´ØfÝQè- ¢_ZZ,%û€Cy‹”éæÉÙÃxG¤KX@l˜7;ZÚ10à#ôíG4'âÂÃ[xU–>hÝ°Þ»$'\ó¼õãIáõL…âÅ¥ÿG¸5ˆ:•Ñd|É• ;Aªj­¼ü´¼²V‹ªÈé\T+þxŒ¬ jnú 6Ž_oæñﺪBû(GL¦[ëd¿±‡f,Û¯wö›ˆh å~âÌßÝ ·¤T?“õš»ÍF˪?šV_•të·~k7÷Lõ8QÝÔ—%ÝêošG-x˜úWÓšW%U}>F¹ü'úçžžÝp0¹¹:ÿ«.–¼…G*¬¼x1ìF,òá”$ú¿Ðóñ0ì|½ð È^¨ˆN¡éáo´§M\ú¨vwžoo¥îy ÈùäÎóàn?ýTn¼´N0€6¥a 3ôµðÈñös² ´Û%ÙÒ¤ƒƒRŽ#îv»cÌ1%U •«§ ÒIÑôHöúCÞ¥ušÓX«$çÅ(Réw„¼yàðd!ùS—š1HYÖ­eFú (zïà+ƒÈeŒ]I®¨Ü¯Ÿë‰%ÖßrCš¹ExYßÆphë‹uÞü)Šƒ³¸[c´šÇŠ³S¼¦GŠ?Ä kH‚”IÈ`4ÂúôžOÓñdˆ‚±X^,‚1@ zç‹KÖ·MÆ‹KXÏ*Ó‰ÎÏ9:ˆN\„ÒKdsÈIÝ€…"Ãú1ÐjKFXÍÝ—v#‹2ò]ôP*Cfñ¸ëiëx|Ùð H1Kd@ë˜#&@Þ5†ê[`Rn׳°Žoeˆi„õûz-ã>Çɦ¥`nJƒLóN›CÎ>¹n/Œ­¨ÊèF"Bk< »<åˆô,obæ ö5xíßÆdãÍr5ä U8çqo3Çÿ"sy]éù 祺œ·àl³v^Ÿ€†ª1"輬çlþ;qÊ·cuf–£k[ö¦ô1@ÆƦy¯TÔÎpËQ'7鳬t…76t¡E§LªD|¹ôL‘ø²—YäÌ.’Qâ± äq/H²:’94§¡‰…Gd_.Y7°qZŒŽ’2©ÜB´{ˆaŽÉ§:ƒ> daD\fyMsœÊüó¾x‡ïúëO?Þ âÕ•w0E‹w1ìÐÎÝ•¸c*vGò‡Ö»Ý†NµÛ€$SÈ´ìlØE •–ÿ­êA"ßþ üT?@}ÔOÆxQaŸvðàjn¼| 8Ìà“΀_ÁÃS4¨§TÑÀ¤ÓÎc·§$@¼³óögY.Š7¹—î 7ð$!•¶`ö|ØõRkÝʱ;¤¼ÎB^ËÈ«à &ÄêJ÷øe;àe¿Ä@T¤Dâ׶Íu©j{]c¨-ºÊ1â]/Xë~ F Â3ì-Ð÷n29¹°(@ ÄX¢„|'¡|‘úKjÅã[vÍÕCb£Œ¼ºä~s®#š->Í™œ”ÍV-$gTå2ƒ5yáÝiVkõ]¹ý¾²X=­Tñ:vfŸ#mž´;l–÷û'/ÛÇ'GÍ£ò/Í£ýænùà°yÔ8ÞÙ%ïÖ:ß’Ùläbhf{ºhô—h—Bö–}ª”ÝL¾ò‡S%ŸeŸäú.ç?Eñçü'9òÏ€ŸmÖbýy+}!oò,ÔX]é·ÆU.^©Ò¼8³˜‰£Ðó”OÎt²€¹†ž¸¿²üüÝ@7ƒpîëGðñcdú‘׀IJs€lE½°;/Ì ß Öv8ìÔ÷ÂQ.9ov4¸~8š£‡i8Sû7@ŠXX?h½¬Iü.wªÐÉ]\«,ã¡L<˜ €þ FÈǽþõGQøÄR€üêg}(W¿ÆÚçÔÁnt:@fݱcû/Y4É0‘ºÞšbNÛF¬C®Öˆ¸;MÖ×䛈¨ÂîQ¸Wìc4 5Ò\ƈC¥«YQFÔƒîtý[Ec’Ì0l‚pø-'ŒÐ‘£ÞmV#$¬"êHK¢±¡8ù?<<Ë€5»‡¯m…lìùS£¦$ü8(òwöËÅÁ9O‹•ÅÓ’‰>TYÌWOkÕajéÞŠÍmÏ ò\óÍš(®Ô–××J9³®ê‰£ÆršRÂâ•Ç©°»Ý ¬Wñï§s6CÔf5\=vkTÖeÆÌJëSjnO¯6ìø©zOæ¬÷Ä©G­­Ì—ÛÒ:·´rϸÖíTžn?—õ¶gÖ{š¬×Ø•õž?¬Þö[YïŃêýØÕªðõãì1þèÔ¥yY=—î¬<©ü(ëÌlç‰lG#*q8¨˜¸RäLŠ…›]£RBåÞ¤ÊI: YðxzAŠ-)lѺ¬ó6YgÀ>«¹j.ŽB”}~Pz6„ªÖ*+ÿ0¿rìQ2É*Ón ÈËQ|žM¸ÙRòêïïß¿}¤$G¢Ðx¾ý¢ùòÕëÿþewoÿàðÿµŽOÞüúö·DÁ?ëtƒó‹Ëð_{ýA4ü÷(O®®onÿÀû)||7ßî EH÷xáÉ›Â'ç;Z-y Êèñ—ùÛˆ­+|?’Œ$o‹IJ¼7µÄCÝ  \öS¸™ áµ~·÷£ˆq$Á¥$+P *½ƒÂo?¶Ðô¥‰*ê]„qxÐÚy Ôöß+?ˬ™k›Öåe J àJ›j¸.x•P—P:q&$÷•fΡ)ê9)ô~–+I{¸ DIÈÝt‰ÂÜÖ8ë—ë«%§*®üu8ŒW+ÝÊ~xá/ÖOöwÞ¶ùÅÛ~S¢Â2øò4ÄÕm|µ–$~Þ5ü÷æÝAôþ]+~?äc(NÁÚë¿FÃËÁêc4¬ƒVuõÇeB¸úd¹žõ‰– X Yëê›=»N 0¨ÎWý(H·±¶¼œE?R+1d&(;x”í´¶ëµÊ»åÚÊ{¨z‡‰£0î„7Vª^ÁQ¿ìU5(s‘{(ÇQ‘`Eq]‚^¤ZõP5{\ÚÓ:Zùy¹V½S>y[Ý;<ĺ€ ZGO—a¸N²y9úµJ­| /Rx7Á¿“›þpè• œ·›E to§•þní¶_l—U2\ÿcl]áy½¼Z¹úçgÿ¼Ò{¢ØôG@C¾¬ˆÆÇ DÏD¥öЈžÜßÙmVŒ@(÷¡Xeq‹L\Ö>ʇüñXK=äÒrçËê_< «žbGd!Ær%ìIÀ®Ð¨ê]˜ø½s’à¯F‰£öâ¨õó:.ôú†NéºÙ¦È*‡^yp³>¥Ÿr<ß+‹õ'8×:+ŒÃX¥«÷“°Z($ÊÚʤæJ"Õô£ß±Àò.›zk2p÷aêH㱉9¼ÃÊý†ß+ïåûÕo<¬½–mÁÛ¦ž˜£Kt$ý šX´›À{Òï£^°8½e¨õÕ-‡O×áÝÚ˜Œ¢‘òV7É7Á ‘nÐÞÓu¼>|Ê܃B¸wl|bdSØŽ­“}æ8ä°áœq±š•-ÚBmf¤Ò³L>2p}|nê`@’WoôX0FD§ÃT‘¡F|Äv{÷p}­ÝæPÍ5òÂ@2h,VaÖ´EH€|-P[$lPÝŠO¼I¡ñw›¢’Ä{[þBq{ûàð¸µy·V'n­×ßr¯$3+sótÊç8!)Þ’ªÔgÜ3ßò¤¬+Lî° ¤Â WK:î½±À×>+{*Õùðb×ÄuxÑ¿FOeZÇ>¸ñÉúî7 —ÑZÞ¸XÇ{á“}ÆEÇYÀ4Ú.*¾ ‘d­2í ¯~‹‰±˜<9ƒu‰_WþøÁ¼í[zçX¼k­eql”˜:É”ùo耻@¦NРK¾84gÛU åIø°V©UVËÿ½[ÈûdÅ÷¼\mgzu1}‘©!ÏÆOPïN¸¬ˆå¦™F]»Pû·¨ãNµ» Æ’ñãQ1ÿx©¶´Zú\pï~x\Â’HänHÓÈmpÕ,Z6kÍpÄ%EÜ7NÍjÇÝ¡k%&~J5^n‡œÄ—Ãôd38È7óL8KKâpßðÜB¸’·“qLÉÇǘòËXឧ –[L·¸ø§´¶xî÷`ºí™D«E“ø5íÁ³ÄO´¦’ì¶TZVS”7GS—~.§)•d7¥Ò²š¢¼yfÑ>·lÐFîqï”Añ:â1š©y{AYæΆ#ŸàY ÔëüÐøµ¾E>…ØØ*£ ϼµÊjV½“Ý㣷™5'=x¤ÞC‹¿i¼U0m WþÍÜ0V–W–ëÛ»Ü X§•µUó­vz!z©eÓÅÈ^–!éæ¾=>$.Cýdoç°E;\&àà£xÆA !_@ãO? Ò@Ó hštî {pMÁn$Z $«ÙJÙ$:G$—Y¬ ZA~8 ¿Ø¨ißY’~½á÷Õ»÷èX]ꟙ¢\ ”„ª¶áTÛ j¬¥f)ĉâeÛ8¤¬“qjšÏK‰Â(tþíÇÞ”ðÊ—ŒŠ9Úô3fþ#Ÿ|SjïKò]\.m¹lðoŽÖî5ZûBð@€­­:¡#­œûÚ…C3G³ò_i|!÷³Gú‰ç‘Ò 6 ‚ß5é ZÑ6a)ÂN‹å`Kžß-—|¿xZB唿}pXQ u7?8MpUH½n«¼4{ÙŸm,`MÇ샶ûzïú!â/ô³î"Z…Öú²\™úþÍ0H=¯ÖwŸ–S `§C¦ØGˬök ¦é”[½AæàíPÇí}}œ·ÓF–Õ}P–@LOá&Ù~[=y[b£Þ§tÕQÍÎÍäæIF-˜@_kn=¯üoY ^5G«3j%n‡Æ›0<دw/&7š¿ùâtXº†e vF¾KÑs ŸQW=y¶›­ÖÁÑf¯N21ò‰¢²¢óôimyY¼Ç“;½D Jx kãZ~4Ž^5ÛÏwöG¿µwö›G/ÛÍÏ7XÆc zç7 ^ê%ŸûêÞ`k³ÂLd÷¢Œ@Óg„ì,ö«]ú¬gW NUÒf áã§ëÓ[Iòo÷ž>]¬¿ˆzCx­È=Ž«§=¾9ZuvB—ó²6£½£vAÐûj©Ra@¨ón¯·/,Å÷[ðq<Šà˜PFð d¿ÉèõXÕÊjꬭ¦¤¿ê$ÝËY͉"_†¾3ÏÜ%:w’ôaÎø",‡@þÌň¸Hr"~–ê·?×ßÕVÞWjõ•½‘ I¬TV*5|nòG >à)ut\=ÜÆ$Ågã¸Ö~x#-•µ9¸%™îSq Om’O¢ºHh˜pvc±8ëò)(¾Nü¡“ Ø'ö¢.>]Ç!Ô“ü^Ù§o×__³JÓ‰.ß<¢˜DÌptµècçùÌé ÃÈB´èCIjV¦œ¥©œ)N -õòÀn¯dºM<ϳ(^]y̽—äaUR‡I#É™¦+«)Òl’ta!{›6uçü‚âj/, ùXDŽÍÂ'ü‹Bû¶Ût?µ‡b‰²hDE"a†“q\ÌÙòBþ*ìºÇ9.@…—ù·¤xîTO©òÁhñ.d(F¯VîëåBN·¤‚-™w˜ù_{àüg_såh©i,¼(÷ñ»µÇëOÞÃôâ¾Au¨¶òU/†~ˆò6›i¶(·,Õ3¦þjÿÖlBi*Ÿ¯ ÒpÃø¢<Œá$›°‹>™&?kqxðkó¨0u°ñàyŒÎ!¢t¹#xÄÿ£'TuiÎÃia wý8è¬?ºFìÛ;…@늛ë¢UzZ¯eAX̬ïbS©ÈXuºI_;ÕBJë‰ÌšÖŒý.[åMCÝIDÎ~áëºj¹Rgø •5cg°_Êp®söâðmuåçååúóÊA¥UIqG¨ZÆ-ý#À¬¾[]{÷´ C­×*)æÏ0}ç^áæÖ‹D|ƒ X+S`¥VLÕ]ò«¿>,Ÿ¨Ñ¿>gÌÖºdÖð¬òVቢ8C•9»‡õ"“ý·–2o¿Óî 'må7ãCªxk›°Š<¤ é„Áfí³pgƒ`Ez µ[Y Ôä¹½‘³'iöÇ+ðºWSc eT¤¬VØh#§§Ö^¶ªKÍC­VYY'€~xÑàÉž ÑLÃÓ¼(iÙ(Õ}îÄüZ3Jg†,¹¾ÃyJ_«ÉÉž¦D£¶•ê<¦0¡ó9ãIþ"~ý[S6µÕÕåÇË‹¬ÈYŸ­Í5[R“y±àµâ-è{åNÆÿ3Ñÿ‚ôÌÖú}xla²$΂Ž?‘Èy§W^{o{ýé/"¢AMâÞ­âœJ†ãx4a§_îNš†LÓ Wé°Õ§s@{ê@{:Ú]sz6£cGß+ïÖ¿íË‘ [&Ìü:†X§ºãóÕÊÛj!ú»FùŸïÙÆe†Rý¬ÖN½»A„ZY<-JÀ§%ŒJÝV§[ƒU§Û‚U sŒí¸åküãò7›·ãÕ¦ \™’Ú-ô?~U­75·øªö-@ÖZÛ­jèhðäÁ•Óÿá—6ñruùÝrí}Â,ŒOÃË'Ú’ÄÊ€^¼<ùoxNžY+#÷¿Þ€PÁ…ëVƒ~%Xw"ªL=«†`¶6ç0’J½Y*•Øãÿ\>Ÿü+Ç“²I‡þ6_2éHâñrjf×*îÜþoÖª;…¬—üG—ÿóÖ‹ê*ü+ VT’Æâ‹õFÜ ÝSÑìŸÈ̯Þc‹4ì NïÑFÇN/ZM¹ZÖڇǽ€²`L¥2æ‡úËI‡ ÷(Œ°›‰O‰²Ÿ?"´dÑjélC¢û„ªÏЯ9üÂÑ/ ,¼pË8õLã_ ?­ ÿÛ«_wöïYüÎíÅu˜²ÝÛÙõëúÚ=uûáàâz}-³ò Äo íãl¼„ É¡ã‡K_†ü;ÙéA/éÛŒÖvÛmǶK%»‰i2É[€Þlf6Æ'>£ÍçÙm>ÏhóyºÍçSÚÔ-bfʸìË}͸‚rp“Ë‚ïÏä&äEˆZPHéÙûÃÊMj¿Ív‹Fsá›9 ýî(Hƒry\3ë£üËÞé$fw©õ17ØP$Æã>*MAŠÑŠ”ËôݻߑÎ^¬\’/±ì †£ª\”ÏW9xØx²(=!)a^f×9×xjGiû¬â‹&Ø ‰Ù§—M3º†ÃNÖüʧܜS<ìL…0gýõµ^0£Ö“r6œPæƒN¨œÍÂ^©î?!¨&> î%ò¿ÉA‹/¿ a’¦”ou½ŽCôtõM@]ùó,Z»Ï"Ù%ߤC7ã`û‹ß,zñÛþÎÛêp|S_SH >ÄZe™½W) /¥ƒ„ˆÕ +Jßî:à‘üQ/4Áo9dI?ˆ‘F˜ 9x£ '¯[ÉÐ"/Wä5þ6f“(§ò+¶íXü{ ÆYæ®4Ë‘ÜÞ!ZÐNá …hdG¦Ñùy|EÄSC;tXí’BÈÅã/È`ué|(&G‚¢ž‡**íJ¥Bß~Ÿ|} £8c${òÆLlÄpj"ŒãÁAR«½ÄÕ)Œy‰Gä=ºBAG}ö FÁqЕ•É5´É.Tü1'.2¼»_™AàjIs›L•êŠ¾©vΑMzM¡^¤#ŠÅ"¿‚ ÔÜ{Ksí†D!§V± „ L¿×3í³zÅ+å “ѯ·Ç­ò*¹¶lÞïu} 3  {—=QÞfÀˆo{d§uß³B•Ëz–ÜPqc¥b eÚ*:Ü|ŸN_ƒtÇ' }à¡Ð}FûmñÅýBÆ~Üâî¿.†Y3¸È2`Õ;©sf$ú³EÖ$âÝ;Ì3VðíG@ õ\>Àe“ö{V<À{Þùp$ÙÉêÇg׶oÚ‰qk$_ôr2×ÉîÆ œ_á<©Ü,aè–"&BkøÑ FèÈi½¢ýYZâηŠŠÏý¾Ç®ªrÆ»åâÚÓõÅk«¸Œ°rŒØRJ=²K>N–\¼[ÜzÁ˜'ʮ˲’†›}Ôܹ¢UNð•çÀ;‹°óW”¶—Ž‡#¡ÆÕÎY§J/¹µÓŒ·ŒÊâ©TW%Ži„³Vèw×@—ºëd“àÖϬ~šw´¾GìMÛb•W7¡·Œ~´U#|ºŒ«œ°;Hïƒ)Õ jCUÔþ(8°(ÆNàãyŠÅ¹ ®? ‹âp=èôƒÜ‰Üå¼ÿܯf÷£È`vƒs¸³ñRäÎÖ¥WwäÙd¶Ë=_ü÷«ÃC‡«0ì4õ! AÎæ(®—@iaôaØóoEìŸÒÕãIŸÂ{ÂZULì0ô5‰*âÊ{%E¶Ý;i£¯5m³Dϵ X/Ý]hºŒ%st äú¢ØQ¤SùêÅsíõ–ÝY9vMè å7ÓQÇeâU2Ëi÷ c{ìáj5Ãk,z¸ZM½»‰qèÈ%çëË$íI%Ø„SÙeu—¡‹*Œ›¹ŒZc \ûÛµ'¿«¿ óž6*·ÔxMb &ORœiÙÌ›0|»'4ÙD£Û•¥Î“Aßb],Øç–ÈnŠ «O„–Ý‘Yøí[Nd2«Éc€¢¸ÅúöñÎ[¼øËÃó쪜±½]®-³&êèB>¬ƒþÕÈ¡_á x\ë;ö»3!ìA+?/×_”ÆãÊjÂö·úgånJx¸·.=œ¼y÷˜înªÆWÎHà¿YjñË ìüÎönRÐ\2m¿Bš?ÿL{j² ÷ù*›ï6²—³R«nê;s·ž>vZ¿4Ö)/Z+nÂëW‰„'—kVC0úƒ]X…‚5è­Ãñ†]Ľ0²Pźnßý.Þ/ þ[:ª¢¿Œ³*ZHpÅ9:^YlLçªcù“Y ¼çʃÎH¾iVóŸ¸WŸ-¾å¬Ø(›‘÷ÌŒ¦ß×”½øfí3wØ·xª ûÛGÒ -û¬?©0ÛäCë)ô·Ý#‹N§(£:3M”6÷wNöÓJçgð‡ÂâÃ6¼µF‡þøR¼Þ;ð‡ u¹@œ¹*$ç@èŽñañˆb¨ðÓQˆ¾5»•½Ês¤ãV§³ç‡½Êv0ˆ'qåÕÁ›g6;¡v²ç1q¬ë/ß2½ô};¿ F~¯+^×´{‰ÿla˜¾?úŒ+ð¬xVQêŠìWH‡lM}Œ¯1h’ãIìºäûY”»ÿê'ŒºdÉìþâÿÜ.Æ?8ߊ¯»Š¬‰ÝªØôõ ˆô¬£ÙMæ¡?éU^ ß[0Ó{B¿J‡Óy èä¤ ":\¬7ª'o§8û½7RÅ ¸ŽëûÍ_[e]À:qÑඌe¢8åÉD~‹j¿(µË£5c„ñ[KÙ¼-ÚáSl Ã.¿VAÇrîaºéÓðí¶‹Îz.¤áóàytSÿƒø[û؃+qãû~—ž¯Ïƒ%qx¸M + {Àÿ“ ô<€7áÌ6 ©øO§ f4À+šÕܳš Ç©¨Æ¿yò];êk?ü8Q`éãp/±N¦˜É€ÎÖÉͨÙz[^«·N›GewÃÇ7k¼M&Ã`tߎ(§@yü (ëS ¬?Ê“)Pž<ÊÓ)Pž> ÊÑ40£ùáM—ÿ¥?Œ£îít×á#Yâ>#œ,Hi…¯|á®ÃÁ4³ªéîN$såþœ©³(Õ3UQYSÇL·Œ§“-$×4åwÙW.aŒ(Mvʽ@Ô–E"¤ÎÃcñ,dâaW‰Ä3ËUÍ”h¬"rgaAUXH)ÂTU»¨ºC1ÆQÔ‹+B4·Iï²x©Þ<ËIUîù¼È‡GÔ8È0%–q: þ= GäàOaç9ª¾ ËˤBs ½ŒÈŽ£=’¸)gÜ <è·:þIÌ  ;*ëHñzg¸Nµläƒt©ÅûðŽd0Žµ]äÿÙ[Ǩƒ«èIóéïïÃ,÷  Œ-•K¼Q ÜR©§‹BÓ†—˜Ðÿò¿7÷ G†½“,m¨šð;Þ<(ÿ\ß?ØGa·ôŽe£ìA•Ç°c‚~yœÝì~« ¯¹°âà°Žf÷+Í ú Zãh˜¸!‰ú$*èßåA4@Iþ$1=Ï[+H“U–ó²=‹1£‡Al,ã­êb¦µxöM˜c–ïÑaÏü¨_%9% Ê©ãÙñ`¤ Á˜$:èA(ßìƒ1"¤…WEÐŽ|$#ÐÁ3 äÇ' ¤sË…7\ ¿¥ê‰eR5FçbÕ:òbê†QÔOÄ1ÖfùPVôç§%9W°ƒZ嚬´;¬6,|\[NUkî7ßΨ ‚Änù¥­Pk+ËÉü²›JÂ0kvš õ½°C+‰½ýe·\Ëõx:¨›½LP‹Ó«ØS’®¶sÜš^%'c©6wè­ÿž¼u¨AˆÿMîÅc/HÜö²w;—&M—JŸ÷n`4–bN¼ÙkefMç2Ý絡Ô^MLâ«~,¬€¡$ŒT¥ÈˆvJ¡7ªŠƒ“(cÔ.Öß69ˆ` 7É›à&„YêOñÇÛ{ô–Pz…²'ùƒëç ²ˆš7팺÷7ƒe2ª6ŽîW-òGɪòûf}ε¡Û1Q‘Þ”Dˆm” ~ú UëùÝjþŸ“æþqÛ{$OêˆÕbt—H‘1‡õ•G¹Ožù<%7IY;¹ç/_ˆkÅì¹³¸›³M{sÌÊ-yÐŒJËhrg*´ww‰æNìˆ.©â´TP=}Â%ƒÜÛ‰ƒÛ81mØÁõ"‚ô>ŽÐB1 ïê1†ÉQӈܮƒƒ¹µœ _”ËéˆD‰)QþãÎP»íún¤"HÂ8ÓÉD ¯R²;˜ŒHhF{äPš@g¥M\È– é¹€îoy忳:Œï­ãæöñÉQ³Ý†|å(7‘#¨==w‚>I‹vÐL¡ÈÀTYÄæñÁq)ÒAƒ\ìˆàðAªž?‰µ’´·–Cÿ2 oÆôlÏá?88R²ÏKªW%IËŸ 9Ûóƒ™=Ë{'»Ç;{·¶½(jë‰CweÞ8ëÉ¢ œ¢Ë]¦ ÊöÞÉt¨‹’ cZé[iöé€ûáyën ²º5æÝŸR:1Oô¬OU:×ÝÛÁÔ#å€ÁabLËôÐç•9l…£ysÆðºíŒ…DÄb§‚Ò‰(~?ÁÝã© ÇPxÐé<¨È½µ$roV`ó­”Äæ¦XÆxk ÙcŽoV’ýd‡‘³¡×èˆëß¾}‹„ü›šR¥ÿ™ÜvNm¶6½Ù©u’U²çH“^i6nâp}˜,²¯G4Z]ž‚ä<â)Àð0Ð5 `uOÑ@„0µÜʾö‘pàÔ~üqyy}6¬Q0ˆ²à¼“]5»o;ûW}Í¢*N¯Çœ®:cÏû=ôº·ÊÚÜ#ŠÂ7YtÖñWÈc¼°·Qï!®gz½Çñ( ³1Œz½(ÖÆ’7&Ÿ»” ®ÂQ4€çú¸ây¬™"…X>Õ¶4'òŸvZ‡È\Âtx‹Ëà~Ÿ6Ù-¢1Eaß(èúã@Š²1ð/>½SI˜Ïs|t²Ūåwò½GOeÍ$ýàú¤Ä 80ÒÚ¦BµyÜ`vVþ —Õµ¹|WvVŸÎ啲³6ÃI"Í¡+L†¿" ðürB”pœtkgx14ãÎ(Ž—DÃ)÷#ØÍ!œ„ü8ìÃñûÃ%²Û9÷óG¹FŒÆNîs\qMH=RÆ„Þ“zj÷*DŠö”ð0zq/ò»´5û@e!W€Óæ±x©˜Í°²Ÿ°ÏÛåx<¬W«á¸ûWþ`à_V.“J4ºÀÄëà¬úópS9‡mëožõ¢³ö°¯‰óMÛõøÆåÙæëfã…‡]¾èxr¦{;<56œ¦Ñ^5ùeâCû½^©ðÔ³c´@18YÁ ƒVÏ@aÅpå–ƒósx»ÆžÇÔŽâD­,×VËËË«Ë•å'Qëäx›iðáíˆ.úâv Ÿv?–±¨@°¢Iì%ªHÐݽ$v Ö$ÒOõ*Dª jIJÆÑH½9Ö2áÙè2@SpïW£“‰·øÊÂm@dÐ ã`ÔÕ†Îò^Ñh{âprÖ ;b7샘,¢†˜_Ix†`°Â´>ã#$¹›"VÈ@ªÈ”äH°Ñ!¢>$†XÜ/‹fŽÔ ¨«ÞFhδ)Œ‡Ì¬ÎHZ>é-4 ûuçøõÁɱhìÿ&~m5öÛ © jŒÂõÄÂþ°‡ä3Œa/Æ[˜ °×<Ú~ 5ÏwvwŽÃî¿Ü9Þo¶Zˆ¢!GÇ;Û'»#qxrtxÐjV„hD‚AýsyN«æHÁHô˜†ü¬žde“Nì\õ4hx{ÿádRà{Ž­„~%;ˆP® ýûI’Ê××ךBî1Œ¸úŒ:Ó@ë´xtBh&¸éCEEÎîÃ2-ð­ðÈZ2îË9ªÍÑÈË€9_ciisÞ¼GÚ~ŽiW>VêÒöÉ8ÂRK´ëûþ­æѨÝ-w(™óé¾Ð hÇ«W ½u•Eß_Ø4Ñô,æÉÃù8€ü^ïVà]>†ƒè7p¸`!zá•/~ŠðŸ­n§SA§îpWÎF8¡¬7TãÇo¡À ;É€÷Þ>úIí÷¬ÔñèVòË¢\¾ zÂÙ,9_ɉ<=´«ÆoJzZ–Ñ—Ô^,Éçøž–§HµœÄþEP׸î7ñÈÃ÷^¼:jì‰w£W­÷žwï™Ö˜†›ÀàH\Õ¥iÒK`H˜‰¦áhØ4†©¢oG"$_(·b<ò;.fV \ è£# ãÿ¦…/1\“‚ÓÙV‰Îþ­s•þMU¤ÙìJ/š‡/vŽ¸R7Dæd„æœdÙ 3ùüšÁVx91JƒJÜ ÷‡ºìqÐF#dÊá–¼F¾WHÍ+Bꫨ©_/B¶* NÛ_îÅ[8Ѓ¨ó~DN+^Äô¤„eÎPßÿèe…h[½©ò?[›êŠ6ÕÕ¢½wÕFÊ;_.  "+Ìì2SŠ"zêJ ‡Q³€&Æ—Kô\Ž0Æûãží6É ÇÀàìèxÜŒr²Á›¯‡@ÝP0ûˆòGÄvTØÓ…j剰ýÆOJé‘u˜eÂC%ªÐF¹,êT*‚5ÅçZ¬.–°›J­²æ¨RÞUÉ•lþ®zWø CäF «Ð7MÜg{êâÉù9†yŒ6"6„éùyÏüeNÌÖ/ð`ð§3L˜Öõß+‹Õ»»B2@ê'PéÊ1ûVnïkŒ¶×O—vàÔJ„ÎL#o/\Á«Šˆt cã¯\Áp5X$æÍÊ“´„Y>k<ŽFhÿ+/Böìsj?§î 5m•Ã^”ƒ;æ2@¿:xÚ¶­¨œ ž„G”—Ï`>d÷¥[ ,à¨> ¦¡Þ`<.K}DÒf?7¾³iìJ@±^#Çô'7a/D´^2ƒ> 8hØÌ°zÏoÚØ^[¶—­‰3Ñz%àò»¡+9IÝI‡¦×]»%aˆ\ë B9¥ÈY}SúS¬SÙDÑkE»¡¦7ñB…ó(ªDu«µÊ%¡`¬õ(Žkè“q4ä€69bi?‰1QV"ÏøÞ(sñ=ä¬Qx9uZrñœ8"ùjú¾_¬/©^.åÄOî¬I$0µê»üØ?ï— *;ÇÎ/Õ— ™`>»•, û©u²…Óéà‘ö1‹,4=é1Yf°£©›……•×´ÊVö ·Yð0w[¥‰®]¬žjÞr—$V¬ÌmÑCþ cZiû„ä³D ùRñ&€G›Ócœx4s›Óãœx] îÆñ¦Q«õHíi3ÿ‰`Î"ŸI b‚—Jš%‡F“ÊJ"‘Wۜ筋7ú.ãÚKŠhÁ «H£>îz>ëšþ“|(”#<2$¾N‘nŒ'gÕ3T‰„ýqö/qúÚx ­ðcÊ9Œ*ž\tºüUVè_AÜy*àñÝ»ßOOéú*ä?1ÁT&hŸ Õïï6â»ÓÊi‘®…ÓRþ®rxZÃÄC”‡¿áÆûì™]-šݨڢ–g$ fµrŒ¯Ž—µ­=¥OÈ<°°0"-^»ètÎ{þŦèúñeŸ~"€ârœ~ôR6úȨ§~ ¤b)e±¿7N+B@µ÷_ñú!™q€QþÈ; ×àk Õc)Sé²²9~œ…LL ¼a½ðtJU鯉ÀCfÿ‡Ñ¡€àÖ\ìøxõ-RÏ|‚`dó2F§y›!ë­ÁÔSŒ%õ ÃMųd”eõæß—C½¯1춹^Hy¾¼'}×ÁfEþèÑ£šïòž¡þ7!‘örf3¸0oûñ¸ ÂjPQffeh¹œ"ç̺@ó‹°–º|cwÃÀ"ºÛ ¤§Ú“Íœü)ÊÜoå\vWûñUã»Ìì& c¸~;Ã!í†ë*6:·$GHXúpn„øÍ¿ýNHJtÍ Žš<ª@½Ak•5ƒ˜8>„€883{/à?ÂÈD=KN$ ÎÏ¡…×} ¡¡©:Ú O€ÐͦŒ’%:OÒ¹R>`t¤& ÛÊ¡µR4Àê’Öí“ù%êð³ÜtÍ ü®ÔùÀ¿ n±¾·¿Ï y¥BÌ4û™ ØÐs—| :“š%! ªÎlU‰§sðúò=WÇ?^6ZÇp{þÙ£qÍ­+ãÒãìBŸq¡#£\‘‡$õÀ,wJHˆó V~ ˆÂ½cëºVÓÓë\ðprZõº$’€Üôe··áùv8•tRòª¯¤Ò p{l'@š<&‰2¬Ç²õDÈ&L'«0% 4êUj$V è.îyÚòI†€Üü~ ®3²eÎâFPt¢ÕÊxµ½­ï°˜ö!â(ŠgD†ne¼8uÆe;{Ïõñö¥ì®Bˆàcæãnè‹Ætð2¼`–€ÏËãŽ~ ®‚U;¦]‰,v|FاèD`Ŭc,‘ Q8OÔ,Ät~/oÉKZØùȳ!ã9ÁðaߢKÚñeÔ­cÑ2¼»pžð¼+†î#E4\….›Ÿ@Ù ¥áÔ‹€­î#•Ù ‘‰òÚ¿’Ö‚#fYÀÃÕˆcu†èT¯øk _¨EPº£&òU{ c'4´9ò´˜3ëUâ`\r8UÍýÍýíf«}pr|xrl}æIÇ1& 8Oã+8]{{Kd›DLˆ³!PYìŽubtQBëFØäKŽ;ŽuÎ$ÙQÃçHôX>0™ƒt£ {…sB¼è³´ðÁÀ-© )Gýø:¤X$ùЬ±ìÅí¢y‡%çÝŽ/¹íìG»!Ñ^,©³Çæ×á’®‘8°ßþ¸«’ösÕ~’ˆº8=Í%_ºtj£áIÃwrpÇ;&akÂÄâÅA«o{’…Œ;R2º£ð* 𺖉Èïï~¯ÃK\T…Ûµåþþ®§Çcá}ý´j—K¼ÏÅ3§Ã$„ ápF¾Öúþ<ˆ‰ÛKŸƒÌo’ßÀ 4×q…úÆcÅod&ûv¹çø‚‹ù˜V)‹nêX16–Ü#÷˜OT=½DPë)„­fy”¦»÷vˆ¦Â°Uò—Gvå Ëï¨3%z!i~ ´‹¾»È‰E šÁç¾kä%Y£AþlØ¥3¬Ð<Ü™¤»E¬5‰õñ¡™¢§‰ë"úDÑ—ßÁ—×y4’‡²Žüå~š¡óãÑ-ÃVDUàC‰äù«\B|‹ô…(ågKûŒ–ƒ^¯‚QÔõ;Ÿ.¨&ª.™+¶ñyx#¹„oǯ©'4œ\ŸŽÏÒ ÄF#˜D–†v½ì™àÛë„ ³W–içÍZ+ËjéÃR³iˆv‡­?jÈIjnÌL¼˜„·ªŠt‰j„‚c’‹ŒlÈå½_L4ÛTë÷ÓSd8ÓWõ÷|µ[`–Ù]eQâ†üÝsɪuÊNÃÈWE@›LònSÁlÚí,.&_šqêÝCõ™Šš(’dPI¯kEþX²5aØÛuèLÅò%ÄBŒìZ¿-Èk &Õ/êHA ’ rÎxÆRË&PR· %ÓÔISˆ<Átz$”¯øužWj/”Ð*HâØ’…kîƒÌ0re;gŽ Èl·Ú& ùIX]™$òV6³ÓW©N Ã °JÈ7 òÐìÝ?wcSóVSyòVüú °–s>WÜÏÕìûQr,mX·B•Œ§ÌÍÎÔ3LŸi2hyÖƉ-à‡(‡ƒ[8qꤕXs+F')¢ÀŒ«—‚ÅÜ|¤•:áråÇÊÊ:z¹óv¯Y‡³ëk{`)Wa%G鈈n'_ÉYúRßÅ&hòâ±ô—þìÑËFóŒ´ð¯:ÒP#7Btùó“Ü-A.Y~tmPêà3ü©§x=ò‡òŠ.ªÃ¹Q×J“õø8rKRˆÁó6òÃbÈÂiý7 PNýH6K²t¤QT70¡ã~^ò§Ó'~öØÀY?RÜ&;#ì2«”P|ðÁé©F8ß)±%\f£Ô8&åOœ¢±FÏLÀ–]^ýq­ãŸ?!8¹&&Ih8ðrįP$fš—ùWñ¤à ”YohºB.B×x98éÞ@9iEVaའ@„pÄGŒ$%4z—ÕµVÉ,"Dò=ØJÑ ¬d¬ž»®$×,ì“S/r7D;’T…`#_bœ$´±®æÛó®GŽf'•Gáôj¹-õÁ XW©+Ë[ïrAg„Þ ª‹×ʃ…ÄQD¼Â¾?¸å—µäªH¤ €NwGòy”¥'ùªèñ¼T¼á…B¾‡0nŒƒ^ˆ-µ…|cîžÜ¯8lI®HÎÊøiwÒ €Êd± ß0L*Œ0˜˜¥–Æ(ÂRØdìÌK=wÂ8pz¥B'*Ä6YDšV‹,eNjŠäVÈì`É ÃYªqì«¢¸ œâpðÒjU )£:iH0U¿.=¥IdasÄ×|ŒÉ†’h}*(ôF¢Q²œHÇ0j3+€f^±Ì¨6L :š]T:èãagÁiÌ"w¼§œÝÝ•Â>žŽ\‚¨’AÆI-G—U’a]/æˆÀ¿HF÷©aþ‘V¶½˜gM¬"#ªçq0)+£¸/´¹‡ZCžqÌZd‹ré-ˆòVâPzÒ; b%vë/à^/èqßP_ã„t%z‹CÉ!rpqkÐœNزä—ÖS\Ž…–HA  §œ“2~‡ ¶‹õ–, 8ô …(ò{KÈð‰­?Â(¥ê=ê@¨!A,ýo¼EM¬ˆÚª¨=†/xå16ßfmyïÄͼJ¯ëKšsº$CQ¾ã ÙU*t}ÎÜ9íõË–aÏ—IÑPz'à‚9ÕŸ\Fð1¦ƒŒA1ýŽò߈¤T®Èrê‚W*púJg 2:TªÏ‹é‡LV”©ãAë@baäY€3 (ŸP®­)"» w¢ŽuõɈK‚p²ðE+CÆDã8ñ¢ÉXõÑšòrמ3 ¡³‚f CZ]þn~@9µ2]’Þ’lÉ*%KÐæ+;ûDK!ysµ)%c ` ÉåÒñìñ}£7–@¨¢8§w¬AÏpu(¬=l•U™.>—E»}H(£Ž+—æ)ÀªZ™5ÀÖðÏ ÑudÛô¿W9yÍ"÷¤ÁúH|H©¯b2W?XùuM¢º( –4q¸4qøõb^|«ù©Q&óK§µ¥ Åðß ^ÿ†déß/&øÿŠáå.‡9DEƒ?|f 2ƒ4ùq¶½-ŠÛ?üP¢•z}*úÄ“³¢É7–º:‰¬>ÚcmLü­@M¥¤Þø¦‘–!R«=¦Íû>W»d‡:€qJô>éTozDð‘ÜÑ"IÛ"í8`šÏwñ%J 1ó­y“ïMEÌ:^°Gª)€ðb^_# |ƒ,Ð4XFÉMP96ÿ¨›ÉÒ±ùD]—OÄ“|?¯¨;ƒWdÔàÄš‡)Ä¿ž ôp¾Ï6s)ÃÏÄSB|+8¸ ïŠi&®°²”ÿä%Ü.þ‹Õj:Yœž"ç<|ódêÐMø\¸çÕúeÜõô‚û ’AMÇ|®Œê¬Äò‡”ɲO&y‚Íòဢ&¾J$HDvf2º—3‹ÿ†âìÀ[¶ÊÕ£ ‹ÿz¥¶Dì=ÿßbPä›õÊJùñòb>aõâJ´¡”òÿ¨^¾LF°½&rèøq÷—y Ò8Gô€BBÐý2ü2‚y$v¥Â£ø Ô ßc…IMÈÈÔùØGÆó±váíh=†í§¶3/IL“$ØŽ”@ŒY,¨3ì&5yÄ»—o*©¼!!D†/”ê>£ÎȚ߸´YF­„`$8}p1³ß–ÚÚ€#1ÆÊR‡ŒÇR…„^D(ëD.ƒqtT˜º†ç,?±#ÕË ‰:ä«R¹5ŸÌ "OÈ[Ê ´Ž}ÕY*®ï½HdUÜ&ƒë0*÷Ê(ºªŒs“_¼øwR¶ü¢ë%^d|‘üß/Ád‚Ïù¤á»°‚(9¡²L¾GòAÊãsê]À™ºÞa;Åx“VÚN±×Ü-™(eöòvݪӘç £|% ¿³~7›Kâ`Ùº(¤êþoPóc¦yL´4;àدdqґט¥ä‡D:Û°äÖ¶ /òl iqÉ ·ÁÛr`¹È˜×D(jÄ‚KkËït&}4ÃÖ{=í®€°-¾Œ1A&„ãàKÞP¬/ü d!KiVÀnˆã=è±eêZiDëüKDÎ|¥ ÈwïPnT«:&ßUèH׫NÙŠŸ_HuÅUô«K?NO«hJQE¤<ô€Xºyml¯4Tá-O,g½àv¨#  Tg¨…=æ §5ØÕ!dT¤üá×€H{íåeÓ•E]»ðJ5œ¢ËRªÈûBáŸä«ÃâŒü ’(1]@\_²(Ò[fæKRÂü‡ëH<DH62ÅhEêýðÃX9@Fšt.@O@”§XŽ ¼„vqò K$ŒûÒH/¦Ò$è;²Êâì(>ÆÙ®B¥N³Òg¥)C)/¢e‘ù,٠dzŒ+®^ã8#Ò%7‹RÞ „ÊÃÄ$)GZ,‰Næ¤Ëy•¤Å’'”EŠR¬ÌwX ÃÜ[´½Ç JoËe2÷‘)XÌB²Áðv Jâ{T÷©€nM§ý¾ó²µ™#žôæ&Q)ÕžP"茋:/ËÒÄ®çØ—¤,L,Ò,…í Û:W÷Ñ%o™úíÉÉ`N¦–J¹k4â¤òoPäHDt(Ë•bP)ë#Þdƒå"‚¤ %£ÆÕ1§Û‡åBŽy}Œüxœ:u¡5n€H©`Œ,1Œ97WèXGQÑ“|Åë’…®bÞý®ìÅßý^ç_ÈYcîšÊºÓLÇ»\uq3“W™?‰©è2 ¿cñ›èC=bÛœ5y;е ¯ˆ,‹E¾È\àÊrã@PÃsÐ{‰ùˆ!Ǿœªv«=iÂóûg½4Ò—æ†Ðd)ÍYx©w0b»ÿ ‡Ýy+L—=“‹o= Ø7ÑèÜA4ÕÉ¢ Ý "aårRSpaX)#9M£Ò}räÂôƒàDƒq8˜82iÈIx ÷¾X¼+ïÌF¡²ƒª;pÑM -Ô5 ÚÏLùÎB^¶‘þÃæâuµÞÑ’‡…\2¸ÇÃZD>:-E­â3ù.¿zËäKÔškâÊ •re$Æk_äø©ÍÞr6SN ”;bEV+èµPD„x8yXóŸö¿4Ù–¬l†ü.C(Û ù<ÉÂÛÊM“@%V‰å2˜l:Œ—[LN/ ×Ôƒ íG䜄ml.‚i­nä%òá£ÕΘ/3@Æ…J1Üx}¤gŒ =ûœÕ«k±~Zº;­Ýåþ l/5Ëþ,1Rmi¥[˜‚éëà¯DÿîWåŒxˆn;Ãáÿ]û7û¿ŒŠe¶[ÓÝg¹ Š_ÃAlDÝ¡äÐJ^¾"®×½’ëC£ð/Œ…"T'¹÷Ã@Ht™‡G”’¯kb&’ƒb*ULÚú¨ÑÄÁè ulþT¯ýKÚHüfLªÙ8¶±\­ž­½úÓE4ݯÿ½^ý¡~†_ÏÛj5ÛÈ‚efþ̦؊Gn8Úòü~»Æí‹Á¤M»fSJ!€À˱ÒËÝf{w§u\*h}o“»Û|ÓÜ- éˆI¯>mS[²í6é%Æ/Ùü'–ȼògœ]õÖû¹7»þR±—s³€×ÙA&ú¢"ÏÉø ·yØÍ%_"'e²W…t_ ÌkÆ€d¤Û½aÃÎê9 ©þuéÇXsñwìê-9eÛÌçiw¯ZœŸ|11ë%éÞ[KC°ªSd¸S‹5`àÛ3¹xzúîTœ.¼‡I4c8‹7OOíA%šú Ã00ò— pw:ï$»­šÏŸÅøß;üKà_Ðdµz‘û ÒLÕy(§èc8l£Ò®™4äô¶É„æR¹ÓŸ$„óÞEF× 5gw¤VYÌÃ+Z¦jŸe›pJ $i—åÝáâÓQ¶Àìî¼î¿E9B¡Û[ÅïÞP èu­èØ\¼+—aúu {âË‹;¥ä¨ ;ðš5­ácØT ?/fVqÁ¤ËÌ{ö ¶—.Ó› ¶—¶gƒ-¿ë6_ôß—¦y÷ßÇS³Í®šºù¼s¼¡?꬟T§2àáó—É]!kñž0˜®;ºÅ€z›¢è4³9Ø|Ê*• A0¼ q)8ç€3üx¡ùÐ,eJËߥêÖacû—Æ+ÀøPBªë¨Bæ3QˆJU†¦óññf•‘Ÿv9ìp§ ¶_àU³ õÓ?[¯U²*ŸóEÌh·špY5ŽŽJ$ãî`Ì?xäôzíø²ý¢qÜUi%Qî`¿õµ5»¤Šù‘.l—jmígÚÙo7vwÛ4±yD%Tv¢ä‘KW²¯Á;¿·<¹­¬tNÙòØ4R*Þ ¸áÛÛ{{8®ÈôAÉ~Ud¥±tê-ä‹ãhØV™Æê˜÷¯!6Ñö¶”®{‹ËTÍ£¦2ìTè0ÏQ¶<ÈUbΪ‡4\[^MÑ8í¨%¶ÛÙ…^ÝÁnt!Ž^èà0P݉.il ÙR9¾D¢¢ñì+TâK¯±½{° kº·F“hwÜï7xtÙ‹“"?Ûý5š•TñþZU2F‘“šÌ+ëh(‘O.üÑôÊ*dUvåÿ‹¢‚r&½¢¿ã¥—˜“1È$oì¿Üy…±ám—rS˜écÉ…Û¸7·w›ý6£-¯Öcì'zu:~GGo­ô`I‡›ž"¯r¹5e¢×ÿ(WF§±Dד±N:š˜9)•KUØíñ”=ŽãžcK»0‰ˆW½Æ^ûMûPÏùUû°½…i[<‡øÊ|Ñ|Ù8Ù=v -C©s•sUJ ÁÕÜ·€ÀW¢ LÉ(ns°¥-&í…@ÈD‹üÖ†Uç¶I AAölj–!!n2¨YóI ´NŽ¶i šÏ£æö ÜXošíãÆÑ«æ1®!ûQЙÀÁ¹’æöwŒšSè9ÁJDD2ZÓJê^…Ö×å¸oEOFnu…o‰9e²Í*wsFùD{V…DÓ*yØ=Ï.?Œ3J§R’³dàY³2ÜvàP'1‡út˜4ÆCþ)¥¶Ì•Z­×'ì“C¸ ðj~yÐÆ0YšdÜ ¢»}  éhÊèÆ¢=GBG+ K4²òì{ûqÈûŒd~÷_í8O0R/cP¢‹µ^‡ºUfÇ]þwQø°áBAÄÇÚ^›K:z®æ‡æqt÷;÷†üØÓHO<3#lä~g¹¢IÍŒ ™¢[(ä’Hiãþ6…Óî©QT‰–ÅÝF® ª¢²xZ­~ãø¯ºþü‹‚4É9ÞÙ$0¸3ý¥$ Ï›¯vöá±J*ùïr•Ü{èw.'>ë´|~Ó¬âÜ|Mm„ð\øa ªQ[kZ2¬„O‚žãP}eɹ!Tu´£pÚ¥¾|–àÞÇ~aTMr×0à²% ÒTøù^|fþ’½$j" ùüwû³ÿŠ«§ƒª€]c-@afAjNã˜6u…lìäqødž‡¤®›§Zç Pæwì/!ï8KøŽ}©Ä‘JÜÐóDäEY„'v`5â²F®”s¸U’ôî–ì¦XÈ(«hÆgûðJ Žâ‹fëðc =ú•YÂ1.$3™z¡lO¿Ü2ˆï|qa3úSוo-sé2¡c®Þ>¼dz·døf_¹î÷=ß•œUÉs ŒÊ‰,ºþjóÃ(–,_LQ¥T†ÓS•PÉ~' »„DMuÁµRå릳›%qŒ|¾múI "9hȸ1ñ_ú«Œú4xûÒὺ¼•©1¦e[¸ ’êÁŸ™)KüÚÝi–(¸›Ž éìEç*LVY™Šv‰Ñ3¸°Â‘2¦?BÞùpB|z4[âãm¹ ê‹h€Þó¾;öwO&¦;XUj¯ _n±H,¾½<¦ÿž„ç·,É ¡1JÄ•Ph…ÏäóŒÓgÉ] ÇAÔ2"(ÀƒV©š*Ũ q£Ê-)Ô"â" q…t¦°bAÆí3ö8jòX%’ôþ¨ë¶öý @Œ›'ÍKqâ‚ÊEe)ÛóA_’æ¯ßGQ‡¦bu”I€rN²Ë= ²1âª1é¥É¤eÍirÇœRàÎx¼Yàjg— ŒIx@›°±0q#ž:ªÅŒCå×X0ÄßæOMØP†bË›”;á.~éƒ×¤£±)$½mùÕ᯼ú›øIÇFRü'Ïñù“¿K”£n€ë k¤¤>í#Ó|‹´$ýn¾=>jÐ{µä©S‰ ${¬TÎ%#¬äá Ò.#—$JBå)+ÿÔöS€—Š.Ÿs„çè|ÏÎåñ-â¼bPô$Ê+ËË‚žð„éG]1ùáZ|ú, FéNÞ£s”öä‹÷û÷y<¥¬¾]hAë¸~40²2MNá>;YMZp_aì1žÈYÞü0¼îJ>L›p„3^úõª¨T­(JÉÃÉ›ìŸÊT—ìLTæ¥L »4”ˆ³ÉX¬.*zL°ý$ ä½[ËY»Ÿû©Itʶ¨Q Õ`”ÃV”ËsªÁç¬zV1,•*Fó·âta9ÝbîC•óW‚§vu9If ŽØJO„Û•{g"k˜+4N5æÔ`3†›Ñî ·™Dw%˜ÏjÆ”(ÌdMššªÕ5UÄ7¿p'Ü·/ì^œôÔ¦ÆÆH­q´ýˆ‹–ƒW*@PT.þH¦œý±â½úçÎa»¹ÿÊ—ËgЃ1´ g„Ãþy? Ái"™( ¢ÎÕ…A˜¨"ÑÏ9 ¼"ù–™]‘;8­“Xú¥üûi¥z‡|y ,QªÞ!‘¯íÀ‘wÑ‚¾òÏuŸ0G%KYGòçp03”‚?ðÛ0œšGÏZ(§ìt:”æªXïäø{ô-sªf4n™/ÎA¬Jg™>P;”ðë/[Þö6þÜÞÆ_ÿn´øëEópïàES%ÊOÎcù±Ì¡Lwj˜ò¦°*yxHŸ‡‡ôÛäËßúÛ+âYþJÉêc˃顒ø/~QÜrúÆ_²»{|p@³/BZë·½“ãN”¿!õdïðùÎ>%òÏ-¯¹ýú M3¿dʾNQeŽuÊ1¤¼:jÒxè|¿mµN ôkË{©J¼äê“¿Œ fKþÔiJ®µe›\#ËÚJ$™2Z’µå¦X%Žá; –“±åí¾ÀÌÝøK/™ü i;Ïžÿ7§ñOJS ü¥ÖFþÄ´ÃN8<€¯ý6—‡áë؆y¬¡î5vöi@ô¿i"AÅIüS÷w^6)É6Èÿ6 ±Á·äÏ-oŸ†¿¿‡¿š/vŽù myÐ6îL’?)M®4ÿ‚ÕÚ·Bÿ¬¯é”õµ-OÒv˜¦¥ òGûù £c+×$šrû=}›\\¸ýWv>§˜€†’ d’)sr´kççɓD©/“°Œ-­å"v ”Ø!L@YüsË;jìà cÿÚòZMÚpðþf$NPÚI­×M>7ô¾qÃÒ7þØòŽ_&D ÷¡ý½åYcÐ}÷Ïb-¥Á û›sù¡ò´Vü¶%<*ßN3¥\&JtÚq›1¾ú­RW«ß*ÕÂcN‚ÔÔ’ž70×|ržtXÞîFc•o%q™O0¨ Ì¥-É©Tø¹%ÖV*}lygpGòHù׋¢-4‹¦ý^èÇ:•?U^g819ð¡Ò#«B¤K_ƒn429ü-sU_ôŠeˆ-ù“ÓЮ•.?!/R+Ç¿ å*T)ôkË×R›é ’[™O¸A;‰ßõÐÍ—Ì‘W¿ejd Gª¤´õ yã~OvNþÜòåŽ-ó…9Dúp2ýܲT"8Y}myZùc‹QŠQ÷Ø2_CaÍU†úéä¦ÜÎS [Æ2å þ)èGµ=¤$þ¹åE00gPN–7ìžË þ)zqÔºd«ip‰¬¨+ 1ÁŒÍVÕ^g.‹=@7JhL 0@|#‹S¥ê/¥–a«cHE ½ƒìo+w‘ùÒ9‘])25Ìnr¶<ͬíL³JÉ1¸8ÐÅ6î3œHÁx“ôr‹µŽDcOQåÑ_ólF²£„¤3<—_<]ªîY|æ)¥’ö»U˜¤’Þ2{ÍJ¿ëþŠƒ'ãè" ½SwÅÞWi¼|¹ó¶Ùª:-CÎ9¼à.ëZQÚ[ت{™Š6uI ÁÍ£6RÝí㣓æÖœl5O<¿€ES?K6Ä‚…2+X®¸ õç ôG䫘œ~£Bw¹?ù¢zŒ”àùˆžG‹±D’²ˆûëa­Èdà ˆ¥~»`ÔõÔKxÁ«2½!5…ÜS»‰êÔàl^å𨹽spÒ²ÖWý¨OU§r•HÕX>¹N?›EYtŠ˜¥‘cωp*‰Š ˬŴjZS õtênò„fƒù-¹ØÒ†-n÷ýÛ³ dzðr‡YXí͜Ⱥ˜®&µjàyt|Òr’pGLéže¬xS@Ï8À™'uæÁN–•.ÜØÓêBÖ5‡·\=SR È'_tUZ1M‰Òà|¶·+/¾»c±X-Á ö8¦ží‚2….É'| ¯©L9t!·¡ð².;]f­LÓI×aÙ® YjÒ•Q U»›R:ÕÝ4Š*Õœ’Léîõɵäí¤…UZ¡DŠ ,.@w‹B äUô<8ªÈZÖ?ǤdW¼†òH(ÈŽ{žQ³Jí{‹håäo³I¨¯,DÌT«Ae¥„"­ŠDÝG›SgiÃ3­”Œó²%ŽÓËþícòè¬ÆËæ£rÌèá'“COQ0*áþÄ(9÷XfGÚ>©d# , °7 Tí6/ )5µ 0.)ØȤÛèRÿ-p7”‚é–Ü©qÕ¼¥«UÞªÒIËVN?ˆ ´õRj^ðœQGÌVö€g®õàQ%’™ú‰I‘2ÙR&2ÚcG_ÊäLšR%…g,ѵÌ® ]×ÈÙ!5™È¸œ¨œj¤ì÷l3óÓ «’­7ì“®üÆ…÷À^[[b®|&"„‡(“Ü}’[#Vâ1"gÐÓštšq1Ùú—Ð|Îóv^ÔE†v’zÿLÓn‚½Ýÿv<ßyca-&u†êÂU<÷P¡ˆ=*]«+µ9× %³ˆBnh<ƨ±àTÁ‚öòH}©¬¸ý3έi”¥•ù`ˆÚ(¨ÁÖF¯‚•Ä‘MUŸVÑ>Ë©³³!fŸ–ÌCP‘èo8Ùh˪ÂUÒ纻3\!rm™gwGùÄòyœäªS9q ôV½wƒ@ò™äÒg¸ùxÕÚ#Xº|~QíŸ\Ö ,ªN–ÂÑHµ¹|^OreäóT€5Wè #¨£ŠçÈM°ºhæŽçMõ$“|%üdEK†^‡VÂ0Æcu=™Î…x¼æYEká¶í…Së¡›Ì.©öàÝ„íŒÁk,â½¢A©Ÿd3:lÄ q6CRå_àüˆrÙ¯¬äx×çh?[¹[ÕwH«yëvRÚÞORÚÞ£ëÔ÷>ÝÐmëÁ¹Ã³ðiÊt¸×|•­Ùq;×Â<Ò¬K£$—ªÿ“Ǧû¥×mŽ¥(Òòyfçd¨ŽÍ §4’QÜiÍBÎÈ}¼~KÛzê³?‹~³Nˆ;Õ.é²ï)œXrÒ~V%7¤®u ·ÛÆ6 ¤sÁµº$kGß×e‰Qš· «Nºe²‡Ò¡9ÞÖ6,X´øœHäéôÓÓ\²Iü“¾7ë”HžtzÁàb|Ù&¦ŽÎ2é}W鹘Â,°$üÙ#ÓĽƒ´ŠN/\™ƒSYtò¬A¦Û+Mߣα,[ÌÙd¶„úsâ‹›?²F3OóPðŸVØ+ȯ£ýýWu‘kIåtá]ú–ûGôàGѮȖÒÁÊß_7ÂÙêÕž‚¿c9rÿàôP« 9íx·6”7͕ʲ„qÿ$¡¡º ʘ•Î1)8Ò9'%{>TŽøƘSÍJ/¸ð;·Ú×eA.pTÒ?cÊhé¬ ›ócµûŽ1Ϙ{„ä«Ó‚„æJ ÔÂè߉tÛòòÞ†´uuËNá”mã©’˜q³°U/ÌnQ Ö¤HT°¥Ð»B¤%JwÆ,c“±W”r9@å èa.³‹‰¾Dƒ@QTôþ!W， QŒBJû,Ùð$}BwÔþˆEnÚÀœ§^>¹ªlдNá¢ÄÊJÇlÊèv2lÖŒ½/± p¬(ñp”™¡§{Ô›ÒÞ¬ÜèêˆÓ•ofUþ§ª;ØH#‰3¦@çãA*ëä:Ó±”° ¨é‹{,è”P1rl³`nôòµszŒ9±Ê‹œgÆ‚“‚”„ªŸ„jž£IŠJc5ÑnG;+Aõ—×ê6%™­Î£ü÷w¿×‘·Ç¾¥*¼Í5¯@wM“~:ÞCë´ruÜ~®ú}˜árþTsº5|ÝeO&K79U¦R±4õK- Ñ Úëæö/mãBÍ¥²ùàÍ.S.ó“|³R߬âMÆ£îäå¬>Ï ìgäw¯Â{ËpëûJÉ~Í[n> Záþ¤mQ•Ám朙'…[K7äŸYS_üdAÄ·$ì X6È™ôýø£X~ò?‡3oviÎ~yÍ›TúØt+»3þ…0ü…PDÝ̵Еҥ,æÒgv^ =Ø57ô£ï³Ùà™%çÚ5IÉ‹q. V¬w½È§D1F`%ƒcÌ¢(¶ŠŠS­i1M4¢vÕmŠ¨¤p|;ÚÌ(s»37*ÌæM‡Ì˜.%8ÓµKú;®Vª›Õ ú=¤¿oçóÂüqSÈ03G…Ëyö®ºƒVÚ(išGGGu —nI‘("›ü–ŒŠ<`wÁÚtÐéÐ¥ða³ >'Œ ¾ {€1 ;—ÌÞGâË:A3$/ÁÙõwâ^ï½0çÿËrü–ï)Ù1æ÷÷‚ó±ðÏÇ@ìkˆõœØ°Ïª£¿¨UËRLl›oUä=.˪PU Šy¹n;÷y p ë³Mo÷lÕÍYƒ½¥º_Ð ìrPEZSÎLâ ¢J…åÁýE.‘qNw½ž,î‘Pbq¹©?𨲼d/ÕÌ•‚cɆVÏ“‹§ÛH,Þ¬Öírît²›G¼¢ú£ß÷ä´&Ü?zœkŒd)’&­å~¬.2=DÚE‹}$|ºfó 5NÃ2·T‰”Àahç5÷™X€jÛ§Ý^z¶ûM“ï:ãôlŸž¦ëáÓh“Ö3Ý]j Ö¤£žéLâˆ;‚.ì6¡¦çà×)Î;u“$&¬;z0¨„VÚ¤¼z¯jW½2á3½”4 vù=«’›Žn–c³y%°„ÔÿÊÎæ­ãËn“Jb¦™öœ3*@'¶ é—†º2-1ßFÀ¯Óƒ›udRÎŒY®®X,ù @…ýyø˜Øòh<¼] #<'´=ͤsaŽ`&u`ÑÃÚ`ŒšÇ¥ÌT'5Ü PÞºbˆ¡ÔÐûu,Q© <Œ¨9òºŒIA…{1‡®%4[Éñ ד¾ ÕÌãiuº+ÇÑ!žKƒ¦³<Z¼®éþ²Kº”6M4 L+¤6ƒH±Ê¸­â¡Í|ÝukLi„¤Éh½žpsÌ©œ¶éõ„ßcNUù¦²ÐeÂ$Ed*ß[°—™n“2n«_Z)<žlwÊn)·žg–³e·”[6¯õ5ìž×³]3;e\ÃتgV‰ú6OŸ²ú,gšÙô rä#ßxm°÷ôžMµ‹›ÁÞÈbFplîêÙ¾D]»<?E†ížçÑš$ÖB¯ν;çj®Í¥Ž­M7µSÌJ<¯‚—T}šãPsé[÷=ÝÜPóðõÁþo3ª²çDÖð%/a° Ú%GmF& =>gQ‹ÈÁ()m?CêJ T¿§ï¦IdBËÓ„–£-fÒÕoþJh`œ¤š”œ§ºíbÁä@ù6”U¼ äŽ1®!Ì($º 4($°\¥g­$n$çø‹Ÿ†±mß%ÝÆO¥©¯ —t!/¨LXˆÌÆ\Ž+y:-ÙÜÂ\ÂAW6vîLq•ÙoŠ¤ú Ô1—`] Ì‹%?9L ù mµÉ ÏÌÆ XþK°ƒ÷ÈÚ³h»Q'‰Ràu¤ûw«•Ç?.­VÖWKh õjÿDèäA7$hÄió)4µ:P†Hð°oãqйO‘²jÝÆo0´,´Œ|H6aô»NtÑkoeÿ ùý_ý¹ô[Æÿ4îH¾]hÌ'O‰ÿ¹¼¼ºòDÆÿ\}²&ã.¯ÿÿó/‰ÿù]õ,TãK `Ê–sbÑèD[á8ë¸dâሢ‹kDð¯‰M„æ*M%,Ùa=—D0îTJ:ì‘ ‹)R‚a‡È`ªxîE *(‡ž‡¯*ŸVGÄe–¼×‚%ì*ÀÓéïƒýçX}룱¾¶6õü?®­%ÎíÉ“Õ¿Ïÿ_ñgs“ã•ýøc,67=¯ÑíŠí~X¾ã=8Ü´;D?è#ÇèjÖ ÐóoƒQ`¼Üy»×´€½nÉÍzõðà×æÑQ¼ètÊk°½ž”W«Ãag}­´$^Ýhä×’…Ö++åš*ä½ÎBPF×ÁhØ¡2ˬ–Ÿ”êòÚ@µ†¦›AW¹‚x>¹ÖŸ.×–—KÐK ¦¿þô£(RßÄje¥²\^)£¿0ÖóIÌÑ`¡·€þP­õ[’m,¯¯Cÿ·œ…î/8ÿµÚãÇËWôùò¸†÷muåïóÿ×ÜÿBpa«7FéwùQ+¸+*kµ§z]…Ý@F ï…èC?Ü–‰o‰÷¹”¹ Œ®v˜Òÿu„¡ª¨ö*u#ty6þ#¼øµÿÓ$m] &?¬ù_ º“gK:|=3 øú\Åép‰âqØ>5028v¨tä€ÁIãmDö0>¸Œ ½Á/ °5ï ¦Jû=‘vå|§»¨ZŒ'N¹ ^N±ÉoYFŒh<ã`Ôe@‚ÿŠWINÎz€Äwa1øÖ‚G#¦Ä—¤™‡ªx3¢ªoX"TÉ”=±¢šð–`ÌèX^jÐí‘ ‹]‚¾bXò±© Kå¨b¨ØÞø˜ã(Ú2¶ùôn#EžÓÌXsBÞ;XƒFå(4Š¯•Ra®äö$Ö;‚ˆIŽ óF´§µ K_™Ê^Þד (zŠ£ïÈO¼}î9pkàxÐÙ>Ï—¯£¥ð<$6ÀãÄc”x€Í>ÞhÎýIoãv'íaL<Ÿ :„›e˜"DÊ8YgQ4†Ããaí#òäÛ6!¡ïkúªßBÇòá4”LE—ï%lšÑÙ2>r€¬ý`°¨N;8ãu‘ÿ¤<*næðŠóû¬3ŸÎȃŒ{IÎ|‹/¤àfm›ßUºwiäªìM8$âá^t]î è鉃 Î>δòÄW`—w—j—)nyI°ç!¼´ÓB¬œ~¼ð'7ÝpD×Y fÝ×W‡ñ’HPïáŠÇÿÊR›x‰——Ÿ–W€_Þ°?·= §ð‘ûÿ,<<C¼Q–H]O ¤è]‘$3é¿©ˆ7þä¶Õ’XY^^K“˜ú9qláÂÿ0zbõË鉯!'ÒÄuü!äÄ,b€ÍANÌELȨkÓɉŒõ 9éý9äÄ jâ ‰‰?›–x)¯"”P0çvÌÙä"ÆÁ´!^Cp¹v.ÙGÛìœ- ¤ò ª¡‰~Ù|‡à¾<§Ñ‡K‡EbKj ÖÝï` @ø”‡Ò\¡ˆAµ,F°«›.]™u¢Õ„¨h× š+ÿ©Õ|Q†ëø3ºþcÏèü¯Jï¾2ÜU„ç™#ˆ>`|³GŠðè Ëå‘÷¼Wá(ô1¦ êÒ@@`<È%T°£­{ ËlòÓ¡‰$6$šz˪û•.”A4êÃMKæé7«œú’-tÅ< `9÷¦×ø"tñæÀ„€>“8$Šcü÷Çsî{7b;¨[è9ü@½±%––QŒG’ÑP :Rgœ»!¿¼»ßyÞ‹“Æîv£Õܬm(ÉšJŒ*ö~iA=G}öÓ?[¯U0–`b?S$×bП Rh{›í¬ŽÁ÷t)øØ?ÙÝÝÞ{±‰ÈÊ@Y ,í?ãK\±kxÖnÆÙ‘r˪ý€Ž÷>Kº‚ rÕ`Ìh5"ÚeÂA¼€e™äEü1ÌP*qhƒò…(hˆ…Íþ[ {p$Æp϶_íþí¾·vwÇôsÈ(Õòº®zÖË©½S¨ˆÓÜiþSž¡Óf8•JÕV¨:T[–Ù<ÍË_V•·Í:È´U)HIŒï4§ažæ ø©LÙôË*}š“ì1¶e +kœ‡9=¨•÷•ü*^q2À!ógj‹“ŒUÀs­î¼lÉ—L 螎´DX^<Ü,ˆ‚7èm¼‚7sùx¸ ûÀG’ÖÃUçZõRÆ-owº¶àXXH¢[¨€·€‚1|šÕÚíáÁ9ƒ—gÜó&äجô<‰éÁcPGþ,nÊ–NFá0ùÖ{‘ZíD#Ôß&ª° á]¯,«DTÅ1+<®¦‡AC¾pÄJeý)Ù“bL;Bc‚îPIðwFPfx,žˆê$‡‘¢àW<ÙÅÍÂé_ó§ [T³sß¿® +2<ÊÎòû…D8Àxý‘qˆzÝñŒÚr ¦MQcŠîºöã±|N}Œ ¿ŸÁ4#‰ñG|Yñ'‚ÏËç-Œ¯b®"Êg§.o?p¬áò.?½u>cÍ·ê3ç`H"ô"Z &½=09Ê zè˜Òiø\ü#þªfÀé «YÌ)(„¯½Ø¼ýP¤Ý8éœUé”ÀµÿWmºw÷Çʶñ£jï,êÞn¿¦ çò5D§t0Y° CÛN xu„3Sˉ:ü{zZ¬,žž–’€­*Cû£‹Í|mC~±¿-HûäQQ¦.æ°‹%oA5%܆°À†·€Ð>$ U!W÷èÆjŒÃi(óŽ)€‘¦Ø)bM²“òd¢£±%ç8»…T„wu ”¤÷Qˆ /ûÿ!Þjn ‡ÁˆVM»ŽÆS웸bˆ²èfÉk Ž¡ðñõ/Ù^i–—"«á"í1VWïfšC™˜]j‡øŽ'áØ£z‘Rp,Œ?¡²úWðf“ô¼|‰ªjq€Fƒ‚/jbžmnæÈ»–d¦a,M¸YÕ”‰öp3ÇÑY›2ñ¥øR&š4™€$7s=8ø±LaVdÓQÂ/d?JÖ°*é |_™^ímæH©X~ÃÃh3K¢>1fôú“ ƒße)gû<‹hö<ÊÙ}õ „0Žï}§`d_è1®ì뻪~ Q«,éµ¹v]ôÿ×ËX2ÔÃ9¯HÂy2ä‰!þ`c —}l¨…ð<¤˜ð}x—w.ý‘ß“1´¤ÂÃœn3Xÿn¯ð L1»’n¢;Iimêöó´øîC.zúþ´tyíî‚ûŒ{ ‰²3ØËÌ«í²–!%ÔÇ…®bäØJðÜr¢ Ñû@ KÅZõbÆÄÀëc@Ô S;dSé“^Ô PaðÊ7LOz½r1xþ û¡wËÝ i2­Muq°ìÚñôtñ´úFûýݬ~-ÇxŒ]¹^]‘Üœä:º¡Ç>—CÕS¢®}|‹)"’ºŽžrHúqÇÝ’C ÑÀ÷Ý-´‚K‰üŸq?¡iX”Ó¶¶Æ-­!üY„¿ï.6`OªðfÈ1åÂi¹m0dïÒöü–Dºi2Nˆé•½ˆ G]#Å €ÊÌñ XK²‘ËÆ"´¨ìváùÖ?C|}.¨ifîw‰Z.ä NýìV—xæ°ðµOœ£1PÕ’“PôPb«GDBÅ6 K^‹ñu„Ÿ°$½(úH›Ù#Ü?€=MøQ}Žc, ¿z½èZ F$öà‚ïu{Íb+ª“ôÚ<‹‘ê.ðϦÀåך¡Ç)¥ -À;«pš/ØgG/ïfŽÙWó\»úýé©W½ ¤ß9m%¯ÁÈRßW)îÿw²Ì{¤/R¥áZ‰g±•Å-œªÕ‹Ü,*ñä«^tæÛÚÆÓð§â¯çXóY/Õq={a'ÄwZàÜ°KÌU£õ€³ŽœZÍa“—]áwLjøúú)¾à<É°³k;„ã¹U†[8 ¤¨.Qÿ‚b¶i‡…”Ç}1¼Bb÷"ŽBW‘÷OÌB9Jݲ2`gÎîb L+ü˜-à~HMr½ö‰WÃvwŒ?ÔŒ²AU¸&ˆqG˜uÄ6O’z‰RÂqˆ”ΰdz1 b’J|ëÐC]i…l37y~£s1ûÝÐsä/9]å%€íeÍ~E±-}¢‡FtÿÔ¿ŠÂ®–Ì"gWWBò*æ±…Ɉ•Ë ))Ü(xÓ‘à“¸ÖˆtÃÁ„tä¯áe‡w¶ ; –²"ƒîûB¡á d§‡B$å®Gp‘Ø U3™°“³ù»’ØCÆ€"÷/ºÒë>ê‡ã e Í·;è3t{»Ùjm.óçËÆÎîÉQs³ÆŸ{;­½ÆñöëÍõUäçå†Çü ¥øvŒ¶Ý½i¡O?ŒéÆÄL©\‘Mý²s¸ùäÉ‚†ôäI&$¸†?"mÔåçn )o­HЫ$wú’` q<éóúIñ ]I•Â­: [–䀩éÙ]Èwƒ³ÉE»Óï„tw•lv,­·žx³RÁÿÏÞ¿6´qe‰Âðgé/¼_*…ÜBDCÒ=g ¤›`ì0àNz,GRj IQIÆÄp~û»®ûVU’°žžyÆݱ¡j×¾¬½öÚë¾ð^"YÊŒ£­ô þè¡S{d†Rñ5ðŸ¾z±e¸_?~sU6(Z•ûÆáŒe ÄȲí£òÑü܈·óÄ`{zC1?Ü:‹®c¦Éô§ü¿77®TD]HmI|‘Ž-4ÉžÌ"§ ‡€Œ¿%Ó±šÜnº£™»—Ô œzÂÁ”en¦¨UêωÂè!æ~T#b(É9ȤZƇ31rLƨzÀÞ’ÂØ™ÏnÅEh„ÂOtø¦h $¦‡8%ÕâÈd &pxrøsô§æ›Ñ±ùåÛ¯ë¨'=6ª}Hus%¦2ÖQÌðûñ;$Wi§W±¹zó锥·!q!kèüüòY®t§âÜ6mF똅o"1„"ö¢=ÙüΪò¸®|x×ÇÅ:ö‹=0©NÚ¦I•‘·Ü­<§ÓÔ±QC5Þud\ѯAè¯`ýö¸âJ%ñ[_ïz“°r°©{žŽéÂÒ芨8±]fÕ†y?@ g׿{½×øÏnã·7ÛÀ…b¶3x³!‰÷Y=_Q–í¥sÙ ¦êHItä·X‹/Ø6 2yߪ(p¸OH¦×ª‘+ð? ß>R¨úéÁ˽“½³ã“Æö=¿¼`㥦nÆf˜†BÕóô1w©XIøÁN×N‡&~òú;nLJôü~¬AÉ,úî΂ãa«'£ÊB>ît${,åãÎ\vL?áîT¶Ð¨ {öÆ”Ki6óv¤£àÛ}eÐÅe‚V]8‰3¸ƒ#®@&¦-`jÈ·Ðqk°TŒÒ0VØ‚s?öUâ»Ä|Ùøx÷¢‹j@|,a2s~‡Kìø y‚Æ ÿ’K¢UáðVi¦U ³I•ø–îø³Ôª^P€›à\™U Û8(ÏEUÀºL.0{?jçDw€Âÿ T‘x62°_Æ͈Œ }Xˆ¼íôÌÄv傃I=€¡»¤) õÆÓ¾°U\§ö‚¹‚Ó*ù"M¯êsœH5¢æÛUü'’=V ½¢óOø¢;›¼÷Åþ±LLã’3»1ÐÒÈÒCŸ±Ó¿]v¸kÀÐhw”}Sç'œmü Kõ'&ûƒ¬À|Â)»Ä"{sGgä ú EB’5û|û ŸÉŒï‰jêÞð”:×+‹ŽÓ,g€½‹3Y¦–Ê‘;V0Ÿs8Y"Wj$謱kÑ2{ ‰™ a9±Ao3`·½9È€( ð,Ö»$ÛÔÇ ¼[~âR{o^WQò¡‹Ê‹^wæxðIGÕ¦=Þ„^C›/¶ìⵈ‡ `žñ åM8dÂO®°•†#6îaÏH`ª*÷mØ‚‚4"/YÓª²á˜ïºÄL2FåØÉÉb’rpS¦HÃÁ9Åè‰fG8üPÒFÍ5é üU@¯óäÖpŒ„]-àµuËDŸ$ÖTy³NŠ›);9ugÎzØU‚½Ž\ÿ>¢8] MäÉ¡öò:DÁqŽ‰få šáö â_Dçh‰Ÿá9—ªpB²FOÌšåœAø ç^ô"Z¯•?Ò¥fE…rÙÞ–˜œ .Ørý>>:>9;8yNˆ÷êô ³÷âô°COó•úä†j:°î¨u)W„DÌ¥^:†üú¬\éöc‘GàëÏm?À§’/­0â×9)LY{Ë`ÂHë(¸ú?šXOÔ|+Ù7QÛíçrÛ¤l>AËÐûÀ¹ø±UÄZI;AÓp†sØ­þÿ^?¾®ºÏðñæuu‡Ÿ¤Ø'ˆ øôßüÆÓ„Ú~c_N±z">Û ú"@Ï¿¥¶ð¤wÛå–2-IWcÝgÓy:3î•ÞV‰*Î@ÓŽ§0KZÐôrú8°S:ˆåÄ~ðÖ}í÷GÇ$ÓŸ϶yë`Y‘¦Å#¤× æ`ú°íLVÔ½ÜÉë ÷Îkµ´Ÿ­Ü~xǽvK{ú6zˆ"^³¥ý1·#Â,¯™íH$6tâ¯ôOAÛ.ß/沟ª((ޭ˹ì¼;Us ùƒ*‰wîõ1+=DA†2?éàÂ2öë,n±ðž" üBd'P±±!Ø׉–€RÇ[‘ezÑR +ò­Í¦ú:VÝ»Žû™Ïœ±cdeóëÝve PîÓÐZýÙ †0S~-Jg©Xº¾ÏÎèsAGËMŽ¸ ¸}tÄp¾”YzôÉ,ÎäÙM™ŒÒ%vßàyQºGïwTe°À¼¾H¦ÍöÕœüÌ~èü€‚Z³©h_G ³‡{ÖŽÚ•œ¶6ùûù;Ì€wj…Iäí"u]qí•`W½XêÆÚbïHŠ{L]Í‚ÆÕ‘ÆÇ8pð÷0F3Šž¢‹ÌjÈ,C•l1,Bª{4ø™¼j¨2)¦.èV&Ý„ÅÄŠv¸µ¼Ÿ(fm»ëf„ |…Üߊ¨5 @iµN\†ØìÈ` š†¾ j  ¡-™îHò ¨Œ‘\F)Vk–3P( _àˆˆ¢¿CJ„ݪÕ8Wª•Íê[ÐÔÛ£¾v€tp UÛëÍv­ú¶ìÜmÚ²vmÞØoú1cÿ¶ó:Ð{7Ú½ƒ¹S4£Ì‡¤6cEf[Ë)PR#¿z9áØašQ)£½§¨íV„¥#×A(øþ«Õ–ÝN†ïXx9™AsiÁ`åp×¾‹3¬lÀôrèÑÃ{S´ø Ù!|Ò¢Ö”Óc.Ý míì~Ç. :û0o1§ÒQ›z$Ñ®á¨E^Nh†-¾„¡³¥Ð  åOÖ4À¯ó‹‹ÁôaBi® ÕÖÙ¯u6ô¢%žúAæ˜üÒ~ô(2ŠE¼¨á2#ÒìdȸpúÞ%ÌV‘™ŒÆ#Jo­øÀ¾Îù6G¨šW­Ïãj6Ý<‚ÏÏÞK¬.½8~IßO^íí7e×ü]¦6ÛQ\„h\Á4Çlô M+&d<ç? ©"­WDvtÖcB¡V‡˜F“€ü¨jþX[é Ò¶k{ <ò#j¼E3v'10yÀ3X<÷œx¤%æcV$ëx¿u{(½ðSÓSzW1ÞÝ]šîýSe»s7'~[Ôo5½kÞEw—Õ·À?ÅѪ9i™ša8èåjp>˜ug,‘†EÐï˧Ó,1h¨û®tÆÁ ,ìcÀ,Hka°¹c»DÜ:ŠéÀJô› jf§÷O8ÂY:Ûéž‚ÊG>÷4„wlاÓ]¤ëÁ²Œä}â‚ÙóÝ#eép€DÔÚ:‡ºÞÁîR(,ëàç—'§¤ŒGþÝY—Ñpdƒ) »ª>®%¯å…A|¾û­WQ‘ÕÑ4Š÷ÃÅX†!ÅK+î®(a„õr^<Ë®À•²¡] aŠsåï›ò/eŠ«…â†Ð¹˜¯ èêv’P¾‚Dë<=~ë¼eb0éË?vá<ì±gíÃ}åã‡G$„¿üJ³øþ»TÛ¯vš…ꔌìï0tÄeÚ @™×6ï³Z”ö¢”M‰`½EbùCÒÉ]w?`øeVÓB±IüúÁþÙñÉß”;`!.{®¬xGŸŠ×BÜðûòÜ“yuÔE¬¦)ÎÖa×ËMç`Ûå¦^fÌwl}Æ÷ÛÑW¸›Ž›¢î¤q!yÉ¡ON]8ŽS%,h~j£êE"gÆtµ&ZÎbš­œ¯<}ˆÔOWõB–aÔ舻'4²[öSOg¬åÁ?7ô-ü+L΂Æu²eµ å_è²›•Œ'ä‰Ãì$9AàøŠjà]1² øriM?#¨„ó¥ó:Ìn&1*.Ûbv6;ÙíŠó¾ìÌúðÂjðt<às1@¤Kq>äEap³ºq!¤¼RÆ3xáV²âkgÌäWlR¨ø°s²ì]MÇ7Q—âŠÐOö*¨5ˆ>³ãñ$X¹‹F•ƒÏwé¤IZÊY– Ò Kzh:žm›S é¢ÜcjX°bi¶µ ó_ê¶íôKˆU²ìÓ3.ÒKq@@ô’¨>EÄ%l®òÅN'ü†øÌåxL­©‡çö§(PÍÆ$PCK ˜†·˜ˆý>RL:5ÐxTÀƒ¯ÌË EP eìvæù«6§ù\*^æ°¨›„Šp.Ib d‰5ÍÚm—Öµäû°õ °äNn9³™.;? ûGà s?p;Ü»÷œáF½þaï”’7‹n½ºN šE}ñ ùeöèXÒ¦óÚ%’ÎÉÝl6œY;R•§Ùl„H“™ µZÐÁåà}2ªG:a1šìÎ\˜«]t3aL|´”=¯|ÜléÞ¿¶£‚ËGã„taî>‹ÏQá2ÞªÑfè¦õ"Ð[È÷Ížè§Î²Q©”n¹ìM^,yW„ç©øÙŠÓüˆ²2$Hÿ3Ý¿•OùÌP?Ëï ¼ Ý&í…Äýe=&ŸJ,N¨nêæÐiljá\+'{/ž?76Œ^ÇK‡¨æã#×x|pñOˆÙýß}KÿXÁZJŒ?þ·Ë%²˜ y%¯këîænÈMR’óX¸¿€ãës"㑆‚åQ™Â²Ó¯å”ŸòjÕöfÉ‚§Ùrì NH×鞧t{.á%)bËqK*…~c>áh²© €‰ò›±ò0[tU§ÜBظ‡É˘¨¢ü7³M Ä‹²[*°9Li(m¨˜_ %RHÖ8?I„·¨8’ýÍoi’é]o9M£ƒ&= VOï~Át˜ø¢]kÂÕÜÞ¼«z­úÒŠÚÜÙ—\ß¼?žaœAº[݆Óa¹TJïZífë®uw ¿ IqWà±é¡‡ê » {JÁÑþ¸YoßãǦÙ¹¡S=¶Øà>ŒVå>RøLÇc"´´WèÏ—&לOnÔºŠ9…ïg®`× ;œ¯ÿ]Çá °3˹ÇqÍ¡G-$YÂ?Ðóù:éÂýSéÝô›þa#;2Ý4ÕjTmU£˜‚Éb¿Uþj+~òØ|É&“rƆ*aŒ%ìg’xn2pœNÐË„Ê !K‡ØÕá­é¹,ã0»o”lz‘E¤ïxØà=¸bçq#i¦»ý÷]`÷/‰%C¸c¶¼[-}ž\ußÆó©¯Õjm¸@5šc zDV1ŒOvR]¬4WmGÐÕ X÷(Af¢; ·…tOyWw¢—ǧ‡?£A+™¾§:á …j«Uuú‘[Qýˆ¢ýÛË›Áˆs ‰=Ÿ³”â);gøv™VJŸ¶laëôùäÒzC â— ÎDQÊš1 QmÆ·ràâeïõ>†¹©BYöjϱIQJî“ÀÇÏ/.Í1à–”ãš¯ú'Œ¬C8wEG»fȇ*õ•03°i‘Tä:M)èÞÍOh;á<Ø(y¬Sª†y5'51ú-„Þ¦…MŒˆÖv¼îIöËÐúØ<(¸}ai¶ˆ‹¬&Øv4¤!¶»O×#&HfX¸±³Å³ÎptÄÞDÝ´ÇÕ¦Õ¬ŒwSº¶×*-‘H”w4¾±xå% ,¦¤Ù,  ¨®=*‚@)Úl±}œ»fÃi|îŽ `„ùß u„‡0ÏÍÅ(K#Ÿ)ï-‹ÁÌSx-«ýroQº£”íIÌ…j¹´z4¸¡¹5øö+Ç©¨Ùô»{Ù¥|À\ì°ï«”ÅèÛ¾…¡Ín†(¡¾ ±i5<ÊsbÈ_ˆ¿”=J‘ˆ¸ÿ ²“vƒrçÅ­%;çÍL¼ÿEËbíÂàbj˜‹ ©F1Ð…" 2·K»Ê²lÁ~øBÇŒÂÌ—ZöW0+ý¦H‘øçk ÷G+6¾˜ÀwĬc…Éï¬wÙ&X7W]Ì Dg,8ªMµ Ù\ÒJƒûÂu/9C^aQÉÌçúfGd›Cw,]Ü8YC»e­Ö¶ â©\ø¬==ÙG©÷Ééü³‚דkFòzÊxÕ:lY ­ 4Z³œ3ŸÅÖ½¼ … 2§};ÎI£°/‹ûÝ*î÷ÓÇ,îWQ†nPº¤ºjš hñü ov©}a²’ðíÊ1 `cšI–ÜçNØ%õ•bxù”NÆÄìÁNÂ@HÜ‚nX‚¾ë4to瀶.˜ËFîdlÊC†D8+ÐÅ úŽQÜ‹À+^yK¤À<&(ͳ<Т3áÝ1ƒÕ@íÁÓ»Mj ¼SVx—.ƒ€nJÖ¢)Ë=G‘S.%$œò¦_­ ¹f«x–õ‘Ùö\Üñz 7ÄÛ­ÏŸf3PVaúÝM{\FÅg’ø1ÅœÕÇ“G uz&!ûÉ,^BË–p¬Ö‚Áì>ÄYÃrî>neزܫN¹²L_ž–¡ì•ö8TÒŒ×;cv]”AQµYå¸Iïþl,b9ÖD¨­°CŸºG7ÁÄây†ª€€e9— ömKŒRƒ©\%³A‚”9/|©¥Æ°'[üB">M2Þ•”´iœf…³µ¨8¼N˜½œÂu›žú‚óé`ÊtnœÑð£AA·ó÷ôO5 (^ä!9Žõk ?ñ²&«lèÅ<ÙâÉî6tß;.£­ÊšÃíäE°¼n·Ûo±^&M“²:2e…—”ûUÊÆŸ q’æÆo oÁ°W˜D– æÌÅ@Ñ3ZÊЙÅßE1ÙæÝ)Å+…›,붨WkÕ2Nn3wGÖ¢'¾“µ:‰šB›Â”Üxk»·N'~qžºMÊv«DÙœÆe—Ì9bM§Ás4/¹9a)ùʉTÞ.À!Ú|Îa¦ï°‰©Oâô˜’±(UéŒÒ!\Ü¢ºM=ˇ·Mm_·ÿ_{­ýKûíöz»ÖþؾoßµwÚßµ¿oÿ¹]mGíÒ›» øÏ׸èDlg¶¬¯ÀÕù„]à9Êõ\ZŠßDk›?—]ÎE`)d<׉ÿÉ¿U“úx;,q‹(¸Sr®”.¥gÃK •å©áó§VH‰3$R $‘G ÑD7˜Nõ‰%£JÌO)g^š+Ã%œšÉh–VZT2TÄ#_€t„„ƒ­Éy´c!iø|Âð dᓉ‚šiO2ÏÅ'ÃÑñ÷î©°<ãË“ G9}õÿYÅ=ZN «qåsÜé‚ÔìM»CúHTs展ȓe»¸F›-ù=0šPÎðsJy9•Ê6ç¬Åš:òL䃀UL(.p‰¹‘ñLj×Ý[Ó«±ßaPŒ¶&GéÎŒ¿7§Àfµæ'ù[ˆ/ð^‹&}ÌæûÇæVsó[ë6ÚG•äÏ*¿wKia¹ÙUÄ û»$Ñ¡NrÒð2²vS a[˪ÍWˆfß<á/€-xù1÷ù’¤û‡÷5q9Î×+’iÑ–%CM ŠÎ oç7žÏfúè—Êæ£G±ü‚e *[í }”bܸ˜ãPHÕíêýz(&×ë¾›SÅ·TÒØ1ˆo J¹&9ZÜ!¸š ¤-³ ÄÆÇM ƒÅ=­st‹y]Û¡_tÅq˜‰í>e¤Ná1翱¯;W]Áz¼²lò0½‡h¦ÀùllóÍH]Ëô°MO‹1ÐIº·Ú–Ì.GNû±Sæ2þçaîlÚ¡´öž¡îŒØ_ªÅ!%ŽB‹ŸL iq“ÜI€À´ȉPŒyÅ¥|HDõÏ,/!h+õ:( wã·½Æ>nü{G «R¥qG©vªÍèé|Šf;”R0ßóä’b(Øa¥?¸ÄÀ†.6æ|kä‹ÃéùoLÀiçµ²,ðfôËm¼þÊNÑäš2KÍ“à2ª¦­_ÚëÔ[»Öê´7[Uyüú§ßV§uYUW¹µ6¢âÁäìDE ~$ËøBmßjö`Ø*í mÀı Dõùb;°¶úÃK0…fu•™ŒÜ+†‡/^Šæ_*šýË„š@Q™È’PQîþÞÙÁ³ã“¿¯ƒÏAô7¡d÷ÔÈÔ¼ a™x Ü,ï:½ºI\é耩ÞР}˜Î¸•Y”¤ü’tæB‚RM˜\;'—|ÙÓÏd3I>牓͵NóøÊ‚8ªä4ŠÝ4\H,róoQ-Þ‘u6Œ€zìH‡·r’:ñ2‘&zÎYãM/—pvN74ÏŠ›ßºbQt<¥³ýíàdÿÚZ°\ÅöQãoUÝØËdÄ•òÜØGrDTé'ï1ƒzÊ’-n‹Ö¢„‘ÓA:Q²©¤%'»3ò4E×ý4Úlþ1úÿn>–J\úüÛæ·]zõmcòMW4H’§Šr³R~ª^·„Ä䜥IÅCÌk¢³B/\ìšdåþÎVTP®æcrcgpv'ML\ëe·¿>m?zaaÜ”_†˜®“2Ó…bºW®Ô]Û‘ t,’E +eœ•ùÒÝ*< ðrSÑ ~ÞÚ­l_uÔÿ ×ÚÑDD#Q>=ã-%ö´ÝÍ÷ŠÉæ®æDÀÁàìÍ12£5.*½Ü&[n«­‚V6R&®L2)¤äûÍÈ&€òMÂT¢Øv°UÐÁV¤¾.K:Ø䬩َL ,jÓ¸œq«lÅcóh~L=½sîŒì,¸WéóÓû÷AF6Só¡ðÿCà2{x‡L®Š:NŒ¥§ÓÁìÚ#ØJ&À6Ï0ʯ1ò²wÛµ 'Eð,œj ß.™ç °Ì•u 䕦|*ºK·Yûш‰,Ð6óÄR¦‹ŠÀ58û‰CÛRJäØ·£õn¿ß¸ÂbUªîÖ@xzFU,0Ó€[øzRÃ,|æ·†¤ÌÛŽâÍÇ-EhÀî£íÛÆ£Ç[×øW¿ ý¸ƒgû±ßýø,:‘·£>¬à«Hj×j­“®!pÂÿsl ÒI¹Yög°õxs«±ù¸±µÙÜÜ”Á©F›Iô]&Ãùå%g6期èBÄ »vµÄH ¸Ì¸‚ñ3Ô™ý­ý­;¿¼ê‚< cQªýñäv:¸¼šEëû5zÚ€¿¾‰ž¢ØéøbvƒÔê)º2u¹üÙá¨gìÒÈ–§˜4ܹC„Z.>‚ÓêÁ’xUâ*YôfïöÇ\Úe 4üv‡kvÄL_>?8ÙÿqïÅÙÞ‡G‡gÇûáéáÙ‹ƒÓÓèéñ ÀååÞÉÙáþ«£½“èå«“—ǧM“w]¹µpŽÛ¦Ü5Ü™ó9G>}nÁ€ˆpKq,[ª&"7šj𳯢g| G/Ñ¥Á…7JéΛàØI¼Žƒ3ã¤bÊ7:„ô‡e[°Þ,WŽ›Ê®×8›tôËÜ…Ûõ>ð +QêUO9fÏÉB¯Æ ŸÏ~<~uí½ø{ôÓÞÉ ìÀßwL°íö¤™`uó¸ÚΧìV0J¤”ÚÐ^ÐæPj^$‚)-ùï°™r¿“Û!Vü B¥Kˆ·|Ç0Òo8Ö ^‘6Id7«Zw5›M¶[­›››æåhÞO/[Cî#m}O“y9¤È“©œúü’x,–ƒbÚD4óÀá_Âyü‹tÒt‹˜ÒÖ˜8Í+/àÖ ØÌ}¡•¸ÐG“˜LæÆ&g•BZ,åF?M9“'»ïJ5IðI$K‹ xÅ )V…k†"|Çc.²óTÊÂrÐ æÁ—1ñ»k¢2ä-Œ‚®æI^ûJ©&þÖ4~F-t¾iÍÆ-dÂ`•Íâ²Þ“BjåÖÍæc›“Y¡c=¦×T‹„J“þüúúV­ÊÒÖš“YZ y4›XÑ×ïT‚$a’ò¼I]­”[m4d6U¥ÜRдnë‹pà1WõÃëF·Â!Ï8ì€r;ï˜Ò¢eD va²·¾&ɱéE¼K9R)ͦï-)®ÚM­6®¤xZ£eÏ«9“§ (v§9¡W9š©†ŒèJXU‘RNédiKWÆ‘Â(ÝP*D& áÌ9ÿÜ*@àUœqÎ[ªOe³]§cSåVFl}Õ«ŠA>pã‘)ÓkklbÉ+’‘õÆÓéó¬ˆÀEò¤b52?ju¨hqª¦Ö¥§2®_¨H¤òMñv±…ÌŒ2Iõ6à€¾Aå*9i± 6à[v ©= c6uybUzú‘Ñ ÊÖØôHÀ˜ ÿZð‹¤PS¥É¦Õ}· ™©Ïì´• éÞÁ¥6ªG[nÚUó¥îÊë8û¼¡K2µ…ÈzóÈ/ì"عq¤nn"…üªÉn}Øn¦¨ àä;NÙ¯ir1Ô ŒRa8•bb|¦ }äf`-l`Sk;ÎIE¸;c:¬–2¥Ðm•^=æŒ|ÐÅ`¢8Õ¤å#$×ç˜ÚÓasòƒ ä2®PæpbåGüÁè@S[aÍÞ!5„nØ ƒ¯(ë|Ñp¼/¤õ<¬'SäQf\[Ž ´èTr¦æ¬)@ò8ùÈ4˸ݪ­“úúøåÙáñ‹7@Ù«ÄØ_!µ@ظz\¸ &dKõ Cb‰ªú¾lÆsN¥*5aÎ ;̽¹HAJSÙPÏ™‡j=¬ÐžÊJLRËØê 3¢Þˆ¤ ¥ ^!nøIã§:|¢5wUï牋öp>Ž&0¥,Û¸.“Ѿ†go¨û÷ؽŽ‰ ÁèÜ›%5v Ê/K U¬d¬°Xޖꘇ¦ê ‡¢Ó?üaJ[ ˆKl ·µæû˜1›ã”j江ƪïj)Ê8H¶{SþÉ×_ˆ‚PbKÍ$U3Í*“íÎ4í¸|¦É˜LØÅ……´'b`>°eG§ küØÚãÔûL ?º`"8¢¼Ã9Q¹q.Ñi–9[`7>CUmÛ䵉”èNßÙË& [XzÓ¥ä?¢RÀ\›«á\^µËfhÖë½A)Jš~¢ œf("-ßÍDëÐu‡ À! —Hö(ÍC—Œ ¶x)Vã–êš4Š/Cʬ`ÊE²è'Rñ Ø-d,ÞYìož$½aWKhšO˜ðâH¬Há»YC¼Øó±ß§±œ4Š²ÔÌb±‹¶¸OjëÎÕEAe“[I#;ÒÇÇíà¯+z| K]: WIÖL_Šµƒ™º×cEÓ tYcê"ºÏ“³ÓûQ¬«ˆ¹ú—¬ ¸ô¥È,j±µ€góˆ—ˆM Ö‹¯F>ƒÊÍ Bî&œtß½ZŒŠÃª¼‰i>kŸ¼d=vW ‹¨gÃ-ËŠ‘4n3¤‰Ý´ÓY\jÆ.Ë-2·©Ì ¿0úé]T­lUïî°ºƒ»øùH c—þzïäÙ›UÒn˲á¬!Âøƒ.ƒh½›òÝâ¬+Ù’äE‹’¾á ”‚Ž ý’ìDVI)…郜d‰l%eLQ/5þ,=¥êºp‰£1æ·§"±)Fiã׳魘1{”‹%Ÿa#µgDA]„“³1€ì?ùœ¨8hÀHçdTtP:Ïhš86ºâIï¸VEIeÈdŸsê'Ž…‡qRÛUQ1Qµ ¼Ø%Õ”4P¾6Šê—Ÿ‰u¢´p3%̓røT„U+É6ÝèäÄ–ôQÝû¡|}‰ÿe¼:¸V ³z奻ïGxå7Ýç³rÙûra ¿QÚ ¨ »–o9š‹ÃdýÚÊòqèyî¬&ó)uëSá#I¥¯ÛkTn]i%Ûˆ Ñsá m¿ÏôùHóö~`Ìêw8`Òïè<Çß «uIoß÷4Nxç#¤Q€9bMË U½]t}kÔcÉMÏ?ÚzΑ]³O×¢ƒ3 47eÙXb5%#Lk_Œ©ø\¶6k¤ÈÚ§X¹c™´™Õvµ:ßa$»C#Íò÷Uwv‹QÔ4 V¿ ¢®±ëØšå‚”ðtÌ {œ :/SÞ?ìâ €y³…IH€œþ5šŒŠŒ,ø̃š~¦Iøõêí0߬òPˆ˜ª§a´Äó¤%–ø„˜~¸Œ¹_W˲Jï¶Î&Š•8(2Ê$"®¬‘ ÷1‘T§` ,Ä)á¼`§´ñ„rÊx^‘îiéøzÇè œ_:@ƺà`“|—º;Å‹èö—ëh%làg…Ä)RW3ZgsÔáø^Ï1SP*«‘Þ'Íøsˆ£³Ä/aéÌrfšîßÇó*›$cTºÆk#•täß$¡ž ø¤i××°1…D› Y.(6ŽD]ä$•Ò…êÈëª×EÇXÚ`â[ì ¡Ž€,i£3ú€ CÇ_&U rJ<1 ¸T4zýáf+ãÜt¬¯˜àý é¢üºÁªÙë/ì»]—½q«¼+Ïç­êŸ+›oLBprná¯ëó*Ó{§2xã#ä½ÓLv +Ìx°ÉŒÎ%¬àµMùD¹ É{Íò¹!UìA÷nv¼òà®ÜëíÛJ¯à'•œ4™'PÌ%W_£84ÖJ²é9– b2'GLõŒpOt˾Ô+ MšRºüùå•+!— ¢ÍØÚßõ»Rp 3Ž]ÙèJÊæ†ñdÌÅÜ°2;jv~Ä L¬…p¼f ;>ñŽÑÕŸvBàD‹nFUV^¡òjJf"³{·ÀÁW'±™¦¬‡vn›Ý‹®zeüewË9²ÜÂ#ÿ…08ËŠ/BcŸ²¬¦¸û©tzÎ(š³ Þ8圡SÉ<"³[6YBU•Œž')×¢È`5—1É&Ô/2ò:ð5Gg9¯ÁJårKlˆñeBrÖxŠ^·b’e€iÂY8»béâ¦uñ‘ćN€%”©¬OKÎiœ3týÛ\`ùÎ!ªÄž‡ ,;J©Ò%}Š>œóÌØÆéô¹4°¬×+ª {€ñOì9iC›XXÉ$pÂÔE^‰|[Þ]ãòÕyv«”®ïCµÀJç‹ùϵϨºbÆß:(ZÈò;óíðÎýÍþR+/q¬ù‘ªŠœB‘PR*åÍÇ™Œ™ÉOESÐ Û…íRæúz@.% ÐwaÖ,÷Ï‚°ŒhŒÊEâ“Ña–‹e¸5'á;bówjÏQ–Gèˆ\St•W³> á»çì~áb€h/ZHöÉØ'xó°±GnŸì7âÃT­yè¬Hý{‚Ä›e¨úþÄI×–!«]o—ëÜbâa϶S8æÓtR!å‡UH—0:w÷5ñÙvÇ5ž5³~õCp[µÿ|׸ª¹Pb}§×Jì^áqR%GÓS¡„$p§‘¿‚a"Ð- -=T!„^à jÛåR£±±k/ŽÂ¸o`â…Si%-Ö^¥ñ ÎûhŠ­FÀ—îQ>På›ïO…˜»D ÷™¸áS¨|û<4^QEé ê`*ü÷þûð¯²Æ?fF-̇éTO‰™Ñ¸ylð6×¼_lPâjÚP³¤¬JtAÍO£–[ære‘eÖ¹µUËʦr§‚='Òîå Ê8ŒN®*Vgì»Ä0( ƒfrôñÌÏW^…s+çÏx¼üDœp]Ÿ, ?QúrŠÛÄTÍ e抧<”Ù‹?—Œ‹íÌÜ3Â6•‹“<àÚè£rÒÞ4¹Iú³[A‰’™ýªµŸ‰jʬER{¾ï–ø|ÁÑCo{ãÙRèëµÈÇ‹âc‚ž¸ÀÍù­ÖPÙ:1(„báÂ)ï9šÇÒÞ`Ð8çÜlRæ2,]LtcI$ú'.vê¸ã)`÷F f5éýb×™¶q—iÇ1Eªl‹:=nÇÍ*¶wmä”Gt¿ k$c.˜2YçMâÆ,yñb-Ÿ¦f‚rPÕ;ãËéy~ì•:t¤FØé%IË>q³9{Ü"ëONÏ|vµ¡3‹•ªV?ç¬!2råM»PR8¬âîò—E ssø‡,&äñ‘ßsò£FÏ“tOjF‹‹Tu·JùÕšåÿÖ5¢ËÖkc0»£^šà÷¡¸q×9`„60º@ï¬i`Õáš¾nÎ7wßœ\eY4‰ò·kŽò£G»÷…¦Ühmc÷Þ…iü¡HÄØÅw›._¨º˜L¿^æµ r.º¡å9;~y¶B:™à¨ûìxÜ=ß„agÞ=ñ2yÇ~käÔ”kþ / µÕÑȃŸ?ÿù~Q3&ÆRæýï^>o­´ˆ[€¨ùgÆRæ»æB 7[$§»?LíE7sšZÎm°ÊçÓÙ ô®†ÁÑ]åã˽g' ôì½çØ rBœ/bHüqò탖ê®ÐøT|6 /ù{Êø5ÂR⿬Y3®õ‹ m}tDû;“[iå¾\º*—¼Æ¿V£ï0M†„yæð¯ÞÒp†~J°”ƒó¨úÀÕE¿(`˜KÞàDÅ |Ž}èµ~Y[kýj·¾_k}u]ŽÍ£mò7 ÚÍÖW.T_8?§wíìEtçÖr‰¼ï­fÛfá†ò¶ê-7è¸}ôñ÷[ž`9y*ë°–víuô¸ñïõÆ›×ü ×ëfãßßHº¹ví®½µ·Ü'9S §·d>ù]8ëÉ š#âüùn6”‚(aÊ“ê:&f¢ìÀ$7¿m›ÿ§jÀBé¡'%Ý)œ[‚IS ¡R?Ê®70' k¦ŒÃ)œ!m:ŽÄEW²‡›´œÔlQ*Nãµ¼&°;|zº[¿è1ý2ºÑ¹+ÑÒ‹c´§¼ÎôZµ¢©’„ÊG¼_o³» þ|¿M]ã0±_‘/§ïœzK’ê–xÑ„”[TW¿Q» ‘—åÁÊ˜f7bi¾º‚m¼²ì"¼ØtIð€Fü(¾ÞÌ)ìùñ ñèϧ§x>YÇ’…¡ÉÑëçÇO¢P}@ r&Nø80 4=ŠŒ4é}Ús£æ-+ˆ5^1âx„ÎüZ£Þù£y$¾­Í{ØÇä–Âê˜ &َλ)åár×P=ÌáÙÙEPÛÎ0•Üx"™Ô`ƒrž „Á¯óœf¼?QЮýDC£ýù@8I9ža¦q"ðx8À³gBG½[ ¸k§ ¿~h÷³0(Â|>ë^îží=s÷W[°é±×½Œà›‚Øn7ì: ðu¦Àáiâ{Vô½$ô{Aìú§„©›Øqý·èïE×I‰ ›ÄOŽµ{ü~×òö[üúI´~9šÿX¸ì:ðcgØ7Vy¡{¦½x_]öŽ×»D¿|»^Ù{uvü|ﯮK‹«´æXèÍ_ߺ}àUô±üâéò>Ê'NŽ4Ø­ïà‡†ÌW£}ß,;«€MA+é òR±i~¿–´Ç”lšñuXØ£M˜×Ñe2Ãöð}lßáxkÿðûgEÖ›2"¥d¬vÚËñªÍá¸Ê r?h~àEfÔ^ò2axSGiGÇßM[í6|ß®´šlðaÖ*·†òBáÛá¸Uþ¤š/´LGS—-ã}×,Hl=”ÍGðæ^'áÄ\Ãylæûri= ~Ø àþðlŸ4N_ìÐûEšf) /{~n7dLô¬ÚìU£uÌ•¤Ðõ`·J7Oð«l‘Gž²HûÔÙÆ=tù@-lŠyŠ¢(w¿2pÎIfË­qÌJв;µÅÎ骚޵›¯i¾Ù¨ÜÁBîŒf54qû,ãj™ç¿ ÑÛ«: 8¶À î`äJjá98Údßjw‰%š*ª¼ÜÛÿëÞ³`¹{sc(Èmc?JÉsü pyOçÈ |–­Š$¸rW׭Ĉ“.©Óœd´N·vÅÓ¤C5!z»Õ_Ö@Ô]‹~8xvøÏÓÙññQU[¿á´9xñĶ(›@J¿çM«iU”ñf½U±ãEx‘>kõwè)õ¯ÏêíJ?ÎÓ«qafÊ3 HM6F\Óè[à7Â,Ô·Àφã([T}{“C±ˆ'³Ma@yëÎ\ šLâͳõÞò5ƒŒ’"Á†&Øn#èZ—Zr[ ·Ø´3›Ì*#äq¶™Õñ‹ëBÜGÈþ›ú9¦ˆë);Žá_EÃn3MskÅ4—tÒùódNÏ\oõIä6ך£9;ÃÃtDæ]štéoÉ‹îQ˜˜´G;ùB !âlÀÈ’˜`Ü:ppÉ,kÃ-×N`ÈÝ'¬ÅÜæÍØ­þ èí˜P#LĬ M»ƒkÑ3¿rk†Ÿ1\%¤q(8 ±O>â,ùXø!¤PÝÞ ¾v¨{[%¯3~Óar,0e¿jtöÿÙmü†f…ÖÇ6›FFKQ ð°;ÙE±Ð$ªc»•8Å¢÷ˆ£}ì­.IÞ€² fÕÔD~¡¯fL¤¼5\]dåëîôs…+‹¢ý}“ÇYÖzvrðŽ˜…dì«Èaæ·¾ÿæVQ"„@ÌÚÇœõã{ØT­~•!Ì€»?$šÃQ–>o £òç&[%ÆIk8¥„·ã‘“Mˆ2JÊçd h£ ¡5«º–ž–²ÔÈmyO¸}”p0Ì»:FѾØÊ‘LÒml(è˜ :¿Õ»ÃT,5È\oéS®dåôà×À6®wÖàr4žrÚDŽá^ëœTýIÈ“ÖÃàH¹ÅÞi#ÒgsnBzlæM¯¿üëMÇR ME7ÉMiôHXƒ–bWY„·ŠåB²²É)Ü;… 3Ô?½3ú ¯š}è]öã¿œœ¿ð¾Q»iA) ò[ØÜ «Eß}×9:ë?-¡|/6R^”2®&†gÔéÕ¥¸Jâvc &ÀÆ:|qx†GWWd2U07Ý.œ$¶ÓD•T=*žÖ„M$£ ï$w–™˜Û™ä>4¨{ÙEO…@A‰PÙ¾¼Ýý¯‡˜9»è¾8àô¬D™#Uw»ø®TÛ© ? ªÅ3u{…YeV¹"Ìm…yÇ ùùáéó½³ý•dÚ©œðÃÓ!HLÔCsT:;öFfÞ UÌ*4w¢nuiø>_¼Aô~8ž$£]û;×h ZQÎVÿ©sÍoj¶êôç“š­‚ÖdŽ’gônaŒyŸù¹L|;Y1¯8 øTõÇãq“›3ÏÕM Rê«œ§¿"+ÇþÁ57ØzÇ‹9&K›EÂ(¿@ (uïø_þ‡þÆ¿à¿»ÞÒQÄ^²x1‘Üñ¿üýÁwɲqÔȲx6 ÜÑ?ô7þÿÝ],ë_L/‹»ûÅÿËÿÐßøüw7X6ŒJƒªô;ø þ»[ºÏd¶YÜŸ1ÐÜéOúƒüËÿÐßøüw7_6®µú,Ù{Gdxé%ÿ3™ƒ™24WŒæÊ#(«Ås-K]—׳G.?%í†C3ÇïÑ_DS\Y0l¦èÏ-0òÇ\Æ¥qfêªA0—)G’å%È›ŒÓ”¼‚…Ȭqq7A\×â4Ÿ˜ü}$îè'úaTíÒõâ€u?’/ /&Y„~;¾?îäß%sà»&fÇ$þíëŠý¹|¿(ÃÀ¢Îpö/ŠÅËÞ^ÛA‡ª9«9:U¦-‰ÖrRY,"”A'n<¸soç4Co„šß¬ºé›jðΡö¥³\8 Aã‚\®A)?¥)jØ™Æn.ʲ »ÜÄzSÊM¦t›n†ðCxklòæ²O\4zN L•ýº©QÏ-øVó *"/šjIÌtdyQhµ°éâ=Z–ÞaA愇¾ÑؤÑÄŸ‰õ[|þ\îp… %>ÃÅË!ù¥2Óxy9þ©_ªÅË&èú'föyåMÞþ×ZÀ¬{Y‹~zˆ.t Èá ‹X˜p'TÛÇ_êît“Ÿ¬~<½4)¿ßΕ֢=›Ll, Ï{——ÊlÛÉ·P*-βPò²,¦Yø=ó,䲬ŸÌšûŒonße;ÿô, _>QCáœëíKþ¨Ó—<%€ªoG!žlOg+*ˆÎ[5AkIÕŸÙ¦pØ&{¤‘"bsY€ÞÒAì”0 ƒ«cuêÝ^Þ FÑ]´q @º¡Ÿ&7ßlѽä²×sL6kbÓ â #òß`Mý^¼œ‘1jQ*0#ü¥ì±äêNÜQµ×Ÿ%}á„ËÞÁ™Äj}Tr™ìbãXEYYêG“„ïÔC*Úùm70ϘáFТù«s¶cœ×Üs‘ó\GbŠzGìåËN´x>Þ `GØø¾¡±Í4ø¤;$ˆÒ9¬ÑKZ8ëwÒ«iòa¶ÛŽ+ü"^Úv>>QgÖõ°Æ$åXU§¼¤Èjì‰Ø ¬#&3 7Š 4´W‚ˆòû¡ÄåyM6œßL6œ¨*c;¹½ÔµˆòCD›ßÿa«ì²¾A6ˆPS <:Ü—‰Iàáúu  «™Ü“„ N±KcË §:U‘«Y}aµ* ËUÚÌG¢ã5¢YåvA,N¡ò€;"C^‹F ‹â%W˜p5 IwŠyµUˆV5˜!å1.¡å5©¾LµÉ€­è½Ãœ×ÅYT˜5Î#!;ðç9êúi/ÖrÚ”¯»—ƒÞnõÑ£GÏ÷žîoxPå—À}§ÁÁÏ~£rÆSŽ•±åÂл¼ÇܸöPÂAw¸K…¸Åbü2(A ™—IßÄžû]Mp¬G²Ðd0£Š¾\Í)â–¤2õÕøc2C¢ë@CÝÒIJ¢…‡ÉŌⲛ"_gZGÒ#ù³ÌÉmURª$-Yr´´"WöÅK"ùæ®W»á„HÇN”há"ëÒ¶pm–_© “ºæ–žw&Zñöl:‡á/.¢§‡G¦H2é«Ía·êzâ³C§8rJ±X©°¬ HÕ®D ¹<ÍŽ©¡}Õö±hÊpž^aP/¾Å’á¬×3¸Æ;8™jî)±ac˜è^°oåþàyž%Ñ·¿ò‹l Êò >¿¬I…kñüjn¨ ,Ž¾|¿ øæ#Ì=ÿûAQó"¤ÆþÏ ¤0&ÓEÞ©8ü‡C“L‰µf_Pª!/5Ãë\½#"R¼&éÜ ?ÙŽ11²ÖÙ±½ Â%t ØG“o|:¸à­¢‘c*8²‡@ÁÖ_']ô~¨“ t«Uv§‚0J.©8uÄ”)º!Óæ9E™’c'æ›î-zk§ï(CXÇsJPQISÌæ„híŽÆ‡kQH~ŸšßñGüî£ïð‘:îúœ;ë`~öh3ÚŠ¾‰¾-—úcN‰im,ê\²¼«ûyØR©½Ö¶hØo øDÙŠ=ªÐ—Jìé‹ó`ÁÕÀã¡vèU¦°ä ‚妀E=ñ花 ›¨p8‘$ãÐ ô@2ñiˆev ¢Ãÿ›Nª6ŒàŸÐëjh>,¡ªì˜~¨üXÞÎÚøŒªN€¶0€µ¤&†TÞßCé•ô™»?ïx‡ý—ŸŽâ#aèG^Ü-¤qPDU6’mà4F@pe¡è@$º¥nÈýãçÏ÷^<9m2oŠ¢Wgÿù„屬3§Füß|b£*°½iŒA„x4°D^ê'ep¸WÃóÂ7_•³ó.´×¢ò§3¸H)—Âå.¨þ¿ªqìǬ•¨Ù s'¤Í· '²¶ PÃ?íØk(x¹†®Æ7ñÕ$O\ù¸ÕؾÏK¤`¾wsãÙ˜X ÓçßGëRVØv’gtˆ±ÚÀ[ á¸û…P3æ¶g¶êÚXÔ"’S£¨ 3œqYu:(`ççãÙ?ÁMÁˆ|3²mÃqÜM_R]â+` ÔWô\NÈ…ÄÆ®S«ÓÄØ»)­oÕ¾Š¢½a:®›zçXe†sX ÊžiÖ 5œÑ8· \Œ‹ëƒ:G‹ôgíöF­Ôä£d.‘>i¶œg¡‡,ò¢CØÊô6Ža‚/÷Î~¤¢µ“!¦ÜÊXŽ[·‹‡oÙu ˜Fþ¾S*â)iD‘7Ä€è‚T^Ï\–¼à;Vg24cØìŠ&/$ò»U$ôñ¢B_4‘áLUr zÙèþæ"Ûä@‹¼äžjvDጾŒ¼'Dáå®Èiøs‡’™™’Âþ<úÂÿšÕm+ªýyc;vžÇùÐõš0œ7=hæÍhöde8¬fŠáΈ“ ˆ+.Aôày2]ÀmƒV¦îô’Ê¥Rá˜î%M_ëI±Šxù’îÝûïáz Ï»¯0!ÁM7Eí5ÈÿÀ@Dï]Ž€ “\l®’.´–Šè71uÑ5U]¤šÅØ„WKdKô!J‚Ò’•ÝcÅ¡UBÓ¸ƒ&Û!X±ÁUãLê„éuT½ìõ¨êy9L!1ò«øMêHkè^®îûžNuŸõy}ÍIà”’UTö÷éz+¹Õ;¸µýG^êÕÖ·µ- EòaÒÅ »omÚòHÛߎ¿¨±4yë¹-ýÅZ6Ö¢†ÝÑ»TwG·™[W0{bS.k…/N¹hºÒ¸R°¿%£÷ƒéxDúTÃRp™0UÀS.îéÜ”ä‰qâQŒWCl¢ÕèJíÛàQÛíCoÛ*Üm‡£°­ûÆ)ZmÀ&ú<ª‘FΈÞjmaæ³×ÅcGGi ™é„«±±ˆ5/otÍñEÃaÓvH-ða—¬Œin¤Ðò`¯ß*A°‹«²DKB„DG@l—WƒYí–Ì Zù­Š¡™K‚˸Ùóµ™¹¾•šÎ,?c»Ï\ Ža"»Ÿ$§ð$Šï³5ÑmIô¦ö°Ê9.™c\Zå—~ˆ­’'†CLUŠJŸbJ¿Û±ð?[r8„è’Ú/I ȉ×$J8sµ5mkðåJ ¿ÀcwÓÍÌ—&tò7}Ân$¶^•£#½—(ňù1Ñ|é Oü€n²4ÑÚ‚p×çM?FÒwtŸC³&'sLYO±…$Lä\¿ø­s›„BsJDPò‚£‚Û«äÕ›´^ê uˆÍ7^t%[ïPöÆk–øº*Ͳ—×J³V²õw(áTÌ!i`Ã!|³~äa’ÑaREc+U7'ïä´Å“AGú3|¼ï¤ÿq²±RhÄšáør{tŸOÓ0%æ-¼PFï¡1ÞÒöЮV¶ÚÕ0¢Úi`Jh©¥ö!qÜܼ“¡¾)Jšd«8Ï®OU>ºÀ¸?‹¾ûLkQÅ}5òw®XZ*/OŽŸì=ç¬;ªí®ÙÈ/¬Iü’cŸG/ŽÏ€ã”œTÖ~… 5 òFˆg×öÑ;5PˆÉ¥‰XùqMxÒ—‡û2»fqÞ­Ø­¿@OûU~íd?dÀ–Ë66ªòüo¨ìðA‡ú÷‰¾9·âCÿ¨Z‚‚×÷à¦&a®hâúñàèåÁIôôÕ‹}L~x­}Ê(N 5M:¸ tÙ¸sóÍæ))gj‹˜‚ t†éÌs/–f3?ãÉ(ŽÛº1|ÀSMN8ìò“F¤œ©‹šƒ2Ç¥˜äˆ™œÃÒ6£“dH‰ÇF¤ü…)£–hx뺗àì=>Ø°ou+*c#J ©™ÓÖˆ¡©V)>ðìÇ&á,@¯6Y‰]4z²èÒgìX‚3fˆ&)GXÌNáÇYxF9†[Ò4E(ï‘j‹/LÖC@–YÒëZy…}Šè i+O‹I§'Ñmº´k-z…~ ³9ºc oëÞ®‰o¦ "<‹¿%Ó±¬ª7î'”õ&‘ÞP|†þz cæÝ…?ž‘Eu:ëÃmÔј™B ôŠ¬‹l,}¥k*z¹96!±‚XR’"Ðí€rÔ f4`sëßh7È€/m˜ ân³Á¹xx*§¸f¬¼AZF»P,ÇÌ}ð¼#8x£¹#Í7¼ÞÐé÷éYqî¸x®°ƒ³ëÉî[³›Œaýmbþç„Œ_ÙØî÷j#ùÚêøe-­8Œ“ƒ[]8ÛÀ¨;xŸtÐÅ"vÑCæ6~^¢«OËZa‰9ÂD$ýí¾/çS[ÜP[Ú°• ­h™>ŸÐZ2K$÷ó­KfqvDh¡ÉØ• 3Úd”е¸+u”rÄ0GptH5µ I3Ç£ 'úLÔz0úfëa„:Ü3£)Eš'-Éÿ‹ù[cǨѕAšœ'R´ô©yvÈ°1vLÔ²ÌdÏéÒ©.ú[ÉPIÄ¢Y^ÁrÉþZ4_@­‰ûæN ´©Ä›k0ͽ9 à´»ðÞ~+“|ÛزVä"ßØÅý®|ÜséNv¬8Ïeteb²0ÃÆÊðÌfßX}+VŸkQú ×Ï{åq£xçPÊæ|+£ÙáÅ„9œ’C˜o9£8feWÿŸÄÞ’Æ@µ°ÄwHc%j¨µ?:ëìÿýÓ3Í3a\Ñ5Ïîúf- ÓÄR쳑Â6R$WØa7Caw®oa ÛÉóÓ¿Ÿú,õ¾%ñë߸ãñ‹ft8bµΆòiAŸuñFeîB&dY]t\ÄF¸tK×£ ús¾@ÿXŠl¢ ]X.™R;¡Sæ`‹½tx²V$©Ä0#˜8ç“HIÞñɽ`<iGrÌ>þ ‡¨ålp‡¶-êf—²¯ÍÇ¡\‹¬»FÖK¹œ¦†  =ô® –4±¸™ àL[G!FŒóI2Öý (6¶uòö+ ` ç8´€Ç¼NoSŸ½Ü—Ë<‹UȘСsÎX ÔF‚êìœÊ6äÅ£ú¦ä¹p&Ý›w论MŽ,|Ó¤%6K9õ\O«La÷í:uÓjõ$ë!J>Azæ²+CTÓÖëèÍF¥Õª.)ü)˜Gv‹èÖcÙ€¿‰mYéùz×Ù.ÃB+ý!½¶§†àlÝkº‡Ìtnp¬Yu鯳(_9ŠÕƒÑ¨*†*Q šN‚]óÄfTœf³l±³¶ÅTž­Ø/734@ŽÐ>y#!²^‚tñ¹º¨)× è³çt¦ÖjQÏ8§sZøk Lˆ|Òw3Ýs}yqÒÿÀµè©øò;’x´Xub¹”"|Èâ Q†çÓ“ãç$§/£³có£y®\²ï¡”ü?—¤ó‡¢^Ы¡S— Ýô"‘ÀLGˆ“i‚wãp|"œ å÷m€pß<á(È ‘NDòUðí›ß ßœ¼f]TªÎI-5#,c«7ˆI3 ¡£WfuÀMÄÐ~:~ŸôcôÕJ“| £ºšþ½J5¿¢Š›[¾2œÏ’“I%õt7Nï*›w•­;ã…áá€wà }þ&_³S4Dn'o„Ê7yÊœ¢Wpá²Íè*Ðyà{q§#úaoÿ¯øïÉÁË£èøä¯Þç(N‹Ô³+ÙÎ&±Uï¥çöÂ5³©–Ë2÷_¨ñQœd$pCTµ†tÔ-ô®©Kx­æ-ëGëçdëÍj‰Ý‘k¸>‡ÃÞKT½‹VvW÷«“Ò'#vq[#ÝŸS<Û9(ù3B÷ïH+°‹¢©¿†íU’Û¥:©sÌè–£Áü-Hß瘌n Õg«üyU”ØŒL’‰%˜H²/M·ñ8Ö(¹)%­KåôÙ͘ÚNÈ‘Êœí#§ì! á{ƒY'< &†f8ꞢÆ\'eKƒi<F0ZlãѲÇN=q¥.d4”°:…¯ôµ–/ÀB¥N³v¾[.žõ v‚ð“ çá„ gñNâ‡ÃY2½ÎÌ4‹t…¡®¦G†täià|ëîg*ß<ú”¾ø>ÎGœ(Š5sù–núp-MvîÙ.ò´4žŽ{sÂ9_KC¯Šµ4þöüë(h–@ëa š„‹¹°)ý-N Tøl©(ƒ+«F<£) h#£4«â_D|Çrsê:tÍañÕæN•®î4«;êˆ>ê[ïH*>–È7ZcóøåІmø_¾´Ip™]O6wĵ/“qò{,íz¬¨Ð kÚqê¶M#÷M†s]f›Š·7 §í˜`.4Ý-T”ñ2(ÊüSùåud9ø§M¸ ¡²ý{¡j®M×Q–5&ÅØòö¿3Ê-ÑÒñQ¤¥ó1î¡ :qøÏSÐ}ºö&œðÿ ]ì'ÿå(jôg_¤Žôö/W•ãiøOÒDæÍí&>?9p”N–0?\1šsB•Ó"œßþçcüöƒØˆ"­«{(V@ù+\IÝÊ”ý˨\Φÿ5©`å‚ÛQu«X^vž<í¼ÄWêWyým9±øh™6Á«ù´ì«þËëRôfÕíÓÖ/íõæF»¶Qiõ«~óöúÁÏ/OÎNÛwG‡?œìü½]k¯c'òL³™~•ÕÖMGQ*‹ì,½4œX(À¤jêN/1È*ûbA]Âg’®…›²jUƒ¹Met›X’¦› Šã1Òi_ïV¸ì öu‡7] ïpçºNüµ(kfÉWŒŒé|‚Êð” Þ&iðß<¬“ëÁʵxfë$Ö@ˤøë é`% ©û*é•$ÔÍK(¦Ú¼b˜‡)ªa– Ò‰Õç=yá"ÚJ¹5Mf,0åA'»Øw¹κd #a+ØK“¨ä¡ã»ßò;žç^¯—Lf¤=—=l8 v0”Y+å]jŒ)½‘½C$Ó:qKN¥lÊœÛñë, @4{Nµ1®r¥ ,©G½„òí˜ðñ‘]‚”\jÀEwQãBÿ}yxP+ˆ†ÔÝľµ½•Ê1ÜØ¥(ÒÃCÐͦã­Ó(N¶4ìÎæKó“ä– ÒŸÉΤ4õYæûpA‘¬FºˆÝ), ›Àí3Q5å¨BºÑ ÑÑKÇGÞ$cðRà&F65a¤¬µGÖKšáLÃFÜ9O¸úz^gü¥·zùŽ6N¯¢gœƒ E Ç - òd údÙ–äÙju•À¹¦ô™œ oæNÜN­0ïR Q ŽÖÌUQ.¾"àwÏ7C&ÉFhRŒü†ľÃ.Óʇt¬÷‡¤/Wã`{Ýœ¤M¦â†¤zrjZ‘±Î¹>J6P'¡»¹ÃÍÝ•—¹]:½/®>}¢åœ@0f®´>0‡ÉTc6#ΚŸHM©5õÛ¦¶r Üφê`4ÜÏ JY•.Ð'Ipd¿Ö"FÕ×oþßÚ/ïw¾ûþÏqÿWŠþ°^»{[yý¦êvÁù¹oËà;_ÐDJþUÉqEDsþÛ :ñÒz4˸…U18YËù?8‰g!ý=å–¸`Ù‡Î"¶1/¤ËrÙ'ë>KIæœR‘µ¼'G\Œ•’?á„(…`Í/*ùåè´ùà´SRg!Ó»K@ƒóËóU>š´a°¢÷åÂlaÎã‘1M¢Ž«JÉ“âiÒÆ”‘„Ô&"ãCMIÈ„dÍn'"ÂÚbœqª´Åã4µ8µç8¥ü‚œæ¨IFñèBf‹Õ¯lT.æÈ ”¼_q}Ñ BZJ[^'³«q?R:hJÇ3>>ÝÂWü"PSŽ‘3¶Þï{ó¡¦d6h„%ai_a9¸°yw1yRYgfFÅkŸî÷F.LåÐ^gì¯OR­â¡1ÙÑ ß{ÇÁ±ÕôÑ/ÍÖ£G;Qú¨Ý|ýKóÍFåÑ£êÛ&""lzËŽ{ï˜Ûµ½6ñaˆ‘Π*Ä' =4Mµò–Ó]¹£1åéÃXŠé€Ø`à˜¤’Ì…í€þ Gþ‰˜$þD ÓhM ëî»DxÀÑ;☺ïǬ肙a9,¹½á šwdíÄ}¸Îá2fR¥G^ºn<Ž¼F/׈“už–êh.TÖ^?wQ>Ý@|JéM[a*z8ù2g$ê 'íU;3SӔÂíòÆÆFtprr|RwfCùE¸®Ü évù-愵m¼|*e/õ©¸­ˆÔÝgŽ›H-LÔ*Mo¥To"¹+ÛMNþXV¯kbÙž‰B§²'’qi0Ó(Ÿ2Ðõ©²¼3UmôDsêÙDŒ+Ö\Dði#ª»R(Á¹ð†Lç ƒ&ý:†_Ã8êIæ¼N®º¨9@‡É2aU¶“!“Ò4Z'Ôlü£f"‡€Ÿ!ëJ–(îtµS]® Rˆs•“çQÅÞX®¸îkVåd¿DÑÛž\eB3Dã{w&g¶xh¿ÏÙ´;†dq;95n«Tˆoóårnا»’Å1ržÖ·(|tÏçé~õ{ʯ1[vª+m“ K!ôí¥—xhô$˜ËªùI¹©„JUGBD¸B—b)ô €”œh€©£—ÎÓ~çjÐOÆó´“^uÎç—»9‚‰we}åÝÝJ„ÍÚõ9·¨¢°‹èäL7éÊ)aáL7È Ó«|yq¦2ÞSIÁ&3WA¦sZt˜®‹èØ}ãZâÜWkĘ!b¼Ý‰s+˜’)œ…D½KH¬»ˆµ¼Ú:ŒZÓëj ÝWu–œ>Yœ„¢u wWè#Pm\Tk¢fãÜÊeøåä9Ìð0¯øµèøëJfÆS3ÐóáÐ(zݹ–i®¨wÄÚS´ž¾—“X>k–&à RÚI`3L(ÎÛIFæZùSvRÂþñó—0tCjVc‹ÓãW'û×ò¾úݹ®ì´“Š±®ó}Ièß%4ÍÆZ͸@bdK¶qMÀ¿:{ùê¬AÐ@í‹Øò…ò*è8Mñ[Ç]IÕ£æŠÌe«ð _χ³Ád(›‡Ìu£/Xbˆa;U¨Ç}+gŒ†á~½(û•ì™¯rÝÕ渪^JçI3/©mU6ÆR§£±Ë¼¯ÜÍO½úÓ£½g¶IDøào%ÎÚ@ÐÃÇ>,Êxò±¢TöÀ8êö*Œ>êw§ýªWÌ ‹·hH•ƒtNL}øó[V'j&€¼Jàäûm;Q3Ÿ§³Ál>ÓO÷ÛÉ"Ä^Ià±4Ûz90ßs›:4Ž«¹‡Uª²"ᕯµ´|ôS¿!’»§!½DþðÄèÜدŸ–ˆ|CWiÕgœÐþk‘Gz>#q õ¡m*vR3AwRîøi"ƒ» òëÑÂTÇSÉ• ¤›çR-£Œ–2ÅFƒ¬Ü%&g¾R)›7’PæÔFáJËpÒ!mõKLƒ4½nª]Ì¡€·{ëÐðÉ”C2ŒïCYÁƒÖD››!4ŒëÀ™;GJ6¿/ÉþyeÖ ,ÍÅ· Ø‚ôêÑ?Ž^þðäð„ñl_‚hʶŽ³7K¨†.àõÌ=HŽaƒ#$A©t–ûñ™­rœjyME§7P#O¦ä)5™Þ¸„~¢èO”G£Ñþ¹ç ªÅ8$Eÿ˜“l:¢Œ˜#úÆóüTàçYÀð‰P–¯£Ã§g{GGÎ È,ïÜlÎã©¢à3e¨¼­6ÙgÖª“˜ŠÄ{ž”Åm– %Tq¼joRõȆŸaE:¢:játø@%Ä®‰ßÈð–©Ž@×æàC"zyäøç" n˜û;â9ÞV—D• ;º¾Ü5ò¬¦(Œm-s™N‚ÒˆÀh8÷Øðñ#Dä kîæNŸ4°‡.—cÒMRÞ±KÄ‘¯_ËE ¼V?'ðS84/þêaÃ>uîJŒÀOi+Ð;N•–_Åwe)†Jê 1´»ëë_å6¿Î¾å£vx‚ø¬ÇÎc”ÍeÃR€:<ºkX‚OÞl üäó@ÂHÁ?H“û·jËê ô_Ї¨Íhh û!^iÝHŸËíÄb2NSD üöµAÓè‡Ã„´‘ñ2ižðjÀ½±Do¯Ût–\§œ ¨åü±ÛªÕ‚¹ò°\Ñ༙,fŠ~×ÄWdog¼$ó鞃DyuÔƒ{›>Á“aºâžä3íŒðr ¿Ò}×GU º>é0 gøj8îÂÝÖ‘çØYò•T Ý ›AÍ·~Iâ2þêöŽ‡ïUÖë¡ùú75§?ýþôïÏEÈþVœ¿`Θdgù”“ãºl'A÷)Ü$¢“ƒg?Ê”O³¬s#¹ÍŸ4éNíU‰XbøËk´À.†”@Üùã‚oªñ Îm`Yü¿Æn€â̇‰ÓJ Ú–É#Ð E‘´.º@À•2¢j„«SãivßW;aIS¦-u`©’|x—ÄHä¤~Òv9gæLÒhCIã½À4U¨À²H˜‘-…ºO¢ÎÖ}Û¨ú‘œ¸¼ªº„CH¯<òlŽ¬"´Ò§?8+=ôæoÐ'KñŒëY³BÍ•…òP N!UL>98:Ø;=pÉS歹´hÀ0b¼Gñ;"_~²:é®Â›ãl0·ÚœDŽóÄ9æϱ»“×ÑÙ‘hÈá}…æ0Ý(Ê­‘ªzÜâ|F`¦£4;¤ðyì(w0Eóá髧À\P@㧚ßHeÒÀk9קY2JH{ñ…Óqe†ü©Q— y‡ÿ¦8°d¤ÜÞå*kàfGû¯NN^œ½Þ>9øÛ!¦E|½½÷ìàÍ›Üñm6}<ôôšôoF:'Hº cw›¤‹¼Ì†Xy˜rÎqT}`Š¥ÛvÑí%Žv4!f‘è+HQ0H¦ 9¸½%Š ìqh{ä#£ÿX½GnDìïûݘN‚.‚¹D}WàŸõýýóÈiëft•–_¥ô‹#ŽÚ§0˜j\Š1ï£È=ÝJ&‡,S|„‰›VOT žý2 pt«Ía·Š}–/bo]F­çÔ9H†E½-lŸÄµ¸¤—Jê D.Ïj©R£z™Žàt­“†ªi™SCÍëb##2W…ÞÊzÑÖáˆS4U[ttUœErŒznyX@þä»,55¡©]…Hve欫ݩØï¦Ý ÝÀAÓpqi†¯ k§ñÅm×Îù2:¨®ÎÍ(o$ª¤ógÖ¹BA“O”|Ì÷+Ø,LWvwäK½ÿ“, Ef…(ϬPþf…šoGrã$£÷ÝáÎö$‘ ÒÈTÁ«êõè/¡«sÙñ(=ƒ£Pµ8ÑhàUV̧suÏÑ9‘i [Û(IÀZô‚’“¢Æ&©¾G² tŠ i]#° †!E¬£ÎãFÌnh#FÛ=R(øÅcŠ8·I_g2yÓ¡[×Ñ3ÑÒx£13õñ˜H¼ í’8cÕöêuœ=!d‡sœÈÝx®á÷Ñ]„ øP‡MXØV½’¶~áãØhºµ&Õê„ –O›½oaêÕMµ7·~ù‰tÙ JZ€À­zë—ú¥õ±\ú±\ê1˜•úåBTj™íú8Ž—]sãùñ“óÖ®¹!$«½þú—èÍF»M[OŽ<h{“:ßnU5c6›²ÿ\F£¾—ÜB¡—In¡/$·°j=ï¾·ÚS"{bš¾îköŠ P SË>4>JT3&&êG Ïš(!H+ ®¯“þ ë¤¼OÕ†(^ ÔÜ R´ñ ì£Ý.—ü CžQ•^WMÎÒˆ}“Ó]/èQÆT\FMPô ô6Ž1FE‚}oí  w_‹ö)Y¨Ž­¢©†·>MG)x½¦ <JzÞ™ÒîEBÞÆf½a˜¥®¯»`¦ÄAç1Mê$éöÕ´à^'0tHÁwËŒ:TŠ}W\Øî¥0À¾Nß &¼&þè wÏ9š‡2¾ äP>`Ö$ŒmfruØ)fRv˜FEì§D|x_™d_ûT r àa,¹‘†fbø?\2¥ÂXDgµˆ­êbCÿf–îzæ¡æ0n¿ò;$Úëæ+§ÃLG ‚Œê¹”OªÄb'̺óc ÀÒqùNü+Å?ãž“OÕBÓ¾€ÖšZáÓ Xò˜ŽR°«jࣜ\,âp6se3rqÏ"ÄÅ¡º™,¦Ú5Š–TFøçý¶×ç­ ô›Üôßzd ±”[Ò{Z)ÿn‡B% K¤W0}J(B´ãÙËá#zŽÚq»Rñš¶cƒiâ¾ÞÅ/` vì{¼.j»3†ïeœ×¸l¨ü¸Sµ©Jø]Êf5"‹3¡Ò°lqê’uZ‘j`”•-›¥æ Œ… ;&1ê續¤Žð2œa?¤ Þ{ñŒþzµ÷ì :Úïìá?ûgI¿ïíÑÏa™ÐêÔH(:K]+nÀGJ£TᾊwߎAd„¼ý·¤)ì•û厑äw¾î•|—ð)p‹IæýÅ v(ïâÁ¢À¤rªÔ…=žkWDh:.JTO¢mö^½AÔ¦ÕªD²ÀÅV›X[_ÚÙ0#ìÈóBY‡R}èOpìå—nÿz0‚F©“ÿÓóaò=vbg.7øÚçåäoÈh MŒ?×Ðãþܯ % |·Q gF0 aÈæÂÛåüÉî'Ë/ªLjŒÜuáïëâØ~=S))ß O—É›‹Àù@ÓñHú +è 3tàâ·™Î]ã´’xT}Ó®U¼AZíÍÖåŽÇå}ŸKZHϨ2!YQœÚ%’y!7ƒsÎÁàr¤[Õƒaª qV´SM Öï¢NBy¡¤ tiµl}ç-pv=!þU"Z1~»xŽ%V¹P­tB‘¸ñú蠼ˀ,ÜùIL]©ö}TáI´àŸÆ°‹O¯ßãqñŸÓG %Ø…Àáÿxòü~Šp¨eœá!Óœnª?#¥¶!Š½xš}ÜX \&àÀ6 ‘¢1<±x>®ú%:ñÕ’¦~l6í2³ØQÐmTµ d ý¹\e-M5®2›“7/Zo0/ºg͆:jES¡‹Œj{]´‰ cND|àIª~BÈ—™fd“Ò\Dµa†ÈQ # óÈÉ-ùá¡‹š¨f¤@kÚ˜_ç¸ü`;s8‘/Š|@_äOìõydäÕ+¸øùKü|ÝÛñ ()”“øz—³´@uí:2G‚¡Ý~ cã¶g-~ìq‰î˜³<§TÆ‘½´@[Ã~=2ºBq*D‹ÜRd€óûR…"—¹Ô{ËÉÝG1««ªMÕõçSÎŒ _¨q£º†¸yoÅ‹Râå—Ufb5fÖî®æ¡>F6T’»½tZØ+³ÍØξ™kã :ñ(™˜ T¨\pnów"Ÿàäo˜0£Haô›˜oŠ4™¿åR@®#¶}£TŠ µf·ñ5‹t°…5N7qQb¦S¤]ÄØ›JWé° <’ ]pzÉ-2U­‚U¥‡<“š#þÃH[k²h]æ¼¹Ðë õ…ɇ™ú)HÜ g‚PÙŸËáø$Ø.®A¶î{~CÿÝéÂBºÐSN2Øá³]Lq„Ú¨Žæ“+v¤Ó²8¢ÖÅXY×mrë !7L$°ˆrlbfElÙAy*aß$ôÀëXµÆQ̧»DŽ—:.ó­#íé ¾‘ˆaâ®ãLÏåQÓ™š4³Ì§¹[àÔÇe¸¤eõlþWŸ“÷÷Ý7»˜j"2`±©är…ЙL†–Q ( R8áîðg2â©­Ôl½JÑP—>´+ÅoËjùÁhÁ®«!!”£J1Ê/óYŠ±o¹3H>LÈmž¿Æ\€t«Ÿ·z’ÒmJ)9"-´É 8t8¯ÜÇÝ«ATј O !Õ˜öfì„ÃR˜ÐñLjNšþÅFªÜˆö¨Ù¢b§hJÙ!°h5›¨=ŠÖ•‡·u­è5}G‹H¤Š'ÿƒnÓ1Vì"\Ño%·¡‘uKeŽÕÙÖ\™}YTUŽþÙV¿Yåì• QF%çÒƒ&6.ËØy\™Ñðèît\±ÙÅät ÚE}˜™-¾Fæ£(+qM ¬ ÐÞ˜ìÓG ÆøË£L¢‡pºˆ¯¥ÈHö_fT锈@èCÁýP,ÃÝñR3¹ý²ÃÉžV 7•?ˆªíªô ?˜dA¨eoòÏ“‹±E\Úá™XuÉß:±ê·Tõo7i‡aô®'eKù…sK]¥Ìàn’½ŸšK%3~®-|gì&€êæ‹úÉý™ÐÍ_’<©ã9Ð\âä±_Ç8înDžìÇžÌ2¶ad[fÚf»0 #Ç\Ti)ªø©ÈæJrK—”V.Ñ’%%Ëcé°ò1rC@§šÝšNÂŒ«øªÒËÊ>Ñß½­Ó¯¥=EGŒg¸ >m• %8rZ¬^^„Ç>A‘Â7”“ 6P7+%¢«ikž6õ#ŠóŽ¢FJÕn§)f•çĦlÕŽª’K ~y5“ËzÑ.LÁd¸Rñì«(:eûÛ ` “ SL)ò2j\Ôµ.hÓ¿ª«Åü Ók„.MQfÍö÷Ñ;=‘©»hn}ÍÙB}ô+©ÝÆÙõ^ߊ]Xi.ª½èœ’CŒA"Ó+e¶ä\¡æj^è“œö;Ñ=ü¿ëdG‰³­…*“12™ž¡„!H³›Eš"§õb±È%tÍ¥“4™÷Ç cO)}l„Öd>… ƒÂZ|"L,ÐK8~OsÿHtiÉàê«æøj (JxNpÏ»·6áAV‚B>c…ÝEep’RðpÉßé [5mÑÕ̧‡S¦ÛÏüCãNï ;<ì÷ùÐôÅÙâE¾ÊÝð¢Mö·2ØÆÜÂŽËÜ®˜ÏÍϬpô)_)Çà„=ý朊 OZ W}ŠŽ‰u-ÂΊÒnÔ„Ë…j?@[ ‘u¶iÂú±åXOrn)ÃÁ»Ä ª‘ `xÑ«Ë»ø¹a²bœW §t7£¿D‚ ..Í Ba Ôìø}Õ£ZxÔ„66\v",ÉÀ2‹æpb´QàÕ³aYÞ æyíºd ±,0ÿH‹Ý¥qAÂ.)quhûCäÜ…«®Û~'”ÚûâP-yäÀ(7ɨRŠp—…0_i˜•Ò~„½( «¨&…†ølXwR 0Z4d]b²qÌÑ9¿5yâ%•Ïb•… (ù t¸väA•§y”k8ø J¾‡y[Å‘¢7²a Ð4Sñ²ú6Õú[í+3™¢ÓáÄtPL÷•D.gü¹"« Ù•Ä® dcÌ×Õ°ù9»#瓨ðLaILè¦Æ@-Ô€æ,(Y#±®ÀLqÈB)W ¨¸d2ÆF /(·.%K„àqý`%i˜x\Ó8©J^¿x Î é/œ½ç/ªZA‚në*á—íØqzwA˜çPñaÂ¥^‚1*âæÛb“•ÜÝLÍ¢a~4AÉù{m»s“p5•sõd±ÿ u™©¥Ɖ”<×®û³­_j¥{ÿz ©ðßþìÉ?ÝûºLŸíý†¤ªÑô)} vÓá ™ªÚ'g0(‹æŽâ“´0ùH呦hoZݧ2]’0˜*`·0©9—ýmÍÓ)iMT–¥¼~ÐÁ d±4ZwG·7Ý[e\F¸î0auå+jVÕ†kÚö%.aµ¶]†kÍp1ãw®ŽLZJ+Ÿë$vß°KÒÞëuÛàIxŽ7ŸsðÕv–AX(:´Uýr +6eªãä”° xüìaȇvj•»f«‹pâÕòE)黂›Ä)¯ù„S=Rj3*tPíp-<ìûê&:–ÎøAùNn¿JõÎ(âš82@a ÏÜŠXY‘O¶KÇwdܼè‘\½-ʳÝmf\·UTqÖàšZ|’ÏYr ÍÃÑiôò\ÝF»nÖ-ͱÂ\'×çlDìö’€±“{ÐY5Ï?-0S‡MYSG>}2®¡¢wn<$¼óS ]0b$3D)]eÿu¯æsEó t(O€YQÐW5ôe*ˆ¯w¢¯u„h“œ:”K9ux¡h<\¢ÖëÙ zIcó¨"‘Ÿ¥™ÒBK&:«ð¯|´]ÝŸ6¹N9tÑliî&"ÁQBÂùF'\ßv\¾mÓ<4³Þ­léCšÿnåã7 âïÍs²Ú»Õû>–4iÀ›½þ¥Ûøm¯ñŸÍò¨C™ôÀÓÜÍAÄþ`R±à±A Z ¾N† §_<HÅåp|¢CÖ5±´ÞΦòу€¿—u<ŒUˆ£ Ò6õ%Q2m2•³×’œ×´B®™˜¿P¾úÍK¯*–ãgßì±gÒ í¡C(+ø4¿²[oKLÓˆk‹Ù:ltx0iŽ®Ë94-+Üyå#ý{j~:c—Ýiꨩ±Ô>rÊ!©•f|>F“>4gZ¼êw„˜ß{E傯°ÐakÃdC¹TQü`d«üT}@T9‹z”\ÏÅY,Úha‡ÏTA€Et*/OŽŸì=Ö1œ¦òroÿ¯{ÏjQåo'˜/¿)¯ .úÉEÔéô&ÃyŠÿ•9évÔŽ÷Û1+kè½pA-#MâÝé@—ûâùúúºùuw7ú¶FåÑóÃÇ'ðâ{|QCèØÆßã£òÚdÚ½¼îFÏö÷£þ {9ÂûªgòDµãÆOxöÐý`<cÀDڎͬ`ÑE©ˆÈ) ÓÛQ Þ .*æõ·õh8»îFøo‡£èšW¢µÄÇ*#o?¾øf §mW¾ÿ÷gðæï>¥vŸöpBOöÎö¢ÖŠœÉ|rt”RøuBH•Ü$á »&T›¶Ÿ²¼²|ʹxAÆG«†ô7H¿2ìWÓ ímlŽ£¯u92Éèè¬óäèôïÏ;ûÇ/NÏ€CoCÇéE§ƒ³'Kc(FØÐvH¸IÏ¥ÄhcôDY:&²‚·Ü‹E7itzvrð×ÓÍz”nÕ¢uÀ…Þõ.ŨÃuxVC¬{\#T8ðóÅKžj™($7a3švÙuS‹…OâU6dAî;ŽÅ¤qˆ ðAåS*z´Lè=ŠíÕíè/r4ÿU‰P±R !º¢'×øÆDh™´Èê€e‡mrüÇø’#ŽÌµ_¤ÄŠ¦Ž%Η[/Žlr4”ÐóG[§/ߪ®O{#aÂtmU}y¬¼6[ÆÌÛ 8åîBpÊõµï_`ÕB~_E÷‚/žG…Ÿâ²³sôý÷0m÷mTqÞí˜|è ç”"gâÞ‘‹5fRnôàÙÉÁ˨ñ>Š£õ°£Z%6Øà ÆY5èƒJ–Ê;óSÕQ^^ 2i¤HZÏC±|ÂÌ“¢¾¾èÔáÒÖŒGW‰©ÍÀã&}S¢Äzøó–ç¿Ê°Ÿ-—@„˜¿Co1{uŽZÕÖ/´úUzœ¶~inDíõ&ª~0íʤÅÕï|(ë1Ð ì>Âwe¬?ø»:EµLò*ÉÒ…4éàç—Ç'g§0~ßâ@ˆr\Í見•™3Ƶ¼Ã’“jºä(9ò´q‹±4VwÚ*å´yÓ|½ñKåM»ÖjãŸÍÖ¥}+jéÏø_5®FßåÍáô¡ub8Ÿ’‹¥ßEß}ö)Àƒ¥˜PúHPÊß]л(Üx£Å›ÉÈet5Y)Mï¦_,¦ ÇÔ<Ò×ôvšÌ.$gCVÛŒ5Î{)Œ£õBº±ÑÈãsÌÚõ‡®º[˜0° ü5ª&ȈiÚhø^œ‚$•Y§‹¨ëè »¤Am«%¬S±_gÍ ¦3mN»ž Â×üH÷VÿÁ “àu¸ªu&TôÓ>ÖÉóš ›÷`·ÏÊ~"º@«š'©Û;_šë[c^ §ÇÙ$4—ï[·—@àw™3ùȦùÍsÁºÄJCj£qÄkjr4£á 7Àj(Ɖȭö’ß7ý+ìÓ‹{†§ªƒ¦üóå£Vñr ºÊ®Ë7¦¶¼Ûaáér÷I¹â«·£ü™àÄ9|ê>YýYƺž`À‹¬¦à$q9¨Έ¨p .|ò¹w»I«°ïÞu Ï}à“Þà­CK÷,ÄF×Ö“¨µ“¶ðÇN nñiÌž¸„ö3Ÿ¾®ˆ5…ö¿|—€Çu›QW¶¥`yP¾ H~_€Ü 8[@¬ˆˆ€¹À@ãÄ;¼ƒ¦¨aç›,d%ד٭u_´.Â&A?Û¡`uIóSDIù4—«ôÄ/töO¹>©Èæ£Á¯óÁÅ­&gn®)3®˜©€°ã±¶w£‚ýEwÑ7ÑwvœíÚúþ›ºÂ’i¤Ï¥ç_oYôµCàÅžºÐÚĈ ;ßç‰ÒùÝ vúØÚC”ÈòY.sl•ÃU¢¬3jmD/Ž_DLî|†LYUy¥ÖXUã‡<‡m™Ù3±ŒWY¨4 Vj~>t£ShMß/U‘³:³YM&ˆvªÒõV!n WÏÚGT£N;M罕Ãa%æ6(Æž§¸Ñí÷p¤;å{T ÓØ8ÝÕ‚:J·M~!« [¤î;Gg?g릾~³ÃJFÔ©…ŠÙÕ "a 4Rdc¹Ù:þΆ·sŽ6v»ÑJ³G@¡àµ¾#0n|Ï1*_Í¿³Vá£êáØ/ªÕÜh™3¿NÜhÝý¾$üí¸V3½Ê>À¼ÖycjQûØi¹èt¸æ¯ E¦ù÷±M¢³â‡_#¢ÝòÇèc;°]¶ãº]üãûúEšÇûËá‹Ã³¿xãüÁbŽh¨dWÉ“…IŽ}ˆ#lm ÑëpÞTŸº®°…1þAœY~âxªxX¢½ +ßï”…Ó»S*K5´Aø¼¦B²Ó$Áôa’ú’-NH¯žžÀ‹ÎOÇ'Ý;9~õâ‰u&_<’_›9™Í'ë5¢qSøÖŠÇúÞµë…@}‰„«t¼ÀW.óè¶yJò‰n‡Ð'Y*ÕõÄf¶°¨s¡$؈MÉUM àú“9*“5±Ñ(«áú°›Y¡t°% Ü€ù|~©ÕAØMm]Z*qŽw¨Rdcˆu%hžË‰ó"%ߤü·/÷5*+Š~˜“ûe<¡0EM¡`guEÖGŽR¦ Ëòáë3.]H8‘|DMÍÒuâ[Í­æŸèv`œûv#Ö·ß47‰õÚhl4.àÙyÚßjnÜ9¿~Ó|ìýž /ð‘ªüDŸ~ãI!5;v{5™X¹·8<Ôõð jóS¯>\ Õ]Kùì㢨4×ð˜§ÎÏg±Ï{âl瘋~×”×b*-mð={3É8ÐHàÞ A2¡>Ö¯±È%Ùîu>k ^x™¤fý_-+ªXY´kÞ<ÜMc›)¼àJå5•¢œzê“Ð÷„€P…fÕòÖ«N¨6õpLŽ)—ã1JW\;wãà¾ÁnÄÁ›½Ãýú±›Jñ®T¬ÃÉpòÍQ4žöÙ¡¾štgU/ oyEtЛKâ1’2*¼˜ªÐ]è)Á–hŸN3ë[çÔ)}ÌNèó§o£sà )¸i€Ü_>¹Xâ4à\Ör™W8±)ú¥ôGQeÓUÐã¦1wæ5g¿âî´­éûÚön ðæâH8À¢ÄòšˆofRñ‡ÿó'íH²4]î0ÔkO“§kÕ,aáMÒIŠÓi%—SøiÒ‘ºPOM<]ÁCÃ;û?ìÿµó|ïÙ!V£;ûñø‰I¡Ox_9þá?ž¼zN¾#%›®ºùøתoÖ0Åy„Øt9ïJ´>IÁ7ÿçOëÍ Z× èù4ÙŽðaíÏw“¤Ñ^7n0Š ð4þô-ˆvˆ¯ïÑ5PHXåÆTZÇï秘¿j˜×lHu!rÇÊúâ{[•KÊQó^Ž®‡d‹M–÷]"ex¥‡R°’Ûé[Þ [°%“q üUco‰õ‰–çz1O»Yß|üøc¹TjE‡V9§§éÈ켬;y4‘…Å&uÁÊyÅ-Ü“C3¶ÛÂ:¯vÜùògñw|âì¬$¨€O@I7›ß¼w¢MI@çðœ*š }Ô<¯èÛV1¥èi6Ë!0<2??mkéŠvôò "M&Ü%“óÓÒšßå7åÃNò˜ƒþpHâ9#;óÐæå°;ÃÃÛÐÈd{!8±p$ ­›'=ºi:î Hn7DÇäö>Û€Câ}p8z?~ÇaˆãUÕ´i~u—¦‹=<ÊT½ýi‘]yŒ>©$`mµnÄ»c¤r/Ÿ…Ý»à9;>>Šæ·¢Á¡Î¢ o—nÈ\Ãáy·‡Ó€ƒ§ûg‡Ç/:/öž`}ü7¥­DÑGò¾RKØ©n¤ãf Çc^Â7“U·ßÝ|¼Ô—m¸ù2Ó&ÍÔ[LYŠ|5èÇ_ùÞxòó¿Õ%À¥¼¦]tÖ@&>õ¢j¥p2N Èðã!zWã4“í§`оh!Íòê[•‹9pMö®´$¥ò6W+\i/j LÞ*ú<®lÅ975ÛÅZ¿ìî`òUXº~W+Þtâêv룑|_Rƒëî…éîÌ«×cˆ±a®Ò³f$GkÜ.üy¾wòWü·%/&š~[la¦¤ •y%È?Ž8›ê ­À Ç£K­õýí7‘-²\Gb-= ‘îoº·)Úã‘c TH\¯¤µýº½Ùpù•Iòzð¦ý±¾Ù¾o´x2­_Gfu¯Ù~³±-o‰Fäm! !Ñ Ñ½•NÊ^PŒ§ä•’ Ñà˜]‹tÔlüö›ö}ë+ø)ºcMŒ ’ºj ¬[Âò¹O¶ŸÔvÔªºØÜAÕìòŒ`ê&£ÁÈLC‚†Ñˆ€Y±Ä­q)Hl%Ýk8B[^þ¨Á²þãsùwÛyöÁ N{Ôj]†¥TgW |Óθ•ùB+ôÇ3–‡n'M'€Ú¦×ífÔž½Ù¨8ß¿ÄÕÕ5Ñ?þNöbÇ7âoCÑubµápÃÌ6˜ºÉº:CgP¾¹ƒžsIÄšL¦cÀ$”Ðõdâ £râxº´¥ArFN¢wÀ¦‚K3ýºý˜Ì§ fÛÆÃ×hä5_S.‰q*ßË2‡PÒH`z}‹J*õé×QµYÖåamRÈWQu&Y˜íý2¢B÷°,^;nÖ$Ü‹s¡« MÞôð¬H?|óxKã1 ·fµ}Ø ‰¿7´L¢KšÄKº R&Ýãõ£¥á Á-¸È#1-. ¤z•<:¾p˧µÎ$Br–M¹td³ìûþÒn¶ú;xZñß_««³¢æù§3qªZ*â.ò†‘…¬$~ð4®ÕZÄ=Ë&q™™ÿ†ü¢Ý›Üë?R3ò§#ý®Eªb vÉûbtu6¥ª¼VU8R)L¾P˜ö¦y6¬ ïŸ1Õ?¹SM•¶Xв!˪&×s&g¤Óu”¼¢ ”f”‹šf¸€ÖÜrïW6ÝZ,ÎKM*²éEÁk,èp ëÆ8JO§€)×<% 6”D3aßM|WVE¼ÐCgÒáÈË<Áòwì–«”A¶MÿÔ&žsó‰è™1ÁÔQé•U[9å›ór¥ º]ñGf轓èCÔŽÛÙõµã'KÆLݨØ­üys1sú4]ÊŽdÆÀÕÏv¿ÌXî Ñ gO5L¹SÆ<+òOcÞ =RkîÐÛ¹•‹<“œ$-%"i†ƒùw蕺àmåLË1#e·ÞÌpÞgã‰È” Í´[”ƒûNZ€©SÌK¡ùGì Œ-ÞÕß?àá1¿tÏ7”ÜÏä'’¶ä•apRÙ\%¤9åçf˜yBú(—Š+éDLs¶üšço'7ý·qK_ǹ•cÃðm,¯uå‹âÁ¤Mgnf¢ §+<§ÛÎÚm…KÙ½¤o÷ÏøOULèBe\|áÖ¦Áù2MàF_GT |.s¦¯œÐ;Ûá,ÓW#„å9ÈøïTrÊ.c7Î[›]’ Y"Ø;[¶‘—áéúV›žÈæp]¼(õúÊÄ’y=ÄΗØÈö\˜Ø~OIŽ_G Líží< ¸ ‹ÄžcwHýw Γ·çsoLÏ©&œÑñ>p &¨óÖcdî·™.vó’TrÀCÙ<¯"à«£®·¢`p[kÀyŽ”.h¸ãTðQx>‚;¤Q©´òfÒp{1!+²+ˆŽÞ0QC²]> ÓÜq>&ÑëÒ”‹˜¸˜Irþ>xƒV¼»ùŸ½\[rî"㼘÷53ßuoIq“TIx?‡•IZ#4âòåU.dz*€g³„Dœkt·Û®yH‰ e?z‹5™"]ì,Zž/àtà¡no4ÇQƒ%ÙÆØ>š§N-©Š L4|ÍÛÌ »™'én“m¸µ?[•½ÂUH-§73_a¼œü#^KR2ƒÌn±×aš»q:Qq8iL/̼ÄyÍÁ(¥ÐqàßÖÂÉÃesÉ|P¤R­rÜ«=+¦B·ú`y ûÅû œ=Ú0sÌÿÉeHlb˜2!U Й…Çç^fÍPý«ŸÆoØ€oœ4èAk¬Ú:ë1(Më¦q.¬Ø‰Ì]öáÐ|Kè¾Ýµ)å1£<¸ 8wÅSBú5ºBÔÍ /™W[ä<Š82k™lFÑsdŽ_ý2=qhŠèå^t±”ì²Ñ:ñÙÜB)£ºÑhNÚ} -&c8ÚF)J:±.H\†X2œ;Õ]:Ù{ùòà¤Ã®2ŽŽ_<;í¾è !ãð>6áñ¤Á›ußá /¢*HfU)„MÞ°”~… C¾G¨*LÓùµ[NÖT?»ájì²2£Œ^ƒ´Ìe€$Ù­Sk6b…9·¹ 6*µ2j ¯ºïã©Ê:.®œSÊ<Çô›(È4Fã{Œädþ¡]^û*â´ˆzâ5"ÌW=&E[€`$fg³YÀÇJ¼f …:¤fy’ìÄç‰Å[ÉèÙ½APþ£¼í ‘Ç­«ç¨ ƒu‰úw”`®>TÅBt”\åË) L5 ¬~ˆÞ§ÇŒNxm¡)šcæçél0“Ìv¤õN†“+öÇÑt|ŽÇsYÆ#wTµ ˆ4×ɬkÍ+Ü ®úE$þ}¢gÈ sƒ’c÷Eÿ²$Zõ8a6Íg·Z žTq¾?$ÑãùtĹº³ª$^• ÿóôÇŽlè×pïÛ”!bsòa­´ZAdkÙ6𠺳í?B¥”×¢ÿL¯¢ošÈJò-ü+‰ß( Ö1Âù#ëÌEsœÊ_Úñ}eÊÞõA™ðF3v^㺔ó´{‰GúÉ å2º¤8†û˜Y”°»ÃðºË¨êõZݭʨ¯UÂ=½8î<;:þ¡súê‡Ó³²hBHàj¿]G²Ô×\Ž¿ýÙ‡ òŸÁ‘[°;ÍÎ_Pƒò@ŽNÜý0¹üvGÌ ?ƒáÁ;›ÎÿômùÉ«½£ý½ÓƒÝMÓJI»ç=EÀÊûñeãÕÏÑ;€*BôåñéáÏâSbm3 ÉÌ¡ZXÀ.’2%eÙòrïìG"aX’a}>Â5ðÓÌ&#¸ Êå ­|;̽ގËz.“ÑûÁt<ºö2–ôµiÊiáèˆá)«£ið7*·†qK[b°!ÿb°ÐTP¡Ž(É _lhA,3"ç¢êp®»½éXGt ËeTÃâUEžµè'¼`°Î gʾBÑNBýh‚uÍÛŒÙfΦf)¢ƒ{cEJšYÁñU.<$i;~ø¸‹*áWÇŠœøOà$àqþ6÷ ÞÊŽH\7空mšZ9£± £DôD”…\È5g4ð¤÷}žM»ôÝw£3µspü´Ü®l–ßÑ”…Ó¢•ÀºiIí˜Õï0Å¿%€ò / zbðAqJd˜ø){_­wk¦~3M®Hî•z´~^ãˇ,JÀý˜Øml.Íàãß@--dn¦–å¥Z>ä¤;ñ\NV=Q¤záz¯F÷$Ù{ÝQÜh g>_§Ú½Rׄâ¬ç#)ED½ï-h"ä­Q–¼öâøYÓË7» YÎnÆjaÉs'ÛÍ€4±8_øŒ̯' GS:ÂÛµŸ`©oáçqJ%7ZØ»Ä3©Ã–aâ'ìÂc;®˿㟊 <\Yüðv·±X?¹Èͺ`¯‡²qÈ.Ô,Z¿+ Z+@!ôóV ˜UÁgjÁóÚ)ü´áO[Hã}ÈŽóïu')‹…K Öƒ‡k"5|‰¸Ï0ç¼8è\Çú&X‘ðÜ1ª 2}Z>Éz8šÖÌL%Kr}ãR#½»7ÚmïJ2u3JY³'^1o­µN:ˆÜÈ”ªØá/8dì|ˆXGlFžæÓ¶IEìîjÅñ‘á^î,ª" 0×o3ŒÈAÔÁÓp¹Ž¨É:3”-Y3$«è€ª›às4ó9\Ë@m·YÀ§‡ò¡]‘Ï…?ù`>ÅâÒsS&F\Ÿ„ÖR äÑ;õ=½ÁÔ3Í<Žqºúu³¬"ÓÛa5†ýœù¡›+ZãßG­Ö„gÈÖo—„ð7Æ.õƒVZw[.îG\š³±uQ‹hšØüÑL´™½«îè2q—âÊŽÚZÄHÅÅv–adÎζ6üÉlÖCA|ÌÞz»Ø[¹mÝØGŽ]<ŸÌî¢pù~Z®îUÊUZ«£qµÔ®—°ZÞUæ2…>µý>IùOÎrdO3ÜŽeZk1^g½`Y7r:n±ª„çOGR. ;m1…Õ7«–„G¬`‡=¿“›¾uY#Þ¹žÕ 'B-Í}±ÈŽ ÁL‚Cª>¯å“ ûÝtùòõ/‚…|t‘l‡væÍ€g ãä€@.ÙuÏ©h‰KØ8_G„¯xn½~0/Lü"`qià“)÷ynů¸¥SHÍÞÙBÞwáV©:ŒHµÄ“„p‹ð¼ LÚq¹Ô.b#î$6ó£{¨6û³b¾ÃyÞlz¯Ç ÜÅÍ_Ûow¢¶r!Ž<*çô+‘Es†Ú‰î4¾¶«]i8­üb@°Ö¾Ç;~xÏÿ gÈo:È¡åÕ_w¥{ÓÉ™#ÍÁOâ$ª*GÜ>Ó_3·ƒÓ„ÝOT1Ôù"_j.«Ì”£ãvdîÃÅ“8†Î5Êg;éÝ*ð1›I¸ö•RcTËz·XOør‰ŸK— ZV—ú¹øN.…Ó¿6„¡Œjëi#YPž[‡³¢"×çÃ|;ð‹/ãÛÁEíWvîàçguwðˆ¢Õ=<6Ze„zIÍß}Ãï±É,úüt=%lá·ÎþÉYçô`ÿÕÉAçÅqçÉÁË“ƒý½³@ZÉJº6Q6óè;”vÇÍ«ïýGTCÏÂL#^ 5²a3ƒ žJÿRœÎ<†‹F ÚâtFÚ­$NÕŠ€µvÉzÂe]î{™uµóŸuÓ4™ÎÂvhÉôŸõÐWÔtl@î¢7š ƒÎnÓäàÓO+ºçÙ|Á-·÷âôÐè7ÓLYE¬ ùì§o¶f Fôpÿ¬ƒŸÂs4u°Æè}´îæï®í8Põk:‘ß)÷€:,ºû½~ë¶Û í>z”™O=òƒvÎ>þ,)– c’'8E$›M*ãéT¶ÄK¸+v"n•’Vvõ³´Ê8…¿‘ÿEÔ™Ãk Žüà¼4À3ÜÁìãÞ4ÃÇôƒ}Âï^tøûB@§Ûg_œv~uzuà‡ƒŸö3è¢ÅÝt‹±J¾øqïo@¿Î^üÍ>|züòàE秢øæ<.ØwëªgÈ^wžïýìUÊćðÌyéuOðÍÑÁ‹Ü¯Ü×™"œÚhóñÖ·î„Fx„pÏŽÝ÷6D-Q³-Ÿ¼ô[ÂÛ’pÚCZÃ=¦Ÿž˜_îì;ì=Žª­ª}EÐqÞmWóë×æÔu}~úäø4(ëÚyòÏ^¾ä‡ÈîÚǧ[ŒÀïØ–ºƒÉ ;§?=;x^„ H¢²‹ìlá%’·ÎÎp¤íª¥}ú½¿d¯ƒðUTÝ©†WR>°©éåð´ã½’wý —€÷ªÆØaÜ`ònYØÜÛåÒzA¯T78÷Ug KÓJ 5ëË“ŽÿÒ_¡ÿÎYb¼ÁWï–á¬"¯_³ Å¢\¼ŠÃ3Ù9îüpøbïäïó¥œs©÷þÏÏ÷ŽŽŽ÷ב™¨#C.ÙÀÖé %>0ãOèíF”~KÆô¾†{¡=aòðudN“:ø~¤óƒ‘¸òìc„yÉõ׈þ€©Ø‰î¡í½X‰Ö‘Ép.–_8øáÕ3ÑëkŠ|¼ÑLÎ$»ÑæŽÐ¹ü×wÌÒÝË[M€å°ʼn7„£ÑvG“ã~®¨?ŸPº ¢ZeNÐo „éÌŠ;Âyè7Áì¶qR\Íc=,^bzðŽÃå{-eΦ1ü =R¡ ´íym‘&£¹C¸J{TÔ/¶•v½«=74kxÿÖ(C|Æ šCk-jBÅ~¯¨l¬óvR‚ïÝõ¬Ž÷ªÓÅe¯ÞÃ5ª—/íÅ+¿ 0‘ªÕßÁ¶\ÿ)ÓØÔnÉá'9=§û„\ó (á3¬M[0ô?¥ø$qäsŸwû}^ñlÜ Ì'}æp;YŽ¸x&Á甑âŸóo.ðÛI'Ý›‘"Æ:¸˜€þ¢MYÇ{v^“˜ïHœøûû1pWH4Ü1#N¸ ì&i9G*¬7öÏæFc‚ý·½J‰¶›Ñ:º£þ³4™~¡]Í;‰P qï[VAR´Ä£WÐn×IÇkºÔt¼;V¨wkºþÒÞÝN¤®L¦ cŽ{ù¢}ô²…ÃægöqÀi÷;(o«Ì`!—@ålïäÙ0ÿ¬Ïê茆³†£ÿâ+ïj­5 0ó=FI¤”b‹jˈs=ú,¡5A‚HÑÊŒÑ ¨m`7w@~Lµáä–t¼#tˆQ%­‰,ë´ÔoF¾…'0q ïB{§GeíÅE‚µ9¡ÚFˬ¬·ûØÔm3 ¢ïhIðÓ×_KͶr¦DAiƒùh l}飫âÍ+=ïR‘ê*ðUi˜I1P*²x> ]È{El8M¡§3².ÊžõͺWj;@æKAð,1(E®G¯Ñ—’ßTº_=v¼v;1_ÆpÊ~G³Áhž,é·€ÊÔ¬ï½;ÄTÚ׉àk¸Pw¤‘:âøY@ü‹Ô¸…R²N Ê%•þÈ$£SrÌ$Â^Q÷7 ]G½~8[¡D]aù™zêØóq F¢Ÿtã2ê97;°heÄ2©hrkFÇZ¬ .ªit=¸¼’¬§œ×j8xøýÀW· Ʊ+ÐpîÄ-}šNd æ?¥:`T -çèQž €ÐË´W‡Ã /)ÛNG ˆbw)EÔàr>M4ÏÚï‰ìp¦]³ÛkÀ™ÙzæM·ùFËÇW‘:¬•êÔ£N}®á'I5GÒ óx”ÚGi5®ì˜ö›‹ÈõHP½f‡žÀfSBÕŸ (¢|¯¿þZØ8^†Œû=Þ— Úc-ëÀ…¿Òи›h²“@r®à@(Ùd4[p/>à" ò,C‘4˜F]°4ºd×vò-f+´Ž{-2îòRè³®¿ Ò{‘šÎ܇| º<À;£}p‡GÚç·ç ª•—"eSý¼T)/Å£ôáKËAY]ì9Q c¹..<¢‰HCP) èx¸«`8äq=PÁ|øçݽÀt¨‹§7Iš)æ2³ËY–°U¹ÜT^çÔ»£çÉkTÏÅðXzph”™Ö†Kù.èš5 1Š 1M#@Õ@e²èó:±|LÓ-„VÈ'y¬+u¸_w¡]\â #QêAÀ…wùB¤;ÃñDJ!¹æo\Ž–Ù7§—À4ç«”N îÏ›íJ€[å!òë™Q‚,€téŸmoJy*%{×<ƪ½øÒ“êd&£‚C}­•>¤U,N&q ¥ ø¯èsšI ºA=ÖítêÅgc!·±¸°E+΂^L€´)&›D´.9ÿ'X!ÙE–)ßé‹‹äìfГû3ØNƒ›v|CàëÇg"P]yXÎc§cç'P)Efq éΓãÂáð&ˆ·WjÆvqWù#¸ægõõÈ;*› ˆrlÌâ¸;¤’Xgœ:ÂËbµ¼mdñQw#š0G%†–õ Œ€ »šú C³c­†N|öÇŽJøEµUUVï¾°;<ìðÞrJ*ûH~…”¦€–‡Wb1Š8šú˜s’q‹1U œD “ŸÄ`ƒi¯ÙIð‹Ml®íŸŸþ5J¯øxôŠTé9ÈÍ(Ô ®ûêÏ1³ ²sã‘l ÛDñ¸®.ˆÈ?ÔB…íº£I®io̪ÃL­/3Ê”®/3‹ …ÞÌRD¨'­ëWf*c|Uøõ`‰µU/{8xëÝÆ ä¶`JmÔ.Yí¢º´¬æå!3Ñù¨ÿÆ›)êv>Ún º.<@¡¥ ÕGÿ½ñšÕþ\+“ÐPLW7EŸá¤Gy.°ä€ò$V×X{äMRT|¨©¬EÜŽNçe秽ózäSÏÆ$ºÒ  #}pŸ»QcÓ:ž¾î`È’9àê”,ô ´òèª|†ÇŸ›N9ÊV™Žv »göÌ_“Ù>äÃH]'ï½ZÍÈÑ¢¸"5¨ÒFy†KÒÑåì&oe@½p:DHíÂp¬-ê¢=CB)‹M×R¨°*éKKhô½ZÉËyfrRIó{¼ ÖùG oÒ”M鼿_MV’%¯“kŒFK>\%쌙ÈBá„1*•çifò‘$’ù³áɬæÙ¬I˜:ùšØ8ÜûRé£m¹Íï}„ò"Ã?«ì/ß?b'!ÿé»Á$B¥"§ïXÜ`©QøŽ´H &$=H»ÃÉU–:¥ƒK'P£O‘yC3&ý¼ù]u»Ê»C]½mY‡ ¡8uØcj6øü[‰$ú Eë eœ>Ä3`îÙ ²‚ŸA¶fÞ›±_a:{ÀeP3Ç=+Ï[§+5ãZ¡é.GW§¯xR¼L«±Ö–4Áu–§ÿÉüž|q¹ÌA×+xr›„ßÔëòÎ8äÝ©_̓ hÂ&ìÀ÷jNZæB`tŒ6w>¬Áx¿/TU¯Y;˜JSÔªHôkTûžœ"ONKGƒT’xW#Šy ŒŽLÝ_Ö›ɦ4îQ|‚ýŠôkêDj¬ò?}¢q,¤>Reº¿ÂÅISÄS•«ÙB1×äñ/äj%$ƒ0V‡²µ(nx”yÐÁºW;*|’mô|ŽV/‚“8ô‘¢@Zzí¸³ExCøÇ ÊR@”­±†°‰re¤ ¼R* jö«®K£„¢ÎÓjûqÕGVÑp8ö4â·ûÏ¡×÷ÂK`!A— (M×_²þÑ^7 t¥zë{f-a¹DX?F+›,ÒÛþ\ä3·½=M†\}ÔÆŽ™½?œå‘a¯´ÂJ+.ÀÙ)o¥‚”îWß3\kp"‡$“ÜÁÃMÜ«(’¥ñÚ=}@êKTÂÁ•µ‰¯2­2|ófNµ´£¡¤$ù¾9¼`œK•ƒÉßÆÃja”¼feäJÀËÂ߈Œ?_g¸_ ß+Ç]»æÇ~Åžv°mô+ªT$ ¼Æ×7~Åý„OBÒ u‰|©: @hRsP¡¾]ìA0ð‰¿³÷«8”œõswtÍ”J\å-"ä×õæS´ð;iÖ%AH¡¨5ª;nü5kkaac ‡,Ý°ü²Mæ–\‹ŸG׊¥µ™0¨”†'òÎ;n2Ã@¥ªŸû R= H¬X’\îôI_›.²c¾–7oTÓ$¸2®µZ|e6dý«MĤ¦LߤÑ0\â:ñ]íÁÀ„¹,Šî÷ZŸFÃäb&‹ËÂþaÛ 0ŽßOÅ'n¹S¯nµ¡”8ab˜K|XÌÜJ^èy`ÙÎ\œ_pC2†2ák§ ç¼Ð5åqæ”-{¨È=¤™ó+Éc%3ËìBHoißjA3¬ºb¦œF&Ö½(zœvÆpÚ;Îshê†â»œ¦Љ‹<‹AD4tÓámÝ;Á¡ÜÆ­ÈሸWµ øCR‰ л=r|®wéÚãÙ¸ó¤+B’ià…‚¡øé«ýýƒÓS« R¸ £ ·§ý:'xøb!0˜QrÃ_èM`û@Tvº n9´}È{Îw;þ'0™ -<1Ì|²û ~Žªr¡B^W™^àø”)¤r¦šÛ230M)ÇéÛɹtp¿‡üQeá3½ÏS gi]Ë͈›á C>)Röád*¦†·ààâÖP¬ó['åàç/Ar÷½õ‹ð9¸œ”¬¯Û¥C–ju-+òØlŠrAš¼ª›%¯‹V7KA{­jµÌùtMgdR‰_Àåèz͇¯¡acóMA(ŽmÖh¨öÄð¨.Â;cEvfBßÂ÷9èö°ÈêOF7æº}ævä½­â8…6Ý—ìïDÑZ¦4Ï{Rã«gfËC¸’ÇÓz¢x^ŒgRIQžÚ”ƒ°ƒYš /èCN˜-éja«“)ìüÍ«2€‰÷ŸŸ¾<ØÃ%°c9/5ÇíúÇèøT"U_<=ŽÞïDï›ýxÈ¥½GãS8‚xø8÷‡×Þ¥àÏ’™|tðaýïÝWØåK11öQ‡>:/öΞŸ<çü<gæþ'&²wÝ'ÏrdQeåMø7fÈÂqHº}t×¥8Í[Ñ<&HG¸öŠI&Y7ÅB(«_5ªŠO3–LëûT|ö%{†ÁÖDÑO û0R½/¿7oÔKÐGò›­ðË2ËS¼;iäÔ/ÄS2•œÚm~ÐvŸè3|ˆ>š‰ ‹œvð¤îuöÜ;9âvÜnGíÇ7á¿-øïøï[øïðߟà¿k?Þ| ÿÁûMx¿ ï7áý&¼ß„÷›ð~ ÞoÁû-x¿ï·àý¼ß‚÷[ðþxÿ ¼ÿÞï¿÷ßÀûoàý7ÿgæ·· ³û/ž™Æ—ä(qo~´<]XØÆq?¨çÆ>¤™“ìÔ&¸•ÐM²USü9ùSè9 §g=µöqÂ.¼pš6>œæ•úž‰x9b×w(–k Ã»`”кÀý9ëf ŸH°çNÙ‘aø%Eàˆ[L¹¤+¶.CH[7ÊÔ%]LΧﴯzÞ‰¨…Î(%ruGI½¼» #ƒº5G£Zr¹ÕKLŽOŒÇ |´Ä`G¼Q,Pø û7ÐFtxTçùd‡ $Ü=˜ÐoÁ!1ú Áà®FLüå×_ï÷‹”ÙjJn°‘âjˆÓRò™ð=0pˆ§2WcE¦Šq£J2µ¯w½Y}íØ{¼)ø]`¤ôá|é4ó{ÞbÅ(²p͹S¬su ô516e÷ç{°1ùúëˆö»íû(x¨÷ö Ñþeaýå&ø§ÑPW(l‹ç9 Ï{ÿ´4kϬÈñ÷ .È_Œ·݉¬m õiO¸ó¾ñÍok<ŵµÑÞqý®õõs”|£ÜçzÚ»²˜+‰¦ÑÚˆ.ð³©u2ÕÔ1µÐF‹ÿ`ùÉrÚú¥½Þlü·oß·kðcs£]kµ7ÛåöV«|ïÛë¯yƒOÛíÍÖ%<ªÀ£¿û¥=zŸ47Z¨»ŸÃ½”{3®ÃœvZ“òeùIµpE¼þ{Îc¹½ ©¹f<¿A¶¼3Àäß3–t£½“gX:u:§Û~“¬Ü£–êÈ6@ìí™Ìߨ‰ç”öDÊE}Ka4'Á¶¶¤— ú¢Ìó›ù_à›}kªÿðX@ ¥y60ø/:·TϽY¾M½ŽÉ¥›’GÝ>]<_§Ø"NÔì.w¶Œ¢þ2¹ùfkcQME*ÐEiGpi: RäãˆgG%*Ûפª«¯;9HÖ0ܔәS†€1ævG~µìd¯Æpœü‡ãˆ3f`ªsÛ פ~Ò’Óè1 Q Õ_îó÷“nJ˜‘|˜M»¦‹‹a—›&”H㌣÷c.§×4M)'Ie'róÜËæÝÓߟlƒÐ]Íæ#©ñ;3E„'Ó1@‹¿kq>N±ÂÅ£§¨¦1}iž#INW] ØQÿR.î†ÙÜG’Lˆ6ÄÓù~wÕÕZËd`±,K ìÝSXòh|SwJ¢H5è[ÓIc4nØQÇ#¯@4í4åþ¹‘Šß=.H¦¸iv9¸ÔrÈ´Y …y¥ƒ¤_w2‰H}ºpÚº!üªù¥i n.miê¬i ´¾îVF㑤z¢°“#S²Ë›¨òÑä…©ï~ Cv‡È*†/½/)8s×ÿÀy¦ÍLŠÁ iðxMØðA2ê%ü`<ìw2µ|»iá=!§<ò 7ÙâÅ«j£ó?#Íã.–Hã iT"žC°;X¨¬ú×Áö|€—­?5 5SŽ~Ä…Ï‘‚OuHÌ„hçwÔ«ég\þ¤Ó¿u¯½à© änγÎ4¹L>ð›K­a–;>ÿ‡hf„xÈ"cŒÆšÄOŸØ¯F˜e. xâ–<„eôãyڡŸÀŒøTth@éÞ ÇÝþ.Ýúä½ùê= õ®8ð ÀhùÅîÝçg¸p¯]´AÄòû&Šê¤Ý ³È÷X¸d×þØaaX_ß$Ýw ôDÂË’áT¹6¼'eü@W°ÞPæŠ{µ8ÏO–dQv«C¦îÖ±›Rr ©Üå@8SÅ4¿~iÅ/\š— £j4~…©©ÄFGI®/ƜױEó'ƒŽfyâZ/±– ¡ú@ã¨o¥qq¹Ä½Ž¹gÚavë/—LyÈ`“,näÌO ÍrŒÔ°ŒŠ³¤’óqMøq/ïdÞªLJÓß UH$Äóê%§dJbHcJ¬•ÌKÉGä¾èó ”Í y€¢¼ow†”^táèýáx’Œ:tò+Î/òí2ç(áåPâ”yà¡¥OtP?Éëï6'º¥ƒY…»û_À3jçLMÆ~†š1R/¯BcƒIñ#E¯•/ºé £âÔÄ+kqÔ¸œ¡¨j ÒäÊf¦ž±!–a€‰1_U ÿJŸæ4VGdWNhëvˆ‚Ô¨ï1:Qåö"Ùp-WË%xé&Á›IS"ñõŒa(b¡ð fÍleqÀMèÀ S%|Dd‰I4á³;߀Â)ÿåøÕÙËWg‰Ã¦!ö5(š›™ [ø · <\£%› R;ÞãβôyEnbŒý†-Ødž‘¶'ï Œ³Þr‰RUñèÇÖ@3vQâŸPìLp”¬\‹¡“¾¤ >&’>AßÜ ¸cèÀÂSêY < ÓÃQ½>‡ËýPmnB_ûÖ)h^ÎL øC^‹ ³®(‡æˆHGÉMÉ j|¡·<•™'<Ä\×”ìŸêëÎÐ!Jçç6ØxQ(;ÕTx@êVÈ_Ü‚ÿ°»t¸Ü&Êø90£},ÚYÎù5!ŽâΈòG ·’šÍ&}æìfçáô^Ö€æÅ7PnÕƒEÒ§¶Ñû–Xøý^iÎâMS9ô%?á·<K–Ãû瘀þ< TaÎDªZ Ლþ€öê”çxg–¤“Àöÿ¡"9:Äc „ê¤ÌvD§´Eã4í^wH³9Š¾ö”vvØ‘òv˜Ø^Z|Ígah!hg¿½<Ü÷ú T€åuG´ÌA#{^^ŒG ¿Ó,vØOÄð€f1–ûí’AõñySÍ,?Pù!‚‰{[šCðŠ)™·×Ì`¶²O¥’Ám#ÛÙ)›Ì˜xóbJyvÂkJ{H¹©“–+nÛaؤ‘Ãp2…Œ²—æx®EÇèf¦çpHŠùšïFýémc: ÆT€èÀ#¬ããáÇêôXæ\D‘£h!M–¯‡ã­±Þn¹´TË›ÖÚG!^æ¶\ñÜ=tÔ†k°({# ç-åºèÅ;èÔßOý‰T?%WðÈöN¬ù.ãó¹W: Êh-äöŒòÝòÿ¹úø¥­(Úk\¡‚•îå_I>„’³³äª¹QÑâæjæ‰í¯ÛíÖ´Ó¾Þküg·ñÛ›m~R äÃ,PÉ]Ó '¤A‘¬n†8O„SR5•ü09r¦È5Ü"¶"KŽF–QÓ·ƒŽú 3ÏAÂÃáÃ' ñañFñ™¿céÕTóØð¤V\ŽhÉ(»ŒÄ•© »øÐë±Õ,ÓkLSI0.Ьå53C.ÖAå÷›£}² ³kYÔþ5§÷e|3|ø"Üo–­Ãm.…¾(“iptQÖíx‰FD•òxP…à«sUK¬fFÂü¶4Ïú´ªe‡­¸RÍv¡F/òÛ $GbR¢…~2ÞÍÀ›t8ç|„dÂBnÇx»6ˆtZ÷ X´ña÷y–»iFEc¤¾ÍÅ|†ÅaÊ¥œ 6ì¸Ê± dZL"ÊéªÉž¹.%M.º¤Ú÷fˆvö†ØÙa~¾Ý¹+3ZsBþ­ )KlÚT¤²Â¶ÐÈonå¥Ü/XCוi”xê¢/Õ#å.|ÒP6ÀCT_#hyòœ—Ì.8˜œÝIÂØÙV€–^&ôÖMF\²•™2w1âœNìçp-pÿ(¨š¢à,—ôòtŸòt`³«Ö¤̓‚Pzh°*°á`‹£!ÌÿpÊûŒ8KÔáÉáÏBsÉýiJÒV5Žö^<ÛިǧgÛ=Ò8zq¼½aºÁBm$ô1KÔpÁ}”€¹¹˜9pfÌ'lÍ£˜“Æ‘.ãÙ©7ô×Æö†±©£Wç²×kYÝîhÜBÕî`:ø€l˜ýeÓVeUB¯í¬Õ5øG8(kÔfÓÁ„%–ÆQU«Füð$M¿­)‹i0H»ÍÀöïáö4ùu> ˆ ï9Of7I2Šª#‰ƒªlVãeü>±¿Ä¥‘: ¿e¥®áñé?ü¦<¾ÇüRét<ž®©\²rZð‘ ²ÞŒ( ã®/f»yï¡óm¯:¬WŠ%©’«Àäfô²]Q8öŽªMìì¬øªŠÈ*ŽÅ0f]<õ`OžáxçÆ­0&ÇOËJ‹\29ÈëŠP•ýit"”‘Š÷À˜Í}^„Ô2i2}ŸhKNL>BL˜Ao8ïcŒ™¤ŠÓ• Ø"æÃÁT´ðd·ØJâ1ý…Íq úòµëý†]ã9p¶´âs¼ogÄ^ý¶r°ÿã±â•8WÓL«²Ñ‚VÕ·lÛAµ]5ùÆÛøý¶–¶·k§6PI2Ð:Í"î)öÁµll»žÅS°íV›‰mçX‹Éçp£æ^°Ãž½TͯóîÚŒÅï{}žŒSw³åñUwðn®ò;Ý© ºçz=¦–WtŒöñ^#Ôõw½›Fé¼wU[`Bt{àH#äH[áÀ°…@ tÍÓ$q~íO»—ãÑÅðÖ€j„ýÒNõɘîr%0§^ÔŸ'\?çŠjA|Š(ó“&9‚—ŽûflÇÝl¾~¼¹õÆÌåDZlð¦s¶a ¨Â柲çºÃJeÔð†q[Ϭ»x'ÓÞø›æÖû?ê\á÷?¾ÿ“…Ø>Šià˜Þéôf·“ä“€xòþÛæÖüÆà3>1ãc!‘X¼þ~ |õâðggF"7£æ9™ÎRÞEUo<Åk“™;ÁÉÕÑ•êíZà=`ÎL¬Ã~Õ™æœéðH.ºæb+ŒÌÆ  ðÖ˜ð‰ietõVA‹à5&(ÿ–+ rj{'¾œ~)jHÞ¹ÐRw Ū5©œ„Ûvá·É0ÂX¨7TOÌ0.d‰ïÞb€ð*û_múè 1§]Ê ˆàôŒ.‡9"õ”Ñ’๠ÏxB‡‘ÇÅÞ”e’äkodñ &·Àœ$m»ÔdxG_Þ5ÂÜ5òS͇sVÑÃà^‰Ù_Õ§Í1ʲ¢ ‚)^Ëq¸k¼ãŸîÕ&ÁШÁ?5Іì&wt×0ï/Á¯'w ýÿû`â_¿¦×“Ý>H„g-#X¦Ž|¶aaG–M\À/\ƒÔ0è˜c’uswô17.º 2KÌ‚~uC ¿³Ÿ|6Ó8'…L' æ”%þªÛ{‡ÁR~$†H.F"ûõZcü=î¢R—¥U2Ð8­a^#òè!vUXämjUzÆǼê¬,NƒËÑÇÅ> qö#JNM pBˆWÕàÉ_…ÀWÆë@¿„%¨áFP¡Š-B–ÿç}DDÀ>)ú¤Æ*¡oεd5H™ft[ÔÚ7|tmZôüZÔXLXÜ)hx¢>,l•£Ë¨6Nª®.Êô¡¼ÿ…ù]G“ãLeWf¢BÍsñ•Q4-W þt›\F’÷ a,‹êWh3"îL6±0L8¿KŠ—wøç'¦f¸±~ãÃñ½í úC¡ÿVÔtI¼KÎÌ4<`ÉÌIHw®EO1DKŧ^ÐM¦š~ÚôMÍÔ.9TàíÁ: r#@šÃ\‹øÛ™Iâç7”øžÝ|ߢÊÝ,n¦c`o" ³•&5SèbŠnJƒ?\0¹é+¬Ó‡vïðç"P;w>Æ49á\Åšr140ºK7‰B½–´ç@°à /F¬xL¶‘ª·upC#¹­êÕsI<÷ˆ‡xG ”+‘«Ààš>=݉à¯Ý:ôŒ¾›ÈFêT(½0:kÂéÃ÷ýƉrÏäȵ2s²8c©uqáÇìVáÏ4«(T!œ\¸ à>üï÷›áçþa߇¼åÑÆýìØÞW’/~6Öpnο5Þßš«»B‘ÐظN/;\Iwœ^D½žá«ñ¹¢X~`T©0$*»ðµè)AH<×E)³o¼°Ð'ˆšèÍIšFj¼mçù§oë0©Á$}ý¸ñïoÄjD53þô-Êø”èÚð´§Ï ÊØN¦ô1ýµaÒ£rབ/O—ôñÔ]´}àÚ¤» '2e;ùúÉtðõ“'NvŽüø2g"¿ndóGj+Jsn>?üáyÎ÷׸†Ùëoÿø†~øöâžlÞ`àˆÉŸ;|¶¿oûxÚ"6ÆûCOP÷g«[5[Z@ªÁ‹”EÛÕ&1›»Ñèa]MÊËݸ€]Aƹ±wþHÙ%r'órK þ@ŠÒÉx„&H²g›g B‡í_Ž§³!^圦Ÿµ¨‘÷ÝCä´½¨~ÂíëÂ1Ĉ«²ýàÁ}‰] gcú÷æj<™ÒOÀ5øÄ6&Ãù%P_\>i“šà®¿uý9¤³>°aþjxªQïkÌPM¦>\= õÐSþ§oï졺óÎÇbúEô;DÜ;ÄÛ;@?øtãÎ(0•î &Ý5&ðÿË;»¡wÎ~Þ5žnÜý›Op E§Çcxq ÿœîLw9Pº3 °¼ËçP.¯%ª“¼¶…”‡z{¦…pë—ªžb`ÊâaÏ>+-†(R}ý… âÐó&ú˲ðà¹boqw…êËø½ ÇÒÁÂø™O‹œY)fÆs.g=}ˬ?É ›Qq4ˆ›YèG.Ž·‹#gl“ÂЙœ&®ø mÙKƒg$ÄàAîÚ‹½µ;k/Z·Ýûðغ™†Ï< ‚óKЬ:£!¾-ÅqÈÿÌH™ŒÏ—ï.HðÐ0™‡…/ ”Y›ã/ïDÄ:k‚erÂõs½öM„‡P¡µµrâeÜ€ì%3ŸƒÕ«…ÌèÊ cfB(¬”ðYQ3N×nO­l4íò«fÙy©££ó1ze†"F7GFÁ«»aµK |•Ì=bš%)µ:¬›,õÈñkž‚æç+€l‚4CÚ8¼0o¬K²t6˜Íƒ¢6c‹ÍÔ’“äÆåè¿œ¹Û0A#Ç+à‰MºSªîˆVŒrúÈä,i»Ù€˜Þ\%CApEÕŠÄo¨g­šo½ü>천¾»}xÊIreOŠÂHö··°]ü…I‹¿º$¼2h‘#“lˆ6OÝèÍû8AºH'šAEÜ4·éƒ¹ýlþ:LZ'W[cy0þ_Æj;Wä—릃JßÝŠüæßàk2@v`û| ®™,xŽïl„¦c¶ùߺ;A/¼dŽí·mv1Ũ!ÿÃvµï¢6¹œ¶«ik»µ.ÛÕ6ç~tÊEe{-;HÍߦÌаÈìc%¼Oû½úy9‡-‘½RÎÄnY‡‹\E˜ÛßlÜ!ŒTÚ©ôÐâ^é}^×î·.R¬I-— 7x×´c_¿ƒ§¤_ðz5¯ÙÏÿ ]ýHꦶN¦`q!Õh׊HÈíxÎáGªÁÆh›s1ò³&…´‰¨^Þåƒg[ Ç”|J5;NÃó8­ºÎ÷{ç1–£ÄVÈÝ¢”xÉE8å0ÝEZ²²YöÓoK‘“U¦¡OÉIe8äê,œŽ ²ÞËç·RåXÿϲ›wÊÙhNó¢Á@½$ZOš—ͨ1ìÂçøoÍ$®ä!èËhNn9åØ'â`ßéÏ'ÈÓ¥^ò5 ¹s½ý¥#òp)§†È4Œ³ñùçÜo‚ü~JËpÜ] Ämó)Áœî2\DÄó®eeè{_™Œ±lè$urØ¡W)ÞèÖ×=QÄöYÐtb:Þé;ŽRî«‹šIn†«1@À>¤|ã¤1ÝH¸Úú±8UE«5m e‡¡ýÚ 6ÔtØ1‹7ii½ Fq{r—c—¡–TAohã>‡˜áuµ?¼ŽEM„#z_ªõ3@®éõí%2%7z"{·ïyî=„ *[ÄÀÝјҊ'Äß$Õ©MÓ‡>i®=É&Âv6l1ŸéŒx׫~F³‚oØ݇0Ù÷.ìâ²nú­‡I)84Bk,ùÕîƘ:2B ­/kû€³²VT|ªX‰ÅC™Š´Ô„ ² ðEaOæ慠ØVå0¢ÌZ¶y€œ´ljÔ½…4HP2,Ÿ}PÓ_8Y2Ös0‰¤ù›HÚ‡UŠsægáfožÈýȾ±× MÌBOg’;´›Kí]Û!}¤­œbtTJ{¢dŸîh.<a¦y'ö‘Q§q„|2åj¤*utLé é_3I’ ¹^‚|¹«'PÎ —B×iêFÔY3aÍt)R¾PòÑ¿¡ä÷œq-±g(åµU—~rp¢ä¹„²£÷ÅàNèÃ>O’éðְܺ³ÛÅ·bÉo«‘nQÅyj|-´•ûÒÒ €†-(Ô Q´Nø³„<ªŽXòˆ™CÿthblòîLMoʨƒ¹J)œ:’þåLsSµ6/fßcϵȃY=zrðòèð‡ÓGc—¾3.¸ìÑY„NpaÉjLh0žÞ ¢X§Ìªôá“À”±À @†j­E‡äL*g×m\6ÃÛB/«¬êŠ8™’¥³ç. ’Ø-Ò̸DMÒʲ³ë“Å×%ú.¢™£ãﯨ8`oÈ®˜)å‰t…Ù#â.X”•^]ÞMÿð3jU Æ:™Y¢Š›ÛÄuËwºY”¥¥€ùt3µÈ饿Cl.ÂG¡æ¤ßËG?ƒ­F¥I¨ä‹e(Å‚3[¶nä-¸ÑS±v>Òôýꬭ˥/Ùñɱ>ÕYz¸¥+²D7xc2Ç—µý |•§A/t`PÜ-­"n”V+ Ø&d}xl‰‹Ð%›~•-Nüw˜”…cSýõ|å-Èháèšø*w±Ù„ýÕF6†B“ª·Ä¢‘p(S ]@‡êo·ÀÑzå9Ã/Ýv'Â)õSÄ‘,7O§Ë')â÷QžfIôbî£á> #°$/†•ufP‡N›VXB›aÖî wö šÀ6»ö Î¥C!q~s…ˆ °k¤ rܨŠ+t? |¸¸Éæ éœn¥ýÖK¦J„oÛÍIèÑB²\p¡€h«(Wœþ‹R2}í›(•’ºž9Þ‚É–[á ×s¢Cù=$ÑÏt>B··VÅí’ݽêÚ•S•¤?–Êè¢ íSJ<:³·¨PãFžf}Å)6l½r3â¾sõ†´‹7ÌñQš„û)Ì:TB…³~JÑ|¼kSÖ‡O½ 3e=®8_Ð9±=2’r9ÇáneH?óÖº©G~® ‡1‡ç:}É<þ$JJœ†D!DÝ÷ÝÁ]Z5Å©‡b9*`¢Ç1ü¿©™N‡ÝBÛ´4À3C­ZîÄ‚<·+]Ÿ%σv¥ÔœŒ‡\¢Ù<·ÙÏ2CäÓg<9 ÛOöe짿 ðÒSú˦&wØC7OyÖ5CÅ„’“&ɵÚó)Àƒ¹›‡ó7çp‚z ¶æËïŒKf³7=©ÓpB7ÜLÿê|â2þa6j®pj•€%Õ®‚)¾Œx”Í¡ð‰˜rŠGYN±Pö.Jè”qÄÉ2f+x[¨žQ”Š.^ø°*},=>ÜôlißF7ô }»TâŸA•Œ+æ¿þ.zŠhGÊ9ZUʱú xz”²‡É᜼“P,ú—ÙÕÂHæÏ…Ýò´f|E>ÇÒ¢é\T³,6†”™¨ùhðëÜsh.϶ë/̶ëäÓ ³í.FøLfSvC+„–QâÑ–‡»´nt«œÿe'4{ƒ.¡ÍkÑ‘© eªwJeÉ”‘¼ÂhQAa„cÂ,‚¡Çj·b/¯¤ª|…ºPt¹A¹ékíHûåL¡Pì¹r]ìt‘ö+»í¦†(uzRѹNfWã>_ ×ÝwŽ¨BUvšEýùõõmþ‡;RE ›zŸKÎî·É‡ÉÔf¹ó¾£mx³µ×±ð5Öbá}g3ãú"߶ãÜÂΛÅ”}\›(ª<;9x ½æÌ%Ž¾Ìç×ïlÛ2Âtû#Úu8ÃG)Û2¿‚ŠÄNK3VÒ»BaKÒÆmllD?1uÜ6˜G®ß^uJãÒ½D*Av™Øï%¨4ìÊ(ë*–}…_-¿2E4Y0×3*™l*N“㥂u홄9ì{9äX}òèëNºçƒá`vkÊ.“}L×ÑÏÆ×]uW”üóTQÈïaè-y ZÝ|3Š~¸’Ù“ˆk_ÀáGœ5ÀïL€¯B¬xžIu)ùŒ÷9’Ø.%OÁÞü¾×J6ïqKF)FRbÇ# œ”³ˆ4ºÆ¼ÃAöIâäÂÿ@çŸnP†‘ª§VsBõG3u9Qæ.ÈÏi–×À¿úoÆ<¥" Ø b-ÌuD—ïõ%.(ëó\lSÌÐø†b‘©Š'AFN FQœRƒÃ˜'©‡Új¤CÌlè;f0òá­Û>rcŒ²NJžÝ?c5øç û™¹åOl‘hÌ´œ|Öú=ley'‡W{-—Ë%Ö¦ÚתäåÌ´¹õ÷Üp>‡\EUü°Š»6qɾ¥3U²?4Â2ˆoÈÄW.™­Ìª ÔB:5„¡@?¸@5ˆ&v2y¨~×1ºï’õÊ™—Bݪ¯X-ª“^2QHn ‚õ¢ûo ¿’­ ‰¼¬¯Žßý¾ÁD¾¸~ÔcvÃt€÷´ÓW2ú%‡¦8 ®ûG/9‰‹÷–rZQ*y¬.åÃiwøծįæhÙ Œ'õØæYm#jÄðCÓó‹Î™Ccл£®&›nA'6ÁnË™Y{ýõ/Qå ð­ö¦;µÖ%çÞ¥E£’r¼xNÖ‚£¬ùJ‰ï˜E/4öTªQLvçæ‘J…ª"tŽ'‰ñ#°.TE.ì7WwˉVpÌÑ– -©ÆÊš5ÀîD÷²¼d2›ñÙ@%i~&D#çKïÞ2íÊ\=mo q€$ †º§ãðàò ¼dš–Ë8Ðû¬ÕÆ»õ–‡Ó¾*½ãq¾:<þj fyWEva·TL´Û§hŒáÝOnfû1V;ºKÊ~‹oö}À=çEÚ‡—]@ 4žoëµ¢ãÐ *öÅŽé^!\»åÕóÍFþV9#ºœ–˜-×D¥pØÅn—ÉwÛ3 ¸qC…ÌÕ,5gExn²{ûÿxW—‹ šbá£oÆ#äVìÀB1½| äbYf;Û¼^1—·O©tN¾ Ó®lÇe“¨ô5ô¯€\P£…5RFˆî=$ft™7X”¥nZ›A‰qÞte€ü“¶í’- Ì1†û¹@®òspIW´ Ç+"#]á¨õ-íÀ‘·òĬ=!ºC °Á­Ó,†Z ™±É•9çÃYXM•èȧÉTmºFÃ9¾>(odÈgÁÉБbî_™J¦2vª|3_S Ê`}`€–WJBJ7Ã’4¤ðeG„nî‘W\g„~ö*x¸fš/ð {X±ê­çu„ÐÀ¸ÛÐIsRËüc#*/¯°Ñõàò }×”»×í¤5iièºÊ4ì.·¤’\*¯¢˜ô¾ †×‘ÃŽ’üÜ!J–]šÖÌùJÄg›–IIËP@8{ánM+‡D†  ¤l¤vX[¬ßt­Bf¦D öyö±c@rÚrs¿ÇÜ×ÂQ¸ ºêNû=àY:FµJë$F’+u!$}ê“ ¸"\PhµµÚØÉÉåÈ{+/ „ã¡@csÎò ê.¤`þë/<Î#˪v#‚}h§$ôª‚ä^¥ ›ª\ZäÕ¹âUls%,Ð2fO•w'{.¯`Œ5úH. ëî­3£®oפç”|¡KR\ÿ´Nÿ˜ÜÁ´ú—'GG*ul8©Úmžv©S³šÍ#®‡FÊ›ó„šh À S6ØnTeì³ÍßLüùh—øò5T’Ù‹oÈx€I_œ^¤êœIü2¸&ÞÁ¶›™JªÃØ~ÖÉJy3H“:®3+†O¾ehÁçh2•Z 5f5\W:ç·5SSV0#ê‹ ©OùÛ´½ü„·% ,š QM©¨LU*Y˜„léÉ£àâ&óéCCUÅÆŽ ëtnk X™³í‡¹3 ^¨™qÃYÒ©4*¤€+NSn)¢SÒ™ìðŒ"Ï+ö9Í»m‡$µ-ÈË%˜Õ©çéj½Wù>+j3„þš$öÓ™”«Ï@¶ƒTnš•›sœ'¸ ” \mxk¸LÝXbeÞ½ƒjRTw¡ÎÚ9Õš»X-è¹ÝŠ,R÷~ô˜ÏeÏUësÍ¢%y¹¬R‚´nž’#ã÷â»æ>È3W‰vÞ™ºVɤúïöB»¯ý8²!›‚éÇ"ؘô§§ï/™IÀ#ÜWÕ"õTîÃÛŒ(mÕ—jn†¯°ü­£ÀMUN¦ÞÙ¡_saÐ…=˜jÎùÞ™9.oXsN‹—dx‰ü5åt‘YS¦ ï¶(ŸŽÔ•!4´ƒI SQ{Q¸„ix¿rë\^çp\%+6ÞrE„‰è@–ÐñSz IQ¸¹Kè÷Mç…nÏy†~’I¦¬½ûè òçÁ&WãÈkÛ•—JE|hl¦”‘xàŒ_ÏcŠ[AÆ3§y÷áõ¯Wét@©_æÓ)ú—4¥/Š,ûÇX½µ©M】6ó‹‹Á‡ÝF…š†UqÆa^tÛ[[;‡†*tt33ÂI|]ÔB°ÅH«¥‰9ÈC2ªgf2ÑŒ©RUÅŭЂÛÄúÁGˆÜÈT±øö±4²®46ÁßèÞÿ ®'|T³[ f(ÅLeÀqºoRøK]˜ç8FíÄh| àE&—²Ì©äW³€lDTÀŸ£ñ-vìl<>2Ùd aËÚªÒs5ö:á+5áÍÀtåÙ=Š£jòa0‹*®f«Öðê$oÐòÕq;³²«’T°äcã[;Ù?n•å,&p9ë’e]{J ×Uyr‰×#/IÀw/ ùµ(¶²q—M¿m9Q¾Ñ´.E ÞŽ^ÿ² «?Ÿc$T}Ÿ ˆ7®¬ñUF¸É% ¶ÃWwuq÷ùwTü—–zëãä$(W~âA÷؇«lçeÞ ¢CMR¦8ìçLM³¤ózÍnÉ7g*ó”ðàºJN楒É-”aGò×UÔ‘5rÚ”E?0,:›À¦ÌÓÎQCÆ9ˆt<æ£q*(oÉ‹E{ªäŸ9èaÅÞý‹f’[)‚;õÇ,꘠íPµÑ¸8ˆ—)i­¨J]Hº¬ðÚì‚–u>]HíBPd†ÍìŠZ–|¨”Ý\aÃñ˜„Ý‹Á4uÜŒ{T÷T<£ÙÇÀ:ÏÍÆM'žÄ£¥d î²ãÚ»Ý$²êùKóg_‹|nÙjž-ˆ40ß gṙB8‡uâMXÿTÄ¡Ò NK_*˦ÉÛ°~QQÔH ã}‹ûÕÚu8Ãô dü8àÛü?îÊó’ïm‰Ü4óí0Û~Û+Éæ¦y8…íŦÀUuIþÕõ%ëì ØWûìuTÜIQ.ƒ›?§œ¹,ŸC0vøA©riT©¨‘R”°Õ*'IpÆè+¤)!¾ð©6ˆR*Òu¸H¢ß„ÉüjšYEÇrù‹ðÇätO“Ö‚Z$¦PE1ôjf˜lsj sB'ÔCn”Ý'R/•ÀA?Tk,½ULWzµ¸ó<†G+Lƒ=’S„>–æ8´XiVˆHYmÈCbÝýóëØæ^–ž­î"Û Já3KZUñÖÛsã;¦ü¤"…áw|­G—ó$ÅDìU`f/PLvÜù ‘ã3™€p¤>ÿásŸÈ{’”ÉÜ´Ÿv[å8Ø™+¢ ïFÞ]‘ßÍJ©;þY7–Íý±Zú–µèÇ„½÷»i:¿–Ä(æŽ/¢€*bÌ_HÕ¸±Ì8ÜÅ°‰‘³g`¾]Àt.ià ÄXÈ⦉€ðj»<ÙW‹4>¸‚xÙ‚ÖŽ›*?ÐiÓ|¶Äa33ª ~$š•‡ ¿Ë×Lj.j¼ÈÑx,:_|Uè}ºJ išqz.V°„¦Bã>¨H"VM\çZÖT !©H@µéÌ ñÑÚßUÍ ÅTà™qu‘˜Ûwã‹Ò±ö¢>ãZ ŽuY לé{×7CËmnš2 ÓâµÈM¡YÂò²•Iª2í÷Ëf+ó{ýü„e~Ÿ—³¬ç3w¢ôò/;(δ›R·3ÞhBw£ë²ãk.R,¥3ü[¬ q¶[ƒ˜ª1# K63J;ƒLjn©!Dø7á:mƒœŽ Ì„Wÿ…Ÿj¬8eeˆ_® ¬ê’Y­ÊÍŒÄBzºËáø¤\nß™ &Ž†Dtuv?Žo°ŒTwô†D›L«\X8ÁÊÈt?«1J¦ä§‚C£‰D™jŠu‰G©Ž®)ïF•`=ß°Dœ˜RórÀð~w&Ø?ºØúŒQt:–IËÎR™èçi2N+ÈòGÃÓÌž½xÃeÛÎüºÀØp=ª>Åýa™²¼ätRÉ©Ü/Nâö,™Ý剚wúµ Æ3ç㬦$Lv¾j˜QÔïL7ŸDøì¶|úöç²—U§ˆ»ðMÄa2ŸÐ—/+>[‹®…˜¶sÖ™õæÕrõƉ`ªÊZx…Å´Ò†áøüçhóø1¦.Îúkøf§ÀÍ‚óåVL)9ž^:Þ’¦~²xYÈ Óò:ÄÚYøÅÞ¾£I9’bßÜð¡³}ÅíÅQI,b?'pÈÞÕ~m,÷üº8R˜ ߧ@ÇÂP€µ¨ÙlI¡JÐYœú¤ø‘O J£N"ïÏjá'QöσâPL­uý£ƒfgŽ‚O,Ò|¡àŠÑ.Tÿ$w½…+Ôt{XXƲ„æ\1w•°(ŸÞí ìø QùÅoáûdê°§Ø`’4{¡´¡„´|–? Ûô6]Çà¼1¶ë±³Iîkÿéý×H3Òز5÷nã™9’Ž¤£#£ópcÞ˜ƒ˜/Œ¢Rs@ãÜ)I@k~…q·¨p R z iš½©DÑ’„FZã8™yƒÞ³CoÈ<ë¹$àR3Zîkä/nT+ÚuÜYEhf,‚1·a¼VBôôÑÅø?Є@B«u§‰<»£Ü¸â)¬ó¡y“ЕG5ët.J鸋a5qí}1ž@g>`m,½ÂuLÐh­æà ñ£.÷ÈI7†ƒöù»D„Q@–¥×Õ_;+U3ÎOmÏÆJÐé‚,|iD/TbJÍNÍ<䥔4Îà^‹”®Ì5Ú¾Rï‚-¹£OÕüïçÆw¨,õ!¯ß#îŒ9d>‘HÜzßtP‘¿º€ ÌÀ= ¶-ð¶âß°Ó#òÕ<‘3Y£¾Äý ÆUø5ZD7gÛ€Fˆ1ĈT‡ñÂaqM¡œÖ&Á íÖ–¹s2[““+‡˜6MÑLv[z´[ÝÀÇIèvY9+GÇ´Bž*b ”ò²ÓáÎÖè°MÏÖôwI™#›C×­¯Ÿû„oéy+%õRF¦Ûƒ·½N SîYc(b%ŠË¹–ÁˆEâNâÎ…t3Ç$=|;M–%±–¬âjYjﾉªô¥yòÙXg ÷YTå£g²­E©d§ÆԦݽõaÒ¹Ù~ÌèMª¶qfuÇ!U‘þ¢çª‰ÙTfU°X*ÌgQéÈŒFÀ> ÝO¶_îBÄᚺNJ,À*ûB€Åâp-–år/P'_¼oÄã!:ú^ È/t*„݇«ß¸°îw]Zë °Rï¹Æ•Ôs€†`U³”GK ï%rl…¸.ñ%XôÀ9x‰çÍ2o†0Jì)Ô>S³÷â×BeÜu)ÒŠH1z!€ŠíDQÇpFQæ€r¿é¬!•:M× Š\¾8ñº\hàm区áô´â-Ä.Ι(‚šŸ¸§O)àÑÈAXž0µDA®X6(†r|¸IÚ"x(m—*9*غ#p‡®›¡,#âèªj¹RÚ^Ÿm²°Rx·ÔHŠGêãÙV˜¥}÷(þC+((ÔÉ® :ìØ<_¦¢yá*$I¾KR¾Û4§T Àï x¼ýzÉ`¸%ËuŒ,.ÐÀó'¾dæCªQàÐÍðciBMý„V„æ”#k­IÎ"‹(ÓòjXÔan¤ ˆ®©KOÉHÆÑí ²ûï½8ÙŒÈ $ª²vp\¢5ø?Hþ‡qIj‘—ÔºõÔèºÛ‘Ù‰®›]ˆ»jû!ê$z‘>¶,9ä9K (n·y7èˆ3]»º„é|ÀÓGRÕ56é,3 Eræ™™Y଑†´¤°¯…ÑÂL¸ä ÕŒÎ A ¨o ºA|”LH‰çqÁÁiPœPŽ#”…"}Õ`aHêê«v^­+¯ñû6tnkñ®Ò ”„4T7.ª,úЋÞa¸èjÂk%Ô*˜ᑦy8^17]EtøP²ÅˆÞܼrj;£¦sdPñT‰¿ax%Ô‚˜…ô™†Úƒö˜‚c¥W\WIª&ì¶ÙjZF/ hB'¢×lTiÝáMŸ'MÀÃzƒj4†»ìŽVéCk$œ÷»ÀÎÚ—¤ëM¸®@ýÞÝ~BàO½äâ Bó‰ìxqE5Ù¡ÑdÔÉ‹¾•ÏÐq¦|¡l 0ƒ¶—ä ’.&'Ú˜y5¨ÛÅ ŽÏ’VµIXà'þ@¶¾OvǟЇ¼b ¡âëhHAp[S„Ù‚¡H†½þh|§ã¡|ë €X£Ý=ÄÀ¬ŒÀ{\yOÝb-°Àõ&+ǵ†(<Ò+JZ Ó¸y~Åż۠ñLèí7ã;"ƒ_b@žkŸ~¯Wÿçúßß×ôŸÖg÷KüOEÉõD÷ГäΫãã݃SrhdÍ Aâ õºÝø’ð¼÷˜ò‚ȃ²ý@ºDù–¸á§=´lec¸h×W™ißwÿ¹w²wx@:ϸ“Þ3œiÇ·Þ%}&Íθ»"( ´]Žª—ð“Ñ)ï¤Q%­]¢ÏÅ€^}¨Û < ì9f«J¡ç)t‚%ÜivÎGpE; YÈts.)Áèï!ì&[b‹77#Ü4Pñ±Àbar³dr‚؇=†ÞϯÞmŽƒ‰"ö6Ñ*;áµX5Ì\£EÓŠ›ì¾7+úYD7ú­šËþÒøg5(U[T÷¢ÑsìZDŽóÜ-«ý[ãQËàî¹#ž@d_BßFȉ‘«7²÷ˆqç\Ž}̹´\ƒXviõ¡éû톒Ý+ó!`M¹ÚÑI·à¬^¯AÖ]>ôúQˆ[ %³´w·yIFÛb¶¬uàVÇ*ݲÅê;¿[`+NÊÁ€0å0UQW«W_âµ¾´šÈI, "QÎ2ѧH?fþF©#O:£™sÅ›i,mp|=R3ugˆÄ̃x¤tAÎ2Ó>n‰oêu`Š&8trÙ6s’lMhΫÄÄHg›ú"cþ/¾µ$â¼ÉÄ7 ÁNŒl™0õzý-mž?\©'ÎÈgÑD‰•å¥«:¶âDÀ¸#iÜyVË£L5b?)6ŽbÂínÈÏš;Áƒè'j–†"2è[‰hIz¦`·ò :GKµ¥šJàB¬Hï©E‚"VE‘Ö‚ä´ÛÝÓA"ýU¦Ö”Â.R­)Sæšý2ŒÃHWéñPî%ÖÚšA£xm$CYs³8Ð÷FóU3•ÎòUÞc¾VSOÄç"Œ[JÜ…·¦n`çÄW ¨—¢A“åhâš[‰’6èôø•ÙLOÛeá×¥•üÿóÓèïµG¨ÌâÙk¾TGÔU¹àyE q„Ø¢1 D0P¶ãž±¤m!Kå´øÝAÇpCOÉâ³PÛqk…©©ÀPCämFLEZ3rIMnZÝ*7T~úÏØë”ã=³ £ñòñæÂå5Ba¸~YTRŒ¯Ú¡+õŸ#ð)Í ©n€§ZqÁ↰ôÜR•AÒ‰ä×µÚšM!b*ð‚uN;O¨bz~Phšµ ’ZˆŒ´ÚdÑ‹+nš}eÈ®@^…T8pǨÜgð¬õø#¸âBWΖŽ¶:V\ð£HÜó¡üÊ#àýĨK¨«ÝK¢g”{Òâ­Æ2±”@SvmÐí:)så ^\ ¤0fv¤EjÅI}°´‹¾6¸6 Ë£#3f¸£§B›·šKüRÓÒ2؃Ÿ>Y~½ªD½­d¶„¸I»£©%°oÖ™Š"ÛHo-v{Æ+JæÕ#ö†Û$@û›ë$wÐeõçFÉæ'$®7IIàÂ䱬Þ)’*˜5B²€5ø{˼wÎ G,Vì€ôN,¡ê…3wciÌéíÝG€[ByŒw‹¨Û-jlL¥Q Œ£½~ÇKF—V Ö«[p·sÝW^pß ã‚î!„ŸGË1jU®â‡ÊhûÒÊ¿×ÃpüD~_ž35®fNh^*!Ÿ"×-áC÷7¾Ô”Pòšdúl÷F ú}qûéÏ.’lú裲‹“ÕØUT‰ú­ÿðMCœ ç@™;hA‰C¡ýTO)Z–S£%L9éf@ +Õ]—7®é«þР ?¿ü<ˆÞ¨À©TÜ)‡Š][½æü:çê[3U¢÷Âhzy…LïOÍn‚6HµN­²uÔØo²H…¸l©mˆt^’k•ŽÖö¹ÇRyõ odqµµ çåõ‚쯟½µŒæn§}Ý⺣y¹êtÀ©}&„O»`%å;.3´`úº¨hö§íäoÌYîoÑß.ËoEUÜ/IT!­¯•¢Õ}WaÍäT­D‹ÒäQ•,kv¬[Mˆ$`÷®ž»7,Ѻ˜±[KAêºFyÆAÙ™ „¾ç¼Œù¤÷;D’Q|Ø•©ð"üFõxÑV\Åš%0/ŠÊ!ÜQQµˆ-žG—t8 µû‹é€ã ÕˆYéÚÝÒØ’EY™æ£Ò<ó¤ÅMCØ(«ÊÒtY±ðæF÷J)ݾ[I•ÌkSì¸U£zcR$𢰄ljPLµ­# Ús‚ÖUi.mØJk¶ÔÎ>ë¸1j ¢½:«&”Îëo€©“¶öÍìšélrÕ‡U%¡y’IeÈCÿãuþ»—ˆŸgq/¡¿iâöúªÙ~7zX‘åà"„çF£G²æùp„ö4xZ¤¤ho&èbSùZìHµƒ«f?éµnx3Tò¬C …õ?DkÇ *ÚU‚±½\;¡ç„Gl:‰dÛVõ¥-›uãáYÒ’=¥'r¯Ÿ,cRÓyNToÕ¬A¤N«FdÛ6¸CŽãVͬ–$TÊ:É4ê¢Ïƒæe¯{ѹQE‡œg;£VLÛdÂõ(á¾aðvþÓ¤Zä™/D†ŠóÞ“÷ßÉvÀ)01ÌÞsP¤ê‚ĵuÈŒ¡æ»à<©É1dcìò ãÁ0¡ýaÓǦ¸#°K6rV§™€ä|êºá zÎââü²ÐœôƉÓ&Y3Ýøœd2šaöŠ£†Åçù %=U œ;?!“ËåQ‹ÄëMv½A>®e$ãCË5än€ÝÙ‹)+¬†ñ{Ïøì5{R.zÙñÌî‚Ùk¦ÿ"§ˆ¥k¤?äÁd´ày×b³šùäuÀiomGÞAyþ™)Bàú|Æ«h¹ ÿ\^÷ŸT˜Rˆ²Ôý {PœNÚ4(ð‡öy ða¢þ(ºk\es• uwgŽe­AL^ |’PÎW½Èt“fäžÜò¹¢ŠåRý¥Å’#¨í‚{-u ’MjJrÊkôFã…N{8ì€_pû=tèט}dݦ Т”¬©œçÅcŒCHÚ'“ÃBXrïd~}ÝK.EßÀ?Qwȧ’™ÒÁŒB0/+ÊBÞ‚îÜy3ÅÄI4þ!9jd«}‰A¦ÛCfy"ÏÉ±à†ŒbL¤#š¾2ÁÜnžš6ªgäœmÖMÕÞ›/:è'”߈”d2>è©Ì¦ã˜Õ‘X¦°…éiÝåÈé¦Ñ¢›ê9Zƒ›Æ`Ô…såâñK8Ø\ÀÐÕÎé.>Œ~PÞEß¿{øUo„F®I'–+ÑG°ö ºÑÚfô¹Ä¾gÕÍïŸîìà_ìoÿ|U{BmrÑ’Ížô AåÊ­·ä·+Cjµ•C–˜m5fVÝO Â0Nxñeû®84–ê¡©ϳò2¯È$•—Äê³(b *Ή©C…\Üñî-[jtp=/‰Ãq!,ס˜Ñ¸n e&öR2Æ“^V±pÖ«ÙäÉЪPQý¾ÇýH|‚"ÊÑFT®=Ôê+¿ÅÛ¸µtD¯¬ñ‘ ÃF³u%±31[x, ‘t¼nžŸÇý!º¨«¾ íZY©wºˆ§‰¸H(â=0èn–©%†ÓõñÌÑÍHåãQ«Ý˜dƒ‘æ£ÛnÑhé Äü®F²IÑò!+nï.ã! ÌëAyD)# ’ä#nºÊŠl$uý¢]Tð³Ð -~\¡É ØxéÚ!›(‹Äœ4;ïÙ-#‹¢¤MÄ ¸"Üà_µÃÖ6”¸a¢Ý­h{Ö|4{ÓXØ3Ú*;so éãwÞíŽÓüÛ‹ƒ+<\pqÁÇEX37/ææ“ñsOŽnçéSáê^£ªpvo׸û”ùû­qø[àñÓ 8o«q2>XÖi«Óf¯óy^¯‡Ôc£A5iŠùš°kA hCM)ýÈ Â{Å=|piHørIÏÛxM“Ûp2 uÿF^Oâȃà0Hq±w›µ‰¼ 0:"Ž*1Λ5†ÍñBºß˜uÁúƒ§Ù1™6Í,©Y]ìº ¨Ì8JRñppЧ¼³R@€*”ðË6KcbXº¾)³€Ë’ôRq‹³)«/20¬ÅzDCBÒ´àè¨ÚЃýÚÂÉ(0, LGÞ“:¶W^FÜFæx‡ÛTOÁ{_î¾{žè ßúÜÓ¨tŒ ØÓ–“Ó•0€&ôáu,ƒv@­.eÆ!çƒEH‚×[o©÷Y蟮Ø-°Ë´j™u½U‰Z™ÔŸÑ5 ÍèfÝŒ;"„ñÔÅãÖÛ䊡¢j_y Ƀœy︘Ü$ôË+kÐ@ËqÉDHÛ‹6‰‚ ûÒï AÉÓd¶.o;„vÚâr¯Uÿx­Ëk{~ÀX4*SöòµrîwºXGƒ¯P½J-@ñƒèEMc’Þåài“$IZ¯vö!Ú´¬³¬¶­§)Žª?DÖäÄ ªu‚ŽTQáƒj3²[€!Ê*D³®(sVšªG)C:ä$¡qÑÕvºŒkšlíç7çv¸Qúõ@ê iJ¬ýJ•ê¸e‹+…±-¦Y>ïô´ÿhÛq4±Á¥ l‡ –%[Ó2ÄooˆAÉåЊOŠnõŠŽ¾9òlè'h‰¥ FTôŒ{ºZ{S³º qMyœmYò¹Œxä ¦¬r²ùI\ÆsLEÛŸ~ÿ©cñÓ§¥·e¥š,bAHFll¤>ÅKa:ç×­RÒjÞX)‘ñªúÚŸü µ«Ñ8!7¨±!_ðcí *g_@õi´nR7ëÌcÀñÓ3v,³gíƃ%r>q†ÇC0¨©©y/»›¥g7Þž‘üfj'ù©žá§yzOŸÛ÷ð<~μwcm,E>E ÏA­¤‡Í¨öË%#ó9£|e÷Pfê5w§\ÙA‰vIÓ„íA¶ÇÌШ۪E˵Z ÝÙ¡9¤Wl¥RV·[gÝpGÑeiúè<ŠFàÍ9=\ƒ\ƒY–Q% ÁØTP¨ÑÐxøÇ*nmpÂϺîÍJÌÒ PÝW#Gäɼ©s¡-ì©ûgøgx5ÀÈ•,cÔQãçf¹á0@ø}7ô謞ŸžÿkOÏÓ;hfŸå\縀\ú¡WcLl¬J¹=P‘šä1}¤ºÓ–å°È É è»,Ýaq{AùQ¹ÄvYË2±o´«ž'ÕÈFvV÷Ýù®;ßu'Þu‘b#F¿w¶ñjXüWì½84Ÿ"îäõ‰a¦Ù”Ð0¹¦•°áTJ4`)´¸ºJögòó÷ýã?~ÿWôÇÃÕULÝ0ùƦ_¥v7õéóåª~ ÓÌäPNé‹m&l ·ØÕ%‘ÃÙÚ]å­bËüi±ýéSù­M'H J1n°øû×oÞDp"Yg¥kW7Ž¼rôªêQÁÑÉ´*B˜s5·C¡&OÜ­‰‡IçÉœk–lØÅÚ $EC¥ËDÓ†!™¬zÉó¼Ó¤—’™ÕÓððl[àU¦v {0!ú[q(ÖÍƸaÕ¢4“X‹ªå™0OÛZTíÔxÃÙTù™£©*ÿR#ÍšR5xÐYLG×2®'s€eåjÒ£ÁÝÍ&nPé‘Q}‘1¬Âî–YÑZý(L¤¢ü&ËN íX„·åMż)fn‚Ð1q=ı1R„º5GÜQÀdäÇü‡ûñàÚpdçÖÉ)gvK&1­¸áÌ®›ÞQ["xÖÉè,¶‡#F3| ZœldœÕKúî½d¢o¾aí;¡u±¯ˆ )ÞèH“=ce©Kt΄KŽ¡†ÚÖp/EÔC©„)œ%ÛÓ3½ÊJU«·„Î$hÝ(ëªPÞgé­%ÊõÞ,ªo—6#š/)Ò:(Ç@Kßy©´¼ºžï™¹§âu ÁÌÅ;BÅÅΕ²œ¥‹W‹J%Ú‰÷ÊD°‘ŸØXˆg2Ú7eD´÷2òÏ|2áf«ÉRœãsbTk!™”ÉÃ*_K!¡ˆ$€Õ„Öù;sŒzâ–×%ú QìYó1€EÞ •÷´‰žžÔÀ Z– "^Õ‚«¬Æ“ÒX¼°:SB„(©åé°—i†:žÓf "ŠH{-‘j‡F.»¡ž¡ísÆoÏÚç4²˜VÊ#.M* ­³üZ–!Äý:2ÂUY˜ÇÈÐçGOuf°æ´O(©áµ”a6mÎû–ºœ`F’fÒJleÁ›³Á;“a4Ìf½G¦ £UMßèÑ© ,!‚JÐx•WvŽÖR¨SÌjAà\Mµ¦4¸Í”ÄTÏ]R並¨¿hØF—g§5chƒ7×Áá©pynF5R¯/kÑKLÖQ!™’µ•Þ"3VrÙSz·Õ6å „Ó¼T“Ç׋‰Q£:[2ì—¤[#j jŒ °¡š’ìVû Þ &SNÚ—j“ÌRGëþvl-2MÏ+[‘ºº2Ì›0leyl•²eG˜fP£TéöŽ"›…ŠŒ¹§“Ö˜ñ¦ý5뺯Ϻ‡«yDû›ÙMƒ$⾨±¢$ÃYhÝBÎH¡ïãÁdž)³P|£‹P¤¡.‰…Üi.q¯ßÊg ßîn 0s‚êègK®¤¥ÿ[’"YÇQÏBz¾$i@ÍsÑLXÙ%»d5±˜•ÝkŒ#×€¡Àí}W2]³Èü¨i…9¿X€NªE¦þ>z6åÅTÿ·H„dõñ=ØíRk°ÿÃéb9™èÇ.ØSŠlŸ®ÁàŠÔôáÑ:ø?&î á€ýlÐ~HÇ%ØÐIc°›Ã¾)Ks³a(ePú’<3©“ü’’fÄs3;šêöP:s±Ià©âej2EöGžƒ´^fyã®›cª¾’¶U|=ÕNUë›tå¢Ü ˆÜj>èr´Ûät÷#!²…ä]îUØÂÛºhªðº(–šYC´?#óÖ/|—…Áe«¨ÓdÌä(#ós?3ð÷ÌÑ•'åõmÙ8’fjÝkŽJvN¢±TS%ž®­^Ö«³ŸsÓeñà%¡xÈ‹ˆ˜@cZ1ð‹>û7®qu0„qŸµ7T1rb^fæoÑÚX—G>¹ðáW&GPý\âB=uø Î5$ðZ’ºáu6^Cìn´Y„n@BîZj°éá…ÈR½f o•Ø¥ÔœŠ40øµÚÜÈm 2?¡!DŠ›ƒÎÍ wô¡ gi µ g´(Üö"ìx?6£¦¨AO+Ø‘‹Öh¤hª<¤Ôjaé§=% 0‚lÐ0{:¢¶PKrŠ—ÔH£öÚÓç< ¤úËϧå%g/ÿi-®yÉr›6éì¡òLJÆÖô‹¶e©ÇkHøxÓåj¢*åª`xÓíÀàhÃaŸm}@lÝPUÕ§â|MqîÅ…)ö¨%y$T 1Ó“{€;[!‰…Ⱦe¸ðz«y=ß>Ýæ —)BL¡ï:|±Ú…4\*óÐ…„oº õ,%Kœ©$Ü*•¶&˵E=¥¯šàãUC³ 0Ö“¡ÅáR›§+ÆZ´ÝIÐúƒE”œ71,ò¨€m»f4,G‡Í(y¢¢÷ÚÝåzE: wÛç1Z7P+•dŸŽ z+àN$<–5#¨ A[„^Çøˆù=-­þ­ü£¼úuk3Y¡Þo–Þ¬ü?W’OÿzS_üô¦þfýÓÊRô½y€%K={*üeàœŠB„o"Aº»}‘G<¤“–e=5×0Í媘eRm ºö»ý6øM£kX½lT‹«7ŽéËRÕˆS/XN›ÒMD\#*eMª fÈäÃU øM™¼ŠiíhËóOat¿¤A·^¥A®2UÔÊK ©/Òà=#W^avÖ„[*îuøüpƒ™êAÚ°ëö˜ ÄL ¼j88°ªYiG·Êo×€¨=qd…6š¯EìÝUñ›²2v9ª4;Š½CÈœb¬2ÂùçqšÒxÔúЭ‚Û6Q_p:ŽÏ„iTž®V io­FMìÝ×Ô¹@HXÚ²‘4/bcT¾XçN»Ì²¿)Ût¯ÜXE¹Ìb*rŒ²ÛDÛœQŸk²F]ÓÖã†^mÓ;ÌêaÄï·†ïw-–Ï[óƒa@½ÄG®\þü ß‘#™Ð7k_+KX=ñ‹î<ïiyLyâ ¾ÃZ²\0Ã[}èKÔ}¸8OæùŽ•§g&³64ð ¨\ÞØ ð…E•2é¢«FgU¼5ó„9ðï¡¥„Ž— ¯ª…„½2µ—~‡R¬EU¾ˆÅW›†ËQä¨Eøn¨Ù@òäNîPÅ…Nö2ê·ãóBt°óKåO8HvZ¨’6¤E¦1ÛX¡©¯÷ U$çƒvŸìjìZ™»‘i¡¾š-i¬VlÜÌ“ì‘"®«’¬ûšŠ ±æB죎½ŒzXüM**Qw3P§3ƒPò†‡ë´ÖÇ G ¾ 0(˜¢s š$£ëXu÷cÒ^X%®šµÈ¯Ü ‰ (4=fuâAxfxžéÛ’áƒ%É@£0ÂÀÛ ËŽÇçä0Ã-±ØsM힦¤ºú?“žèĪcëȦn‹¢<}íŽL•V™P½U¯+ÇŸ£x„.mL é¶Aô‚³Ú’õQãÂ3e!x îuÏ›Ê3©œ¥~! ½I ä >½Ûª—R\R—<‡ø,‚¸€7×ewÔèè¶×¹ºÃN÷]Œ¶ë¡Ïc«œBªšnÁ‰i­$/÷öá‚­÷^Ä>§—¸Š€-BäKàLžEijAE“]Mh¹=É—o#Ë›<óé¹#õ[d¶yÀþJo²ƒŠ ¨–ĉ֢ ¨˜ª§A9Ðpnkv®Áy‚ W0x~“ãE˜¥n•5-²X=ªÆßé±Äh‹4ü-R?¿veù=úp éµ…&:§Vs”Vè±uŒÅ›eûM“–fŒZ˜'£³<|ºCÁSO$J±y—tty¡‰àlXŠY$ÔÀ÷ÿ²å7‹Êóÿ©ø¿7(ÑŠJÞ”Õ˜gòlá·ü¦ïh6k<–Xé2p­+'Ivúª6FÃX6köu£JK†ÒTWzfé íf‡>ˆu~%låŸ1ï,|×¥3*‹Ú ‚y„#«HS‹r”„‡ü€ÍéØ*hD‹zP‚3ÈÎΑµÝDVªo%4m!c3pCÞFšöÄdÄ)ŽÌTå£~ŠªâUåg´=°o~¶3áÖ3ö3‘Pÿiç d\LQ®0opœ£~†ð–‰ßH®S ­\Š±XùxSÎÂä$󹤪Ümg뜳NSIh_õ&ù±C÷¡ÌE¢è•iÜ!°Ù}>ËŽçiE- äXäB!yý9j“ã8µKä¼(q¼7hP3sFCeþ”q^³„®¶Ž¤ÕU-ˬ(a”«[‹?–Ðvà˜ÌTo;õÃtÄÚê‘(K5LYŽÎ[¦¡+OÌI¹!¢²¢ó=Õ¿ÒÛz©.cŠOúTŽ*t‡jE1ë1.‹†“Óú‚Í„[™Gž†Õ+ãg,:Uëçr˜ÌBÛÖ´!Ê6uGîIÍÒÌs"“yw*f´®)™>ðÓýäæ´¦)˜@0Ci—„õP1[Sˆ¬C[¸9DÀ¹Š™D¸‡`Šf’§Ñã†åt¦ïkâ&ƒÔJŠ¥¦´Àšn]ãy>ºõÛ¾t§cð Ú¥ÇÕÛ—û*‹ƒzO Gê=EËÊKŽ:îó;&^¿Ê¿‡u†@ò¹‰â]lö «.´X/PÓ¡c¦wšs7jÃμù̶Räë^3¶³ +4!ºrìéÂ…g 7Öex;o¤åöëÞÉõéY>nÙ¯ÁLìEŠ]_Ã/³’£%»ðBq‹¯eLý4ò‡&{(B=Ôö»RÚÓ€r‘”L’’GÄ^áH¤kˆDòÙi ¢I"(W«ÂËì-¨K2ÛZþ²¤q(v &ùB‰v0L‰&Ÿ¹}œ)Ž„tøÖMsN3MsäWÕ˜G€ê†;™[©•áûÞX[¢Ç/?Cäk¶ÂSbÏŸ‘Ý×{§“W;;»''‚aíPm æIàztô,–>Ä܇„FcfŽ¯|Eòn¨Tׇ2í'¦ô`ÙA›” Eøjÿ q¢5£9Pœ%èܽ‹¨ÊÇ‘îT™ÜÇS:Í ì‚bs±¦ÎÃöUÜ‿gû"«VÛig ³×—ú=Ìå¼ÂÒŽƒƒ_»r9á×ÌF̪ÍM*Û’¡«”,º.– ^ÝXâݨÙr;aœ¢4,cT^bA×–05ùe·±ØØÅìre‰‘öJýÔî²/ß@uð2#?0:ÙVg WýRu‰‡¥A{L(3<ã_føÑÝ—TeãÌÚŽjzß&B•«"æÞW˜€:YtRggéçÜ ©û ³u’³Uëô*ÜM½Kï“EˆZ$f–o"ØðE“ðïFŒÉ&ËDÒÉ—&â é2—XS,4c—ô›G¬“˜1Ï&)ÚЛ˜ÞzOX3“=!Äq#(hŒUÄ€yuŽÀbÏÉ1v¯#œ÷y'«ânhF²žCõ h=ùa(R¸äDs¬D”s¶NÌ)ÂYöW\ñ¿Á5´ÚD”ïâõkŽövVaœÉ¿<h¼D87ãjhhRY Uáã Á€_ˤè-{ÏŽ¨%ýÚŠ^ä’±"Ìýç_“ª£j‡ s4béQÛ-ÐWð²Õ_;tØ\FnÀ!®Oâi¬¡Ž3ª‘èè*Àã>“ô›çq÷äCG„ÙÊÝ­íÑ©}Áu¿‘Å+áL85‹ʥڛHD…pÔ¯¦üYù}Â0z\¦r gÿžža˜¥§úSV;”+K¨;ž˜\4¬\bQ§‘ÅànŠ‘N0NOWÆ„ì` 'š –¶ôT•åaEK,vä]aÕdx#®kŒå"l4öIN,1>Vßðpš‹«­Íˆ<’'üiFÿ õ-š£Í±7ç„G)GIv!Dשf« úžŠï›6Zµ’¡]`«G¯® O/ýŒÕ%ÝPì ‹Ñ˜\G§]<ÈZN¸&ÍøÌøÇiá#Hƒð¦v—€¶[‘¾ÁÁ ÓrcŒFÑ ’+é>€ hxTÒK )“A‘n°‰Ê(žbäüaóºŠC±A>pÈ£Î"š‚sd?[y§ŒcØ­ø¢ ¶äx΄ϚÈcšûBhë(uÁ¿ÃCŠÝŒ —Üt[¡`4Wñ³=z!€ôM:Ê"|ò0ks/?ÕÃ\WÑdY¤šŠ™ˆh‰ðéÝ’iÕ§skB"(§Œ¦wŠå™r§wŒMոȔmP ×J²L+Æ¿4=J6 ’yE<iH{`ù)ʬ^¿ýÓÆÞÁÞéòï´ÄDei…[µhNwG–;‹^Íš«Ço>³ìàê‘1À'_@;qd à‘ÍÒ1{/YD¤µt¥æ§€Z­'uטÉË z /ß dó?ân`C8€$Úùö[~?FXY£óa¢÷=À =í„N™Ëè‡Ç1ÄÎêkµÇ J Á–oš7_WMÁÎë×Ô-®yi(@(Ú_nïž¼n<ß=Ú?üíåîÁiãtûøçÝÓ*©xí³ˆ¥Hž`®ýQ±Ýpñyâí2„n­žµ»­FsØ€uP¶3‘[Nõq¥Áµ§»õEŽ.FŠAMt9Mš¼û£Ú@é Um®%fuÉ‹C˜Ë«äÇ RkÆz ¢Çz ,+´¤Y) ""tè– xoˆÞn°Z6do76*‘ÍéÞ:d$ê+ë›I²{ÙˆH8?d$|ÙwO.²;(Ð=µ®öˆØíŽÖk†éŽ2Wq§qá-÷®>gãs6~çl\aA~n/ïbì-†¡/pƒcèž*¦g¶®ÂNeæ"ÇáA³›`Ʊ¦ž»FÆ!Ç»0#:yMŠäìÔ/·DãƒWrS†µ™_|ª3ÔHhü~ªÑê`Ôf®íd¦!ÏŽŽ>Þ~ù¬L£CÊã8Øû!#ê‹à?eĪѦ º£M¬f(? ` à†ëÏQ{·¶6²4Zô´<Ù:ÒÚ­Ú2Q5Gà­;À¸%7J¶e´ €ø£Í‹ Œ˜ÉâõÎI$Øvo@¯I<ˉ‚ p FmÉ$äi3úŒÿoŽ„ˆÕˆØÀú+o‘ƒ#–’šzñ-W[Ëö6“Øî I—¡l-£EKYF¿(×­³rp{ÛÿÐz›*X)§ [4šjÆ„PEi Ëo-  TÉyf„©-Ð8ZN¨/œZ¢Äë! ,[]œuAÚÝGëtŸ‡Jèù”®8 v‘]Lö.À>íª‰FhÍl2ÉIèâ¢=æ¡ùÑl€zµAdØ–>< ’‡¢ö¡™æ¡ò†oá¥@T7¢ P¾~]4Û$ú°Ú£ÈÇãaÜÃÐ$uƒ+5ˆî?CªR(§: f`ϸµDžºÌ¹;€w¬¥GNÌ4ݦ’Ž±=ÀšÁ88*“ÿ¯ix5ÄR¹¸0–µVmC…:çÚÆÞhp gÕXJÙS±ÑÚ¹^Ô,¤@ŠqÇÍ\oK>³` äô8 pSµq~±½·ÿêx·Õ£õ¨þDËrpÝ6x!‚C#œƒQº^¯p•>Uö,EÂ#«Ô½CÖP¾M¬ð 8±¶‡2œ ¥y¸yáY¬—P]^åe…ÚìHW豚6à‰$ñY‰®áêó,–é6p¿FR‰\àwïHAŠ»ïÛƒ^2VÖìYEü¸ÅýÓüï‹ýíŸO¢jO\jy™“Óã½#sF?‹&„÷ ×=]atÂÉXn(ÓÙ2ø…§ç>½-¤'´Fò ¡åÈ$¸ìa|=Þ îq¬ŸÈ­ÑË(³‡\¸E-6ϯÛ¯™QæÊczí€qÆ8Ë2L˜œšj•¬ÓÖèº_e­ýà; "ˆ¨\<¼Òn/¤½NdS\NS©Ó@_­nAµ^ÄèÛ±úÖ°%ùìá1¡ËT¢“8fî$\1F½QÉ2­‹&9™ö ±¬HO#bîvZÜ|”þ¤f£š²#}¯¤j8'8MRÒh‘eùå¡1›­5ë4œèÒaL:LÔ]kFkE«®Œ½*7Dc£ŠzÈaO„+†ˆwJwyô îOÁ#Ó&ÀVÀ56–.XejMÐ`¥Å2ô‹©âá™ã ÉÚÕ«R:™íþ˜>ò0D\ÂbÁ\Óáˆ,c'œE½ëó< ¹·µâªƒò8ë*)üé¿?(Ž÷Lòû½£Ã“½×Q+¦Þn„ ØaºÔÄòa° ÀÓ›ÞÎâ™»5ß÷Ú-1X ‹ÞÂ;âLæQ…¯ñ²–{|+©¿®‰4=Œš[×.k+49’lÊS'(Aj©³wA”ôBòέBdWbåÝa{ohIîÉ«¤Ž]Lü-Ÿàöèèê`ðöfe™ÛͲ*MŠ5î¾zRwÅÜ7çeX“ˆ ¯ìŸêˆRW[ñûÕÖø¦^±¦¼AoËòy¯ƒÆ&q‡,…¸¥‡øs+P${A¦s(âÝOæ9Ìõ;0UêKE™ù„ï$Ê`òwôoÔ%4³Uç×gZœz¥vsf}ò ÞgIFÜ-C.7nÞG¤¬ŠÜö nY÷ð÷7ÑêØÐ(¼¨>\öoƒeùe)Ã’Ñ N¸ÙÏÞÁI¡ ú b„x£þ©ÙIh9ˆæßiöáj~ð?ˆ/Ñ.²¡©ò–€üì3‹vÎÇÑOÜÞíÞ3Ú¤°ÁÏÎ7¿¦û-ÕUɸ'u}Û$dG‹©©³Õ¸å¦ ¶Óe±.ôZ1zsßúÉꦰL´˜ÁŠ«  8ÇŸâŽQálš^<È•£Ìôæ¥,Ba³©¨aá´½….-ÙÎáTdÏu.ã'M˜b+½1Óˆy†Ù'û8°&o±¥vÊ\HΪytDÆ™ìW[üΔ'y´ûu%ÿ’Þf_Æ: •µ£md lÌÜãžÄ2…U|gäM¿9&®‰‘±*³‚¼øxû`吝Eú/¼fo6ÌäPfâ(¯àA´‡ÎWLºµ}hâNLC³ °à]‘åGßí#¯Ó÷4Š…bo‘ÎçbY‘ Y ]œÉ\d"—mNËÆ"ù_vB–(rg–HñP3ŸŠ¦}ÈKÎB¹ì†ÍVe ŒÏéU†'‡v–„ôf—ñPR±H‚ ìÄ41Š¡¡¬{‹Gá§ðR9‰U¡Ütn†ÛÌ"`§vL+EÏñ£ïs’tôÃ6™#´¥AÃÁ2ªÖÂÈ‚¾L¢*„¶Œ·ØÍû"×Ùà·gÔ¿”c¸LzV)Û-~Yjš(J#°Ñ°waSøôÚmbR·­Êúç‹œ^¶6ù]kÆ5ëº~q ,²ˆº=@Í Vʱ nO8Òà>˜Ú&Š¢”žõÏ‘¤JÒÛ2ä/5ú‹Ãòùž ý âûK îG+"ò“°Ñ¿añ,± 5‘K*"‚ˆÙoŠôÎ"€Ü›q©I‹‘§^‡P+³½ÞP+ÍÅS\4 éR“˜Õ±×4_Àâê›új‰›Œ*YƒoI…Z¨1=ýJ:HåÃd‰6#=ZÛwʆÏ_z¼á$ö±3äm|»õ™!@¤[zA­¸üÑh ÆÕvun·ÕÑa}EQ†Ïzµí…cuÑV§R…‚ä±ÉãÛGòØÉt0 ËÄè±8tŸK©ð0WÐbº2¹ÚhTÝ­’\fbÑOéµe]XÂÃÈX_>‹+|í·ÖHÁ"Óoø/ ËtÊj|æÍË¢,©ÌWâoÙfôœ8»®ßL¸Î€È^ÜS‡Çéé'ñ¨Õ«rátÔX0~wÁ HäªÌô»FOŠ4&w{XáúûˆëÚ¢­È¦Óbq±Ñ<¿dá‘VQ£ŽeOÐ ?ÿo 7>ƒa$g'#A*‹ZÕº¼¥2‚p>°ðû›7«€uÑïÛÕÿmVÿóÇ}S!8½Âj]xGÂòª{Dk§y–”gºXfÑ;uÂí̘Fz\3lDôk™`7“6˜BÆÃxp ÊLl¯uÉÙ´O«MõAĪr,7`ä—²‡ÀŸOuÒ¼Ym6.dÂ;p ãfÔ¤ž\×=°‹ZaBuÜìJ 6‚tÀãèh—VïÚÄZ†ûœHVÌÆ mEEö˜ÂF„5WÀ45zLViô“Z“ÛA‘©$ÃFh 4äaûé¿2î­0r[‘²Ç K)°²(èŽ]€0 Ä•‡f|=Vº½•‡µiOØ$Ú¿Q¿ñô·ŠTõíÁ l•v…ðÕËö“!ŒpÌ[+‘tIhÑhƒ¸fM©ÉãÁp=;À-9¦3G9C’’Å`àc–.Év Ue8 (²^¨¿€E…AÉB½ŠGƒvBäÏšR}­“gV%U‹z@*‹K‡¨ü¦ô R]ªÊ%6_a@Rìgqïzv-²`Ñ2d}[<ÚÞùÇöÏ»•hñŸ»Ç'{‡¥¤ÄF9žF‡§¿Œú_´iŠ¼¯ Ä wãó8I°)–œC(ÙyÚŽ5‘”W–,R:@ºü¨R+±YZdC³…Ðb£ ’†DuìZˆ&[¸CËç%­5‘P·¨•TÛÒ¢ò„¥Á[/Ð8p‚ÂöÙC ký^+µ»dÆÛdlè+5`¡Õ—0žý#kGDR¼ÂÅM: w.´$õÁÅÆ–L¹Yªf«…;9}ˆ›ï™½?è½o·(¨Z¸†9¨ü%­þŸ,ü?„Ò–Å·¡,1óˆ­Eö£Ô¼$ˇü§ùË¡0„Ž§¿ F¼¦;ó®8A¦\ý,‰W[’?Aéz @è|×àŽ`›â€ì=íN{x£Y{ÐœkÀ(cK~,Ñk2§Â3ŽAÅ/ø‰™Òæ*îÒð«D_ÀðÓÃÉRI|×|7ÇñzŽ'ÞÞàF™Z¾"Áü›Ø¨º¡;¶.¬‰æV–a&VRê¢-ꄪbÉÞ-ÄD5ûÏû{?oÿÖ€­ž_æPc)cˆeÞÉš]{¿äL(¥Æ0ÓöΫhÑž´ô=i‹N‡é'!>Ié¼PâÚ<#i7ƒ¡q{@}ú±þmyñYùs Ô’„®äw¡ŸƒÍ²V«•lŸ–+¥ˆ-ág£K¸=¡³xü3 ¨•)=Z£&öšLÂy¬„Ñ#i”¸É;™qpÆð°ÐŒ²“èß`nÑ}â¡ró@v!ÂKü‚ÐÆ`DÃÇÒ3$£M§›ëùŠÀ˜šdÁÂ?%a!K†€]iF±äµ¤·ê….Íq }Þé iºY}èWƒÀA¦øé_ƒ$c^Pý­—Ó7ST½Š;ý¨|ÓQ³}êx YÈ6HìžgpMã·‰ñ@;=€‹EJý̃@æ(æ® Ú»·‡~̪шåÊ!«‡%éòS­.Ùêm¨~Õ/øé±âƒÝ*å.MR¼¾æà.·®ú¶^Ç4+-œ5a¼0õ"¨ €ö aDhhB$r˜––pÂœ11㜕ºö4pÜfŠN‘³¬—±L@¸T^Ý!TX´/xnÞ]ÁñË.ç›X)bÁ¡ÃÁËnð ¸}>ü›ÑgÓ–p0‚'‡¼Ê…”vÖ ŽŽÈ† qdo™0*Ë©C8–.‘âF±Zr‘­Y²Eƒ‘ã3¸f27ž„5þÀ¥M•FN¾½$iŸ£¹•¡ÀøžœçÈBÄ,Ðj9Ñ$h¹¨õ#Ò¼R…·'q•NÍé+´v¸¹FÍ[Û{tYÒ;å¬æˆr-¸Q6«ÅÑ­°Y}eÓú=U‰ \’‚$§zFܸ*º©¤†²b0‰¬©˜)—.ÕàZìÞ™Øq8Ó/ÒCØñãAöpQ×pzWFoÉ´0ô‚ãT,)iµÎ¦r;læÁ]Zò1-‘¯Ë B+ÂݬùÂà™SÄ:ÊNš®Ì¬'ÂP¤Ò©bˆ/hIÒ™-Ð æíÓhôxƺ&'~™…IÉ iË$Àó›ˆ$sV@u6,€çÀnÒt¿¤z*‘ç±ðS f¸ ­¬Ð”I)4gp-bUú¿HgŠ.È–"ó ûšJ†™^ˆšRDIæIñd™ÜŠâªûëØð5 |q6Š)FêŒW¤ÍkÆ>NN"=BÈô8¢«ÑØaKº8çz ÓÎ?y;¼ƒs«Q\ä2êzÀE}#úB_‘£¿Ïbðž:§±Á.ª _–qÛpŠNO‚ÒM]‘Å$Hs”bzn¡¡ó劓¹¥d /BËnk“:i{‰,QmªÒQT4Ët¶½]c–S¼œ6“ôÁŠ­F$ÆF@=MÙq(¶‘“3/d¤Ž\¦ˆzƒö%D™wF =kŸg‹„töNµ~@l-êQYÍY·}/©ÝX†Ô73®Qc=9áA>2§¥ÇÝØ•5Ç÷#aLúZŽ0Í9üz1•pØ£^Gí¼lÉ/¿` ù™2h„{$V¹ܲnKBÞ5ÿµúc]1Û{›áúa…:zv{››cÀøt·Ž·¾¸Ò¶á¾ªwN¸Ã?¹&w£ô9ÌFBøO‡‚»ª¶ñ'hc¼Úí¶6J_Íÿþ ÿ½5‡½k³úIõiíqm}•š%L¯5ò÷ôéø·þôÉšú/ÿûª¾þèÑÚÓÇkž’÷õõ'õÇ_EO¾¤äáÿ~ñónÌ·y=…¡ùîñcÇü××É›ÿGO?%põÇOÖž~}5Ÿÿ[ÿÛ}}z¼Ýx¾wrº…NŒŒÈá©3jÅ5‘ݽWéGùr0ê6 J§wjWâŒ*lͪ®´:ÎK4ÔtTg˜—ÅZ†:¹*åVØÉ®G?0ù*= â÷ÿ¢A(ÈaçW²õ>$Bãw&¥Ÿ^ííŸ6N_ïìž±!׶öÔ+íìïn“Mv‹g–¶_6vŽŽh­-e|ª{‹ËÃ^¿{?”*«¡Œ¿%¿Å»¬2¸NS¥ð-J ¿lÿs·qtúËñîöóÆ/¥ÓÝ“Óu–µ®÷‡W GJèKrj€Óü¼†”·ç%,Å-‚ò™½­ØËðÙª>ß>l¼:‘(>ß}q-.+ƒæ¨bÿùöóçF£ø®RBÍŠ£§éN!¾}Q*_Åçï̪ zƒTJ%K¯Ôjkú° džIyìÐó}r0;©D–¹^Õøn­Ódm!ŠzSøŠ·D¿»’Ä’Ûdã²ß!͆‘XÒÑÓѤï8ž â®5—õF”ÅäJ à“\%BÓÆë×—Ñâ`®÷Lß` ÄÙw @ó󶸀ŠÝ_?€½™û3ˆfUÈåUÂPLaRÒx톕í—hšlü¢7eeì¯Þ”Ë©Q;ÙûßÝŒ(}Ü9ýíhwƒ¬þ¡x%Æ»HÑœ)ñª"{Ò<±pN«Wù¬9óª ƒ4B†qrD\äZO«å[ÕÆ99 µºIû²·V>\Õ>g[`M´Zc>)†ã8ÍÁË¥Ðúrè¶àŒLÍÛ!Å"O®zƒaFÕú÷l2­Ë‡Ðƒëô õxNwóé(¸Æ<‚/:7·€êm‘fÙ·»®š=iÝ«÷«Èƒª}1šÂÀä…_5yD4ÈÓBjª$B“­Þ謧Ï/ô½ïÉ6¤ú ©ÎƒJð›Ú€åGHeyt[` ¦‹à-\%k2^{ÃPË-,.ï¾<ÚÛ‡²£ê.æ¨\okàQrÓ6ÇZ½¬:«çQþ©|~¥tŸõÿªòé6õÿëkkOÖýÿÐÿ?}òh®ÿŸÅßêÃRô0ÚéõohöÝåóJ3ýèÄÃaõˆ¤ö~¿;½>ºõîô®ûÍîÍJ´_;ª‘òPÅ)w-Å°d˜zN*÷!hwkµ7€ çöE›<ÓëÊ‚ïwÂ=Á§•º»v¢#ÂØÚçÑ~û<îB`Ê$êÛ䊻AÆÑ‹AG'½‹á‡æ+{~jxw½Åm´÷àölëIz¹9Œnz£AÔëTC«¡ëä}¢²j7˜=ÕU¯ÏŒâÚC‘ko”€¿É :»ÿºwúËá«Óhûà7¨è×íããíƒÓß6Å]Dí ˜®Ñ;!Í.eýr÷xç¿ýÓÞþÞéo€ô‹½ÓÌO@:xxmGGÛǧ{;¯ö·££WÇG‡'»ŠãyÆÒ@=8Y;‡G¿íüŒ¦-×=4õa®çÑÃUÂõÛÜøg¯¨yAã— Ù¸þ¯LM:jWåÒ¦QºÁï“a«Ý«]ý ×Õh¼è Þ%0#‡³,¾—ÁOïQ¯·þ€|¸X.£ÅSò®ÝïÇ­7Ýr…ZÐ b'­ÁÓgR;,/‹f~Ý;x´^›«¯eÓ;¿ýŒï ûò^¨¨?}’8¿<Ùiüs÷¸¢½¤5‘ÿîìŠRj¥ìŽƒ‚±›Ž= ±ìƒ2€ õUŒù÷èåŒ,íºò]”Ðo– !LŸÍŸAEßNYþU9Z}ÈkL"UÁ Ëð˜SqY6ƒ …6F—„Ä~}´¾³‹C«O󌈅Êpàór%j€UÚrµ^4h@X â"Úx¿·³ X(ƒÖ…Q{¹ýº¡Œ«Z}Õ×Ö̱>8lœî½ÜUJ\ÆÃÆuŸ'¤=ï(¬ÏŒÖ_ç”Ë9¸!ûkû:ÆiˆhœülQ_ „À6ÊDÃ3fþ~ÏËß Ïô%±,ê« Ïjhúõ:¼}KÊÖ® ¿j¯éºAÚ1~Õmq,%–Pi(8Å›;€d(ß=®žF(»ÁÖH}½Ã”ïYÿ<¼ë]´š7¤›ïW¢5wOß׆ï¤r¥¯øŠ°åóUxÃ; “¨Í' yxC¸ ¡† a€(¤£n<n26Ev–æfé3=àaöC‚-£Wshu‡±ž£-(}rº½óÆÞÁÞéÞö>9Ä`ôFl’:+Ÿ,CÍ]êì«VLºÒ‰±e²ÈºÑÖé?ë:¼Õªè’µ/ â[½~[NÚÿ!ƒ·¬VY©ðú*ÄñüÈ-sÏ%L" V¢ò!ÍËp“ÍáF2_jRº¼Î?Ó†«?àø?1(ýQrEæ ÌJ´ŒÃú°Ò‰IùÏl@°e`Ô‘>ÒlUË}ÒȲþµBj%Km¿ñ \&/óÒQ »×”Gw-»¯O±–>ô h RѶ¥¿Áf´õy·i_˜m&(yÉ4îwï<Œ–µço#`qÑ:üøƒÓ½Æ¡pRFŸSd[J›t§¾µ£ïa¢o¿mWí?"ì÷=>Nj€¬»MidNzAàŸb?Ö*ââ÷£’F(E¨xìC/ÚnÜ%Ô‰£Å¦ª-{BþØN"_}VÃöu( 2kÊ((³VçK,c–K6´ëm‰t å—탿ç¡j ú™®Z«C–=®f8:ôãØ“ß÷÷^ë=í ŸïŽ¨÷E bµ‘‘úhýJ½©= „$€` ݽpƒÂíÚbb'$ãkÊjðOÆ€´€gÞ‹xx~…™ Ç•§íõ2ùP²}U œë;«á ¼€¯#Š=>`8Aá– ÷:H„}et‚üŸÈ¬ÿ ô[¬EÛÆYldev€£èù¯‡Çω|u°}´‡hd½7 ¯ËûGÿ<Ü{Á$ä0#;}¨Ã±w [³l¼ÃßM>ý‡à¸„¨ÇÀúÈC7ÙÆ°BªS82ýño¾Éáá'"¨i»Ù/C>è],>hƒŒ'MžffYŸ«o´eÇŠÑMå[ù}O ÞØë93YCf"Ážbò¼!åI¦Ïvú^_nô«î´'¨¢¢|а3Öí½ýÝçêéÃÉ@U&*éjîé;’fÝÿŽ¾EÒàÁÙw~B•‚6Èÿ¢!²I2Å’$V¢kT!¥àÏ’ß4v_퓳íÁ©"Îh¯£ºXjü&„e!'î$Mü¿k¥á¨"¤vøAÈÿ|…žz>$ïé™/Œ“o IÜ0ßÅcp—ìâ(¥”uÒ¹Q‹Y| ÅPpØuö£ØBµ2D‚m/b¿×å¬Ñ-Sû>‚èzÙ4ÉÑó,°Ç¼¹HM/ðBlg<6žIÍxž®§èé3ëiö)ýUÒ¼Œ É$Ñïfƒ í`Ç×þÐOïuåôŽ+„Í]'üá{n`Åðoá5¸¬Œ4YTr<·ôé&…ùïôé„ñ΂cX7þG7ZY£ÝRÇò—íƒçû»ì›FÊÈêŨ²³,«i˜WŒ-<‰2òÂNܽ^äú÷P É·õÊêºDO‘’õ7`½)_ÓâŸ1 *ÿ`¨3.ò À¥Š…|ª¶þFvŽ<” NŠÙÏÔ¹ÂJ߶èΔ.ÆZÕ¯hõh•T\©É²öyÝß붇m *Lβ*Aþ­UÙÀU HoÓ,N…-'v–Ã-ÿ$'‘¼WFÂ8´Gêb šÊF€œ €©2é¹ë â‹;ó¦;8Å7˯ö÷W¢µíüC60zRG—¶eRm¤¢oÄz3ö\ »º¥ Bh>ú1Z‹6èQéçx¸ßL†»éHëÔZÕñEI“8,#ªO÷Ê£ ìä'û­ã Í8Ý ”CJŠÓg9.!ºb³ ^˜!á-ó-¶5C‡¼ø‘ö2}‚Á#ÿ¯±ˆD /?-€÷Èæûb‚  úD—ýÙ "zðUÁKL;Ž1r{ƒw+H§ñ¸yÝïĵìTªÒNÖk³¤zF"¿6ÛýÁ éJ'>ÄP!Ë ™ì¼åÛn ¿nï6ú»;§µèG'ÉLbÿÝ##•\§OkÐDYÎÊ6:£ç?>]üÎØ;ûµ“beYÕWNˆm<ðbÚä”û·ÎHãΖ¥ìÝpš³Óӵؤ0<ˆ{2 x©'7Ü)2öÞ/}…¾wq&¼¡ÒÕWzªº'B ƒ8^îÄŠfªç/]HF×Bg¨ç6†k%3’Qœñ~3ÕÍ߸“l¤ (…®ð,ÛqÐ1T;…òÎ<ˆ´eÅïdV Œx—¢ß þAˆÐEýÚòM/à‡‹~®òúªãk£«Ý;¥"8EHætqcú0¬®WVµOA‰!OFý Tž¦åÏ)™’~[ÊüÕìl®?·aÿ³öÝÓ§ ÿßÏýïÒþç˜×˜&@Ì쇷;áAgÙãZi; ÌOñwXf«f)—Ì,¥OÍR:Ô,eEÚè@ESL5MÑ­RVY3Üã—ª¾!"*ËyÜ1ª§ŽÂLµÙ†,x7žcIU<)FÁØjççQuwÀX šmž°ò.à˜(iÐIÏø‘OÕíë6¤HjQá?ÑØ«ÌÑÂ"ØcTix;êÖ¼ëB©‡ú[)kúõkqÍú@Ý(ù¥+Ðk¶^¿6­TðDÚ^FÔôÖÁê>%¬PJscÕɇfßKIf¿€w¾ââ„šæÂ=ˆZäCæA*m3†ûÖPcõ:­p¤¼§ø¶±ïÆB°§®¾Pc<ä’o§' ãK¼ºž"ÚIi¯7ȬeŒß-]ow϶ŽÛ‘ïöÄÒE^&_ðåre#*‹Û9öj“_*z l4§^ª\ÂhOý´ü ÜùmÈ–ÓÝH¨°e}ÚÒ¨0bµâ¾a{+ŒšÒHY¡ò°c…rÑ3ÊŠ¦Ã H#››‡²Q4 õºîuçÄÛÁ‚0®¡œŒÎòQ¦@¹(«`þ(ÓR¹(#±â‰_2‰!‘‡ÈE x’#ø‰ ‡Àç¢3vâ3ÎEhŠÑØ ¥ôöeÅ/ ÆP¡Û²›%ùÌëMºž²z— ‡ÎÃ燚âàÌ¿ˆ—bϯ_ Sk)+xÖ:õE°çX†÷[ß™ãê8‘=Õ¿.3LÔŽX¾ºñÔ¼>—<üxT—ÛÿµöØðÿyR¯7—ÿçþ?sÿŸ/Ýÿ§¬Çˆ+Û=Q,îBVßÆŽh5E}=°ØóÝÛ¯öOÕ¢tgÂ^¾|¹}¤š‹šÐ¤J‹Qi ê‘Ͳ”YhïB¶Æíý_ƒV¥HôØÒºú ÈÆŒq© i"µáökGgïä´±¿{ðóé/Ù¡b#VÓZ ÄÝæöñÏ»pÛ€4§Y –ZõZÛ¶À¹¬{a¬ON·žo?o¼ÜÞß?Ü‘ôCæ‚ùPt+‘ø¥}Ç˸~%bÿZÊ6h,æÆõu³¿,lMSž& “ëÂåïGŨÄøôû Èsá‰Vs2½dRO°Û!Ï°Ž©Ó%P³‡ˆÔ4hr#öîú¦Á_ã¿èIBê–¹m´GÂhµ'. ÛÂhOTòL|…Ev§µ* ¬mª6mpÇTm‰ –.س²¸˜Èëî,¼ð.-Ô¡ dv$?Äw4Ae}MXñq6Sû£´‡0œbdŸ¤gLkS{ ó v3d®pXp|™m1˜ªPÈo©©žiÆÊÙTÐÂÔèñúf)e_mqµIfT? ›Î&wù@_éÊ¡°¼Ë'£«;Äð+EB‡û3*¸wàҜ姗+¨S@Bc€_ƒ¾K7šrQ‚o@r ©{áý= ¾é4ƒZ¡Æ¦ôŸ®ÖÅ”ã öu]R®y—ÁM‘ûXh_‘6Ã5·•¯‡– —8¸]8‡#†éVäé3ò¹ÄÑ”s–Àõ¼€+L빑öùКá•÷“gå´O£®èÒü6Y ­¦‘¡ˆHíñ¥IdÖa2K×Íw±ô”Ògy8U4gaöÙå5Ø*ò®¿­Á¯"ôâÑ'Ìg¼‚±hI)ðíéŠm¼I"ÇàVŒÜª‰vüÝÚOÀðÆ1dK¡WCÀÆÑ@b<ÁÕP$ú= ¸!©)¿¿‘4.V<…±æ;ÝhÜ–W5–Žc3–xC kø®7®Ø™ n>£k–„£E%úÈë›g@nŒHtaŒ~Œ|nê+êÁ¢¢¹ZP«ó¾¶qè'ŠûS z#ô+ÌfÄ<}8ˆ[¶ð7Ò7j}…TmiP#ñºM†WÅÂ3¨Kw%uÛ±ã¦px Xw|¦ó̵þ÷5Ø%ú¿ëEV×mo«ux»Ô\¢ú3o éðþ©ìÅ™>hûñä;²±'snù'íÿŸÖþÿiïÿÙ’ìŽß×8(p›cGúU a‚z)T%ƒ›¶˜¬8â\†ˆ²Éu¤`u¸R;RŽ©Ê¼pÔÏõ?¨Ÿi¨ÿé@ý, õ“˜ð‘Ö¤¸ÿYaŽal‰>ßýéÕÏãWÃÝDjFð±Êɤ£¸rÔ³W~R-jžºAK3fµÖû¹¤Y’÷NÆ$¸Áƒ/ä>†¬'£~Þ|Ô¼l*0¹~ÎõÁa˜é^8‚¤“˜CŌДfÙÜØünlÅþ6¦¯ËÏ&‹epïÏïæ³Ú š¾4ò¸{D}`¾þÖbÄÑì ª‹ifÞ€õ,H“õÙ¼Ío4UÂj×Çc x› Mh#̆/wznÇ ,õíô â §•ÞÀZjLÞ§ºl…g±ÁKYàåØßeYßÁš4ZÀ¦“|én `2 ]ŒŒ¶hp—5å«»uÎh^Á¢£aDÄ°šÿ8aÜ(iE|Q«gáVOMŒí³'Fu/”Àể|Ì@I~öA  3P" äc²Œ/îÖ1ÿ³³ÉÞÀh±7p4¨p·×d47Nµ7v68ömqœÙ¤ÉˆöÍϹR~ÜØšå'°. ²-³Y–Ù·*ëZ§byk'cÌ|7K»ÝX–ÕX€Í˜f16— þrRyŸ/pH·” !<…€àuŸë–b6ÞÈ8KÞŽT1eÄ K÷`P'•>ôJ‹I!™ëÀ“özƒÌZÆÊ÷É¥½*MZ«ß”Zä‡Lé…ƒåI1Î"͈–lRþ1[º±àb•r¸hß²¥;TŽô㞕̲$‘L©Èë)‹„¢^÷Á½îœø,0_é)emrQVr¤ªp”ÕRÙR–Oå‹[ê #¥@¦æÀH~pJeaøHøl)ÍÏ8¡q(Fc/”\[Ž4g â/Õeô—î,] •òxAÒžZÈOêË\»…ǵHñPiеbìÒ¡DÓ-%j0~Ң߹ÔøW”Yò1©‘AfHÂWj -P÷)°ù`©쌳ä-IÓE¬¸Ôx÷ƒ:±Ô¨UZPjÌZž´GŽYµŒ•ïSµªt©‘¯þ”Ô(>dK ,Wjdp6©‘·d•µ9Rc»ÔhÇEû–#5Z¡ò¤Æ|ô¬d–)5êˆdKX_©1õºîuçÄgyK!(£Ì–‡² ”'5£¬–Ê‘íx*_2¤Æ P dKvŒä·Ô„„Ï‘íøŒs‡b4öBɵ±åI:*RcfÁ©1ݵ`©‘U&5*…<¥Æ¬µ[x\‹–ûgÀ!Æ!5 43¤FÆSjLã;—ÿšwÍ–×Ec–-"ûìÅ]ϧZÑf+ðÌ{±[»SœJ“Ü&ÞÑ(Ná‘×Xø±Ùª¥.T:;ÊùÇ©ÜòzÌ+C²ˆ-÷…ð6ï²P³AtÝZiŽ;B?óG³}×í`ª}ù!÷^ÐÉ¿l¶n›­œëÀfËó.°Ù*vèn=ߺ}R0—žh²{· 4Dþ_š¢Hîm_³e½êk¶2ïùš­K¾f+ï†/…{›u·ç‹νÕKá0ÎFb„Å8 ëÖ’'0ºÃs• ºÀÓºSàö®Ù ½º£%¼ïí+¯Ø(—-p]—ÞÁ|Ï Î‹:À.ó–Žx_Ñi8Î%­¿¢¤õaÐúÜÎ!\†¬Å¾û [aàõ|x€ÌJ-SO4ånIâšRÅe®»ʉÅ.¥Ê‚r—›Ú½èŒœÜ5ŒÅ×)È^JEºðE×uJúb¯³Å/Ê•¿Ê&€Ñ6¬˜ò)G3q°Ë`6”/9R˜&O ËCËBF™‚˜ŠB¶$–‚ôÅ‚P®çã\wL°È[óGÅ¢lT%HžDˆª,“#“Ùðï3¤²€©àÙr™ þÚ-™àÁ¡sd3ãDÆa˜Œ=P±oByšŠD€„–Q,@D3»,£aaBš(â)¥¹×cÁ± /,¨Y÷:ïã…CTcfÈjÂSX3ñœKkEiíbÔéxk–!«ÑϾ¢Zt=ó`R«Ô{±[’Ò¦…RqíÎFqbMÖXP>s¸u‘‚³ü˜œ‚l&ëÑE3\Ä)ÉŒ¾ÍÌ&W. ›X† X¥2ù%G(3Ú·Ëd–ö凉, ’'å ”&›LqLi?[3}…±të¹øÖí“ê„ñļÑDY(M‘'……¡)ŠäÈ`Üøë Ìz9t¶üeÁ‚½uK_þ80àÙË‚Ã8‰qã|4¬[KžØ¥` u¹K]Fw‚e.(&rñž—såÅà²Áâ–mó=+8„-Š]†¬% ½/+V¬î_Nqâ.pùˆ^NùÛŽr HN)å^ ù´b§Lá.UÑ­tÃϹŸËœÂ‘UÜ÷u:¿qEYñ»¿Ó€}#®¸ïóô¶³¢¯Üï¹p̌Ēqß—Æ 7*K‘û?_´3ÈØ'NKÀ½ ³D`Ì–Ð{Bï>Õs(84–Kè=¢_WÒ žÑ] Ý/úv%ÅÿÜñ^rï Rª˜W×}¤¢Y`>1a¼î)³ð{":.†é8ÕìMÝ3nLÑ{Mâá1d&¿çÔ**O&øÞ3ŸL8öÅ+)g¦È½hæÇ éy&ü¾ÔÕ¹4ÿŽBãëW¨‚çÇ£ ô3,Tªî]Lñ«÷œ Ã-»øíF«™:ŠÇ­¹?£=­06“û/æ.¤j•á²ý³Ç¥p|§Ÿ£Æ\\‘n¼üUXߘ7N?H­á¬è7þ~‘ü2ãà¸ý$SÍçFÄ)à7鉲›l}äøûSº †Ê ô¯ôíO=›hraCÃçú_zu#éM§ˆ_¦g7L&箓ç¯N>f)¯X;?N$3 |Bïøøwfà8öCr\˱?š™[µg`ž‚þ ù¥ÃCôLìªÖS(XO¨¿h.§˜lÔ ×Q4€OÒ¬S‹Ð'žO°Ÿ©£sIü¯(‰›g |a¼å-®Å¥ò€’P¦5lŒdn ·$¡ß.¢Ååôû;ø ìÖÊ Êì¾b{+Hr÷©ul›‚ün­RáM®”’âSÙ‚¼[R³Ëò­|q¾å#Ñ· õ­@¹>W+LŽtŸ 'àŠ!b~I Â~ay? oõ\Âò÷ü‹t Emß.Ù€ó4…»d+£håªZÞÚ€VQ…@+D'qÀ­(„oº\Ž~ ß±7Â㢃PÎ;(ä© ì(h ¼*P¸»¬70ª SX {j|xÍÄó0I5Áj„œóHÃ¥C™B?CŸ`ƒõT)¸û3×*üU´ çWÍACQ-d«(tÏ!yàWç`D óÐè lXôYHè_spè òPÛqg#1Âbœ†¹³Øp2aò…@ÿR9=0+™@Ü ïlâ\Æ~ì^oÅÆ.¤¬×úÌGßC]$ËÁD®¹ˆ5±„W´§¨•™º^žG$Xˆ0U¬TÝ»˜âÙ,4âæ,>#í6ОÈv¯faš¢œÞÀ"]þ: !fé–)êù OaOé i§w´§_´—HèJ¾n~w‹ˆ:„‡¨è“">µ*œ¢£‘„äËe}Ñ”,Ó.Úú i‡Êu}Qgã8öCr\˱?š®ÚG460 ‘³KŠÊ–îõv.äç(Bçó‡ÉƺH…Dk×9 à°–í×ìãÑ\À—y.‚ÏEpáÊì+‚ód¾9"¸ Á •ª{S|—Â…¿0ÜœÅg%‚ߺSÁïÓ,LUטDÏ]g!Ä,=ͲEp¯á)ìðœáëìtsöôpöÁ™ìÍï"¸á#‚§ñËÁ3ðÓ|Dp+¨—•\óEp/ÜR H/ÒºwêÙD“&‚wCu(öÁ=»‘† Á=»¡07—îAH0ÜMÉ2"¸’v¨|ÜÅq6Žc?$Ç…°û£éÚ©½Dp³P<³t¨žînQçæB~Í¡"x.˜l¬‹ÔQLwœkÙÞÌ>ŽÌ|˜ç"ø\?÷p\VïtrMŽó½Qm¡Eê~exž÷"·­Þ(ÙËÎî¶{ŠˆNõžû·}Ê×ÛÁžÈNJŸ˜\ñv!«¦1‡˜ú}¶ÝåØîgìã\œçQ¬3ŸŒ ì,g/OHÚ÷ÞÚŽ“üêwcíï'l ½«n¶|.ª›­[êfk‚+êÀ.ÔýúPÏ '`èµtêì 8uæyŒº(çwÝl¹/¡›­üèf+øú¹Ùòº{¶cÆ>åÞ:áÅJøÝ7Ûñ{ 6Çl쉚u¯ô¼`öñ ,~µ<™çm¸»­ËÇ6ïütì;²Á½Hõ¥Íu Íõš u•ûÇÎÅV*¶z¤²’:w~å8•Ÿµ(}~)P¦îYÀý íiÀ‹ŠQY«nA|2ªS`ïÇØOU†-’ÂÊMô“.9½äÔ5 Sd©«)«¼RU妨28’Sšµ'ä±~÷‘gs3¯Tï–h³RezÉ´^¨ZÈ1_ªÍÊnã$׆w£îÙzq¸!ÃdÛ@ôQ¨ô@_Ây‰·EЗ}\'ÎâcžˆJ&¢Œ‡ëÄŽËsCqãE|]'ncäÆ°û¢gßU½¤]ÏäQ¡eCå݉ÓFHåL•{^ yÆ7¼†bRoÔPù)¡òSA§€š§~š‹¾LôÅàž’/&Ï|)LÜ^¤îW ½­ÉØ‹Ê]2-û DÞ©":E÷ ûT¥]Yû$Ânöò&WrxÉ®iÌ!¦,èÊ:u9™HJÌ¥o³¥\€ñrÒ)ãbSnW~ö‘p œ2\Nò«x›†ó’n}ÐL“_¾l« ã!ÚšÐA’mpê~}¨g„0Lª C%É|Ô˜—H[uQÎG uá˿剳¤Á‹x³.ÌاQ6/VÂGuá5ö@lŽÙØ5ë^é%Ã*…Š°î¢¡¬ÑÅ`ʇɯ¼Dˆøš½º'Ùà ŠÉ®¶Ø÷Lä\)Š‚«ð”[ çbë_=ÜVØÍ­ž†Û/ôV¡›Ü ÊÖ +a6ŠÞ2Á6§’‡çº-Ô§ªëžÎÑmïšÖ ±çª _2¬ŠÏÍqÀàíå¾IÖù+Ì—ßͲò+ç¦YÇ"7üWèͳ ïüP`y7Ñi„ü‚¾™êJÆrðzcí,V$hX¡ì°~Ö}ˆ/¿D¡`b…n¸º—† /Vüæ;¨{)ö›pÌïF¼(¦Êú‡ ˼)÷F> Ö;(™ÿ z.îãäÇ`?E?û”¸l¢w: 1›ü^«¨P@³b7òžîIÏ,êì-Ë÷Ýñ PïØoÞ>ñyxÇ|ˆzæÙ#$2Ü$>ôå²Î­q â øÖçå±ö=ÿ…Ç›Üç~âùð¨·P¹|_|ïLÖEÓXÏsXÏÕºZÃ<™yj6Zaʉ” U¡Å¡`kREG1œs«™•ºcèOQéñ%ÌÖTµÖ†&Q€é@ZájïúÇà)+C¬Õëú“+¦T")€l­ˆ[tÍPŒ´a´#?¤¤ó“»q ™qtTHÔŠ~qJÿN˜<¬°H.ZíXÑÓ ÇñÈr¦Ç y3G ÂGþ´ÃzÉ¡Þh[i7_Æ3PóOm%‚¤¿b]ªû÷©žC@YÀarl®¨>ýr­wWÒÀar®wW¦ç’{½ˆÊç!{£*™©C.öBÔ–/'{£9ÎÁsì‰è¸¦ãT]º—\m *_g•³-]. P,€PùÛƒgL8ÞE*)&—»Î '»l_/ÿþýsù}.¿K×~oùÁçÊï.L~/V¬î_Nql+ 2¢ç,?;ùý60žªü~¿&cºò»ÖÂDò{þ² "lék˜#¿ûQa§ü |§+¾§¾§üΠÝò;o5C~×@¼ä÷4ŽYò{Ž„—ün…õ“ß}ѶҮ‡ü®£æ#¿[J„Éï…ºT÷ïS=‡€²€å÷ð®¨ê>ò»oWÒÀò»oW¦ç”ß}ˆÊç#¿û¢*™©K~÷AÔæ!¿û¢9ÎÁsì‰è¸¦ãT]ºŸü®#,¿g–ßÓ].êð^È×=X~ÏçŽw‘J ÊïŽóBÀÉ.Û£ÝÇ™½€û\~ŸËïxÿžç¸®]å[J纵ÚoA‚ËÔ= Qy³Uè‚×+{áYÞ³O×)߰߃џöÅz°ã¸›ì§@ºxk‘YטƒLÿ&Ýîn÷ýöqøÎóò6RÖÕy¦]¶—©î}cîÀK~ö¼+÷÷Ï6Ëß’7[^WäÍVÐýx³5Éåxh7êžý¨g‡2øB<}v󜋾€ó½G_ô¼o¶2®¿›-»ïf+üâ»Ùò»õv`Ǿåßw‡áÆŠxÞt;pû 7.€ÝØ=ë–ê{µíáõ\¶À¥ödÞÇá.Ç.?ãÜ£JØE¶÷è×Pø ;Ô8×i8×S8Ô=xî<—y™Ìë‘¡O9ö¹q©'®Üü^¶óM‘BußRï šZÐAˆ9JÏNö6¶S•~ïËLW.’H/cLƒˆÉÁ&¯¶±€™¶ìÌ’çÈŽç•/7žÉ¥Ü¢°=G—ÀKÎK¤”ZâpvŽ»H?Ø] mzˆÄYÉ«¼àÄâ]©ûö¥žI(nÐ@Á8´ (ŽútAúÉÆ…º KzIÇn¼Å×\ù8˜dD! Ù!ÿ˜'#ãÇËxIÉnüÆ^Ž‹`8öFѾùú‰Ê~ùÈ  Ëg„+ Ι.ÿh"0‡ŒqxEæYÞò³»ågu Îæ6Ïâ6—›¹Ü|1êt¼ÅfΕš)P˜Ð\ Lݳ€ûA¦ÖsVö³“—§‹ëT¥å{1úÓ•eõIÊ9ëÉŸtɹ&§®1™¶”,+Õ…dd,)™¾Í‘ÆSBP·€ŒeÈÇò»—xlà•%;ñ’Ÿ½dã4 Ÿhì…jš=c#¹Ø‹Ã»Q÷ìG=‹8œ"q ú(ƒz /àüäá"è‹‚^Ò°gþ1W%^ÆGvbǾåÉÁ¡¸±"^R°·±rãØ}ѳn©~°‚S°üë.,þÝ –~¡|˜ðËKɾ9+~’Ñ ®¡ àkÛ±}P±—â˜!õ O¡×Àq.óþåã“Þk¥|c•»Cž¤p=´´p¤ðÅf!„sj™y<³[Ãþ6b›ÝÛ©º•hgS»›ö]Ä…Œ2ãug2‚…c¡¹ï°u芋æw§­‡ÅHË»ãÖñÈ—|çíÂÝ#vZîx'Ï8jÅïÄú“±6ü#«ß•;ËŠ²Vìî<°¯u/BÌ/R,úZ±»õ.¦ Åc›àÎ=¬‹)¶œ¡Íó.¾0I¦ Äl˾£÷ï@°·€»û|üÇAOÒƒqp²3A‘Þ&»ë÷¨¤hÔ·ÉïþµŠ E€+h àË·¦2'Å«š,2\[Ì3Ò'V\¸ «s½Ê_>n\˜ÿyndK°¡Bþè”­VbÀõ”.‚mv%3/wK¸ßF¤¹û9K·xnZ~îžë6|)Èh?>þïƒW8"Ó>;'zHBtßlèÆ™ª.×o>$³£XXäº<z¯ è~‚Ùñ³Ïí’<<®Ý„þ÷Å»Yìg݇ørK xWÈO? {)ø øwÅý÷ƒºgòÞ¼px~~ýEÉÐ,/Óßßù Xÿ`yþqrq‡ ?žûq(ú™G” PzÅ ˜$K¶G•Sˆ¬W ž@^þrï£b@{Sˆ30ùœxT\(î^~üïŒåEÓ•Ïs•Ïu"†NÄ<·ùªEZš‘ÉIõ#Áå¡dkb-IA´së™®d=˜ªÆ䢴éªN¬-M¤= S ´ èPü[[ §­I±Ö¯+SLN™Ò§¤²U*nY7K«ÒòU¬´üu+­Âê•V! ‹O¬^z–Ì2~ª–‰Ôp…KqËÔÔ.j^‚û\÷$PŸB*˜â]EGXWmEüt1vÕV‡—F¦å©”iêeZ“©fZáÚŸž¤Áòt4ô#]ÚKSãÓq`GÆ“õd\ +y$?Åé`ÝW5Áê÷kpŒªÂ”8–ÂAz7¥ù™¤²‚ œóW·C­“êD†fÇë©Üq÷g®ßù«èwÚ]M»“­ÍAàžCô‚xÎæH;\×ó  \ˆ¹ªýH•ÊÔ§©Qn )K fÄ{oç Tª A§­ÞÀYšì] Ö@Þ*Ò•ºo_Ꙅ’"1wAõ±Ï• =» ‘(=» p/»„éA<¨\‰ÓEÉ­¨‚v <‰Ô½q&~c/ÇE0{£èÚt=$X­0I6»p˜DkéjQ_ûB^öa’n./˜hœ‹TQDvíï¯lÏyŸùÞòsIy.)óKdOI™AçHÊ*DR.R¨î[Jñö Ü‚s–¾eIyúHN.)ߟŸŠ¤¬U<¤œ·†hUzÒeJÊ™CRØ=ÃÝé}îéxî%)3X—¤Ì[tJÊ€‡¤œÆÍ-)»qÓ¾{HÊVHIÙ]+iæJÊ:Rù’²>DR.Еºo_Ꙅ’$)‡vAu¯Î—”ýº ’”ýº p/‡¤œO<¨|IÙEÉí’r>‚v \IÙ½q&~c/ÇE0{£èÚt}$e­@I9³p ¤œîjQ¿ëB.×’r/˜hœ‹TQHRvìï¯lgj?ê.ÔsIy.){8L+—*yv¶¹ž“¶û‚Àu¯"TÃÜl¸ÐôÅÇ^ôÖ‡Þ4nïx„§tYìnì¢ã ©•úõŒ9ÀÔn‡ínÂvß`‡àò£×ý¯¿«®^*ðæ·Ùò¸öm¶î|›­â¾aè׽𯻉À xÉ€6»SÍA[@ùÝ톢-ŠyÝê6[Î+Ýf+÷>·Ù ½Ìm¶|nr­X±/yw¸!8±^··VœÆùHƒ±û¡eÝöü®k=|K_ÔNæ1î&êò Í9F„\ÎzŽjpù‚ײ¡~ž¹Î¹¡nœsß͹t‰Ò¥Gö7qTs't’g¥Ü4QéóIx‘º_€öL-á”eoYÊœ.‚“Ë™÷a˜§"jI±æ$éIé’œF²k ˆ)É›ÎLiŽ i^™Ñr3¢éÆ%tÚ32Ù>{ˆyIr Òv žÙYÍ2á|DO4-¤—+|f¥#ò€?ƒ»P÷ëC=ƒ Ü€A"hê(þå£.Á|¤Ð¨Ërr¨ _ñ-G $ Q$_uaÆ?eK£xñò¨ ¯±bãpÌÆž¨Ù7H¡Ô/SThÑ@±tâL]2t93så;üESÿ± ¯ pZ ãV~¦­ü [Á™µæµæ*•P1ŽŸ€  9ò) OƒKÔ½Š°\jûãc/zË’é4Ñ›\.½óžŠP*k@&Í\¾ÔH#™õŒ9À”äQY—.Ž"SHI£ôm¶0 0^²(ºDQlÈ)‰Ê¯‚¨[uà#?zH¡i0!ÔÅ4©åŠ  .ù¨ "€†¢_÷¿î&'\ð„6Ê|¹h (É3mQÌCîtàÊ?åHaäÀKäËœ¬Ø—l‰3 'VÀCÞtà4ÎGjŒÕØ-ë¶ç#j*ØJšî’‚¦Ñ½`9ʇ‰™¼D€”™¹’‹jpùB"¦m‡õ=ß8LŠa†|)<ÅKǹtùØtª§ ÷ŠÞTä^´xÑzXY%ØCÁ‹¼¨æÔ1›O·„ðÔ¢=ÝËé˜fü§)Ý·ú­È`:—!<<îa=¬pt(÷½¬Î¿\‘¢üîi5à¨QÙ÷¶:y¤ïq]8çF“ʹ×McãYªè=oH72Hß7ÖTàý¯³T¸SEúX÷ ¸üEâQ¹/öïZ< BUá{䮥økvÌ*¯û傤—*êÅ*ëÞÙñ,P߸VÞ÷ÑyxÇ|ˆzö# öÕ$÷×U‹ƒ5ù}¶VQ¡˜X…î·ýøÑæ¢xE“ÄÊ*rÿysCúDÏ ¿wõc®Áø‹GÒ ñÎM‰š çRÀo¸pÉzPQ%þF1o×p<³«˜MÄ­[Awj±·îßLL3×tü‘½a(uËP*ù~ÊùcU8F—Óo9;·qHbc߬ÆV¦—¼+Ç¿9$aªµPH,¯l¿g¯¼Å>ࡽÂý¡sºâô5‘ŸtÑîÕƒúWÏ'²\ø"!À øS{w+¬¨Ÿu@·L&š ÌÇÿº¹™%½ã…eøe{"é>Ì×_;ç±?ÒãÂXÃÐΘg/?D+H1‰2¡1™&"°4”kM¨(„pn-·¬•¸}¤'×MÜÿ‰™Š’ÂÚÀzŠUE+X[á[ûØ;%…µZ]mar¹”æ"­¼pK›nýEËO…ÑòÕb´ *2Ztù¸[á<4™%|”þPÕFQíÆ”é8ûZ÷"DŸ"AÊŽ¢]D•BHm|´uÑVƒ‡î£å¥þhi@Z“(AZ¡zü¤²µ!…ñO—õЉäã?êÀx’Œƒ»wˆñQ‘ØÑ Ô’xU¨(qE°®Ä¨*L]b) 1ñå]S™—Iª*¤:É9/8;(©.dèPl°žjwæš”¿Š&…-{E™’­<áð=‡”ľã©6Kðâ^iêÁ)¾îQ€€z@™KÝ“TA«†ƒe¥†AJŽ[ÅNE*P›8É·ÿšŠ@Í„n'¥¿Þ «rTröjÙQÔ@çð<Ð\tµ’h×=ð®»&Û†m=]ZóИ|t%TºP(]iÇ‘|È& 3ŸNo`Ǧ7ÈFFÿž‹KoÊØ…Ë8™q 6ctÌÉŽ› •+Ö•Ëí‰YÍBei3÷õ¬uYt CJ{®ãŒñô=gؾ,/@ › psN‰&à-ȉlìy ÔŠ–«T|í ˆ$Á:+˜…x;ØNI ¼w³0%AQ¯{"ÑgÁ…ѳt{Ì$sG¨pt€Œ¸Îˆž±<N?º’¿ºg?díp‚´?ªã<\ǾȎ b;A×µÓû Þ~Áxvù`AÜÒí¢žù…|òƒt>2阩¥ àî:Wœÿ²}ï}¼î øÛÏü¹€¯8Ûû ø<‰|®€/ü‚å꿵"¢e(†Î f"àß ¶ÓðïÛ,LKÀ×êžLÀ÷Xpaô,] óü¼*ìNŸáIït¢÷ôŸ÷ðx†€ÏÛÍð5??g¦€Ÿ‰§â'à[=|oÔ­ì#àëØy ø–"~±nÕúUÏ#¦,èP¿@wTt/ß»;ièPß»; t ø^æôð½Ñ•üÕ)à{!k‡óð½Qçá:öEv\Ûqº®ÞSÀ×ñ ð3ˇ øénuy/äí.à{ð‘IǼH-E|ǹ"àü—íÛîãÖ^À£}.àÏ|zƒŸçÄ®ß>ycçºÂ:®Q Õ}KQÕz³Uì¦81{éÝÔOÏéÝÑß‹aŸÞÕ|°‹y¹O…bñr#»¶1‡™æ]¼ÝuÜî/îã$žçn2¢ÌË÷lÓo/_TÞÿÎÝ…›üî{Ûîïá*~ÏÞlù]²7[a7ìÍÖD×ëÁ]©ûö¥žI(NÐð+õ°.°‹ëü.@ï›ô]%}ïЛ­¬ ôfËçö¼Ù*puÞlyÞ›»0d=nÌñce|ïÊ]ø½Ápì¢u¯õ¾÷ð¸ /\äZ|2Ïçpwg—sþ9&ð*Ü„ƒ«(~ êÜ븜ë­ê¢<÷Kž Å\(öHŽ§ݹ²´CYn .ëù§P©ºw1(à ›Z×a¸9ŠÏD8ž:¦ÓïÏØOKB.’á.‹ò§C»äx“[ßXMOLv&²s$°óJ\—›°.Å2de{j-„Ÿ´œ—)½²äåì”ty ž³'Ê õ‘™³òPù”š‹t§îÝŸz6ѸaC%çàn °êÕ é)<ë†,ê'>gà.>ç Ðáä#Jy‰ÐXò¯¹Bt8Ž¼ŸãØÉq!,ÇþhÚweOYÚ/õXÒáÒôÄÉß $}s&{ó8÷IÔAã^GQ™º@b·ü„nù‰Ü‚¸Í·Ík!X_Œ:¹ óÅj (U)T÷-ðž ©e„˜½ôLê)ã9-qúž û´diYñd¢tÞJ  XrºÉ«mÌa¦'FËêt)JJˆ¦o³eh€ñ¡6C‚Ææ²h à'?¸eŠÏnÜäw?á9 é);û¡›¦HÉYAÊKp6áåæ]©ûö¥žI(NÐP™9´ (¡útAz Ì…º Jú‰Ën¼ù×|a9˜dx!/QÙ!û˜+(ãÇÊø‰ÉnüÆ^Ž‹`8öFѺ×zJÈ Zá²»p¸|lt5X<†òaÒ1/&çq‰F8¸Š¢’±mg÷=f9äbŠd†X,<¥bǹP<¢zë¬ó¨Vðz¢ÒõàâJ(”â7¤ÅpΩf–A×nó)`»Çs4ålÓ»Ýö^¾EÖ‚Œwãwëí7~…¶¹oÁuÞç Þæw+®r˽%×1ñê~kîÂß'À[þ-z-ß`oܪv)c…„ ¿mw, ®àí{hë~D™_¦`ˆ¸‚·óAÝL— 7É­}`7S|:7Œœïm~qòL• ,—sËЉ,è€Ps!·ÿ}‡ubå„…£›ÐZÀ£–¡é&·Ð**¦®¨57/›Î¼¯kÂðuE¬ 2Ï~nHŸ€váV®~Ì/óàv>ð¹é›m1‘ŠùÄOR¸ZZ‰NSØi»ÂÙµÌ2Þmá=åpx÷uz¦oj¾ö¾+¶À q‡¼|𽆮pØ<§O~v.÷Dî¾YÜ] 3?ž^¾ï~H>iW¹Àðz¹>ý^YÜ=K„EÛ+äëŸß-7|à{“Ƙ «õоֽ1·HÁ¨|Åb„t1U ,Hß1ºh2ãܘ}ž± “¤Y8$„_vÌÿdDô ˆEÿ8¨ãIz0îBæÙ%,Þßd± &ÉîSçÂÿˆi—¿ÝÿY$à4bLa^¥Bu4t ݵ•ñTÖLÚ][%~*›–¯Ö¦ª¸iM¨»iPßxõ& —«Ä™¤/éâ~ª¯¾ŒC;3ž°7ã"ÝÉ;9yjvìx‡+w¼ê ×︇%XÅcT¦å±Sôð½iÍÑ$µÕøäœÓ œËzŸT/2T?6XOí»?ŸK_Íÿ¦ò×iŸ1½J¯ŸTŸÖ×ÖWa’U:ôa¥Q+® ãë>Úã°6ÖÈßwÿõ§OÖÔÉßúÓõ'O¿ª¯?z´öôÑÓÇOŸ|µ¶¾¶þ軯¢/j igÖÄ¿_Èß—ªH=é]ÇÑY3!U$Ín{Hª%¸^Œ¢V5ð›>kíx@*¾nv‰N ¡¦£.l#§ÛfBú1,= LR¾Yfî.„.M*ÑÇè¢?hw‡ËÉ°+QyAý ‚&éðß’¿µ¢eÖêFôúuåM·¼ÂU Æ_£ñbo·ÑX!¿ö÷ȯÊJÛÃåze3ú,Ð|¹wrBFD Éž—»Ík†%C¬ü²$íîåAÛ} Qùõër…iV•åýúµP¢Rþ—ºIû’ìÑùUsi¯’«Þ`%Ú;ÒrôŸÿlæï5d04­Ï¢-ö{ï`ïto{ïw‹éþHÕùêPx¢l­`«*ü6S¯Éþ ¯3wr²ñÉ>]yõÅ2R)üY—>ÔÈKr©ƒZJµN_媩”Úñ‰«˜ô×pT§}팻"— Lèä¾Î‰Ê— E¬’3Y&°çåoÆ+QýQ…Ž`Ñò8ÚÚ¢ØçA„œãkkÅv„-q„¢ @žª;ÖðâË*¡Œœ6vÿMì ¢ˆtŸô>gLÙêÓ‡¾Òdl+Ú(Ú†@í£§ç€Îì¡Å˜6¾^DD+²–§me|±ƒju> r4õ¯ËßüG•²ÙýÝícF½~%NvO “gl¾kç~¥·jMy½ÖTbV:2 p±>^—DåUѪ,WIA,ùä‰{­xúõ|üë–‘ƒBõñÛoÇÞÈ€¾- "yì aÈT«yÈà‘"ÍqÕ·Ëß$+~ìU–r0Y àÅjpO†›.áÇv•rNæ«ôÎdÁ‰ ¦8±üL<ŸKð¬±`Ìé>¼V)Õ*ZЛÜœ[ ¯YÈçgV8\ ™\Í]lY?ÆWª¬ž g©¬@÷ê¾ýCF“äq=[AÁû’@ôœÐ(Ð{ìžÆ óЙ+Å Õ—ËßœùñBYȾ<åwòW ýaº€TŠ¹Ø Ò1“ žùpA,ïd‚â+è|( 3Æ8€¦à}ø˜,Ô*XÎ}R•0V¦'»ï3æù,φŸÉñœ¥–5U†¿KWÞ³ºg×›œå1;K9ÁëÎÂps²:+œÀí±/n£ËíÝMú”wDløŸ…ì,>ûp9 ìÇäRð^,Ê;9ÿCœÏá8´{tø› îæD™V±bnæ&@¬¼MtÜc¬ó9›Š’x&gs–ZVµ¯>Œ-USp·ê~ýªSóØZºœàjT—ìš“«ÙÀ$j=QÓ˜Z.j.m«DìkË…7×,>FrHÂ8cësÔô(£&òÁÉÐêXp‘@eßãõœqè ¶ˆÖwß9ú¶ö¥Þ€•GŸ¶H 9 µ–Ç¢éúßëö¶××ÝD:Vÿ×Ô‘Ó:7¥u|ÂÖŸeÛÛ®6$ñ4Òý»Åë\µ·´d³iöÑÌ\G¹ëïdy~7í%’±6ne]¸ æ–Cà*ȱn2Ïòëγ|}½¾i=öýýÉ£§öcßwëk6òp"…ƒ§~¦²Þ²Ûól º™jzXÙ´¥6L.ùÈ1¢ëkö}ò?õ§·: ¡¬;z&gÞìÛ£'OÖí«?}üݽêœå°nöÓNûúJ2û)WÒ—ÓO÷|Öƒ×[@Oê©nÀà_pF/µÕª}ºÖn³ƒ!;€£ÑÊÜíã®ý?jç»F¸ý?êàn ø¸úòrîÿq—þUòŸ')çñû¸Óë_ÇÝ!÷Y‰ökGiçëæ D¨Ä­v2´ÏFu†,éÕÞ ºî‘ÅÜ&ÏàÕ0÷ (;Œ×IÔ»ž"?3O‘#ê)²O=E¢fB}G’+éXòbÇÑIïbøp¨ìEÔÝŒÍ(nt0YP4ËÍatÓ ¢^ *·›\› ïÓâQ»Ñîb£W½~L~41Vƺ¡!y.F•ˆ@F¿îþrøê4Ú>ø *úuûøxûàô·MŒÖÓ#d4iUíë~„ ?hv‡70 /ww~!ðÛ?ííïþH¿Ø;=Ø=9ÁGÛÑÑöñéÞΫýíãèèÕñÑáÉn-ŠNâ8o i œ,ÕÓæº7ˆ w›ʹÝ;‡/ö~nüR39u ‹Êç½îEû²vU.=àÎúyýà°qtúËñîöó“ l ʧW'»ü[ãùâï“a«Ý«]ýP/Bx×Ív—9¬DÑGÜE¸Û ºû$ïÚý~ÜzÓ-³½iGƒ.ÝèÀ™7‚Ç|0ê6È–Óìtâà¯|²9ÁQî~j¢N0gÞ9{§»Ç'QùkÕþ?Ó1Cßœ‡\„¢üðj°ÌÞµA‰  ?ìèHlŠ‚çâŽRL–b_Òe4§K[ƒ:€R9Ågsª-†Ç•R ½ŽÎÉ¢…ˆg’œ‘@_%¤†˜À/Ãí7Ô~tzü|ïÅ‹Æi¥ÝÚäÓÆ_@ÜËm¬Ó‹ÄR_úÆ}ööºï›ƒ6áoÿzôÃÿ½ͪtÀÜÔWëmXˆý–ƒÑ›Ù±»¾ipœ7ÅVŠ’(¦…¿”'!í®¸hØën×…=F1‘,ÿ5ÏzäÈ­½ü,~+hÑ«IjíÃß)¥¸Gü¸¢•þ6²A›Ùø$¹ËRÜÄá?k ›j-ëÍM'à™x†Sjö½)ÀpGçJÿT,rŽPõqÜê‘ j'yïºù.Ž’Ñ€ `Nb²5¶"¨öu10ATCÎà°ú¾€“‹ xM,dMÆãþ NðT¢Æȳtô¬`GÏr:ŠÔ¬ŽË÷ÚðPøIóCÄ'B2Šà(D¦7h«ìß:#R9ù/8®¦Üe¥ÁS§×½¬èãüH X7F_Ïô¾žy÷5…|NßÁ_¸íœìþX)> gYÃpæ? ŸKÖmÉ\ËŽp©Ëßæx†IûûeÙ1IöúcóR‰=µ¬OáèM!ìnˆ^ðÀÉ6"uë´VÈÀ¯–•¨#cÄWìÛ·F®) æôkôäáV´¾iÿTJ>[©'îRoqäÖïnäªU;}HON$/þ‚1ôÉb&ÖY™Ù°}Œ-i·¨$ ð5uÃÂ%óTâ›ÎwÖc±CQ¹1'd+¿@îbˆ›ÐŠ"ÒÁSED¾SW³} ñõ·"ݨþ“|»êvJGzœŽÌ†’µ"9/?^Ñ„µ]†³-y^…e/¿ûb‚F ­G+Šœ°¢î`Ê:*[Z\M'í¨È"cAéÉJj‡XI“¶ŠžúQÅÂX"’Æ¿Ö.h_dÑV•Ï•àsý¿gü§«âúÿïúÿGkëOŸ|Çôÿ×}Wÿj­N çúÿyü§ÿžøO÷"ú“-öÓl#?ÝZÜ'ϨO¾1Ÿfñ©x¼§Ñžn3Ö“ééKŽó¤GyšÇxš0Æ“#ÂÓ<¾S‘øNYÑBc;…Evº“¸NyQ‘c:Í0¢Sn<§YEsÊå4“HN¶8Nó(NÓŽâ4átb8ùE8*¿éŽ£7yÆnº‹ÈMžq›fµÉ³i±ij›æñšî,^“WH£"±šî2R“_œ¦ÙGiò‹Ñ4«MéøLóèLÓˆÎ4Í4óØL>ŒŠÄeº»¨L^1™f‘É+Ó¬£1ùxHO+Ó}‰Ã¤Daša &5Ólã/©Ñ—î6ö’wä¥[‰»tߣ.M;æÒ<âÒqijñ–fmé Šµ4´t#-…ÇYº£(Kwcéî",Ý]|¥;‹®tg±•¾¸ÈJq•fUi¶1•fQiÖñ”fMéˈ¥t#)Í6ŽÒy¥ÿâJJÿ-ñ“þË£'Ýu줹©÷LL½…¬zL¾926Óoá”6Sp1<·e žÒd›„€ëªˆ˜ˆûà–-êôÎ9Ž·h:žjCy÷%›’§ú¥½›–OhZ®oÊÄ\繩y°©¹>¸v£p9Âa¦çöry&èy¥nÕ=ƒÖ¬p¦éZ±Ù˜¨ûö¨î\G·d²î…˜ 8ö4/O››´OÛ¤=ƒæ¦íweÚž;)ÖVÀÔ]+|w&ïa=VÓìMàPÕyè¬LâSŒ4ýin"?5ù r˜›ÊÏÆT>o  /Üt^+{G&ôAU¸Ï¬MêýñÔ¹älLìS<2õenr? “û *˜›Þß®é}ÎÐ;[¸)¾^ö.LòCzZWÑ­‰¾7š:Cœ­É¾ I«íˆ¦gÜ„ßÐÛÞ¹)j“¯fhÚŸÂbl 13Sÿ&Ê»»5ýÏÕhå’î4]´Êï±K€>jÓs ýŸ»|q.:QLÁUÀ †Ût¸Í¦nÉu (Ês‚Y¸øœ†²KÞ‘KÖü¸èÝ¿ ƒ»p5Ð1¸—ƒô$ÌØõÀº¾„ )ÈÑ׸$˜«|6® Vº~4ãfgçª^E³pYH‘Ó½v]È–$îÔ…AÈ™¹2h­þ÷º4Ü/ȵaV]¼.÷¨·Squ(ÚŸ/ÌåaºLnîúpß]¸ ë^¸>0d¬®Èqž»>„»>hƒëpF#èú`-—ëúSêv]Ü´f… u}P‹ÍÈõÁ³Guç:º-×ÄTÀÙ¸>¤xyúÛÜõaê®nZ˜»>Ü™ëCÞ¤8X[×µðº>õXaLwàúàªÎCgæú`2Òô§¹ëÃô\Üä0w}˜‘ëCÎ8^×µì]¹>„tVá>3w}ðÆSç’3r}0ydêËÜõa*®n*˜»>ܲëCöÐ;[×­ì¸>ô´®¢;c×_4u†8c×’V›MÏ:×]o{÷®æ&!_ÍÒõÁÄbl 1;×åÝ»>äi´rIwª®jå÷ÙõAµ)º>ˆþÏ]¾<×(¦áú Síº>ÜbS·åúPå¹ëÃL\hÜ…ëCjfíú`[_„ëCˆäèë,\ŒU>#×]?šq³3t}H­¢™¸>˜ät¿]2%‰»u}Prv®j«ÿÅ®÷Kr}˜Qï‰ëÃýéít\ öçKs}˜*“›»>Üÿ¬ÍÖ}IùÐl9ò=4[3OöÐlÝf¦E…—›æÁ –k?´o7ÁC6V¹~ì^²ÜíæuPà/¾ðŒJ䫹CÃä¹øÀÚ9àÏ]Šdqàµ8“* ¡Ghþ³Gòw‘ÛÎÜ`¥¬4PxÎVff ò;R·/–ÛKÕƒ’€šU’•=æ> ·žÁ:ÿs…;ÌÍ1#6þU,++y§)|;ÊÐ$cðBRá’3Là°JãýÜ aš ¬$0wA˜Yö÷øÛ¸Z¡¼ ¬àÝ%]ðì#ç2wnÁC…Î,Ñ‚Âõ×s?ƒ)¥X°ÎüÜÉàÖó+8ÇÝƽ eVàï(­‚_ëÑ™'Tð@Pay3O¥FÏ‘G+8§’DAhKïC…û³çÙæNPÚ«Ì2k‚‚qçù2ÔJÙô9åL ¬æû&ÖTs$@Ïç^_b‚^Ùt²#:¸åÔ·ÓÎíåEÇwî0£¤Ù皌bw—µ}7¹xÇï(oþŽ² ðæï&‚:ö³Ï`ü’üÀSn±õr6iäjžY΃ŠͲ͙f;PÌŒR(ôsßó¸D»NrÀ†p–X“ÿÕé ‡õËÊmpûý»7‰ îEW§•Õ ¼3_^Jƒi±´¹Qÿ}7ê§"ë½°êGT¬fýøeÆvýŠ,†ýºn!Dzß8¥…¸eÛþ\¼r„4ß~9Fï6ÍûõÄ›/ÚÀ_ï“ònnâ?©‰¿RoÚÆŸñÜÈ?ÜÈ_X‡õ=Ý@3K©\;ÿÌ2·kèï¢/ T¨©¿,4#[¯¾Ô«æ¶¬ýó‘’`³±÷7¸µùenñ?u‹ ÌMþïÌä?{J¬Œ¬ˆÑ¿,z‡Vÿ}Œèìþ}ÑTùåÌ,ÿu¦i~˜ÛþOÏößEsãÿÿgN€•½0ÿ—%ïÊþß¿›‚ÛÌÜÀG•#ÎÈ@ç‡Æû¹ÀT¼\³?w¸e7€¬·²±ŽJÉ;ñðîc]¢:c_?Uæ7co+‚VóE:U·z÷úVÀ_ÌÒ%@Ç`¬¡0;§ ñæŽÝ²õO9„:UÇYõ}ö PÆkŠ®¬ïs߀/Ï7@!ˆi8¨”p«Þ·ÖÐm¹Bxî0ÿ€Ü“NV¹»òß…‹€Òõ;ñPÚ¿'¥ý»ð0†ÖniÂÿ"üü%k?gá) ­ê¹ ¤iùÑL¡³€±nfâ- ÑývÈîÖ_@âìd›ÿÅ…öKr˜Iï‰ÏÀ}éëtœ õæKó˜"c›» Üw·”²ï…×`bu€3öÀQ¹5—M³‘ã1à «¨Lfá/‡UŽ°æÙ)ûÀݦ³€ÖñE» h=’¯æŽ“: ÈMû °ž» „» ÈauØîÓ± tHÊõÈ*r».ÊJ…:ˆ23òðéHݾXnË; %5ß=æžS÷ pÌÿÜ1àÎ2gÄÆ¿Š¸ˆ’wèàßQ΀îÀ'ÀI…KÎÌ#@c•Æû¹?Àôü$0w˜‘;@ÖøÛ¸ZgQð®|¼ûȹÌÌ=ü0TøàŒü4.¨¿ž{LÅ À1ós'€[vÈw÷*à Þ‰€oëÑÛÿ{!¨°¼[ÿÛгÚsHçlÿméÝ›þkÜŸ=ÏÒð_k¬"0;³ þâŽþ3ÕJÙô9U“Qó}¶ø—ƒ5EƒÚó¹½ÿ—gï/Éaæþ ܪµÿmµs[ÆþEðÛúÏÄÖ?ï\“Qì®,ýEÛwaè/;~'vþ²ù;1ó—Íß…•¿>ö³6òO‘üaãï-·Øz9 u5ÏÈÀ?EÅfÙæ Íûõ3ë~~î·q¿[¸[Û~1„³3íMþ[öÖ/É°ý»'vý÷¤«Ó1ë/Ò™/ͪz,mnÔßúuY÷^X÷k(YÍü5ˆÛûëvk†ÿvDŽ@h!›ºc>Þxæ&| ëoÎ(ߦ»€½¥Ô—/ÚÀÞGË·¹KÁ¤.–¡Nû˜c>w2w2° ´Ã Àí@·ƒŒÒ¹þ^eo×!3 C]Ò…gä£ÔÇzÎê»-¯$Óà³ñcpì.ˆ¹gÃÔ=òhdîâpg.~S“É‹8=¤«¸Cï‡cbdwàŠ¶ÿÎÌCÂ΄]sŸ‰éùLä‘ÉÜybFÎ^‘É& ¸S¤k¸+¿ŠðÕÌ=-q¶qØù^Øù«ãûÜc*ÞyÔ1w˸e· Ÿ Èd‡5,5܉ÇFpßëiÔgìƲ™ÎØ«#a«9Eë<?›.ûî>ì[Žùa–. vŒÆV”fçbÇ*õåŽÝDüôxž?UÇ‘t÷ÙƒÄ2ŽSt%1ÆbîSòåù”XdÎ%6ʸU/“[oð¶ÜM&B|îw2¿ï“—Où»òDI#q.)–¡¸ß wâ¤bÁã.¼UÓ2k·÷Bù"üWÂ%´Ì~Ï£ÅÊfäÚâ¦ýGwÒø ]ëm&^/vb»ßî/rÌÝúÁ¤uv1é¶ÿ‹=c&è/ÉEf¦½'¾2÷­ÏÓqš™¨W_š÷Ì-0¹Í}w£Ñ_÷‹FÅÈêD£Ì؇F­[s¡±*#sw› w›I³ÃwEë@§wá\ŸŸ¢·ë2“C‰nàP‡™TÙùË„t°ž½ènË[ÆÅôl|eìÛ‚`î)3uO™ú˜;ÊÜ™£Œ×ÌdñÁ"n2©îÐK&|Lv>2H[¸îÌsÿ—/Ïÿ%MÓp±ÐÅ­z¿Üv{·åü2 Þsß—™ø¾øž³<Šß•çK ‡»p|IÄø½¤Ñ¸·—4wáõbŸ“Y;½8—Èáó,‡eõz/6n0#‡'Õ?º‹¶gèîb_h3ñv±ÒÙývvÉYîÖ×%5¤³suI5ý_ìé2É0IŽ.³ìç=ñs¹g]žŽ›Ë$úÒ¼\¦Ï‹;¹|•úë´Ï˜—C¯ŸTŸÖ×ÖWÑdõeó] î+µv÷«ÉþÖÈßwß=†ëOŸ¬©ÿ’_ëëOž<ùª¾þèÑÚÓÇ°þÕZýñ“úÚWÑW_Òßýÿ~!"ež™OÒ:*5G„0ÈǨ^«?®Õ£‹AïZB7¯k„°ž÷ºíË!¸v·?>ßʼnj§ÕÿçW××ꢃ8ŽNzÄ@£½Q·Õ_¡•h¯{^ƒ’è3¥".TP*a¥6чÉU©á²ý>N¢Q·Ó¾nC?úñàü~zÝhØ‹Î fY«àIÕN†ƒöÙhGíá )ú¡=¼ŠÈø·7F×=²hÚçXs²5“¨Óë^¿C@³Û¶Ïѹ«/]¿xúƒÞå y _e;p©ˆø_õú1ùÑ’–IsNtG£$¾uýºwúËá«Óhûà·è×íããíƒÓßV  P>ãîömÈf«Óü°ÉQ‡ÿ>¦mµ¯û6!C5hv‡7Qï"z¹{¼ó ©qû§½ý½Óß Ó/öNvON¢‡ÇÑ6)´}|º·ójû8:zu|tx²K:÷ìd÷´ñrû»ÏJÿ<Ú>ý…pÂgÉà¼Õ<+5¯vÒ¸ìŽH4[Ôå¬Ú–—¡ ºsíïœV–€«_÷wÿ¹»_YÂj |c0êvÛÝËt‰ð&ô)ÛBm×y3‰£ÅÅÃæà2²oÕÏ0¸\öc%ÚÜO+Q|~Õ‹ÊY•oÀo<è6;Q<ôðL˜n»UN9¨•iËÃj)ËR”ôãsB=1)þÃ7ë›jàÄFvKú.Nšçô×U3ò[Ý}NšÝ±½è4/“­ÅEÄýíŸO6¹Þâ²1ê\|Ò5(Åa apl@EýêH>|óæ÷7Ñ›…?*ªÆè,ÙzóFí”ÑÔ[ês-«ÝRTV*ׇóS”Ú,'«‹‹g üïwøOÿ!M®®^–ߊ‰”CuÑfCô®ÝotÉjƒF–Z¿14Û2–Ñ2Eú#«á¢siA¼-«ˆÔkWWIËXì3k“, c³¸¨wwœ,i HÕä;GŒì áG„Þ?ØÆ9lwG„£}ÞÔçµ"f`ëá§j• ¿(¡|õá^ÅìõÒÞÒ¦ÒA@)B üøÐZD¯ö0 s˜Yí¡­ÚC³ÚN¦“YmÇVmG­¶ú{k÷ùõw%¿ÿ¿SçgIUÎ X\Ô–7Á‡¯U¨(:#'»w–úZ½nL1ª`¥(MHN×Ü~DÞ.kÍlu7Ùw±¬JEVò.Žû—=®çG=ýw—d mNNÊ/.³ß•ÕgGÛ;ÿØþ™0|ÑîžwF­˜ÉGŽœ)9 ý™þãs†=ªp€ðy‹ì<‡­f‹,Ôÿ{òK㟻Ç'{‡ßÖ>/.ÇÆÉ.Ù«¶O+eXgç­R»› ›N#¹j<ß>ÝfÈòw•¨zU¯‰$óX…<:>üùxû¥X…:Ù9Þ;:µíœœnïï7~ÙÝ~¾{Œü Q)êí&„‹\ã7v@hˆ· tX.¿ÜÞo°¢t£tt¼«?žœj/X™Wf)ã ”Ó_ÚDÅÕ‰.Ÿá‹g¥«^2T_Ãó³#+å=}ó¬ô •TG§¿“Þ7~i¼ØÞ?Ù}vº{rzÂÌ—zqy÷õîîëÓ }IFðü|÷ÆQÑ_“ÑîÉR°§Ç¯rÚ|c/³ :{÷‡W ©%ž¥ŒX=¿ŠÏßq;ÁéꦟõJ)±ƒ’Wé99$5v_¾<<@`zĪ¨™í-9n¾)-,.{ýÿØŠû Fú[h¦Ú£ò ´½³¸C¨çåclKkž“n4;µëǸÙcãúqƒT›¤À¯¯’¥<ìõ Dø<¤ 'Ë×dtÙ¸ ³ÈŽÂÿ×;Kz„.ckBN©5Ï)o‚‹èŒ¥“òzçðàÅÞϯÈzz¾{´{ð|÷`go÷¤BÛÃW)]¿c<´˜¤yD«DkRY ˆk‘$È2DkWü*0¡ý%žÁÅ'ûÒQ ÍY¨Ë·­ ¤XÓ3Y‘Àx•ú»;&Û¨-.Ã{·Ã"ÁX>Ñ]Y¥è¿V‰úQž^¢"iX'McSë4KÛ/ÿlt†¢ž÷ä¡ñ Þ>£¨à‹ôçç»/¶_íŸê`k®ZM?éå[˜?|²ÍKãäðÕñÁø–1†t­õÎþŸ“ D Uû°»¨ÊŠ„œ'yÐþ dôyµT”š`Æ2ÓëO§w+åô[GS®º6Ì5@ßšk +‡Hÿ¤ÃOÜ—ý#ï±äÈ!O0»ˆ/Íš²ƒÚ úκ‡+ÿHYÙGƺ?j¤>¦Wý.ú‹&è”ù›:±þŸw”JȓѼ±¤Û/ÐÒ3ªŒ‰"¨õ)Ñâ³M¹ ¶ÝT¹ZÓäjM«5]\­I¹Ú3ùˆ pÀ½ƒýWÏqæJü¸µžü²»¿_‰¬ç)¬Šü†sWB¨üæ ^ü•ÊÞ“7ä?Õ ²i¿<"›4Öº³U’¶OØ¿”äoÒŸ£#Ô›0 ’ô«x`¿Jû§jsû{?î3hØ&ÈA¤:l^níìÐw BmCU­^÷Zñt‚Yé]@ø ^¨] '([/Y‚¢œÞcöÉ‹ôçôì“Ñ‘JSDG`$vvöŸóY*íïücÊcØiwßaíûÏ]ó'Ædÿ¹ø$~V{i>6 UÞƒýç©ñ!¯l ¶1"ŸŒQ"Õ§F‰@á8± Ÿž`•‰½¯¯Íƒg†Êa–¤Œ•¿¥Qn«X«×)%š]PŸ4Ø©¾Ý½èé*i2¸¯Žˆ´òú‹CÒÒ±Ô#u?u{Ÿ+”Ñ uÑÃJÄ¥„*VX­21§ý@ØÍûÕî¨Ó‰ÖøFÕÓ³Xóò2n5åà P¹» ôæ”–öNŽ*¥Ñ1“¨uÚÉnºñÒŸ¸šÄý&½•[÷2¡·>p‘@pì¶ ú^ôÀ=y¦ÁÕ¢¸y~Õ¸ë¨×=WÄ-JkÔïÀ%J !éö hÔ´âAÔNH»½áCõ:6ê¶ÿµ/nè•vmû×T¢%èþO»?ïD£n¯_÷‡7x}fzÞö0¾òÚx#­BÕ9Ù–ò"Zæ_1”]o@fæ 먰žµQ? —Jô®,JˆÐˆ#Â/éçdÚpñDP1ø^_tcò%in¢³ø¼9Jb¸¸vY[¡ƒ !èhy+ðïÍÈv’\5!``óîœí¿oÚÍ3ØcÐp€í‹‹x€—AT¡”À)a@ Èx³] ,‰pLMŠÁ€>l-±e£|®,Qj£Úz µ©òŠ(*o2ô.ç”éí2»‚@NBž7éM}J üÀÕø (>1F¥O~åmi˜`ô’Ò{:Ç'ÄzxC„ùNo4Z£ëëÖ±ëËîVDFp+º_x<ëŒÈ—[„˜[[´qª Å‘k$[ÝžQ+©Þ°A2š«ˆÛ…òkÊ×÷¨Œª”I ¯Aå¯\ͤ[å·2y5;š7Ife¨•NÕ¶xº{ü²}Mê ˆŸÑ; :sCº8Ö%Ãñ«ŸO oeqÑ¥ªn­2˜’¥ÿï÷µÍGõë%ÎaŠèËuù¦Œ¼¬k/a éËÇòåõ%/þD$ó ò L:yÃ_Pì?ÓÝ­ß^5š­Ctª)¥âÅÃÖ[º- òå×EKɧù¿Ë¥·›z-@ tKèË@R?aú¢Òž¼}úô¯ÅE¥áÕOŸ”û/,EÀÕ›Cl–ÞŽP "¯Z¦µVcÀó_µ‡¤6Ž(×K]7ÑQp _v{gàW@kãÀ—j^C±úûµß þoÞ<üôÇêò÷Í*™TÕ¬R`(}ƒ¡ÈÙäLõ€ MjdÔš‘ó³Nº#•Íü6#­]ì7“Èh9ú´Y^ŠV£ÚÃ7««_'ðƒüou3JVÞ,ÃÛÊêïÿZýãáââÊ›úÊ«Œïa|ÿB.û{¹V†ª\&Ë¿[\\‡wÊCÎa‹õMÉq—¿ý¶Ëy¯•9­È»Úl#°+J•dgäí¬mêí".ŸYt¯Ä½è‹ ÝX­ä¯•üü#úL/ðÕ)á¹´¸øõÁfö’Õ7ÝÕˆP2K™€ü¼ÀúNå18²°åðQÞ¿Uÿƒ—½Áï ?}â,ðë¨Ú‚ϤTYX'|Íö4ó倿Üã„5±ÃórtŽh´t\“z`é¾[®”5s:{ç­ŠÚ–áEÄ1åUƒ˜^( `íþë÷há‡ìÝ>!Ôe‡¬‚= “ãÕ¨3Ô ÐϨx«ÒÏJY0“!ôÄëèô.µ²ð™V«¬ò™•}mGDN¼†ƒ!˜·¬ 9N—œ3ÓçK~xÂA…»¯$ê¡Å ©Å8j2bƒó†ì¥MzYBÍhÀ h؃cÓ ®’#:©cÔ'Õ•Ñ… N™ˆ a1†|—â«“Ò ûJðâÜ͖—çp½z¡3þçûh™7£rm8Hʲò¾#=6ÁÅDÚ%¥¿—ßôïF«|]ÖN™ÔÎË/Дc¹¦»V^}¿ñ,í`ÿ­Rê“$Uù½{ðÇ?VÝxÞRÃ7¿ýñ{¼ûÇïÉIVãÎ6>‹³È2«•WÂ9 Ãö¼Ó#¸¨³fyã烥[#ësÒ•!%èRŠH«Bà"ü °C)«†€P¦%•õ©0ÁùbÔ=gA¸ [\¾N.a(>ÊhØQ¿lDd}€ÍÀⳠ¸a¼e"¬ÍãRÌZ FB­y"rŒ¿—¯ˆ,Ì&è[ZI'ûòßËá—[2»p¥µ£ï~m‘ÿ}Õµ)$Ìx‹aÅŸßtßtË9ÚzšyÉuœfŠ°á¿:(ßî:gQfAÑ «jØ JäékÅÊÑ+K%-—³Ê–WÈn¿‚ý«l¦‹"S_\tCY‡à‚x€u·¡|¨w¨³ëÜ &¤p€4`zªT¶ô¤¼A§Fé³yPF­“‡>1ñ¡Á•xºÔô!ÿ,ÊeR6©<&ƒ3G —8ã¶a{؉)G‚ÁÄGo".Œòâ³2™”V0Š‚Öï†¨­˜PÆp¹› Bm"ŠÕÈêb5¢úd×O•dcJÂ=”¶¢1‘ÎA²£âc‹S8ýŒµ­åË<ß;nUôïäÜ„T5)A{ñ‚+J¯UÚu©°£’§´É‡]ž¥fµŒÊTÖ•d¸…‚$)¾ ´¼µ´øl‰ö[A-ïŸïlÿ´¿Ûøeûøyc÷øøðø¿Ð$u;@u¥ÄfAÎ’•€´n¢j2†¯_lïí35gÄ'§ZŸ“¾03t2Ûâí¤aŸžfBÔÞWÔXQ𵂓Þm*D"ÑEljùâ%Kê%J ÉULV¬z¸ p96ÑY¾”Ñ …° ²%]aÒÁ•Ø_ñuï=¡÷åv-®­D°o½o‚¹NçfÅ^7ABodÄÑlíKéJ+4mPÄŽ@dNšï¥ß í¿ƒ u--‚ª'YâW½.l„E Û ¨“íhÐn×%èPÓLøÕ Üé8_³EæFöƒfr¸¹ŽÉVLJ&¸±€E¿ïuÞÃ+zR¦ÃŽm@‡¶ÈĬv÷œ¹×ÐÛ¼w ‚ô5_ê¾2ˆ1& å·Éèâ¢=®+a)”à0ÇQ³“ô¢%Ô”šî’ïUäwUV¼–\-a·( 9LU1¼gû~lêò¾§#ŒÕº'#®Š6ŸÐê–×» ‹ÀÊ­‹‰:ÙØ‚Š+úwir&‹lðQÇuA ‰©NïoàäX€ƒæJR'Ì|ÉgM¼W Œ—xñÏ \#Ü®¸at…?ª7Ý»¯áÞ“¾oÓ»~nâ ´È~‚¡p|?ШBØEìÿD¤ƒÓßèçô{M‹B¹W§‡`”‹Ïì7}+¬|ŸÉ'ú|¡ø{êM·ýë?ðůÿxVB«—g;;ðkû„þÞ>¡OÏw^>ßå/Ù#ýF]·Ø|€÷Z /9äÑ>áoùý&oûíÅ×üáØQ!$ü OG`ö€Ïð‹¼ÙßK|E’w'¿½|uºG_²ßäí«—G?íàKúóY‰ð«ÃŽýÅÞˆ7æT¼9%o~>ÞÅþàòŒ‹AaF¥â…àôIúH<+µ»¬§ô×3ê¦xQ¯°f§ÝLÄ[úÈ¿÷Gò yàï{Jž€~w[½üBŸÙWŽ‹˜é‡øŒý¤ï½ÞPyÏÉ·Ÿ9ú‹¼yßæoð׳ø‚ŠƒðÑÊQ>R_7é㆞o¢ëò‰}aç¿ÙÛžîqHÙiå‘|^wrìç³’æWùL>Á—‹žx?Ÿ)Þˆô5zV~—Ïè/|#=-ŸÉ'ò¼œx“â½'Uµoüų²ôýEÞ¼#ÿ4úøŠþ|Vê‘ŽiÒ^<+õ[ìýEÞˆÉáób÷¤¶/¤DÂ+M°ÎD’zÂišÕ©Ôß<+INÀ9@r“€W+ž¸G¤ê É|$©Ïâ+£"ù$¾ôÔB=YBR“ö‚|çÜL!oóÅú ó@ÿ©¼Ož¢ Ï6™Dj Â9\bâ­:óà/ÁX.F;¸S»RD'[UWZçJã×XÒa/‚·Vp…)Ú¨¿-(=à6…G7áfªÑ¯„(za«š€êO¯ööUcã|\ÛÚS¯„Þy\jÉT 㙈ÊÖ÷,îâ-—¼à]VªV2KQÓ/£<³ë€ª”ÎVŸo6^Èr(Fè¾5ï?'‡ˆŠøVwó²Î+¡¶T1*»*§“Jäå““6×ýÎUWKrZ|†¼‹š%‹í»áûu®ÁÜ!ª ª-Ì h àÈÉ´ "¾H%Súæu©T;yõâÅÞëÝ“ ågT;k jQQ#ÿöÎþM5Sô¿ÒqnEKVçë &çÿí7@¢¦”épÊæ^šÃ1ÁÿÍçN dÕ B e+Ä4S ,,y÷P˜EÔðÌR¸[uÔuµJ6ˆALŽJ55 Vn"Ÿq£n¸ÑXc&ÝÌç¢ÍìÓRámd8Œ cªË$ªlÈ(¢\%.3pMؾìFz82T‘.H£¹T%جOM¥ÚÑñîÎÞá+Bâÿ±áô»×)–¹kÃña”9e“÷£œ©‡ˆœ¯ÂsŇVVe©Q#ÓÛÕtd¡ƒ#cñ£QÝ¥ª£3‘-\5íµa.eêFäðä®ùD”Þ>}u¢»ç— 0G(ÕbÆ·®ðâhrš5CLÖ®­ÆRéœÈ¡Ý*Þð@„ܹûˆâïÙ-c™ÚZË Ñ5ÉÊÒ6–Úc“Üò éÔKTø(+ålÚ¬z`\¾”¬ŠÊ¤ÆÞ¿RÉÔ`Ã8…p—aãµL‚k¬Ýd´iÛ¶6™Ó õ ¬€›×Á?*~xÐCõs$˦”zaÃåÚç¨Üê«nï­ÔÖí4^>ý÷ÆÕ:"F 1†ß»ñ:£ÛV½·fØŠ¬Nfãaí’)cC÷|4+J»ºý±èÝÑÛËìMf_®{É°sÃõR&¬©J~¨8ø—@˜t ›g u>Û~Iú@¬¦ SnµUðz†û *Pq9⨧jå&©Êcõ³Óý4ª¢^S©F$Û¾ºh&C²ììˆ@lÂ+°uãm 9ž½<%LòÏsò¿#ò¿‘lfñaí´ßÈ]àû-~ŸYssXa¡ÎÞWÒµh/ŽzéNËZY‰0õÑ$[Ý÷K ‚f5‹x´ÕíE´ºŸ¶wþq²¿}òË3ú)>[1tg·tðÀ T,ugãûŒúA‘Ï´±VÆ'êìß·6UoIA~KX‰`àÞÎçnsgX˜ÌŽÏ²á!înáu¦;{_óþNŸ:ÞêâËeõ½ CC•¿LƒB‹d*èô0ŽH@?ùÝpÐWnAI}m¼åšŠ%mÌ–P8 æ9Bš_zë?®²öB>h[/´"Œ¾òÅ‘?^_ ë›5AÏ‚ÜÙ”ÿ;ÖþÙ¿g±úI+oe¥1'Ls©ï™&ê3muY½1Q/ÚoÿŠLãìßs¶1Û¸ :Õ„c6{ªÐKÎb%ëÇÁET#¯’¨ÿ-•öžoD–(1\ïŠ2SÙŒ®ßµ[¤±½çÑâ"&S‚Ø-„Å‘ÿÂE Dt¡O¥{·Áã™ú à65FÕÜU<ˆ·Þö?´Þ*w˜˜äª}AõzbfþƒÚEl}û˜ÌïââCŽ8÷ÆØØäáó"UÑÉ ``qs1ÀirÌté2Vʃ¨z‰jKeÞˆaÓþC%=ý…‚¢¼|!H<+‹æw0׉ë7j¦!T.Ú¥s:§ç|Ri ö¢t^`^}¦O™±uÆøD ’褳Ã{½cöZ±céµ ÛÒÏØ)Niæ%”¦m2¤5 êÝ~]Å¿_ÂøDÕ6ùü³‚™Mh©\:OÎ{ýTÎdDÅogíѱF³ƒ<-0‡+Ò…_]ýþæÍ*zÜü¸AV¢D÷<*GÊmTÂ|»øÕŠ”Ë$k,©g()õ–«¬Ô) çz~ÀF…a´Šªÿ~H_äá8ÖhGESˆt-8&FŸ"¬ g)úù˜þsòÛKò_t)¡l œeÏÁû…ºï¶bˆKÝŠ–àNy ù7i™äª7ê´¢¸Ë‚Š¡›_™¶uÑëÁ-õf„A,à ütY„‹h _Ñbþ±ä5 ¾ª½á@7ôMaåÁUç'¸¸E‡žA|ÞîÇèÞó¡Nßèá“Pƒ™æû^»ÅÝf˜_ ¨Qí–k%¨jÜw"ßCtBçµÓµH¯¡b‹$äÌu?bÏq·µ<­åè©ZJ)bë 窕2ŸD` ™œsÜÄgRËgºPVËg¡! ø,“½ãOhÔ¡Ñ Uùôðt{VádTÌ>\–7]ð°ôhø \ 9èºácPx`0´þÎÈ ìñAn‚FV—õ#8Öà쨖Q?v ,Ör<2 „Çð×:ðD…)Êé¾pxR–Ò£q0 ÛË‚Pbh!‡XxúÕ5Ãr=njhlZ«Õ0`LÜ&ÑF+î¯6¢õrVÉÌÍ“nœ6ÑŽSÜD¨”…ÏÑ©1¨ ¯ûʉ€A^¿ì©·4ʞߣåÑ>äö:[œ^•*>48¤ õ½`„Ô_zÙ! qålQ¯Ô­.ñÏ”£$¼²ä”Ï5Ù<®¯›,JPŠºD-žm¸)IÙ'6 „ÈKZ©¬,é2=âü œZ%<‘±d_tÍIW]VÂKµRÓla£Ÿ:1¨€Xÿ0VVº mø¢HŸ2Y¡eR,†BÒr‰fI«Ò0Še©±ôUòO‰ê*,L5ëL{%Šd/ÌT3+Q”Œi–$ Ío¤ è•u‡`wÒdÕìÔ‰ ò^ÅŒ3»lAð䳬’}ã/¸2Ý!!šý–Á]€;ðèV lyK\eÎQÊ|ø–= ¼Šª÷à<;@¶òÖÓ NkÖüÍ‚vJsµ•R\©à³§Þ`C6ÉÏúÚµ¢øB¥Î3í£æÕÁ’ñp.4 &] Ý@18”©Büá*æN)Äð*Æ௘ÜÏmôS¡ò”(2´%=˜Œþ®ZÕcÐàXd†À;”øP/ž7ŽwŸïÆ£e–RÆË´†Ã¥ÐG ¿ý‹©ÊÑJ™B‹á2¾èãE?þ̸yN­K›É¼±@Ó ¶•* þ»UÄCÚ ã´ø½Ú_Œ*Uq €;é¶GÁh®¡ï Žñ0£2y ŠšÒío7;˜'4Š˜je}øt¨uÍ`ŽØ‡ˆv Ù/þN‹1i]Ž4Se m•°¡21Í‘œq`ƒÂ¨Yú° £>ÁßÕ"Å(å6¥¨ ·3Íf°aèïÛ1üw£„à6"ø/¾g?6Jë ØìEq_ü±Q*ŒY}-(Ú& Z4½ò†â¢>i5¨¸É µ²€‚«öB)@HRyê·.diò ¦Ï*t¢':l¢Š3DzµlD©õãM–’:YE®µ©ÙÝ *ÕŸõïœÄ,,Û$x¶J%W>žbaüظññR ä±;ÕÁSE0H>îʉ%Ò6|Röè—Ãß6"š•ÚÃâ +¢VJ£¿‹°(k.zÍÞ+@Ûina.ç'|Ùò&ô…±S-,e¶œqù¢Ç]!¸jùÒÍ;XÂh:£/iu ëY;¦©EÍc¢d¬\m¥ª… Ta™ªëÒX£jÉ~¢¯I,´S¢R̤+8A§’·cA©ËÁº\Œ¥a)&¦:È:FzC{ÖBkœsNMbÁ'í’5*àFfŒDpUAá8Ùxýzcã2Zü1úM¦Õ÷AŒ·±ì» yŽ{³Գ³ÀýùbD䊌ª¹¼JŠ)LJZ¤Æ kÔH~—þ€Ê}SVâÁ]½)—S£v²÷¿» Qú¸súÛÑîÆöac(^‰ñ.R4gJ¼ªÈž4O,œÓêU>kμ*È aœy…ÖÓjùVµq~ÕµºIû²·V>\Õ>g[`M´Zc>)†ã8ÍÁË¥Ðúrè¶àŒLÍÛ!Å"O®zƒaFÕú÷l2­Ë‡Ðƒëô õxNwóé(¸Æ<‚/:7·€êm‘fÙ“#§£fOZ÷ªÀ‡Àý*ò j_Œ¦00ùDáWMÑ ò´š* …Ðd«7:ëÄéó }ï{² ©Æ‡>Cªó Ò0ì¦6`ùÄRYݘ‚é"x $—EÉšŒ×Þ0¢ú/(ÍH‘ê.æJ¢ýâF’›î°9ÞÐêìeÕ)ƒlý•žbÂÂý"“è÷Gµ'ÿ³ò¨öÝ£ 8ÿ|ðŠº{àWÌs‘6•‡˜ð¼“?´“8j„"¨®ÛÃhì'7É?£æ0‚™VP{~“ºÎijÚRíàp÷5XPo”¾ºZ´õêÓÚãÚ:M°ª'o˜¤5ò÷ÝãÇðoýé“5õ_øY_ûní«úú£GkO=}ü”ÀÕŸ¬“¢¯¾¤?Ú™5ñïò·ú°=Œvzý›æÊ\>¯@VìGUòŸ'Ñ/ñ‡N<VšçVôœ&A†,Û¤Ìu¿Ù½Y‰ökG5R Ôƒ7QÔFn¤ÞCòRÈœ îü°ÚhŽNÔ'¥}NVÑyÜMâ¾B£u¨(Jâ8Ú9<ú fÑùÃf»“À·U²¨Û<órãåÉN À>}biħ_÷­c(Ž¯Å»ÆÎo?ãûFÃþÞ;ª‚ÿîìB^Wö!‚ôä%͇pRz€~€²Æ÷ã½Á»Ä,ñÏ×J$6¾ÉÝVûºËÔ`ß'ÃY­µ«ôwí¼‚a!ÕuDYmbiQ³(¡à$‹0ü±ˆ|;l&ïöéŠÔáe>Ð<+zöQSî•éô.›#OƦEŽíKB¿>ZßÙ%¦ÏdóŒðð &ìÆAÅçåJÔ ”åj½­>dá&ÚNB´1ÌÎ.™Ò³.t ðø”ìŠG§ÇÏ÷^¼hœF^÷25ùä@øÝ㊣û,ÀU+¯š"vA€ †åx-C7äøÑ=¯,Ów•M ՟ׇT!-a*è@CFà8ŽdKüz+ZƒT8Ü!Vk@Ý–¡º.³ü] GõÙD4\¿¹d"zÖ˜€’4§ÚFé#Y¯ŒÂɱ`8h]œü³©¼†¼ËƒßëkkÀ[hªÍœ÷Z1A“ÀÈãÅrÊ 8Áß’7ÝòJÄúfcËArn!•UQ|d M.X§l0X‰Êj÷6ðRÔŒ± zä Ðƈ•‘f°tØ ôH?Ã!†_ã—£W¯Ù=z‰Nâóø¢ yšÑ+ JÀUb©Ê0|_‰bvß¹¡ÁP€÷8:#g—íŸö`²iE{]pvK iR-*ðG+ÂñáãÝ¢¸Q@­Ñí/××Ö?„ÿ¬Dk¤½ ëõG‘&5ˆY5²`µ¨\ráV>üGÔ¼B,0ýŒÎÉpÔÔÿ eè3¨‚l,?+H°-·£-p{nGß bÝŒ¾ý¶­“ Å2æuR‡Âeò}µW"¬yé›/àeXñ•v%xphÝ„Ä`Y û[k…ù‰T ȬDmÑmƒÒ`ø'ìç¿{í.ôò÷ö+ÑÁ«ýýðî@Sê `H>èhó•~lÎé’   òåÌ•ýé.cÝF }2†¥ÏŒ‡ÃRS¹ ?Ϥ·áé³G(má€÷…ëÁ±âdDØU·µ¼&™_-R’ƒ,VPY¿ù¡KH“ Ãà vf%ªÿ}0ž•èÑúÓïþNÝ‹W;dÇ­à¶Wœ,$"Ÿ×I±•ˆ0®'+Ñw+ÑÓ•ˆÔð?¤2ÖþV„þðä.åAoK§È=…)ÝíéôoÀ‚kúÃœà—¡Æ½ËYß*йÃT´VŸÇæÍòwk éÏjÍÙ©&ké‰%f®=åäZJ†ƒÑ9Y.ƒæu¿Ñ\&ˆ“\q]h hä#iƒ,£ç¿?H%ÛG{´àòþÑ?÷žG°®éL×ûÿ»-[>U°$.QÖŸel¥²¬+ËXGõ‡‹ne™µi@Ðïä¿[à-¿l<ßßÕØKº?ðŸôù‹ŽÛý>-ìfûÚE—€_Ô7×ä_ò¾­² Á7¢ÜÄO±îeØ8‘[ánÅçª"­â7º»*ü¬O|'^}T>¦FGmPgAQŠ¢e®ãƵPù9î7“á.DY®èÜ)µ?Oá¸ñk³=|Ñœ:éćÇXœ:ö^ììîғǯÛ{§,™LÃçb©Y9Œä10_öaE2F`™_Íÿæó¿ùßüoþ7ÿ›ÿÍÿæó¿ùßüoþ7ÿ›ÿÍÿæó¿ùßüoþ7ÿ›ÿÍÿæó¿{û÷ÿŒQ¹À&asymptote-2.38/config.sub0000644000000000000000000010527412715037471014171 0ustar rootroot#! /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.38/getopt.c0000644000000000000000000007270312715037472013660 0ustar rootroot/* 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.38/settings.cc0000644000000000000000000013643612715037472014365 0ustar rootroot/***** * 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 context(const string& texengine) { return texengine == "context"; } bool pdf(const string& texengine) { return texengine == "pdflatex" || texengine == "pdftex" || xe(texengine) || texengine == "luatex" || texengine == "lualatex" || 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.38/constructor.cc0000644000000000000000000000713112715037471015076 0ustar rootroot/***** * 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.38/path.h0000644000000000000000000002644112715037472013315 0ustar rootroot/***** * 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.38/BUGS0000644000000000000000000000037712715037471012672 0ustar rootrootIf 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.38/runarray.in0000644000000000000000000012766012715037472014410 0ustar rootroot/***** * 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(&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.38/exp.cc0000644000000000000000000010117612715037472013312 0ustar rootroot/***** * 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.38/runbacktrace.cc0000644000000000000000000000514512715037516015160 0ustar rootroot/***** 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.38/runtriple.in0000644000000000000000000000524512715037472014563 0ustar rootroot/***** * 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.38/newexp.h0000644000000000000000000000237612715037472013670 0ustar rootroot/***** * 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.38/runtime.symbols.h0000644000000000000000000000444512715037527015534 0ustar rootroot/***** * 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.38/settings.h0000644000000000000000000000453112715037472014215 0ustar rootroot/***** * 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 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.38/errormsg.cc0000644000000000000000000000333112715037471014347 0ustar rootroot/***** * 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.38/drawverbatim.h0000644000000000000000000000237712715037471015051 0ustar rootroot/***** * 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.38/ReleaseNotes0000644002154600047050000032376512715037520015371 0ustar bowmanbowmanRelease 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.38/config.guess0000644000000000000000000012753412715037471014531 0ustar rootroot#! /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.38/runbacktrace.in0000644000000000000000000000150112715037472015172 0ustar rootroot/***** * 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.38/record.h0000644000000000000000000000526212715037472013635 0ustar rootroot/***** * 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.38/camperror.cc0000644000000000000000000000224712715037471014506 0ustar rootroot/***** * 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.38/camperror.h0000644000000000000000000000146212715037471014346 0ustar rootroot/***** * 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.38/runtime.in0000644000000000000000000004754412715037472014232 0ustar rootroot/***** * 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.38/aspy.py0000644000000000000000000002637412715037471013542 0ustar rootroot##### # # 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.38/opcodes.h0000644000000000000000000000162512715037472014012 0ustar rootroot/***** * 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.38/runhistory.symbols.h0000644000000000000000000000115112715037527016266 0ustar rootroot/***** * 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.38/callable.cc0000644000000000000000000000217712715037471014255 0ustar rootroot/***** * 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.38/env.h0000644000000000000000000001073712715037471013151 0ustar rootroot/***** * 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.38/pipestream.h0000644000000000000000000000510012715037472014517 0ustar rootroot/* 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.38/runsystem.symbols.h0000644000000000000000000000172012715037527016113 0ustar rootroot/***** * 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.38/runstring.h0000644000000000000000000000027412715037516014407 0ustar rootroot/***** 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.38/runpath.cc0000644000000000000000000006326412715037516014203 0ustar rootroot/***** 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.38/entry.cc0000644000000000000000000005040212715037471013651 0ustar rootroot/***** * 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.38/opsymbols.h0000644000000000000000000000223212715037503014373 0ustar rootroot/***** * 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.38/texfile.cc0000644000000000000000000004734012715037472014160 0ustar rootroot/***** * 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 { name=pdf ? stripExt(psname) : 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.38/asy.list0000644000000000000000000061041612715037721013677 0ustar rootrootstring stripfile(string s); string stripsuffix(string f, string suffix=); real cbrt(real x); real[] cbrt(real[] a); cputime cputime(); string stripdirectory(string s); real sqrtEpsilon; string stripextension(string s); version version; void texpreamble(string s); pen beveljoin; string cputimeformat; real Cos(real deg); string insert(string s, int pos, string t); marginT EndDotMargin(path, pen); pen heavyred; pen black; pen heavyblue; pen heavygreen; pen heavycyan; marginT PenMargin(path, pen)(real begin, real end); marginT PenMargin(path, pen); int realDigits; pen heavymagenta; marginT PenMargins(path, pen); void newl(file file); void seek(file f, int pos); string verbatim(string s); pen heavygray; pen heavygrey; void markuniform(picture pic=, frame f, path g)(pair z(real t), real a, real b, int n); void markuniform(picture pic=, frame f, path g)(bool centered=, int n, bool rotated=); real[] mintimes(path p); real[] mintimes(path3 p); bool straight(path p, int t); bool straight(path3 p, int t); pen makepen(path p); real dotsize(pen p=); real[] curlSpecifier(guide g, int t); real straightness(path3 p, int t); real straightness(triple z0, triple c0, triple c1, triple z1); real log10(real x); real[] log10(real[] a); pen paleblue; bool prc0(string format=); int CTZ(int a); real barfactor; pen Magenta; real cos(real x); real[] cos(real[] a); pair cos(explicit pair z); int intMax; bool cyclic(guide g); bool cyclic(path p); bool cyclic(path3 p); void printBytecode(); transform Rotate(transform)(pair z); transform Rotate(transform t); bool inXasyMode; path subpath(path p, int a, int b); path subpath(path p, real a, real b); path3 subpath(path3 p, int a, int b); path3 subpath(path3 p, real a, real b); bool isnan(real x); string jobname(string name); void print_random_addresses(int n=); void attach(picture dest=, frame src, pair position, pair align, bool group=, filltype filltype=, bool above=); void attach(picture dest=, frame src, pair position=, bool group=, filltype filltype=, bool above=); real[] quadraticroots(real a, real b, real c); pair[] quadraticroots(explicit pair a, explicit pair b, explicit pair c); pen darkcyan; string[] file3; real[] maxtimes(path p); real[] maxtimes(path3 p); filltype FillDraw; filltype FillDraw(real xmargin=, real ymargin=, pen fillpen=, pen drawpen=); void initdefaults(); void erase(frame f); string erase(string s, int pos, int n); void erase(picture pic=); pair E; int Ceil(real x); pair I; pair SSW; pen magenta; pair WSW; pair N; bool view(); void usersetting(); pair S; void nowarn(string s); transform rotate(real angle, pair z=); int quotient(int x, int y); transform rotation(transform t); pair W; int rand(); pen ZapfChancery(string series=, string shape=); int XOR(int a, int b); void atupdate(void f()); void atupdate()(); void unfill(frame f, path[] g, bool copy=); void unfill(picture pic=, path[] g, bool copy=); bool Bar(picture, path, pen, marginT(path, pen))(real size=); bool Bar(picture, path, pen, marginT(path, pen)); bool eol(file f); pen zerowinding; void atbreakpoint(string f(string, int, int, code)); void savedefaults()(); bool MidArrow(picture, path, pen, marginT(path, pen))(arrowhead arrowhead=, real size=, real angle=, filltype filltype=); bool MidArrow(picture, path, pen, marginT(path, pen)); bool MidArcArrow(picture, path, pen, marginT(path, pen))(arrowhead arrowhead=, real size=, real angle=, filltype filltype=); bool MidArcArrow(picture, path, pen, marginT(path, pen)); void exitXasyMode(); void grestore(frame f); pair extension(pair p, pair q, pair p, pair q); pen extendcap; int ceil(real x); pen thick(pen p=); pair left; int Suppress; file input(string name=, bool check=, string comment=, string mode=); int SuppressQuiet; real[] texsize(string s, pen p=); string nativeformat(); bool invisible(pen p); pen invisible(); pen invisible; bool CCW; void usetypescript(string s, string encoding=); path randompath(int n, bool cumulate=, guide join(... guide[])=); int system(string[] s); int system(string s); void bar(picture pic, pair a, pair d, pen p=); picture bar(pair a, pair d, pen p=); side NoSide; file stdout; transform Shift(transform t); real fmod(real x, real y); real offset(pen p); pen rgb(pen p); pen rgb(real r, real g, real b); pen rgb(string s); real inch; bool ArcArrow(picture, path, pen, marginT(path, pen)); bool ArcArrow(picture, path, pen, marginT(path, pen))(arrowhead arrowhead=, real size=, real angle=, filltype filltype=, position position=); bool ArcArrows(picture, path, pen, marginT(path, pen))(arrowhead arrowhead=, real size=, real angle=, filltype filltype=); bool ArcArrows(picture, path, pen, marginT(path, pen)); pen currentpen; pair precontrol(path p, int t); pair precontrol(path p, real t); triple precontrol(path3 p, int t); triple precontrol(path3 p, real t); light currentlight; pen royalblue; picture currentpicture; frame currentpatterns; int JOIN_IN; int JOIN_OUT; projection currentprojection; void endScript(); real orient(pair a, pair b, pair c); real orient(triple a, triple b, triple c, triple d); pen linetype(real[] pattern, real offset=, bool scale=, bool adjust=); real[] linetype(pen p=); pen linetype(string pattern, real offset=, bool scale=, bool adjust=); real xpart(pair z); real xpart(triple v); side Center; real ypart(pair z); real ypart(triple v); real zpart(triple v); frame orientation(frame); pen Courier(string series=, string shape=); real simpson(real f(real), real a, real b, real acc=, real dxmax=); transform shift(transform t); transform shift(pair z); transform shift(real x, real y); transform shift(frame f, pair align); real asinh(real x); real[] asinh(real[] a); pen orange; pen darkgray; slice lastcut(path p, path knife); pen darkgreen; pen darkgrey; transform xscale(real x); transform shiftless(transform t); real[][] shiftless(real[][] t); transform yscale(real y); void usleep(int microseconds); real cosh(real x); real[] cosh(real[] a); position MidPoint; real Sin(real deg); void assert(bool b, string s=); pen Palatino(string series=, string shape=); real incircle(pair a, pair b, pair c, pair d); frame Landscape(frame f); pen purple; string italic(string s); real atan(real x); real[] atan(real[] a); real acos(real x); real[] acos(real[] a); pair minbound(pair a, pair b); triple minbound(triple a, triple b); pair minbound(pair[] a); pair minbound(pair[][] a); pair minbound(pair[][][] a); triple minbound(triple[] a); triple minbound(triple[][] a); triple minbound(triple[][][] a); void restore(); pen basealign(int n); int basealign(pen p=); pen basealign; int min(int a, int b); int[] min(int a, int[] b); int[] min(int[] a, int b); int[] min(int[] a, int[] b); int min(int[] a); int min(int[][] a); int min(int[][][] a); real min(real a, real b); real[] min(real a, real[] b); real[] min(real[] a, real b); real[] min(real[] a, real[] b); real min(real[] a); real min(real[][] a); real min(real[][][] a); string min(string a, string b); string[] min(string a, string[] b); string[] min(string[] a, string b); string[] min(string[] a, string[] b); string min(string[] a); string min(string[][] a); string min(string[][][] a); pair min(pen p); pair min(frame f); pair min(explicit path p); pair min(path[] p); triple min(path3 p); real min(... real[] a); real min(real m, scaling s, coord[] c); pair min(picture pic, bool user=); real min(real m, scaling s, coord[] c); int min(... int[] a); filltype RadialShade(pen penc, pen penr); int search(int[] a, int key); int search(real[] a, real key); int search(string[] a, string key); int search(void()()[] a, void key()(), bool less(void()(), void()())); int search(Legend[] a, Legend key, bool less(Legend, Legend)); int search(real[] a, real key, bool less(real, real)); int search(guide[] a, guide key, bool less(guide, guide)); int search(coord[] a, coord key, bool less(coord, coord)); int search(pair[] a, pair key, bool less(pair, pair)); int search(coord[] a, coord key, bool less(coord, coord)); int search(object[] a, object key, bool less(object, object)); int search(frame[] a, frame key, bool less(frame, frame)); int search(Label[] a, Label key, bool less(Label, Label)); int search(int[] a, int key, bool less(int, int)); int search(bool3[] a, bool3 key, bool less(bool3, bool3)); int search(marker[] a, marker key, bool less(marker, marker)); int search(string[] a, string key, bool less(string, string)); int search(path[] a, path key, bool less(path, path)); int search(pen[] a, pen key, bool less(pen, pen)); int search(bool[] a, bool key, bool less(bool, bool)); int search(triple[] a, triple key, bool less(triple, triple)); int search(picture[] a, picture key, bool less(picture, picture)); filltype RadialShadeDraw(real xmargin=, real ymargin=, pen penc, pen penr, pen drawpen=); real sin(real x); real[] sin(real[] a); pair sin(explicit pair z); pen deepcyan; void restoredefaults(); path[] plus; pair expi(real angle); triple expi(real polar, real azimuth); void endclip(frame f); void endclip(picture pic=); pen opacity(real opacity=, string blend=); real opacity(pen p); real[] solve(real[][] a, real[] b, bool warn=); real[][] solve(real[][] a, real[][] b, bool warn=); int rename(string from, string to); void DOSendl(file file); string debugger(string file, int line, int column, code s=); string getc(file f); bool debugging; void shipout(string prefix=, frame f, frame preamble=, string format=, bool wait=, bool view=, transform xform()); void shipout(string prefix=, frame f, string format=, bool wait=, bool view=, string options=, string script=, light light=, projection P=); void shipout(string prefix=, picture pic=, frame orientation(frame)=, string format=, bool wait=, bool view=, string options=, string script=, light light=, projection P=); void shipout3(string prefix, frame f, string format=, real width, real height, real angle, real zoom, triple m, triple m, pair shift, real[][] t, real[] background, triple[] lights, real[][] diffuse, real[][] ambient, real[][] specular, bool viewportlighting, bool view=); void shipout3(string prefix, frame f); string getstring(string name=, string default=, string prompt=, bool store=); int debuggerlines; frame bbox(picture pic=, real xmargin=, real ymargin=, pen p=, filltype filltype=); real radians(real degrees); bool pdf(); void _eval(string s, bool embedded, bool interactivewrite=); void _eval(code s, bool embedded); path[][] textpath(string[] s, pen[] p); void radialshade(frame f, path[] g, bool stroke=, pen pena, pair a, real ra, bool extenda=, pen penb, pair b, real rb, bool extendb=, bool copy=); void radialshade(picture pic=, path[] g, bool stroke=, pen pena, pair a, real ra, bool extenda=, pen penb, pair b, real rb, bool extendb=, bool copy=); pair maxbound(pair a, pair b); triple maxbound(triple a, triple b); pair maxbound(pair[] a); pair maxbound(pair[][] a); pair maxbound(pair[][][] a); triple maxbound(triple[] a); triple maxbound(triple[][] a); triple maxbound(triple[][][] a); string Embed(string name, string text=, string options=, real width=, real height=); pair postcontrol(path p, int t); pair postcontrol(path p, real t); triple postcontrol(path3 p, int t); triple postcontrol(path3 p, real t); int max(int a, int b); int[] max(int a, int[] b); int[] max(int[] a, int b); int[] max(int[] a, int[] b); int max(int[] a); int max(int[][] a); int max(int[][][] a); real max(real a, real b); real[] max(real a, real[] b); real[] max(real[] a, real b); real[] max(real[] a, real[] b); real max(real[] a); real max(real[][] a); real max(real[][][] a); string max(string a, string b); string[] max(string a, string[] b); string[] max(string[] a, string b); string[] max(string[] a, string[] b); string max(string[] a); string max(string[][] a); string max(string[][][] a); pair max(pen p); pair max(frame f); pair max(explicit path p); pair max(path[] p); triple max(path3 p); pair max(picture pic, bool user=); real max(real M, scaling s, coord[] c); int max(... int[] a); real max(... real[] a); real max(real M, scaling s, coord[] c); Label Label(Label L, pair position, align align=, pen p=, transform embed(transform)=, filltype filltype=); Label Label(string s, string size=, explicit position position, align align=, pen p=, transform embed(transform)=, filltype filltype=); Label Label(Label L, explicit position position, align align=, pen p=, transform embed(transform)=, filltype filltype=); Label Label(explicit pair position, align align=, pen p=, transform embed(transform)=, filltype filltype=); Label Label; Label Label(string s=, string size=, align align=, pen p=, transform embed(transform)=, filltype filltype=); Label Label(string s, string size=, pair position, align align=, pen p=, transform embed(transform)=, filltype filltype=); Label Label(Label L, align align=, pen p=, transform embed(transform)=, filltype filltype=); string font(pen p=); pen font(string name, string options=); pen font(string encoding, string family, string series, string shape); pen font(string name, real size, string options=); marker markthin(path g, pen p=, real thin(real fraction)=, filltype filltype=); int intMin; pen white; side RightSide; string replace(string s, string[][] translate); string replace(string s, string before, string after); transform fixedscaling(picture pic=, pair min, pair max, pen p=, bool warn=); pen Symbol(string series=, string shape=); slice firstcut(path p, path knife); pen squarecap; pen squarepen; bool EndArrow(picture, path, pen, marginT(path, pen)); bool EndArrow(picture, path, pen, marginT(path, pen))(arrowhead arrowhead=, real size=, real angle=, filltype filltype=, position position=); real barsize(pen p=); bool EndArcArrow(picture, path, pen, marginT(path, pen)); bool EndArcArrow(picture, path, pen, marginT(path, pen))(arrowhead arrowhead=, real size=, real angle=, filltype filltype=, position position=); void tensorshade(frame f, path[] g, bool stroke=, pen fillrule=, pen[][] p, path[] b=, pair[][] z=, bool copy=); void tensorshade(picture pic=, path[] g, bool stroke=, pen fillrule=, pen[][] p, path[] b=, pair[][] z=, bool copy=); void tensorshade(frame f, path[] g, bool stroke=, pen fillrule=, pen[] p, path b=, pair[] z); void tensorshade(picture pic=, path[] g, bool stroke=, pen fillrule=, pen[] p, path b=, pair[] z); void tensorshade(frame f, path[] g, bool stroke=, pen fillrule=, pen[] p, path b=); void tensorshade(picture pic=, path[] g, bool stroke=, pen fillrule=, pen[] p, path b=); string[] split(string s, string delimiter=); void addSaveFunction(void s()()); object embed3(string, frame, string, string, string, light, projection); filltype NoFill; real colatitude(triple v, bool warn=); void label(frame f, string s, string size, transform t, pair position, pair align, pen p); void label(picture pic=, Label L, align align=, pen p=, filltype filltype=); void label(frame f, Label L, pair position, align align=, pen p=, filltype filltype=); void label(picture pic=, Label L, pair position, align align=, pen p=, filltype filltype=); void label(frame f, Label L, align align=, pen p=, filltype filltype=); void label(picture pic=, Label L, explicit guide g, align align=, pen p=, filltype filltype=); void label(picture pic=, Label L, explicit path g, align align=, pen p=, filltype filltype=); real fabs(real x); real[] fabs(real[] a); bool labels(frame f); light light(pen diffuse=, pen ambient=, pen specular=, pen background=, real specularfactor=, bool viewport= ... triple[] position); light light(pen[] diffuse, pen[] ambient=, pen[] specular=, pen background=, real specularfactor=, bool viewport=, triple[] position); light light(pen diffuse=, pen ambient=, pen specular=, pen background=, bool viewport=, real x, real y, real z); light light(explicit light light); real remainder(real x, real y); int byte(real x); real camerafactor; pen lightred; real labelmargin; real labelmargin(pen p=); pen lightblue; pen lightgreen; pair right; string outformat(string format=); pen lightcyan; pen lightmagenta; pen lightyellow; pen lightgray; pen lightolive; pen lightgrey; string upcase(string s); pen darkblue; pen darkbrown; path[] strokepath(path g, pen p=); real erf(real x); void saveline(string name, string value, bool store=); pen fuchsia; bool needshipout(); filltype filltype(int type=, pen fillpen=, pen drawpen=, void fill2(frame f, path[] g, pen fillpen)); pen Bookman(string series=, string shape=); path box(frame dest, frame src=, real xmargin=, real ymargin=, pen p=, filltype filltype=, bool above=); path box(frame f, Label L, real xmargin=, real ymargin=, pen p=, filltype filltype=, bool above=); path box(pair a, pair b); frame[] fit(string prefix=, picture[] pictures, string format=, bool view=, string options=, string script=, projection P=); void seekeof(file f); path unitcircle; framedTransformStack xformStack; pair[] conj(pair[] a); pair[][] conj(pair[][] a); pair conj(pair z); pen deepgray; pen deepgreen; pen deepgrey; marker[] Mark; marker Mark(int n); real aTan(real x); void _begingroup3(frame f, string name, real compression, real granularity, bool closed, bool tessellate, bool dobreak, bool nobreak, triple center, int interaction); path[] MarkPath; string graphic(string name, string options=); real aCos(real x); void texreset(); string graphicscale(real x); int[] complement(int[] a, int n); path[] complement(frame f, path[] g); pen Cyan; marginT NoMargin(path, pen); marginT NoMargin(path, pen)(); path[][] _texpath(string[] s, pen[] p); real sinh(real x); real[] sinh(real[] a); real[] _cputime(); position EndPoint; hsv hsv(real h, real s, real v); hsv hsv(pen p); void deconstruct(frame f, frame preamble=, real magnification=, transform xform()); void deconstruct(picture pic=, real magnification=); int sgn(real x); pair minAfterTransform(transform t, path[] p); int seconds(string t=, string format=); pen cyan; pen grey; real cm; filltype Fill; filltype Fill(real xmargin=, real ymargin=, pen p=); pen olive; pen darkolive; int ascii(string s); real arcarrowangle; real arcarrowfactor; real mm; real arcarrowsize(pen p=); real calculateScaling(string dir, coord[] coords, real size, bool warn=); real calculateScaling(string dir, coord[] coords, real size, bool warn=); real calculateScaling(string dir, coord[] m, coord[] M, real size, bool warn=); real calculateScaling(string dir, coord[] m, coord[] M, real size, bool warn=); triple gettriple(string name=, triple default=, string prompt=, bool store=); void drawpixel(frame f, triple v, pen p, real width=); pen fontsize(real size, real lineskip); real fontsize(pen p=); pen fontsize(real size); void close(file f); real lineskip(pen p=); pen dashed; pair maxAfterTransform(transform t, path[] p); int[][] triangulate(pair[] z); void fill(frame f, path[] g, pen p=, bool copy=); path fill(frame dest, frame src, filltype filltype=, real xmargin=, real ymargin=); void fill(picture pic=, path[] g, pen p=, bool copy=); void fill(pair origin, picture pic=, path[] g, pen p=); pair midpoint(path p); real exp(real x); real[] exp(real[] a); pair exp(explicit pair z); pen linejoin(int n); int linejoin(pen p=); real ldexp(real x, int e); pen rgba(real[] a); real[] rgba(pen p); string time(string format=); string time(int seconds, string format=); void prepend(frame dest, frame src); real pt; settings settings; int MoveQuiet; marginT EndMargin(path, pen); pen nullpen; side LeftSide; path nullpath; guide[] copy(guide[] a, int depth=); real[] copy(real[] a, int depth=); triple[] copy(triple[] a, int depth=); bool[] copy(bool[] a, int depth=); real[][] copy(real[][] a, int depth=); pen[] copy(pen[] a, int depth=); coord[] copy(coord[] a, int depth=); picture[] copy(picture[] a, int depth=); marker[] copy(marker[] a, int depth=); Label[] copy(Label[] a, int depth=); pen[][] copy(pen[][] a, int depth=); path[] copy(path[] a, int depth=); string[] copy(string[] a, int depth=); void()()[] copy(void()()[] a, int depth=); int[] copy(int[] a, int depth=); string[][] copy(string[][] a, int depth=); frame[] copy(frame[] a, int depth=); pair[] copy(pair[] a, int depth=); bool3[] copy(bool3[] a, int depth=); coord[] copy(coord[] a, int depth=); object[] copy(object[] a, int depth=); Legend[] copy(Legend[] a, int depth=); pair[][] copy(pair[][] a, int depth=); real[] abs(pair[] a); real[] abs(triple[] a); real abs(real x); real[] abs(real[] a); real abs(pair z); real abs(triple v); int abs(int x); pen pink; real inches; path ellipse(frame dest, frame src=, real xmargin=, real ymargin=, pen p=, filltype filltype=, bool above=); path ellipse(frame f, Label L, real xmargin=, real ymargin=, pen p=, filltype filltype=, bool above=); path ellipse(pair c, real a, real b); pair getpair(string name=, pair default=, string prompt=, bool store=); void axialshade(frame f, path[] g, bool stroke=, pen pena, pair a, bool extenda=, pen penb, pair b, bool extendb=, bool copy=); void axialshade(picture pic=, path[] g, bool stroke=, pen pena, pair a, bool extenda=, pen penb, pair b, bool extendb=, bool copy=); string locale(string s=); real dirtime(path p, pair z); void copyPairOrTriple(pairOrTriple dest, pairOrTriple src); real[] colors(pen p); void filloutside(picture pic=, path[] g, pen p=, bool copy=); void filloutside(frame f, path[] g, pen p=, bool copy=); pen[] colorPen; real _findroot(real f(real), real a, real b, real tolerance, real fa, real fb); pen colorless(pen p); pen solid; string colorspace(pen p); void warn(string s); pen deepblue; pen palered; real[] map(real f(pair), pair[] a); int[] map(int f(real), real[] a); bool3[] map(bool3 f(bool3), bool3[] a); frame[] map(frame f(frame), frame[] a); Label[] map(Label f(Label), Label[] a); pen[][] map(pen[] f(pen[]), pen[][] a); triple[] map(triple f(triple), triple[] a); pen[] map(pen f(pen), pen[] a); coord[] map(coord f(coord), coord[] a); object[] map(object f(object), object[] a); pair[] map(pair f(pair), pair[] a); coord[] map(coord f(coord), coord[] a); string[] map(string f(string), string[] a); Legend[] map(Legend f(Legend), Legend[] a); void()()[] map(void f()()(void()()), void()()[] a); pair[][] map(pair[] f(pair[]), pair[][] a); real[] map(real f(real), real[] a); picture[] map(picture f(picture), picture[] a); int[] map(int f(int), int[] a); string[][] map(string[] f(string[]), string[][] a); bool[] map(bool f(bool), bool[] a); path[] map(path f(path), path[] a); real[][] map(real[] f(real[]), real[][] a); marker[] map(marker f(marker), marker[] a); guide[] map(guide f(guide), guide[] a); path unstraighten(path p); path3 unstraighten(path3 p); void _image(frame f, real[][] data, pair initial, pair final, pen[] palette=, transform t=, bool copy=, bool antialias=); void _image(frame f, pen[][] data, pair initial, pair final, transform t=, bool copy=, bool antialias=); void _image(frame f, pen f(int, int), int width, int height, pair initial, pair final, transform t=, bool antialias=); pair arcpoint(path p, real L); pen Pen(int n); int rfind(string s, string t, int pos=); pair minratio(frame f); pair minratio(triple[][] p, pair b); pair minratio(path3 g); int[] sequence(int n); pen[][] sequence(pen[] f(int), int n); coord[] sequence(coord f(int), int n); picture[] sequence(picture f(int), int n); marker[] sequence(marker f(int), int n); Label[] sequence(Label f(int), int n); int[] sequence(int f(int), int n); string[][] sequence(string[] f(int), int n); pair[] sequence(pair f(int), int n); guide[] sequence(guide f(int), int n); pen[] sequence(pen f(int), int n); void()()[] sequence(void f()()(int), int n); bool[] sequence(bool f(int), int n); string[] sequence(string f(int), int n); pair[][] sequence(pair[] f(int), int n); bool3[] sequence(bool3 f(int), int n); coord[] sequence(coord f(int), int n); object[] sequence(object f(int), int n); Legend[] sequence(Legend f(int), int n); real[][] sequence(real[] f(int), int n); real[] sequence(real f(int), int n); int[] sequence(int n, int m); triple[] sequence(triple f(int), int n); path[] sequence(path f(int), int n); frame[] sequence(frame f(int), int n); triple minbezier(triple[][] p, triple b); path trim(path g, real begin, real end); marginT DotMargin(path, pen)(real begin, real end); marginT DotMargin(path, pen); marginT DotMargins(path, pen); string string(int x); string string(real x, int digits=); string cd(string s=); int size(guide g); pair size(frame f); int size(path p); int size(path[] p); int size(path3 p); void size(picture dest, picture src); pair size(picture pic, bool user=); void size(picture pic=, real x, real y=, bool keepAspect=); void size(picture pic=, real xsize, real ysize, pair min, pair max); void clear(file f); void clear(string file, int line); void clear(); void clear(string file, string text); pen mediumred; pen mediumblue; pen mediumgreen; pen mediumcyan; pen mediummagenta; pair arcdir(path p, real L); pen mediumyellow; pen mediumgray; string downcase(string s); pen mediumgrey; transform transform(pen p); string readline(string prompt=, string name=, bool tabcompletion=); void beep(); pair relpoint(path p, real l); pair[][] transpose(pair[][] a); pen[][] transpose(pen[][] a); string[][] transpose(string[][] a); real[][] transpose(real[][] a); pen overwrite(int n); int overwrite(pen p=); pen linewidth(real x); real linewidth(pen p=); transformation transformation(real[][] modelview); transformation transformation(real[][] modelview, real[][] projection); pair maxratio(frame f); pair maxratio(triple[][] p, pair b); pair maxratio(path3 g); triple maxbezier(triple[][] p, triple b); void layer(frame f); void layer(picture pic=); void DOSnewl(file file); pen cmyk(pen p); pen cmyk(real c, real m, real y, real k); pen blue; pen evenodd; int precision(file f=, int digits=); path3 path3(triple[] pre, triple[] point, triple[] post, bool[] straight, bool cyclic); bool piecewisestraight(path p); bool piecewisestraight(path3 p); void stop(string file, int line, code s=); void stop(string file, string text, code s=); pair reldir(path p, real l); pen TimesRoman(string series=, string shape=); slice cut(path p, path knife, int n); bool is3D(frame f); bool is3D(string format=); void report(string text); void report(int i); void report(transform t); void add(frame dest, frame src); void add(picture dest=, frame src, pair position, pair align, bool group=, filltype filltype=, bool above=); void add(frame dest, frame src, pair position, pair align, bool group=, filltype filltype=, bool above=); void add(picture src, bool group=, filltype filltype=, bool above=); void add(picture pic=, void d(frame f, transform t), bool exact=); void add(picture pic=, void d(frame f, real[][] t, picture pic, projection P), bool exact=); void add(picture pic=, void d(picture, real[][]), bool exact=); void add(picture dest, picture src, bool group=, filltype filltype=, bool above=); void add(picture pic=, Label L); void add(picture dest, picture src, pair position, bool group=, filltype filltype=, bool above=); void add(picture dest=, object F, pair position=, bool group=, filltype filltype=, bool above=); void add(frame dest, frame src, filltype filltype, bool above=); void add(frame dest, frame src, bool group, filltype filltype=, bool above=); void add(frame dest, frame src, pair position, bool group=, filltype filltype=, bool above=); void add(picture dest=, frame src, pair position=, bool group=, filltype filltype=, bool above=); void add(picture pic=, void d(picture, transform), bool exact=); void add(frame f, transform t=, Label L); void add(picture src, pair position, bool group=, filltype filltype=, bool above=); plain plain; void purge(int divisor=); int Round(real x); real sqrt(real x); real[] sqrt(real[] a); pair sqrt(explicit pair z); string[] spinner; real[] times(path p, real x); real[] times(path p, explicit pair z); void drawbeziertriangle(frame f, triple[][] p, triple center, bool straight, pen[] p, real opacity, real shininess, real prcshininess, pen[] colors, int interaction, bool prc=); void Draw(picture pic=, path g, pen p=); filltype Draw; void Draw(picture pic=, explicit path[] g, pen p=); filltype Draw(real xmargin=, real ymargin=, pen p=); void tab(file file); plain_scaling plain_scaling; string file(string s); plain_bounds plain_bounds; string outprefix(string prefix=); object object(Label L, path e(frame dest, frame src=, real xmargin=, real ymargin=, pen p=, filltype filltype=, bool above=), real xmargin=, real ymargin=, pen p=, filltype filltype=, bool above=); object object(frame f); object object(Label L); file stdin; void()()[] array(int n, void value()(), int depth=); bool[] array(int n, bool value, int depth=); string[] array(int n, string value, int depth=); pair[][] array(int n, pair[] value, int depth=); bool3[] array(int n, bool3 value, int depth=); coord[] array(int n, coord value, int depth=); object[] array(int n, object value, int depth=); Legend[] array(int n, Legend value, int depth=); real[][] array(int n, real[] value, int depth=); real[] array(int n, real value, int depth=); triple[] array(int n, triple value, int depth=); path[] array(int n, path value, int depth=); frame[] array(int n, frame value, int depth=); pen[][] array(int n, pen[] value, int depth=); coord[] array(int n, coord value, int depth=); picture[] array(int n, picture value, int depth=); marker[] array(int n, marker value, int depth=); Label[] array(int n, Label value, int depth=); int[] array(int n, int value, int depth=); string[][] array(int n, string[] value, int depth=); pair[] array(int n, pair value, int depth=); guide[] array(int n, guide value, int depth=); pen[] array(int n, pen value, int depth=); bool BeginBar(picture, path, pen, marginT(path, pen)); bool BeginBar(picture, path, pen, marginT(path, pen))(real size=); triple perp(triple v, triple u); int find(bool[] a, int n=); int find(string s, string t, int pos=); position BeginPoint; marginT BeginMargin(path, pen); path buildcycle(... path[] p); bool BeginArrow(picture, path, pen, marginT(path, pen)); bool BeginArrow(picture, path, pen, marginT(path, pen))(arrowhead arrowhead=, real size=, real angle=, filltype filltype=, position position=); marginT BeginPenMargin(path, pen); int round(real x); marginT BeginDotMargin(path, pen); bool BeginArcArrow(picture, path, pen, marginT(path, pen)); bool BeginArcArrow(picture, path, pen, marginT(path, pen))(arrowhead arrowhead=, real size=, real angle=, filltype filltype=, position position=); pen roundcap; void buildRestoreThunk()(); pen roundjoin; int sourceline(string file, string text); void buildRestoreDefaults()(); path roundbox(frame dest, frame src=, real xmargin=, real ymargin=, pen p=, filltype filltype=, bool above=); path roundbox(frame f, Label L, real xmargin=, real ymargin=, pen p=, filltype filltype=, bool above=); real asin(real x); real[] asin(real[] a); pair endpoint(path p); real latitude(triple v, bool warn=); int sum(int[] a); real sum(real[] a); pair sum(pair[] a); triple sum(triple[] a); int sum(bool[] a); real inf; real arctime(path p, real l); real arctime(path3 p, real dval); pen palemagenta; void draw(frame f, triple[][] p, triple center, bool straight, pen[] p, real opacity, real shininess, real prcshininess, triple normal, pen[] colors, int interaction, bool prc=); void draw(frame f, triple[] p, real[] knot, real[] weights=, pen p); void draw(frame f, triple[][] p, real[] uknot, real[] vknot, real[][] weights=, pen[] p, real opacity, real shininess, real prcshininess, pen[] colors); void draw(frame f, triple[] v, int[][] vi, triple[] n, int[][] ni, pen[] p, real opacity, real shininess, real prcshininess, pen[] c=, int[][] ci=); void draw(picture pic=, path[] g, pen fillrule=, pen[] p); object draw(picture pic=, Label L, path e(frame dest, frame src=, real xmargin=, real ymargin=, pen p=, filltype filltype=, bool above=), pair position, real xmargin=, real ymargin=, pen p=, filltype filltype=, bool above=); void draw(frame f, explicit path[] g, pen p=); void draw(picture pic=, Label L=, path g, align align=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, bool bar(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, Label legend=, marker marker=); void draw(pair origin, picture pic=, Label L=, path g, align align=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, bool bar(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, Label legend=, marker marker=); void draw(picture pic=, guide[] g, pen p=, Label legend=, marker marker=); void draw(pair origin, picture pic=, guide[] g, pen p=, Label legend=, marker marker=); object draw(picture pic=, Label L, path e(frame dest, frame src=, real xmargin=, real ymargin=, pen p=, filltype filltype=, bool above=), real xmargin=, real ymargin=, pen p=, filltype filltype=, bool above=); void draw(picture pic=, explicit path[] g, pen p=, Label legend=, marker marker=); void draw(pair origin, picture pic=, explicit path[] g, pen p=, Label legend=, marker marker=); void draw(frame f, guide[] g, pen p=); void draw(frame f, path g, pen p=); void draw(frame f, path g, pen p=, bool arrow(picture, path, pen, marginT(path, pen))); int mantissaBits; real identity(real x); real[] identity(real[] a); transform identity(); real[][] identity(int n); real[][] identity4; marker[] MarkFill; pen pattern(string s); string pattern(pen p); transform invert; transform inverse(transform t); real[][] inverse(real[][] a); pair unit(pair z); triple unit(triple v); triple min3(frame f); triple min3(pen p); void begin(picture pic=, string name, string id=, bool visible=); void drawPRCdisk(frame f, real[][] t, pen[] p, real opacity, real shininess); void drawPRCtube(frame f, path3 center, path3 g, pen[] p, real opacity, real shininess); int CLZ(int a); void drawPRCsphere(frame f, real[][] t, bool half=, pen[] p, real opacity, real shininess, int type); arrowhead DefaultHead; void drawPRCcylinder(frame f, real[][] t, pen[] p, real opacity, real shininess); void beginclip(frame f, path[] g, bool stroke=, pen fillrule=, bool copy=); void beginclip(picture pic=, path[] g, bool stroke=, pen fillrule=, bool copy=); void begingroup(frame f); void begingroup(picture pic=); marker nomarker; pair beginpoint(path p); real azimuth(triple v, bool warn=); real angle(pair z, bool warn=); real angle(transform t); pair ENE; frame pack(pair align= ... object[] inset); void gsave(frame f); void write(file file=, string s=, bool x, void suffix(file)= ... bool[]); void write(file file=, string s=, explicit bool[] a ... bool[][]); void write(file file=, bool[][]); void write(file file=, bool[][][]); void write(file file=, string s=, int x, void suffix(file)= ... int[]); void write(file file=, string s=, explicit int[] a ... int[][]); void write(file file=, int[][]); void write(file file=, int[][][]); void write(file file=, string s=, real x, void suffix(file)= ... real[]); void write(file file=, string s=, explicit real[] a ... real[][]); void write(file file=, real[][]); void write(file file=, real[][][]); void write(file file=, string s=, pair x, void suffix(file)= ... pair[]); void write(file file=, string s=, explicit pair[] a ... pair[][]); void write(file file=, pair[][]); void write(file file=, pair[][][]); void write(file file=, string s=, triple x, void suffix(file)= ... triple[]); void write(file file=, string s=, explicit triple[] a ... triple[][]); void write(file file=, triple[][]); void write(file file=, triple[][][]); void write(file file=, string s=, string x, void suffix(file)= ... string[]); void write(file file=, string s=, explicit string[] a ... string[][]); void write(file file=, string[][]); void write(file file=, string[][][]); void write(file file=, string s, void suffix(file)=); void write(file file=, string s=, transform x, void suffix(file)= ... transform[]); void write(file file=, string s=, guide x, void suffix(file)= ... guide[]); void write(file file=, string s=, pen x, void suffix(file)= ... pen[]); void write(file file, string s=, explicit guide[] x, void suffix(file)=); void write(string s=, cputime c, string format=, void suffix(file)=); void write(string s=, explicit path[] x, void suffix(file)=); void write(file file, void suffix(file)=); void write(file file=, string s=, pen[] p); void write(void suffix(file)=); void write(file file, string s=, explicit path[] x, void suffix(file)=); void write(file file=, Label L, void suffix(file)=); void write(file file, string s=, cputime c, string format=, void suffix(file)=); void write(pairOrTriple a); void write(string s=, bool3 b, void suffix(file)=); void write(file file, string s=, bool3 b, void suffix(file)=); void write(string s=, explicit guide[] x, void suffix(file)=); void write(file file=, align align, void suffix(file)=); void save()(); marginT EndPenMargin(path, pen); pair NNE; real[] tridiagonal(real[] a, real[] b, real[] c, real[] f); pen Dotted; pen Dotted(pen p=); pair dir(real degrees); pair dir(explicit pair z); triple dir(explicit triple z); triple dir(real colatitude, real longitude); pair dir(path p, int t, int sign=, bool normalize=); pair dir(path p, real t, bool normalize=); triple dir(path3 p, int t, int sign=, bool normalize=); triple dir(path3 p, real t, bool normalize=); pair dir(path p); pair dir(path p, path q); int[][] diagonal(... int[]); real[][] diagonal(... real[]); pair[][] diagonal(... pair[]); real reltime(path p, real l); void marknodes(picture pic=, frame f, path g); real newton(int iterations=, real f(real), real fprime(real), real x, bool verbose=); real newton(int iterations=, real f(real), real fprime(real), real x1, real x2, bool verbose=); string TeXify(string s); bool3 default; pair[] controlSpecifier(guide g, int t); void defaultpen(pen p); pen defaultpen(); pen defaultpen; void defaultpen(real w); transform Slant(transform t); triple max3(frame f); triple max3(pen p); string defaultformat(int n, string trailingzero=, bool fixed=, bool signed=); string defaultformat; pen dashdotted; string defaultseparator; string asydir(); string defaultfilename; real longitude(triple v, bool warn=); bool Blank(picture, path, pen, marginT(path, pen)); tensionSpecifier tensionSpecifier(guide g, int t); marker marker(frame f=, void markroutine(picture pic=, frame f, path g)=, bool above=); marker marker(path[] g, void markroutine(picture pic=, frame f, path g)=, pen p=, filltype filltype=, bool above=); int Move; string location(); string locatefile(string file); pen dotted; string blend(pen p); arrowhead HookHead; arrowhead HookHead(real dir=, real barb=); picture[] concat(... picture[][]); real[] concat(... real[][]); Legend[] concat(... Legend[][]); pair[] concat(... pair[][]); coord[] concat(... coord[][]); pen[] concat(... pen[][]); coord[] concat(... coord[][]); object[] concat(... object[][]); path[] concat(... path[][]); Label[] concat(... Label[][]); int[] concat(... int[][]); void()()[] concat(... void()()[][]); bool3[] concat(... bool3[][]); string[] concat(... string[][]); marker[] concat(... marker[][]); triple[] concat(... triple[][]); frame[] concat(... frame[][]); guide[] concat(... guide[][]); bool[] concat(... bool[][]); int OR(int a, int b); real log1p(real x); real[] log1p(real[] a); real infinity; bool alias(pair[][] a, pair[][] b); bool alias(guide[] a, guide[] b); bool alias(marginT a, marginT b); bool alias(light a, light b); bool alias(side a, side b); bool alias(marker a, marker b); bool alias(Label[] a, Label[] b); bool alias(pair[] a, pair[] b); bool alias(coord a, coord b); bool alias(bounds a, bounds b); bool alias(autoscaleT a, autoscaleT b); bool alias(pairOrTriple a, pairOrTriple b); bool alias(object a, object b); bool alias(cputime a, cputime b); bool alias(int[] a, int[] b); bool alias(string[][] a, string[][] b); bool alias(slice a, slice b); bool alias(coord[] a, coord[] b); bool alias(coords2 a, coords2 b); bool alias(picture a, picture b); bool alias(framedTransformStack a, framedTransformStack b); bool alias(real[][] a, real[][] b); bool alias(bool3 a, bool3 b); bool alias(bool3[] a, bool3[] b); bool alias(coords3 a, coords3 b); bool alias(position a, position b); bool alias(arrowhead a, arrowhead b); bool alias(string[] a, string[] b); bool alias(frame[] a, frame[] b); bool alias(scaling a, scaling b); bool alias(coord a, coord b); bool alias(ScaleT a, ScaleT b); bool alias(picture[] a, picture[] b); bool alias(bool[] a, bool[] b); bool alias(void()()[] a, void()()[] b); bool alias(pen[][] a, pen[][] b); bool alias(filltype a, filltype b); bool alias(coord[] a, coord[] b); bool alias(freezableBounds a, freezableBounds b); bool alias(projection a, projection b); bool alias(align a, align b); bool alias(object[] a, object[] b); bool alias(path[] a, path[] b); bool alias(triple[] a, triple[] b); bool alias(transformation a, transformation b); bool alias(scaleT a, scaleT b); bool alias(Label a, Label b); bool alias(marker[] a, marker[] b); bool alias(processtime a, processtime b); bool alias(real[] a, real[] b); bool alias(pen[] a, pen[] b); bool alias(hsv a, hsv b); bool alias(coords2 a, coords2 b); bool alias(scaling a, scaling b); bool alias(Legend a, Legend b); bool alias(indexedTransform a, indexedTransform b); bool alias(Legend[] a, Legend[] b); real pi; int getint(string name=, int default=, string prompt=, bool store=); bool IgnoreAspect; void postscript(frame f, string s); void postscript(frame f, string s, pair min, pair max); void postscript(picture pic=, string s, pair min, pair max); void postscript(picture pic=, string s); transform slant(real s); void breakpoint(code s=); void breakpoints(); void endgroup(frame f); void endgroup(picture pic=); void endgroup3(frame f); int Floor(real x); pair gamma(explicit pair z); real gamma(real x); real pow10(real x); real[] pow10(real[] a); real[][] AtA(real[][] a); real bp; int[] sort(int[] a); int[][] sort(int[][] a); real[] sort(real[] a); real[][] sort(real[][] a); string[] sort(string[] a); string[][] sort(string[][] a); path[] sort(path[] a, bool less(path, path)); picture[] sort(picture[] a, bool less(picture, picture)); pair[] sort(pair[] a, bool less(pair, pair)); void()()[] sort(void()()[] a, bool less(void()(), void()())); real[] sort(real[] a, bool less(real, real)); bool[] sort(bool[] a, bool less(bool, bool)); Legend[] sort(Legend[] a, bool less(Legend, Legend)); coord[] sort(coord[] a, bool less(coord, coord)); pen[] sort(pen[] a, bool less(pen, pen)); pen[][] sort(pen[][] a, bool less(pen[], pen[])); coord[] sort(coord[] a, bool less(coord, coord)); object[] sort(object[] a, bool less(object, object)); guide[] sort(guide[] a, bool less(guide, guide)); real[][] sort(real[][] a, bool less(real[], real[])); triple[] sort(triple[] a, bool less(triple, triple)); Label[] sort(Label[] a, bool less(Label, Label)); string[] sort(string[] a, bool less(string, string)); int[] sort(int[] a, bool less(int, int)); string[][] sort(string[][] a, bool less(string[], string[])); bool3[] sort(bool3[] a, bool less(bool3, bool3)); pair[][] sort(pair[][] a, bool less(pair[], pair[])); marker[] sort(marker[] a, bool less(marker, marker)); frame[] sort(frame[] a, bool less(frame, frame)); pen salmon; bool ignore; pen Pentype(int n); pen chartreuse; void latticeshade(frame f, path[] g, bool stroke=, pen fillrule=, pen[][] p, transform t=, bool copy=); void latticeshade(picture pic=, path[] g, bool stroke=, pen fillrule=, pen[][] p, bool copy=); pair[] pairs(real[] x, real[] y); void eval(code s, bool embedded=); void eval(string s, bool embedded=); bool Arrow(picture, path, pen, marginT(path, pen))(arrowhead arrowhead=, real size=, real angle=, filltype filltype=, position position=); bool Arrow(picture, path, pen, marginT(path, pen)); bool Arrows(picture, path, pen, marginT(path, pen))(arrowhead arrowhead=, real size=, real angle=, filltype filltype=); bool Arrows(picture, path, pen, marginT(path, pen)); int tell(file f); pen Yellow; pair up; guide reverse(guide g); string reverse(string s); path reverse(path p); path3 reverse(path3 p); triple[] reverse(triple[] a); int[] reverse(int[] a); real[] reverse(real[] a); int[] reverse(int n); string[] reverse(string[] a); pair[] reverse(pair[] a); bool[] reverse(bool[] a); void _labelpath(frame f, string s, string size, path g, string justify, pair offset, pen p); int floor(real x); void resetdefaultpen(); real aSin(real x); pen darkred; transform Scale(transform t); pen mean(pen[] p, real opacity(real[])=); pen[] mean(pen[][] palette, real opacity(real[])=); string mktemp(string s); void sleep(int seconds); void arrow(picture pic=, Label L=, pair b, pair dir, real length=, align align=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=); picture arrow(arrowhead arrowhead=, path g, pen p=, real size=, real angle=, filltype filltype=, position position=, bool forwards=, marginT margin(path, pen)=, bool center=); void unitsize(picture pic=, real x, real y=, real z=); picture arrow2(arrowhead arrowhead=, path g, pen p=, real size=, real angle=, filltype filltype=, marginT margin(path, pen)=); path unitsquare; real arrowdir; real arrowbarb; pen yellow; int delete(string s); pen miterjoin; arrowhead SimpleHead; real arrowangle; real arrowlength; pen miterlimit(real x); real miterlimit(pen p=); real arrowfactor; real arrowsize(pen p=); real Tan(real deg); real arrowsizelimit; real arrow2sizelimit; real arrowhookfactor; real arrowtexfactor; void comma(file file); void deletepreamble(); real[] arrowbasepoints(path base, path left, path right, real default=); path arrowbase(path r, pair y, real t, real size); int choose(int n, int k); real hypot(real x, real y); path[] _strokepath(path g, pen p=); void pause(string w=); int ocgindex; pen springgreen; pen brown; bool scale(pen p); transform scale(real x); transform scale(real x, real y); real[][] scale(real x, real y, real z); scaleT scaleT(real T(real x), real Tinv(real x), bool logarithmic=, bool automin=, bool automax=); string baseline(string s, string template=); real[][] scale3(real s); int AND(int a, int b); real polar(triple v, bool warn=); real radius(path p, real t); real radius(path3 p, real t); real radius(triple z0, triple c0, triple c1, triple z1, real t); transform scaleless(transform t); void makedraw(frame f, path g, pen p, int depth=); real nan; pair down; path arc(pair c, real r, real angle1, real angle2); path arc(pair c, explicit pair z1, explicit pair z2, bool direction=); path arc(pair c, real r, real angle1, real angle2, bool direction); real[] cubicroots(real a, real b, real c, real d); pen green; real tan(real x); real[] tan(real[] a); pen longdashed; pair point(guide g, int t); pair point(path p, int t); pair point(path p, real t); triple point(path3 p, int t); triple point(path3 p, real t); pair point(picture pic=, pair dir, bool user=); pair point(object F, pair dir, transform t=); pair point(frame f, pair dir); void progress(bool3 init=); pen longdashdotted; void usepackage(string s, string options=); void drawarrow(frame f, arrowhead arrowhead=, path g, pen p=, real size=, real angle=, filltype filltype=, position position=, bool forwards=, marginT margin(path, pen)=, bool center=); void drawarrow2(frame f, arrowhead arrowhead=, path g, pen p=, real size=, real angle=, filltype filltype=, marginT margin(path, pen)=); pen fillrule(int n); int fillrule(pen p); pair ESE; pair project(triple v, real[][] t); bool prc(string format=); projection projection(triple camera, triple up=, triple target=, triple normal=, real zoom=, real angle=, pair viewportshift=, bool showtarget=, bool autoadjust=, bool center=, transformation projector(triple camera, triple up, triple target)); void endl(file file); marginT TrueMargin(path, pen)(real begin, real end); pair bezier(pair a, pair b, pair c, pair d, real t); triple bezier(triple a, triple b, triple c, triple d, real t); pair SSE; pair bezierP(pair a, pair b, pair c, pair d, real t); triple bezierP(triple a, triple b, triple c, triple d, real t); pair bezierPP(pair a, pair b, pair c, pair d, real t); triple bezierPP(triple a, triple b, triple c, triple d, real t); real[] _projection(); pair bezierPPP(pair a, pair b, pair c, pair d); triple bezierPPP(triple a, triple b, triple c, triple d); real Jn(int n, real x); void initXasyMode(); int randMax; path nurb(pair z0, pair z1, pair z2, pair z3, real w0, real w1, real w2, real w3, int m); align NoAlign; bool EndBar(picture, path, pen, marginT(path, pen)); bool EndBar(picture, path, pen, marginT(path, pen))(real size=); Legend Legend(string label, pen plabel=, pen p=, frame mark=, bool above=); real Yn(int n, real x); int NOT(int a); pen[] monoPen; bool CW; bool all(bool[] a); real atanh(real x); real[] atanh(real[] a); frame UpsideDown(frame f); pair realmult(pair z, pair w); triple realmult(triple u, triple v); real acosh(real x); real[] acosh(real[] a); real realEpsilon; pair NW; real norm(real[] a); real norm(real[][] a); real norm(triple[][] a); int length(guide g); int length(string s); real length(pair z); real length(triple v); int length(path p); int length(path3 p); pair SW; void flush(file f); pen thin(); pen palecyan; void warning(string s, string t, bool position=); frame legend(picture pic=, int perline=, real xmargin=, real ymargin=, real linelength=, real hskip=, real vskip=, real maxwidth=, real maxheight=, bool hstretch=, bool vstretch=, pen p=); picture legend(Legend[] Legend, int perline=, real linelength, real hskip, real vskip, real maxwidth=, real maxheight=, bool hstretch=, bool vstretch=); real Degrees(real radians); picture legenditem(Legend legenditem, real linelength); real legendhskip; real legendvskip; pen darkmagenta; real change2(triple[][] a); real legendmargin; bool None(picture, path, pen, marginT(path, pen)); real dotfactor; real legendlinelength; bool diagnostics; string minipage(string s, real width=); real legendmaxrelativewidth; real cross(explicit pair z, explicit pair w); triple cross(triple u, triple v); path cross(int n, bool round=, real r=); string operator +(string a, string b); int operator +(int a, int b); int[] operator +(int a, int[] b); int[] operator +(int[] a, int b); int[] operator +(int[] a, int[] b); int[][] operator +(int[][] a, int[][] b); int operator +(int a); int[] operator +(int[] a); real operator +(real a, real b); real[] operator +(real a, real[] b); real[] operator +(real[] a, real b); real[] operator +(real[] a, real[] b); real[][] operator +(real[][] a, real[][] b); real operator +(real a); real[] operator +(real[] a); pair operator +(pair a, pair b); pair[] operator +(pair a, pair[] b); pair[] operator +(pair[] a, pair b); pair[] operator +(pair[] a, pair[] b); pair[][] operator +(pair[][] a, pair[][] b); pair operator +(pair a); pair[] operator +(pair[] a); triple operator +(triple a, triple b); triple[] operator +(triple a, triple[] b); triple[] operator +(triple[] a, triple b); triple[] operator +(triple[] a, triple[] b); triple[][] operator +(triple[][] a, triple[][] b); triple operator +(triple a); triple[] operator +(triple[] a); pen operator +(pen a, pen b); transform operator +(transform a, transform b); pen operator +(pen p, real w); pen[] operator +(pen a, pen[] b); pen operator +(real w, pen p); marginT operator +(path, pen)(marginT ma(path, pen), marginT mb(path, pen)); pen[] operator +(pen[] a, pen b); int operator -(int a, int b); int[] operator -(int a, int[] b); int[] operator -(int[] a, int b); int[] operator -(int[] a, int[] b); int[][] operator -(int[][] a, int[][] b); int operator -(int a); int[] operator -(int[] a); int[][] operator -(int[][] a); real operator -(real a, real b); real[] operator -(real a, real[] b); real[] operator -(real[] a, real b); real[] operator -(real[] a, real[] b); real[][] operator -(real[][] a, real[][] b); real operator -(real a); real[] operator -(real[] a); real[][] operator -(real[][] a); pair operator -(pair a, pair b); pair[] operator -(pair a, pair[] b); pair[] operator -(pair[] a, pair b); pair[] operator -(pair[] a, pair[] b); pair[][] operator -(pair[][] a, pair[][] b); pair operator -(pair a); pair[] operator -(pair[] a); pair[][] operator -(pair[][] a); triple operator -(triple a, triple b); triple[] operator -(triple a, triple[] b); triple[] operator -(triple[] a, triple b); triple[] operator -(triple[] a, triple[] b); triple[][] operator -(triple[][] a, triple[][] b); triple operator -(triple a); triple[] operator -(triple[] a); triple[][] operator -(triple[][] a); int operator *(int a, int b); int[] operator *(int a, int[] b); int[] operator *(int[] a, int b); int[] operator *(int[] a, int[] b); int[][] operator *(int a, int[][] b); int[][] operator *(int[][] a, int b); real operator *(real a, real b); real[] operator *(real a, real[] b); real[] operator *(real[] a, real b); real[] operator *(real[] a, real[] b); real[][] operator *(real a, real[][] b); real[][] operator *(real[][] a, real b); pair operator *(pair a, pair b); pair[] operator *(pair a, pair[] b); pair[] operator *(pair[] a, pair b); pair[] operator *(pair[] a, pair[] b); pair[][] operator *(pair a, pair[][] b); pair[][] operator *(pair[][] a, pair b); triple[] operator *(real a, triple[] b); triple[][] operator *(real a, triple[][] b); triple[] operator *(triple[] a, real b); triple[][] operator *(triple[][] a, real b); pen operator *(real a, pen b); pen operator *(pen a, real b); transform operator *(transform a, transform b); pair operator *(transform t, pair z); path operator *(transform t, path g); pen operator *(transform t, pen p); frame operator *(transform t, frame f); frame operator *(real[][] t, frame f); real[] operator *(real[][] a, real[] b); real[] operator *(real[] a, real[][] b); int[][] operator *(int[][] a, int[][] b); real[][] operator *(real[][] a, real[][] b); pair[][] operator *(pair[][] a, pair[][] b); triple operator *(real[][] t, triple v); triple operator *(real x, triple v); triple operator *(triple v, real x); path3 operator *(real[][] t, path3 g); picture operator *(transform t, picture orig); side operator *(real x, side s); Label operator *(real[][] t, Label L); path[] operator *(transform t, explicit path[] p); bounds operator *(transform t, bounds b); object operator *(transform t, explicit object F); pair[] operator *(transform t, pair[] z); Label operator *(transform t, Label L); picture operator *(real[][] t, picture orig); bool operator init(); int operator init(); real operator init(); string operator init(); pair operator init(); triple operator init(); transform operator init(); guide operator init(); path operator init(); path3 operator init(); pen operator init(); frame operator init(); file operator init(); marginT operator init(); light operator init(); side operator init(); marker operator init(); filltype operator init(); projection operator init(); align operator init(); slice operator init(); coords2 operator init(); picture operator init(); framedTransformStack operator init(); hsv operator init(); coords2 operator init(); scaling operator init(); Legend operator init(); indexedTransform operator init(); scaling operator init(); coord operator init(); ScaleT operator init(); coord operator init(); bounds operator init(); autoscaleT operator init(); pairOrTriple operator init(); object operator init(); cputime operator init(); transformation operator init(); scaleT operator init(); Label operator init(); processtime operator init(); bool3 operator init(); coords3 operator init(); position operator init(); arrowhead operator init(); real operator cast(int); pair operator cast(int); pair operator cast(real); path operator cast(pair); guide operator cast(pair); guide operator cast(path); path operator cast(guide); file operator cast(null); real[] operator cast(int[]); pair[] operator cast(int[]); pair[] operator cast(real[]); real[][] operator cast(int[][]); pair[][] operator cast(int[][]); pair[][] operator cast(real[][]); bool operator cast(file); bool[] operator cast(file); bool[][] operator cast(file); bool[][][] operator cast(file); int operator cast(file); int[] operator cast(file); int[][] operator cast(file); int[][][] operator cast(file); real operator cast(file); real[] operator cast(file); real[][] operator cast(file); real[][][] operator cast(file); pair operator cast(file); pair[] operator cast(file); pair[][] operator cast(file); pair[][][] operator cast(file); triple operator cast(file); triple[] operator cast(file); triple[][] operator cast(file); triple[][][] operator cast(file); string operator cast(file); string[] operator cast(file); string[][] operator cast(file); string[][][] operator cast(file); guide operator cast(cycleToken tok); guide operator cast(curlSpecifier spec); guide operator cast(tensionSpecifier t); guide[] operator cast(path[] g); position operator cast(real x); hsv operator cast(pen p); Label operator cast(string s); pair operator cast(pairOrTriple a); triple operator cast(pairOrTriple a); frame operator cast(object F); bool3[] operator cast(bool[] b); align operator cast(side side); position operator cast(pair x); guide[] operator cast(pair[] z); path[] operator cast(guide[] g); bool operator cast(bool3 b); pair operator cast(position P); object operator cast(frame f); path[] operator cast(guide g); object operator cast(Label L); Label operator cast(object F); align operator cast(pair dir); path[] operator cast(pair[] z); path[] operator cast(path p); bool[] operator cast(bool3[] b); align operator cast(triple dir); bool3 operator cast(bool b); pen operator cast(hsv hsv); position operator cast(int x); object operator cast(string s); pen deepred; bool error(file f); string operator ecast(int); string operator ecast(real); string operator ecast(pair); string operator ecast(triple); int operator ecast(string); real operator ecast(string); pair operator ecast(string); triple operator ecast(string); int operator ecast(real); int[] operator ecast(real[]); real[] operator ecast(string[] a); int[] operator ecast(string[] a); pair operator tuple(real x, real y); triple operator tuple(real x, real y, real z); transform operator tuple(real x, real y, real xx, real xy, real yx, real yy); real operator /(real a, real b); real[] operator /(real a, real[] b); real[] operator /(real[] a, real b); real[] operator /(real[] a, real[] b); real[][] operator /(real[][] a, real b); pair operator /(pair a, pair b); pair[] operator /(pair a, pair[] b); pair[] operator /(pair[] a, pair b); pair[] operator /(pair[] a, pair[] b); pair[][] operator /(pair[][] a, pair b); triple[] operator /(triple[] a, real b); real operator /(int a, int b); real[] operator /(int[] a, int b); real[] operator /(int a, int[] b); real[] operator /(int[] a, int[] b); triple operator /(triple v, real x); path[] texpath(string s, pen p, bool tex=, bool bbox=); path[] texpath(Label L, bool tex=, bool bbox=); bool uptodate(); int operator #(int a, int b); int[] operator #(int a, int[] b); int[] operator #(int[] a, int b); int[] operator #(int[] a, int[] b); int operator %(int a, int b); int[] operator %(int a, int[] b); int[] operator %(int[] a, int b); int[] operator %(int[] a, int[] b); real operator %(real a, real b); real[] operator %(real a, real[] b); real[] operator %(real[] a, real b); real[] operator %(real[] a, real[] b); bool operator ^(bool a, bool b); bool[] operator ^(bool a, bool[] b); bool[] operator ^(bool[] a, bool b); bool[] operator ^(bool[] a, bool[] b); int operator ^(int a, int b); int[] operator ^(int a, int[] b); int[] operator ^(int[] a, int b); int[] operator ^(int[] a, int[] b); real operator ^(real a, real b); real[] operator ^(real a, real[] b); real[] operator ^(real[] a, real b); real[] operator ^(real[] a, real[] b); pair operator ^(pair a, pair b); pair[] operator ^(pair a, pair[] b); pair[] operator ^(pair[] a, pair b); pair[] operator ^(pair[] a, pair[] b); transform operator ^(transform t, int n); real operator ^(real x, int y); pair operator ^(pair z, int y); bool operator ==(bool a, bool b); bool[] operator ==(bool a, bool[] b); bool[] operator ==(bool[] a, bool b); bool[] operator ==(bool[] a, bool[] b); bool operator ==(bool[][] a, bool[][] b); bool operator ==(int a, int b); bool[] operator ==(int a, int[] b); bool[] operator ==(int[] a, int b); bool[] operator ==(int[] a, int[] b); bool operator ==(int[][] a, int[][] b); bool operator ==(real a, real b); bool[] operator ==(real a, real[] b); bool[] operator ==(real[] a, real b); bool[] operator ==(real[] a, real[] b); bool operator ==(real[][] a, real[][] b); bool operator ==(pair a, pair b); bool[] operator ==(pair a, pair[] b); bool[] operator ==(pair[] a, pair b); bool[] operator ==(pair[] a, pair[] b); bool operator ==(pair[][] a, pair[][] b); bool operator ==(triple a, triple b); bool[] operator ==(triple a, triple[] b); bool[] operator ==(triple[] a, triple b); bool[] operator ==(triple[] a, triple[] b); bool operator ==(triple[][] a, triple[][] b); bool operator ==(string a, string b); bool[] operator ==(string a, string[] b); bool[] operator ==(string[] a, string b); bool[] operator ==(string[] a, string[] b); bool operator ==(string[][] a, string[][] b); bool[] operator ==(pen[] a, pen[] b); bool operator ==(pen a, pen b); bool operator ==(transform a, transform b); bool operator ==(file a, file b); bool operator ==(path a, path b); bool operator ==(path3 a, path3 b); bool operator ==(bool3 a, bool3 b); bool operator ==(coords3 a, coords3 b); bool operator ==(position a, position b); bool operator ==(arrowhead a, arrowhead b); bool operator ==(scaling a, scaling b); bool operator ==(coord a, coord b); bool operator ==(ScaleT a, ScaleT b); bool operator ==(filltype a, filltype b); bool operator ==(freezableBounds a, freezableBounds b); bool operator ==(projection a, projection b); bool operator ==(align a, align b); bool operator ==(transformation a, transformation b); bool operator ==(scaleT a, scaleT b); bool operator ==(Label a, Label b); bool operator ==(processtime a, processtime b); bool operator ==(hsv a, hsv b); bool operator ==(coords2 a, coords2 b); bool operator ==(scaling a, scaling b); bool operator ==(Legend a, Legend b); bool operator ==(indexedTransform a, indexedTransform b); bool operator ==(bool3 a, bool b); bool operator ==(marginT a, marginT b); bool operator ==(light a, light b); bool operator ==(side a, side b); bool operator ==(marker a, marker b); bool operator ==(coord a, coord b); bool operator ==(bounds a, bounds b); bool operator ==(autoscaleT a, autoscaleT b); bool operator ==(pairOrTriple a, pairOrTriple b); bool operator ==(object a, object b); bool operator ==(cputime a, cputime b); bool operator ==(bool a, bool3 b); bool operator ==(slice a, slice b); bool operator ==(coords2 a, coords2 b); bool operator ==(picture a, picture b); bool operator ==(framedTransformStack a, framedTransformStack b); bool operator !=(bool a, bool b); bool[] operator !=(bool a, bool[] b); bool[] operator !=(bool[] a, bool b); bool[] operator !=(bool[] a, bool[] b); bool operator !=(bool[][] a, bool[][] b); bool operator !=(int a, int b); bool[] operator !=(int a, int[] b); bool[] operator !=(int[] a, int b); bool[] operator !=(int[] a, int[] b); bool operator !=(int[][] a, int[][] b); bool operator !=(real a, real b); bool[] operator !=(real a, real[] b); bool[] operator !=(real[] a, real b); bool[] operator !=(real[] a, real[] b); bool operator !=(real[][] a, real[][] b); bool operator !=(pair a, pair b); bool[] operator !=(pair a, pair[] b); bool[] operator !=(pair[] a, pair b); bool[] operator !=(pair[] a, pair[] b); bool operator !=(pair[][] a, pair[][] b); bool operator !=(triple a, triple b); bool[] operator !=(triple a, triple[] b); bool[] operator !=(triple[] a, triple b); bool[] operator !=(triple[] a, triple[] b); bool operator !=(triple[][] a, triple[][] b); bool operator !=(string a, string b); bool[] operator !=(string a, string[] b); bool[] operator !=(string[] a, string b); bool[] operator !=(string[] a, string[] b); bool operator !=(string[][] a, string[][] b); bool[] operator !=(pen[] a, pen[] b); bool operator !=(pen a, pen b); bool operator !=(transform a, transform b); bool operator !=(file a, file b); bool operator !=(path a, path b); bool operator !=(path3 a, path3 b); bool operator !=(bool3 a, bool3 b); bool operator !=(coords3 a, coords3 b); bool operator !=(position a, position b); bool operator !=(arrowhead a, arrowhead b); bool operator !=(scaling a, scaling b); bool operator !=(coord a, coord b); bool operator !=(ScaleT a, ScaleT b); bool operator !=(filltype a, filltype b); bool operator !=(freezableBounds a, freezableBounds b); bool operator !=(projection a, projection b); bool operator !=(align a, align b); bool operator !=(transformation a, transformation b); bool operator !=(scaleT a, scaleT b); bool operator !=(Label a, Label b); bool operator !=(processtime a, processtime b); bool operator !=(hsv a, hsv b); bool operator !=(coords2 a, coords2 b); bool operator !=(scaling a, scaling b); bool operator !=(Legend a, Legend b); bool operator !=(indexedTransform a, indexedTransform b); bool operator !=(bool3 a, bool b); bool operator !=(marginT a, marginT b); bool operator !=(light a, light b); bool operator !=(side a, side b); bool operator !=(marker a, marker b); bool operator !=(coord a, coord b); bool operator !=(bounds a, bounds b); bool operator !=(autoscaleT a, autoscaleT b); bool operator !=(pairOrTriple a, pairOrTriple b); bool operator !=(object a, object b); bool operator !=(cputime a, cputime b); bool operator !=(bool a, bool3 b); bool operator !=(slice a, slice b); bool operator !=(coords2 a, coords2 b); bool operator !=(picture a, picture b); bool operator !=(framedTransformStack a, framedTransformStack b); bool operator <(int a, int b); bool[] operator <(int a, int[] b); bool[] operator <(int[] a, int b); bool[] operator <(int[] a, int[] b); bool operator <(real a, real b); bool[] operator <(real a, real[] b); bool[] operator <(real[] a, real b); bool[] operator <(real[] a, real[] b); bool operator <(string a, string b); bool[] operator <(string a, string[] b); bool[] operator <(string[] a, string b); bool[] operator <(string[] a, string[] b); bool operator <=(int a, int b); bool[] operator <=(int a, int[] b); bool[] operator <=(int[] a, int b); bool[] operator <=(int[] a, int[] b); bool operator <=(real a, real b); bool[] operator <=(real a, real[] b); bool[] operator <=(real[] a, real b); bool[] operator <=(real[] a, real[] b); bool operator <=(string a, string b); bool[] operator <=(string a, string[] b); bool[] operator <=(string[] a, string b); bool[] operator <=(string[] a, string[] b); bool operator <=(coord a, coord b); bool operator <=(coord a, coord b); void srand(int seed); bool operator >(int a, int b); bool[] operator >(int a, int[] b); bool[] operator >(int[] a, int b); bool[] operator >(int[] a, int[] b); bool operator >(real a, real b); bool[] operator >(real a, real[] b); bool[] operator >(real[] a, real b); bool[] operator >(real[] a, real[] b); bool operator >(string a, string b); bool[] operator >(string a, string[] b); bool[] operator >(string[] a, string b); bool[] operator >(string[] a, string[] b); bool operator >=(int a, int b); bool[] operator >=(int a, int[] b); bool[] operator >=(int[] a, int b); bool[] operator >=(int[] a, int[] b); bool operator >=(real a, real b); bool[] operator >=(real a, real[] b); bool[] operator >=(real[] a, real b); bool[] operator >=(real[] a, real[] b); bool operator >=(string a, string b); bool[] operator >=(string a, string[] b); bool[] operator >=(string[] a, string b); bool[] operator >=(string[] a, string[] b); bool operator >=(coord a, coord b); bool operator >=(coord a, coord b); filltype UnFill(real xmargin=, real ymargin=); filltype UnFill; real degrees(pair z, bool warn=); real degrees(real radians); bool[] operator !(bool[] a); bool operator !(bool b); path[] operator ^^(path p, path q); path[] operator ^^(explicit path[] p, path q); path[] operator ^^(path p, explicit path[] q); path[] operator ^^(explicit path[] p, explicit path[] q); guide operator ::(... guide[]); pen Helvetica(string series=, string shape=); transform reflect(pair a, pair b); bool Bars(picture, path, pen, marginT(path, pen)); bool Bars(picture, path, pen, marginT(path, pen))(real size=); void none(file file); int factorial(int n); real log(real x); real[] log(real[] a); pair log(explicit pair z); guide operator ..(... guide[]); guide operator ..(... guide[])(tensionSpecifier t); path polygon(int n); guide operator --(... guide[]); guide operator ---(... guide[]); pen NewCenturySchoolBook(string series=, string shape=); void()()[] saveFunctions; bool operator &(bool a, bool b); bool[] operator &(bool a, bool[] b); bool[] operator &(bool[] a, bool b); bool[] operator &(bool[] a, bool[] b); path operator &(path p, path q); path3 operator &(path3 p, path3 q); path operator &(path p, cycleToken tok); bool operator |(bool a, bool b); bool[] operator |(bool a, bool[] b); bool[] operator |(bool[] a, bool b); bool[] operator |(bool[] a, bool[] b); string texify(string s); guide operator controls(pair zout, pair zin); guide operator controls(pair z); bool empty(frame f); tensionSpecifier operator tension(real tout, real tin, bool atleast); tensionSpecifier operator tension(real t, bool atLeast); void end(picture pic=); curlSpecifier operator curl(real gamma, int p); guide operator spec(pair z, int p); string substr(string s, int pos, int n=); pen paleyellow; file output(string name=, bool update=, string comment=, string mode=); pen ZapfDingbats(string series=, string shape=); real tanh(real x); real[] tanh(real[] a); real interp(real a, real b, real t); pair interp(explicit pair a, explicit pair b, real t); triple interp(triple a, triple b, real t); pen interp(pen a, pen b, real t); frame Seascape(frame f); bool interior(int windingnumber, pen fillrule); real[] intersect(path p, path q, real fuzz=); real[] intersect(path3 p, path3 q, real fuzz=); real[] intersect(path3 p, triple[][] p, real fuzz=); bool interactive(); real[][] intersections(path p, path q, real fuzz=); real[] intersections(path p, explicit pair a, explicit pair b, real fuzz=); real[][] intersections(path3 p, path3 q, real fuzz=); real[][] intersections(path3 p, triple[][] p, real fuzz=); int animate(string args=, string file=, string format=); void generate_random_backtrace(); pair intersectionpoint(path p, path q, real fuzz=); pair[] intersectionpoints(path p, path q, real fuzz=); pair[] intersectionpoints(explicit path[] p, explicit path[] q, real fuzz=); void asy(string format, bool overwrite= ... string[] s); bool latex(); void startScript(); bool adjust(pen p); pen adjust(pen p, real arclength, bool cyclic); pair Align; void exit(); real[] uniform(real a, real b, int n); pair viewportsize; pair viewportmargin; string VERSION; real insphere(triple a, triple b, triple c, triple d, triple e); void filldraw(picture pic=, path[] g, pen fillpen=, pen drawpen=); void filldraw(frame f, path[] g, pen fillpen=, pen drawpen=); real dot(real[] a, real[] b); pair dot(pair[] a, pair[] b); real dot(explicit pair z, explicit pair w); real dot(triple u, triple v); void dot(picture pic=, Label[] L=, explicit path g, align align=, string format=, pen p=, filltype filltype=); marker dot(pen p=, filltype filltype=); void dot(picture pic=, pair z, pen p=, filltype filltype=); void dot(frame f, pair z, pen p=, filltype filltype=); void dot(picture pic=, Label L, pen p=, filltype filltype=); void dot(picture pic=, Label[] L=, pair[] z, align align=, string format=, pen p=, filltype filltype=); void dot(picture pic=, path[] g, pen p=, filltype filltype=); marker dot; void dot(picture pic=, Label L, pair z, align align=, string format=, pen p=, filltype filltype=); void list(string s, bool imports=); pair NNW; string phantom(string s); void atexit(void f()); void atexit()(); real getreal(string name=, real default=, string prompt=, bool store=); int convert(string args=, string file=, string format=); pair WNW; pen palegray; pen palegreen; pen palegrey; void clip(frame f, path[] g, bool stroke=, pen fillrule=, bool copy=); void clip(picture pic=, path[] g, bool stroke=, pen fillrule=, bool copy=); marginT Margin(path, pen)(real begin, real end); marginT Margin(path, pen); position Relative(real position); side Relative(explicit pair align); marginT Margins(path, pen); pair truepoint(picture pic=, pair dir, bool user=); real arclength(path p); real arclength(path3 p); indexedTransform indexedTransform(int index, transform t, bool active=); bool finite(real x); bool finite(pair z); bool finite(triple v); void updatefunction(); void _draw(frame f, path g, pen p); void _draw(frame f, path3 g, triple center=, pen p, int interaction=); void _draw(picture pic, path g, pen p, marginT margin(path, pen)); frame align(frame f, pair align); path[] align(path[] g, transform t=, pair position, pair align, pen p=); object align(object F, pair align); real unitrand(); string[] history(string name, int n=); string[] history(int n=); coord[] maxcoords(coord[] in, bool operator <=(coord, coord)); coord[] maxcoords(coord[] in, bool operator <=(coord, coord)); pen AvantGarde(string series=, string shape=); frame enclose(string prefix=, object F, string format=); int count; real atan2(real y, real x); bool inside(explicit path[] g, pair z, pen fillrule=); bool inside(path g, pair z, pen fillrule=); int inside(path p, path q, pen fillrule=); pair inside(path p, pen fillrule=); pair rectify(pair dir); arrowhead TeXHead; path[] margin(path[] g, real xmargin, real ymargin); pair relative(picture pic=, pair z); real erfc(real x); int windingnumber(path[] p, pair z); real expansionfactor; void addArrow(picture pic, arrowhead arrowhead, path g, pen p, real size, real angle, filltype filltype, real position); void exitfunction(); pen gray(pen p); pen gray(real gray); pen gray; real relativedistance(real theta, real phi, real t, bool atleast); path circle(pair c, real r); void overloadedMessage(file file); pen deepmagenta; real circlescale; string math(real x); string math(string s); real circleprecision; int Allow; real determinant(real[][] a); void functionshade(frame f, path[] g, bool stroke=, pen fillrule=, string shader=, bool copy=); void functionshade(picture pic=, path[] g, bool stroke=, pen fillrule=, string shader, bool copy=); pen red; pair[] dirSpecifier(guide g, int t); void abort(string s=); bool Aspect; string hex(pen p); int hex(string s); path brace(pair a, pair b, real amplitude=); void deactivatequote(picture pic=); string format(string format, int x, string locale=); string format(string format, string separator, real x, string locale=); string format(string format, real x, string locale=); string format(real x, string locale=); real expm1(real x); real[] expm1(real[] a); void activatequote(picture pic=); int undefined; string ask(string prompt); frame[] fit2(picture[] pictures, picture all); pen linecap(int n); int linecap(pen p=); string outname(); void newpage(frame f); void newpage(picture pic=); pen fontcommand(string s); real bracemidangle; pair accel(path p, int t, int sign=); pair accel(path p, real t); triple accel(path3 p, int t, int sign=); triple accel(path3 p, real t); frame Portrait(frame f); real braceinnerangle; real braceouterangle; void tex(frame f, string s); void tex(frame f, string s, pair min, pair max); void tex(picture pic=, string s, pair min, pair max); void tex(picture pic=, string s); real bracedefaultratio; bool prconly(string format=); pen Black; triple size3(frame f); void size3(picture pic=, real x, real y=, real z=, bool keepAspect=); bool eof(file f); frame dotframe(pen p=, filltype filltype=); frame dotframe; real realMax; pair NE; real realMin; path nib(pen p); void gouraudshade(frame f, path[] g, bool stroke=, pen fillrule=, pen[] p, pair[] z, int[] edges, bool copy=); void gouraudshade(frame f, path[] g, bool stroke=, pen fillrule=, pen[] p, int[] edges, bool copy=); void gouraudshade(picture pic=, path[] g, bool stroke=, pen fillrule=, pen[] p, pair[] z, int[] edges, bool copy=); void gouraudshade(picture pic=, path[] g, bool stroke=, pen fillrule=, pen[] p, int[] edges, bool copy=); bool shipped; pair[] fft(pair[] a, int sign=); pair SE; pen nobasealign; real animationdelay; animation operator init(); frame NoBox(frame f); frame BBox(frame)(real xmargin=, real ymargin=, pen p=, filltype filltype=); void annotate(picture pic=, string title, string text, pair position); void babel(string s); path removeDuplicates(path p); path uncycle(path p, real t); path[] bezulate(path[] p); real[][] intersections(pair a, pair b, path p); void connect(path[] paths, path[] result, path[] patch); int countIntersections(path[] p, pair start, pair end); real duplicateFuzz; path subdivide(path p); bool isDuplicate(pair a, pair b, real relSize); bool checkSegment(path g, pair p, pair q); path section(path p, real t1, real t2, bool loop=); real fuzz; real maxrefinements; path[][] containmentTree(path[] paths); binarytree searchtree(... int[] keys); object draw(picture pic=, binarytreeNode node, pair pos, int height, real minDist, real levelDist, real nodeDiameter, pen p=, bool condensed=); void draw(picture pic=, binarytree tree, real minDist=, real nodeMargin=, pen p=, bool condensed=); real nodeMarginDefault; key key(int n, bool active=); binarytree binarytree(... key[] keys); binarytreeNode binarytreeNode(int key); key nil; real minDistDefault; binarytreeNode operator init(); key operator init(); binarytree operator init(); key operator cast(int n); int operator cast(key k); int[] operator cast(key[] k); line intersection(face a, face b); real epsilon; splitface split(face a, face cut, projection P); face operator init(); line operator init(); half operator init(); splitface operator init(); bsp operator init(); picture operator cast(face f); face operator cast(path3 p); void add(picture pic=, face[] faces, projection P=); sCAD operator init(); surface surface(vertex[][] g); weighted operator init(); bucket operator init(); vertex operator init(); object operator init(); vertex[][] contour3(triple[][][] v, real[][][] f, real[][][] midpoint=, projection P=); vertex[][] contour3(real[][][] f, real[][][] midpoint=, triple a, triple b, projection P=); vertex[][] contour3(real f(real, real, real), triple a, triple b, int nx=, int ny=, int nz=, projection P=); real eps; segment case1(pair p0, pair p1, int edge); void draw(picture pic=, Label[] L=, guide[][] g, pen[] p); void draw(picture pic=, Label[] L=, guide[][] g, pen p=); pen[][] interior(picture pic=, guide[][] g, pen[] palette); pen[] extend(pen[] palette, pen below, pen above); guide[][] connect(pair[][][] points, real[] c, guide join(... guide[])); segment case2(pair p0, pair p1, pair p2, real v0, real v1, real v2, int edge); void collect(pair[][][] points, real[] c); segment case3(pair p0, pair p1, pair p2, real v0, real v1, real v2, int edge=); segment checktriangle(pair p0, pair p1, pair p2, real v0, real v1, real v2, int edge=); segment operator init(); void addseg(pair[][] gds, segment seg); void fill(picture pic=, guide[][] g, pen[][] palette); guide[][] contour(pair[][] z, real[][] f, real[][] midpoint=, real[] c, guide join(... guide[])=); guide[][] contour(real[][] f, real[][] midpoint=, pair a, pair b, real[] c, guide join(... guide[])=); guide[][] contour(real f(real, real), pair a, pair b, real[] c, int nx=, int ny=, guide join(... guide[])=); guide[][] contour(real f(pair), pair a, pair b, real[] c, int nx=, int ny=, guide join(... guide[])=); guide[][] contour(pair[] z, real[] f, real[] c, guide join(... guide[])=); real eps; void draw(TreeNode root, pair pos); real treeNodeStep; void drawAll(TreeNode node, frame f); real layout(int level, TreeNode node); TreeNode operator init(); void add(TreeNode child, TreeNode parent); real treeLevelStep; real treeMinNodeWidth; TreeNode makeNode(TreeNode parent=, frame f); TreeNode makeNode(TreeNode parent=, Label label); string link(string label, string text=); string embed(string name, string text=, string options=, real width=, real height=); string embedplayer(string name, string text=, string options=, real width=, real height=); string link(string label, string text=); string embed(string name, string text=, string options=, real width=, real height=, string image=); string hyperlink(string url, string text); real gluonratio; real gluonamplitude; pen doublelinepen; real doublelinespacing; void drawGluon(picture pic=, path p, real amp=, real width=, pen fgpen=, bool erasebg=, pen bgpen=, real vertexangle=, real margin=); void drawGhost(picture pic=, path p, pen fgpen=, bool arrow(picture, path, pen, marginT(path, pen))=, bool erasebg=, pen bgpen=, real vertexangle=, real margin=); void drawVertex(picture pic=, pair xy, real r=, pen fgpen=); void drawVertexO(picture pic=, pair xy, real r=, pen fgpen=, bool erasebg=, pen bgpen=); void drawVertexX(picture pic=, pair xy, real r=, pen fgpen=); void drawVertexBox(picture pic=, pair xy, real r=, pen fgpen=); void drawVertexBoxO(picture pic=, pair xy, real r=, pen fgpen=, bool erasebg=, pen bgpen=); void drawVertexOX(picture pic=, pair xy, real r=, pen fgpen=, bool erasebg=, pen bgpen=); void drawVertexTriangle(picture pic=, pair xy, real r=, pen fgpen=); void drawVertexTriangleO(picture pic=, pair xy, real r=, pen fgpen=, bool erasebg=, pen bgpen=); void drawVertexBoxX(picture pic=, pair xy, real r=, pen fgpen=, bool erasebg=, pen bgpen=); void do_overpaint(picture pic, path p, pen bgpen, real halfwidth, real vertexangle); bool XYAlign; void texshipout(string stem, picture pic=, bool xalign=); void drawDoubleLine(picture pic=, path p, pen fgpen=, real dlspacing=, bool arrow(picture, path, pen, marginT(path, pen))=, bool erasebg=, pen bgpen=, real vertexangle=, real margin=); void drawScalar(picture pic=, path p, pen fgpen=, bool arrow(picture, path, pen, marginT(path, pen))=, bool erasebg=, pen bgpen=, real vertexangle=, real margin=); bool overpaint; path photon(path p, real amp=, real width=); pen photonpen; real photonratio; real photonamplitude; string includegraphicscommand; pen momarrowpen; real momarrowsize(pen p=); real momarrowlength; real momarrowoffset; real momarrowmargin; real momarrowfactor; pen vertexpen; real vertexsize; path momArrowPath(path p, align align, position pos, real offset=, real length=); void drawPhoton(picture pic=, path p, real amp=, real width=, pen fgpen=, bool erasebg=, pen bgpen=, real vertexangle=, real margin=); bool YAlign; pen backgroundpen; pen scalarpen; pen ghostpen; pen fermionpen; pen bigvertexpen; real bigvertexsize; real minvertexangle; void drawMomArrow(picture pic=, path p, align align, position pos=, real offset=, real length=, pen fgpen=, bool arrow(picture, path, pen, marginT(path, pen))=, bool erasebg=, pen bgpen=, real margin=); void fmdefaults(); real linemargin; void drawFermion(picture pic=, path p, pen fgpen=, bool arrow(picture, path, pen, marginT(path, pen))=, bool erasebg=, pen bgpen=, real vertexangle=, real margin=); bool currentarrow(picture, path, pen, marginT(path, pen)); bool currentmomarrow(picture, path, pen, marginT(path, pen)); bool appendsuffix; path gluon(path p, real amp=, real width=); pen gluonpen; Dir Left; block roundrectangle(object body, pair center=, pen fillpen=, pen drawpen=, real ds=, real dw=, real minwidth=, real minheight=); block diamond(object body, pair center=, pen fillpen=, pen drawpen=, real ds=, real dw=, real height=, real minwidth=, real minheight=); void draw(picture pic=, block block, pen p=); real minblockwidth; real defaultexcursion; real minblockheight; path path(pair[] point ... flowdir[] dir); Dir Up; real mincirclediameter; flowdir Vertical; block rectangle(object header, object body, pair center=, pen headerpen=, pen bodypen=, pen drawpen=, real dx=, real minheaderwidth=, real minheaderheight=, real minbodywidth=, real minbodyheight=); block rectangle(object body, pair center=, pen fillpen=, pen drawpen=, real dx=, real minwidth=, real minheight=); block parallelogram(object body, pair center=, pen fillpen=, pen drawpen=, real dx=, real slope=, real minwidth=, real minheight=); block blockconnector(block, block)(picture pic, transform t, pen p=, marginT margin(path, pen)=); block circle(object body, pair center=, pen fillpen=, pen drawpen=, real dr=, real mindiameter=); flowdir operator init(); block operator init(); Dir operator init(); block operator --(block b1, Label label); block operator --(block b1, Dir dir); block operator --(block b, bool arrowbar(picture, path, pen, marginT(path, pen))); flowdir Horizontal; block bevel(object body, pair center=, pen fillpen=, pen drawpen=, real dh=, real dw=, real minwidth=, real minheight=); Dir Right; Dir Down; int[] numarray; point midpoint(segment s); point midpoint(side side); point isotomicconjugate(triangle t, point M); line altitude(vertex V); line altitude(side side); real rd(real x, real y, real z); point circumcenter(point A, point B, point C); point circumcenter(triangle t); circle circumcircle(point A, point B, point C); circle circumcircle(triangle t); point point(coordsys R, pair p, real m=); point point(explicit pair p, real m); point point(coordsys R, explicit point M, real m=); point point(explicit vector u); point point(circle c, abscissa l); point point(ellipse el, abscissa l); point point(parabola p, abscissa l); point point(hyperbola h, abscissa l); point point(explicit conic co, abscissa l); point point(line l, abscissa x); point point(line l, explicit real x); point point(line l, explicit int x); point point(explicit circle c, explicit real x); point point(explicit circle c, explicit int x); point point(explicit ellipse el, explicit real x); point point(explicit ellipse el, explicit int x); point point(explicit parabola p, explicit real x); point point(explicit parabola p, explicit int x); point point(explicit hyperbola h, explicit real x); point point(explicit hyperbola h, explicit int x); point point(explicit conic co, explicit real x); point point(explicit conic co, explicit int x); point point(arc a, abscissa l); point point(arc a, real x); pair point(explicit arc a, int x); point point(explicit mass m); point point(explicit vertex V); point point(trilinear tri); point point(circle c, point M); point point(circle c, explicit vector v); bool finite(explicit point p); void dot(picture pic=, Label L, explicit point Z, align align=, string format=, pen p=); real dot(point A, point B); real dot(point A, explicit pair B); real dot(explicit pair A, point B); void dot(picture pic=, Label L, explicit mass M, align align=, string format=, pen p=); void dot(picture pic=, triangle t, pen p=); real[] realquarticroots(real a, real b, real c, real d, real e); point origin; point origin(coordsys R=); void draw(picture pic=, Label L=, line l, bool dirA=, bool dirB=, align align=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, Label legend=, marker marker=, path pathModifier(path)=); void draw(picture pic=, Label[] L=, line[] l, align align=, pen[] p=, bool arrow(picture, path, pen, marginT(path, pen))=, Label[] legend=, marker marker=, path pathModifier(path)=); void draw(picture pic=, Label[] L=, line[] l, align align=, pen p, bool arrow(picture, path, pen, marginT(path, pen))=, Label[] legend=, marker marker=, path pathModifier(path)=); void draw(picture pic=, Label L=, circle c, align align=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, bool bar(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, Label legend=, marker marker=); void draw(picture pic=, Label L=, ellipse el, align align=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, bool bar(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, Label legend=, marker marker=); void draw(picture pic=, Label L=, parabola parabola, align align=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, bool bar(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, Label legend=, marker marker=); void draw(picture pic=, Label L=, hyperbola h, align align=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, bool bar(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, Label legend=, marker marker=); void draw(picture pic=, Label L=, explicit conic co, align align=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, bool bar(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, Label legend=, marker marker=); void draw(picture pic=, Label L=, arc a, align align=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, bool bar(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, Label legend=, marker marker=); void draw(picture pic=, triangle t, pen p=, marker marker=); void draw(picture pic=, triangle[] t, pen p=, marker marker=); coordsys defaultcoordsys; string defaultmassformat; line radicalline(circle c1, circle c2); point radicalcenter(circle c1, circle c2); point radicalcenter(circle c1, circle c2, circle c3); ellipse ellipse(point F1, point F2, real a); ellipse ellipse(point F1, point F2, point M); ellipse ellipse(point C, real a, real b, real angle=); ellipse ellipse(bqe bqe); ellipse ellipse(point M1, point M2, point M3, point M4, point M5); path arctopath(arc a, int n); bool inside(ellipse el, point M); bool inside(parabola p, point M); int ellipsenodesnumber(real a, real b); int ellipsenodesnumber(real a, real b, real angle1, real angle2, bool dir); int ellipsenodesnumberfactor; bool byfoci; transform reflect(line l); transform reflect(line l1, line l2, bool safe=); abscissa relabscissa(real x); abscissa relabscissa(int x); abscissa relabscissa(line l, point M); abscissa relabscissa(circle c, point M); abscissa relabscissa(ellipse el, point M); abscissa relabscissa(conic co, point M); abscissa relabscissa(arc a, point M); circle incircle(point A, point B, point C); circle incircle(triangle t); mass masscenter(... mass[] M); vector unit(point M); vector unit(vector u); line Ox(coordsys R=); line Ox; conic conic(point F, line l, real e); conic conic(point M1, point M2, point M3, point M4, point M5); conic conic(bqe bqe); point[] standardizecoordsys(coordsys R=, bool warn= ... point[] M); bool defined(point P); string conictype(bqe bqe); triangle antipedal(triangle t, point M); void clipdraw(picture pic=, Label L=, path g, align align=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, bool bar(picture, path, pen, marginT(path, pen))=, real xmargin=, real ymargin=, Label legend=, marker marker=); real perpfactor; int conicnodesfactor; int conicnodesnumber(conic co, real angle1, real angle2, bool dir=); line hline(coordsys R=); line hline; int[] tricoef(side side); path arcfromfocus(conic co, real angle1, real angle2, int n=, bool direction=); line sector(int n=, int p=, line l1, line l2, real angle=, bool sharp=); path arcfromcenter(ellipse el, real angle1, real angle2, bool direction=, int n=); path arcfromcenter(hyperbola h, real angle1, real angle2, int n=, bool direction=); path arcfromcenter(explicit conic co, real angle1, real angle2, int n, bool direction=); line vline(coordsys R=); line vline; vector vector(coordsys R=, pair v); vector vector(point M); real[] intersect(path g, explicit pair p, real fuzz=); real[] intersect(path g, explicit point P, real fuzz=); int sgnd(real x); int sgnd(int x); circle excircle(point A, point B, point C); circle excircle(side side); line extend(line l); point intersectionpoint(line l1, line l2); pair[] intersectionpoints(pair A, pair B, real a, real b, real c, real d, real f, real g); pair[] intersectionpoints(pair A, pair B, real[] equation); point[] intersectionpoints(line l, path g); point[] intersectionpoints(bqe bqe1, bqe bqe2); point[] intersectionpoints(triangle t, line l, bool extended=); point[] intersectionpoints(line l, triangle t, bool extended=); point[] intersectionpoints(line l, circle c); point[] intersectionpoints(circle c, line l); point[] intersectionpoints(line l, ellipse el); point[] intersectionpoints(ellipse el, line l); point[] intersectionpoints(line l, parabola p); point[] intersectionpoints(parabola p, line l); point[] intersectionpoints(line l, hyperbola h); point[] intersectionpoints(hyperbola h, line l); point[] intersectionpoints(line l, conic co); point[] intersectionpoints(conic co, line l); point[] intersectionpoints(conic co1, conic co2); point[] intersectionpoints(triangle t, conic co, bool extended=); point[] intersectionpoints(conic co, triangle t, bool extended=); point[] intersectionpoints(ellipse a, ellipse b); point[] intersectionpoints(ellipse a, circle b); point[] intersectionpoints(circle a, ellipse b); point[] intersectionpoints(ellipse a, parabola b); point[] intersectionpoints(parabola a, ellipse b); point[] intersectionpoints(ellipse a, hyperbola b); point[] intersectionpoints(hyperbola a, ellipse b); point[] intersectionpoints(circle a, parabola b); point[] intersectionpoints(parabola a, circle b); point[] intersectionpoints(circle a, hyperbola b); point[] intersectionpoints(hyperbola a, circle b); point[] intersectionpoints(parabola a, parabola b); point[] intersectionpoints(parabola a, hyperbola b); point[] intersectionpoints(hyperbola a, parabola b); point[] intersectionpoints(hyperbola a, hyperbola b); point[] intersectionpoints(circle c1, circle c2); point[] intersectionpoints(conic co, arc a); point[] intersectionpoints(arc a, conic co); point[] intersectionpoints(arc a1, arc a2); point[] intersectionpoints(line l, arc a); point[] intersectionpoints(arc a, line l); point intouch(side side); triangle intouch(triangle t); point orthocentercenter(point A, point B, point C); point orthocentercenter(triangle t); real rf(real x, real y, real z); bool concurrent(... line[] l); real inradius(point A, point B, point C); real inradius(triangle t); pen addpenline; pen addpenline(pen p); pen addpenarc; pen addpenarc(pen p); void label(picture pic=, Label L, explicit mass M, align align=, string format=, pen p=, filltype filltype=); void label(picture pic=, Label L, vertex V, pair align=, real alignFactor=, pen p=, filltype filltype=); void label(picture pic=, Label LA=, Label LB=, Label LC=, triangle t, real alignAngle=, real alignFactor=, pen p=, filltype filltype=); real abs(coordsys R, pair m); real abs(explicit point M); point curpoint(line l, real x); point curpoint(explicit circle c, real x); point curpoint(explicit ellipse el, real x); point curpoint(explicit parabola p, real x); point curpoint(conic co, real x); point curpoint(arc a, real x); line bisector(line l1, line l2, real angle=, bool sharp=); line bisector(point A, point B, point C, point D, real angle=, bool sharp=); line bisector(segment s, real angle=); line bisector(point A, point B, real angle=); line bisector(vertex V, real angle=); line bisector(side side); bqe canonical(bqe bqe); point bisectorpoint(side side); abscissa angabscissa(real x, path polarconicroutine(conic co, real angle1, real angle2, int n, bool direction)=); abscissa angabscissa(int x, path polarconicroutine(conic co, real angle1, real angle2, int n, bool direction)=); abscissa angabscissa(circle c, point M); abscissa angabscissa(ellipse el, point M, path polarconicroutine(conic co, real angle1, real angle2, int n, bool direction)=); abscissa angabscissa(hyperbola h, point M, path polarconicroutine(conic co, real angle1, real angle2, int n, bool direction)=); abscissa angabscissa(parabola p, point M); abscissa angabscissa(explicit conic co, point M); abscissa angabscissa(arc a, point M); pair locate(point P); point locate(pair p); pair locate(explicit vector v); bool samecoordsys(bool warn= ... point[] M); bool samecoordsys(bool warn= ... bqe[] bqes); triangle extouch(triangle t); triangle extouch(side side); coordsys canonicalcartesiansystem(ellipse el); coordsys canonicalcartesiansystem(parabola p); coordsys canonicalcartesiansystem(hyperbola h); coordsys canonicalcartesiansystem(explicit conic co); arc arc(ellipse el, real angle1, real angle2, path polarconicroutine(conic co, real angle1, real angle2, int n, bool direction)=, bool direction=); arc arc(ellipse el, explicit abscissa x1, explicit abscissa x2, bool direction=); arc arc(ellipse el, point M, point N, bool direction=); arc arc(explicit arc a, abscissa x1, abscissa x2); arc arc(explicit arc a, point M, point N); path arc(explicit pair B, explicit pair A, explicit pair C, real r); void markrightangle(picture pic=, point A, point O, point B, real size=, pen p=, marginT margin(path, pen)=, filltype filltype=); real epsgeo; bool between(point M, point O, point N); real sharpangle(line l1, line l2); bool isparabola(bqe bqe); real sharpdegrees(line l1, line l2); real exradius(point A, point B, point C); real exradius(side side); abscissa nodabscissa(real x); abscissa nodabscissa(int x); abscissa nodabscissa(line l, point M); abscissa nodabscissa(circle c, point M); abscissa nodabscissa(ellipse el, point M); abscissa nodabscissa(parabola p, point M); abscissa nodabscissa(conic co, point M); abscissa nodabscissa(arc a, point M); coordsys coordsys(line l); coordsys coordsys(conic co); coordsys coordsys(ellipse el); pair coordinates(point M); real length(explicit point M); real length(segment s); int arcnodesnumber(explicit arc a); int nodesystem; bool collinear(vector u, vector v); point centroid(point A, point B, point C); point centroid(triangle t); int angularsystem; path square(pair z1, pair z2); point symmedian(triangle t); point symmedian(side side); line symmedian(vertex V); triangle symmedial(triangle t); int curvilinearsystem; bqe bqe(coordsys R=, real a, real b, real c, real d, real e, real f); bqe bqe(point M1, point M2, point M3, point M4, point M5); arc arccircle(point A, point M, point B); arc arccircle(point A, point B, real angle, bool direction=); point relpoint(line l, real x); point relpoint(explicit circle c, real x); point relpoint(explicit ellipse el, real x); point relpoint(explicit parabola p, real x); point relpoint(explicit hyperbola h, real x); point relpoint(explicit conic co, explicit real x); point relpoint(explicit conic co, explicit int x); point relpoint(arc a, real x); point changecoordsys(coordsys R, point M); vector changecoordsys(coordsys R, vector v); line changecoordsys(coordsys R, line l); bqe changecoordsys(coordsys R, bqe bqe); conic changecoordsys(coordsys R, conic co); real angle(explicit point M, coordsys R=, bool warn=); real angle(explicit vector v, coordsys R=, bool warn=); real angle(line l, coordsys R=); real angle(line l1, line l2); real angle(arc a); point[] fermat(triangle t); real arclength(circle c); real arclength(ellipse el); real arclength(ellipse el, real angle1, real angle2, bool direction=, path polarconicroutine(conic co, real angle1, real angle2, int n, bool direction)=); real arclength(parabola p, real angle); real arclength(parabola p, real angle1, real angle2); real arclength(parabola p); real arclength(arc a); line reverse(line l); arc reverse(arc a); point gergonne(triangle t); real focusToCenter(ellipse el, real a); hyperbola hyperbola(point P1, point P2, real ae, bool byfoci=); hyperbola hyperbola(point C, real a, real b, real angle=); hyperbola hyperbola(bqe bqe); hyperbola hyperbola(point M1, point M2, point M3, point M4, point M5); side opposite(vertex V); vertex opposite(side side); int hyperbolanodesnumber(hyperbola h, real angle1, real angle2); path polarconicroutine(conic co, real angle1, real angle2, int n, bool direction)(conic co); int hyperbolanodesnumberfactor; line parallel(point M, line l); line parallel(point M, explicit vector dir); line parallel(point M, explicit pair dir); bool parallel(line l1, line l2, bool strictly=); transform projection(point A, point B); transform projection(point A, point B, point C, point D, bool safe=); transform projection(line l); transform projection(line l1, line l2, bool safe=); bool degenerate(conic c); bool degenerate(circle c); bool degenerate(ellipse el); segment segment(point A, point B); segment segment(line l); segment segment(explicit side side); line line(point A, bool extendA=, point B, bool extendB=); line line(segment s); line line(real a, point A=); line line(point A=, real a); line line(int a, point A=); line line(coordsys R=, real slope, real origin); line line(coordsys R=, real a, real b, real c); line line(circle c); line line(explicit side side); line complementary(explicit line l); line[] complementary(explicit segment s); arc complementary(arc a); point ppoint(arc a, real x); path fromFocus(conic co, real angle1, real angle2, int n, bool direction); bool sameside(point M, point N, point O); bool sameside(point M, point P, line l); point[] sameside(point M, line l1, line l2); arc arcsubtended(point A, point B, real angle); void distance(picture pic=, Label L=, point A, point B, bool rotated=, real offset=, pen p=, pen joinpen=, bool arrow(picture, path, pen, marginT(path, pen))=); real distance(point M, line l); real distance(line l, point M); point incenter(point A, point B, point C); point incenter(triangle t); void write(explicit line l); void write(explicit segment s); void write(trilinear tri); triangle incentral(triangle t); point arcsubtendedcenter(point A, point B, real angle); circle circle(explicit point C, real r); circle circle(point A, point B); circle circle(segment s); circle circle(point A, point B, point C); circle circle(triangle t); circle circle(inversion i); point angpoint(conic co, real angle); point angpoint(explicit circle c, real x); point angpoint(explicit ellipse el, real x, path polarconicroutine(conic co, real angle1, real angle2, int n, bool direction)=); point angpoint(explicit parabola p, real x); point angpoint(explicit hyperbola h, real x, path polarconicroutine(conic co, real angle1, real angle2, int n, bool direction)=); point angpoint(arc a, real angle); triangle orthic(triangle t); int circlenodesnumber(real r); int circlenodesnumber(real r, real angle1, real angle2); path compassmark(pair O, pair A, real position, real angle=); bool byvertices; int circlenodesnumberfactor; transform xscale(real k, point M); transform yscale(real k, point M); transform scale(real k, point M); transform scale(real k, point A, point B, point C, point D, bool safe=); transform scale(real k, line l1, line l2, bool safe=); point operator +(explicit point P1, explicit point P2); point operator +(explicit point P1, explicit pair p2); point operator +(explicit pair p1, explicit point p2); point operator +(point M, explicit vector v); point operator +(explicit pair m, explicit vector v); vector operator +(explicit vector v1, explicit vector v2); line operator +(line l, vector u); conic operator +(conic c, explicit point M); conic operator +(conic c, explicit pair m); conic operator +(conic c, vector v); circle operator +(explicit circle c, explicit point M); circle operator +(explicit circle c, pair m); circle operator +(explicit circle c, vector m); abscissa operator +(real x, explicit abscissa a); abscissa operator +(explicit abscissa a, real x); abscissa operator +(int x, explicit abscissa a); arc operator +(explicit arc a, point M); arc operator +(explicit arc a, vector v); mass operator +(mass M1, mass M2); mass operator +(explicit mass M, real x); mass operator +(explicit mass M, int x); point operator -(explicit point P); point operator -(explicit point P1, explicit point P2); point operator -(explicit point P1, explicit pair p2); point operator -(explicit pair p1, explicit point P2); point operator -(point M, explicit vector v); vector operator -(explicit vector v); point operator -(explicit pair m, explicit vector v); vector operator -(explicit vector v1, explicit vector v2); line operator -(line l, vector u); conic operator -(conic c, explicit point M); conic operator -(conic c, explicit pair m); conic operator -(conic c, vector v); circle operator -(explicit circle c, explicit point M); circle operator -(explicit circle c, pair m); circle operator -(explicit circle c, vector m); abscissa operator -(explicit abscissa a); abscissa operator -(real x, explicit abscissa a); abscissa operator -(explicit abscissa a, real x); abscissa operator -(int x, explicit abscissa a); arc operator -(explicit arc a, point M); arc operator -(explicit arc a, vector v); mass operator -(mass M1, mass M2); mass operator -(explicit mass M, real x); mass operator -(explicit mass M, int x); transform xscaleO(real x); pair operator *(coordsys R, pair p); path operator *(coordsys R, path g); coordsys operator *(transform t, coordsys R); point operator *(real x, explicit point P); point operator *(transform t, explicit point P); point operator *(explicit point P1, explicit point P2); point operator *(explicit point P1, explicit pair p2); point operator *(explicit pair p1, explicit point p2); vector operator *(real x, explicit vector v); vector operator *(transform t, explicit vector v); vector operator *(explicit point M, explicit vector v); line operator *(transform t, line l); line operator *(real x, line l); line operator *(int x, line l); line operator *(point M, line l); circle operator *(real x, explicit circle c); circle operator *(int x, explicit circle c); ellipse operator *(transform t, ellipse el); parabola operator *(transform t, parabola p); ellipse operator *(transform t, circle c); hyperbola operator *(transform t, hyperbola h); conic operator *(transform t, conic co); ellipse operator *(real x, ellipse el); abscissa operator *(real x, explicit abscissa a); abscissa operator *(explicit abscissa a, real x); arc operator *(transform t, explicit arc a); arc operator *(real x, explicit arc a); arc operator *(int x, explicit arc a); mass operator *(real x, explicit mass M); mass operator *(int x, explicit mass M); mass operator *(transform t, mass M); triangle operator *(transform T, triangle t); point operator *(inversion i, point P); circle operator *(inversion i, line l); circle operator *(inversion i, circle c); arc operator *(inversion i, segment s); path operator *(inversion i, triangle t); transform yscaleO(real x); coordsys operator init(); point operator init(); vector operator init(); line operator init(); segment operator init(); bqe operator init(); conic operator init(); circle operator init(); ellipse operator init(); parabola operator init(); hyperbola operator init(); abscissa operator init(); arc operator init(); mass operator init(); triangle operator init(); trilinear operator init(); inversion operator init(); pair operator cast(point P); pair[] operator cast(point[] P); point operator cast(pair p); point[] operator cast(pair[] p); guide operator cast(point p); path operator cast(point p); point operator cast(vector v); vector operator cast(pair v); vector operator cast(explicit point v); pair operator cast(explicit vector v); align operator cast(vector v); line operator cast(segment s); segment operator cast(line l); ellipse operator cast(circle c); circle operator cast(ellipse el); ellipse operator cast(conic co); parabola operator cast(conic co); conic operator cast(parabola p); hyperbola operator cast(conic co); conic operator cast(hyperbola h); conic operator cast(ellipse el); conic operator cast(circle c); circle operator cast(conic c); path operator cast(ellipse el); path operator cast(circle c); path operator cast(parabola p); path operator cast(hyperbola h); path operator cast(conic co); abscissa operator cast(explicit position position); abscissa operator cast(real x); abscissa operator cast(int x); path operator cast(explicit arc a); guide operator cast(explicit arc a); point operator cast(mass m); mass operator cast(point M); point[] operator cast(mass[] m); mass[] operator cast(point[] P); mass operator cast(pair m); path operator cast(mass M); guide operator cast(mass M); line operator cast(side side); point operator cast(vertex V); point operator cast(trilinear tri); circle operator cast(inversion i); inversion operator cast(circle c); void lineinversion(); pair operator /(pair p, coordsys R); point operator /(explicit point P, real x); point operator /(real x, explicit point P); vector operator /(explicit vector v, real x); line operator /(line l, real x); line operator /(line l, int x); circle operator /(explicit circle c, real x); circle operator /(explicit circle c, int x); ellipse operator /(ellipse el, real x); abscissa operator /(real x, explicit abscissa a); abscissa operator /(explicit abscissa a, real x); abscissa operator /(int x, explicit abscissa a); arc operator /(explicit arc a, real x); mass operator /(explicit mass M, real x); mass operator /(explicit mass M, int x); transform scaleO(real x); real operator ^(point M, explicit circle c); bool operator ==(coordsys c1, coordsys c2); bool operator ==(explicit point M, explicit point N); bool operator ==(explicit vector u, explicit vector v); bool operator ==(line l1, line l2); bool operator !=(explicit point M, explicit point N); bool operator !=(line l1, line l2); line[] operator ^^(line l1, line l2); line[] operator ^^(line l1, line[] l2); line[] operator ^^(line[] l2, line l1); line[] operator ^^(line[] l1, line[] l2); triangle[] operator ^^(triangle[] t1, triangle t2); triangle[] operator ^^(... triangle[] t); real elle(real phi, real k); point excenter(point A, point B, point C); point excenter(side side); mass mass(point M, real m); mass mass(explicit point P); mass mass(coordsys R, explicit pair p, real m); bool operator @(point m, line l); bool operator @(point M, conic co); bool operator @(point M, explicit circle c); bool operator @(point M, arc a); triangle triangle(line l1, line l2, line l3); trilinear trilinear(triangle t, real a, real b, real c); trilinear trilinear(triangle t, point M); trilinear trilinear(triangle t, real f(real, real, real), real a=, real b=, real c=); triangle triangleAbc(real alpha, real b, real c, real angle=, point A=); triangle triangleabc(real a, real b, real c, real angle=, point A=); triangle anticomplementary(triangle t); vector dir(vertex V); real degrees(explicit point M, coordsys R=, bool warn=); real degrees(vector v, coordsys R=, bool warn=); real degrees(line l, coordsys R=); real degrees(line l1, line l2); real degrees(arc a); real linemargin; real linemargin(); triangle cevian(triangle t, point P); point cevian(side side, point P); line cevian(vertex V, point P); line Oy(coordsys R=); line Oy; path fromCenter(conic co, real angle1, real angle2, int n, bool direction); void markarc(picture pic=, Label L=, int n=, real radius=, real space=, arc a, pen sectorpen=, pen markpen=, marginT margin(path, pen)=, bool arrow(picture, path, pen, marginT(path, pen))=, marker marker=); real approximate(real t); real[] approximate(real[] T); void markangle(picture pic=, Label L=, int n=, real radius=, real space=, explicit line l1, explicit line l2, explicit pair align=, bool arrow(picture, path, pen, marginT(path, pen))=, pen p=, filltype filltype=, marginT margin(path, pen)=, marker marker=); void markangle(picture pic=, Label L=, int n=, real radius=, real space=, explicit line l1, explicit line l2, explicit vector align, bool arrow(picture, path, pen, marginT(path, pen))=, pen p=, filltype filltype=, marginT margin(path, pen)=, marker marker=); transform hprojection(line l, bool safe=); point conj(explicit point M); vector conj(explicit vector u); hyperbola conj(hyperbola h); transform vprojection(line l, bool safe=); parabola parabola(point F, line l); parabola parabola(point F, point vertex); parabola parabola(point F, real a, real angle); parabola parabola(bqe bqe); parabola parabola(point M1, point M2, point M3, line l); parabola parabola(point M1, point M2, point M3, point M4, point M5); bool onpath(picture pic=, path g, point M, pen p=); int parabolanodesnumber(parabola p, real angle1, real angle2); int parabolanodesnumberfactor; path NoModifier(path); coordsys currentcoordsys; point foot(vertex V); point foot(side side); path currentpolarconicroutine(conic co, real angle1, real angle2, int n, bool direction); transform rotate(explicit pair dir); transform rotate(explicit vector dir); transform rotate(explicit point dir); real EPS; transform rotateO(real a); pair attract(pair m, path g, real fuzz=); point attract(point M, path g, real fuzz=); real[] bangles(picture pic=, parabola p); real[][] bangles(picture pic=, hyperbola h); line perpendicular(point M, line l); line perpendicular(point M, explicit vector normal); line perpendicular(point M, explicit pair normal); bool perpendicular(line l1, line l2); void perpendicular(picture pic=, pair z, pair align, pair dir=, real size=, pen p=, marginT margin(path, pen)=, filltype filltype=); void perpendicular(picture pic=, pair z, pair align, path g, real size=, pen p=, marginT margin(path, pen)=, filltype filltype=); real binomial(real n, real k); void perpendicularmark(picture pic=, point z, explicit pair align, explicit pair dir=, real size=, pen p=, marginT margin(path, pen)=, filltype filltype=); void perpendicularmark(picture pic=, point z, vector align, vector dir=, real size=, pen p=, marginT margin(path, pen)=, filltype filltype=); void perpendicularmark(picture pic=, point z, explicit pair align, path g, real size=, pen p=, marginT margin(path, pen)=, filltype filltype=); void perpendicularmark(picture pic=, point z, vector align, path g, real size=, pen p=, marginT margin(path, pen)=, filltype filltype=); void perpendicularmark(picture pic=, line l1, line l2, real size=, pen p=, int quarter=, marginT margin(path, pen)=, filltype filltype=); void Drawline(picture pic=, Label L=, pair P, bool dirP=, pair Q, bool dirQ=, align align=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, Label legend=, marker marker=, path pathModifier(path)=); bool simeq(point A, point B, real fuzz=); bool simeq(point a, real b, real fuzz=); point inverse(real k, point A, point M); circle inverse(real k, point A, line l); circle inverse(real k, point A, circle c); arc inverse(real k, point A, segment s); inversion inversion(real k, point C); inversion inversion(point C, real k); inversion inversion(circle c1, circle c2, real sgn=); inversion inversion(circle c1, circle c2, circle c3); inversion inversion(circle c); coordsys cartesiansystem(pair O=, pair i, pair j); line tangent(circle c, abscissa x); line tangent(circle c, point M); line tangent(circle c, explicit vector v); line tangent(ellipse el, abscissa x); line tangent(parabola p, abscissa x); line tangent(hyperbola h, abscissa x); line tangent(explicit arc a, abscissa x); line tangent(explicit arc a, point M); line[] tangents(circle c, point M); line[] tangents(ellipse el, point M); line[] tangents(parabola p, point M); line[] tangents(hyperbola h, point M); point isogonalconjugate(triangle t, point M); real centerToFocus(ellipse el, real a); point isogonal(side side, point M); line isogonal(vertex V, point M); triangle isogonal(triangle t, point M); bqe equation(ellipse el); bqe equation(parabola p); bqe equation(hyperbola h); bqe equation(explicit conic co); triangle tangential(triangle t); triangle pedal(triangle t, point M); line pedal(side side, point M); string massformat(string format=, string s, mass M); int relativesystem; void drawline(picture pic=, triangle t, pen p=); void addMargins(picture pic=, real lmargin=, real bmargin=, real rmargin=, real tmargin=, bool rigid=, bool allObject=); triangle medial(triangle t); line median(vertex V); line median(side side); void show(picture pic=, Label lo=, Label li=, Label lj=, coordsys R, pen dotpen=, pen xpen=, pen ypen=, pen ipen=, pen jpen=, bool arrow(picture, path, pen, marginT(path, pen))=); void show(Label L, vector v, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=); void show(picture pic=, line l, pen p=); void show(picture pic=, Label LA=, Label LB=, Label LC=, Label La=, Label Lb=, Label Lc=, triangle t, pen p=, filltype filltype=); line isotomic(vertex V, point M); point isotomic(side side, point M); triangle isotomic(triangle t, point M); abscissa curabscissa(real x); abscissa curabscissa(int x); abscissa curabscissa(line l, point M); abscissa curabscissa(circle c, point M); abscissa curabscissa(ellipse el, point M); abscissa curabscissa(parabola p, point M); abscissa curabscissa(conic co, point M); abscissa curabscissa(arc a, point M); locateT operator init(); void Straight(flatguide3)(... void(flatguide3)[]); void graph(flatguide3)(triple F(real), real, real, int)(void join(flatguide3)(... void(flatguide3)[])); void(flatguide3)[] graph(triple F(real), real, real, int)(void join(flatguide3)(... void(flatguide3)[]), bool3 cond(real)); void graph(flatguide3)(picture pic=, real x(real), real y(real), real z(real), real a, real b, int n=, void join(flatguide3)(... void(flatguide3)[])=); void(flatguide3)[] graph(picture pic=, real x(real), real y(real), real z(real), real a, real b, int n=, bool3 cond(real), void join(flatguide3)(... void(flatguide3)[])=); void graph(flatguide3)(picture pic=, triple v(real), real a, real b, int n=, void join(flatguide3)(... void(flatguide3)[])=); void(flatguide3)[] graph(picture pic=, triple v(real), real a, real b, int n=, bool3 cond(real), void join(flatguide3)(... void(flatguide3)[])=); void graph(flatguide3)(picture pic=, triple[] v, void join(flatguide3)(... void(flatguide3)[])=); void(flatguide3)[] graph(picture pic=, triple[] v, bool3[] cond, void join(flatguide3)(... void(flatguide3)[])=); void graph(flatguide3)(picture pic=, real[] x, real[] y, real[] z, void join(flatguide3)(... void(flatguide3)[])=); void(flatguide3)[] graph(picture pic=, real[] x, real[] y, real[] z, bool3[] cond, void join(flatguide3)(... void(flatguide3)[])=); void graph(flatguide3)(triple F(path, real), path p, int n=, void join(flatguide3)(... void(flatguide3)[])=); void graph(flatguide3)(triple F(pair), path p, int n=, void join(flatguide3)(... void(flatguide3)[])=); void graph(flatguide3)(picture pic=, real f(pair), path p, int n=, void join(flatguide3)(... void(flatguide3)[])=); void graph(flatguide3)(real f(pair), path p, int n=, real T(pair), void join(flatguide3)(... void(flatguide3)[])=); void(flatguide3)[][] lift(real f(real x, real y), guide[][] g, void join(flatguide3)(... void(flatguide3)[])=); void(flatguide3)[][] lift(real f(pair z), guide[][] g, void join(flatguide3)(... void(flatguide3)[])=); triple polar(real r, real theta, real phi); void polargraph(flatguide3)(real r(real, real), real theta(real), real phi(real), int n=, void join(flatguide3)(... void(flatguide3)[])=); void xaxis3At(picture pic=, Label L=, void axis(picture, axisT), real xmin=, real xmax=, pen p=, void ticks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)=, bool arrow(picture, path3, material, marginT3(path3, pen), light, light)=, marginT3 margin(path3, pen)=, bool above=, bool opposite=, bool opposite2=, bool primary=); void yaxis3At(picture pic=, Label L=, void axis(picture, axisT), real ymin=, real ymax=, pen p=, void ticks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)=, bool arrow(picture, path3, material, marginT3(path3, pen), light, light)=, marginT3 margin(path3, pen)=, bool above=, bool opposite=, bool opposite2=, bool primary=); void zaxis3At(picture pic=, Label L=, void axis(picture, axisT), real zmin=, real zmax=, pen p=, void ticks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)=, bool arrow(picture, path3, material, marginT3(path3, pen), light, light)=, marginT3 margin(path3, pen)=, bool above=, bool opposite=, bool opposite2=, bool primary=); void xaxis3(picture pic=, Label L=, void axis(picture, axisT)=, real xmin=, real xmax=, pen p=, void ticks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)=, bool arrow(picture, path3, material, marginT3(path3, pen), light, light)=, marginT3 margin(path3, pen)=, bool above=); void yaxis3(picture pic=, Label L=, void axis(picture, axisT)=, real ymin=, real ymax=, pen p=, void ticks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)=, bool arrow(picture, path3, material, marginT3(path3, pen), light, light)=, marginT3 margin(path3, pen)=, bool above=); void zaxis3(picture pic=, Label L=, void axis(picture, axisT)=, real zmin=, real zmax=, pen p=, void ticks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)=, bool arrow(picture, path3, material, marginT3(path3, pen), light, light)=, marginT3 margin(path3, pen)=, bool above=); bool uperiodic(triple[][] a); bool vperiodic(triple[][] a); void OutTicks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)(Label format=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, int N=, int n=, real Step=, real step=, bool begin=, bool end=, tickvalues modify(tickvalues)=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void OutTicks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)(Label format=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, real[] Ticks, real[] ticks=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void OutTicks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=); void axis(picture pic=, Label L=, path3 g, path3 g2=, pen p=, void ticks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=), ticklocate locate, bool arrow(picture, path3, material, marginT3(path3, pen), light, light)=, marginT3 margin(path3, pen)=, int[] divisor=, bool above=, bool opposite=); void Bounds(picture, axisT)(int type=, int type2=, triple align=, bool extend=); void Bounds(picture, axisT); void XZZero(picture, axisT)(triple align=, bool extend=); void XZZero(picture, axisT); void YZZero(picture, axisT)(triple align=, bool extend=); void YZZero(picture, axisT); surface surface(triple[][] f, bool[][] cond=); surface surface(real[][] f, real[] x, real[] y, real[] xsplinetype(real[], real[])=, real[] ysplinetype(real[], real[])=, bool[][] cond=); surface surface(real[][] f, pair a, pair b, real[] xsplinetype(real[], real[]), real[] ysplinetype(real[], real[])=, bool[][] cond=); surface surface(real[][] f, pair a, pair b, bool[][] cond=); surface surface(triple f(pair z), pair a, pair b, int nu=, int nv=, bool cond(pair z)=); surface surface(triple f(pair z), pair a, pair b, int nu=, int nv=, real[](real[], real[])[] usplinetype, real[](real[], real[])[] vsplinetype=, bool cond(pair z)=); surface surface(real f(pair z), pair a, pair b, int nx=, int ny=, bool cond(pair z)=); surface surface(real f(pair z), pair a, pair b, int nx=, int ny=, real[] xsplinetype(real[], real[]), real[] ysplinetype(real[], real[])=, bool cond(pair z)=); void XYEquals(picture, axisT)(real x, real y, triple align=, bool extend=); triple Dir(real)(triple dir); void draw(picture pic=, Label[] L=, void(flatguide3)[][] g, pen[] p, light light=, string name=, render render=, interaction interaction=); void draw(picture pic=, Label[] L=, void(flatguide3)[][] g, pen p=, light light=, string name=, render render=, interaction interaction=); void Ticks3(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)(int sign, Label F=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, real[] Ticks=, real[] ticks=, int N=, bool begin=, bool end=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void Ticks3(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)(int sign, Label F=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, int N, int n=, real Step=, real step=, bool begin=, bool end=, tickvalues modify(tickvalues)=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); real maxlength(triple f(pair z), pair a, pair b, int nu, int nv); void drawtick(picture pic, real[][] T, path3 g, path3 g2, ticklocate locate, real val, real Size, int sign, pen p, bool extend); triple tickMin3(picture pic); triple tickMax3(picture pic); triple Scale(picture pic=, triple v); real ScaleZ(picture pic=, real z); picture vectorfield(path3 vector(pair v), triple f(pair z), pair a, pair b, int nu=, int nv=, bool truesize=, real maxlength=, bool cond(pair z)=, pen p=, bool arrow(picture, path3, material, marginT3(path3, pen), light, light)=, marginT3 margin(path3, pen)=, string name=, render render=); path3 Circle(triple c, real r, triple normal=, int n=); void InTicks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)(Label format=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, int N=, int n=, real Step=, real step=, bool begin=, bool end=, tickvalues modify(tickvalues)=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void InTicks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)(Label format=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, real[] Ticks, real[] ticks=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void InTicks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=); void Spline(flatguide3)(... void(flatguide3)[]); void InOutTicks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)(Label format=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, int N=, int n=, real Step=, real step=, bool begin=, bool end=, tickvalues modify(tickvalues)=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void InOutTicks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)(Label format=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, real[] Ticks, real[] ticks=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void InOutTicks(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=); void axes3(picture pic=, Label xlabel=, Label ylabel=, Label zlabel=, bool extend=, triple min=, triple max=, pen p=, bool arrow(picture, path3, material, marginT3(path3, pen), light, light)=, marginT3 margin(path3, pen)=); void label(picture pic, Label L, triple v, real x, align align, string format, pen p); void labelx(picture pic=, Label L=, triple v, align align=, string format=, pen p=); void labelx3(picture pic=, Label L=, real x, align align=, string format=, pen p=); void labeltick(picture pic, real[][] T, path3 g, ticklocate locate, real val, int sign, real Size, string ticklabel(real), Label F, real norm=); void labelaxis(picture pic, real[][] T, Label L, path3 g, ticklocate locate=, int sign=, bool ticklabels=); void labely(picture pic=, Label L=, triple v, align align=, string format=, pen p=); void labely3(picture pic=, Label L=, real y, align align=, string format=, pen p=); void labelz(picture pic=, Label L=, triple v, align align=, string format=, pen p=); void labelz3(picture pic=, Label L=, real z, align align=, string format=, pen p=); void autoscale3(picture pic=, void axis(picture, axisT)); void xtick(picture pic=, triple v, triple dir=, real size=, pen p=); void xtick(picture pic=, Label L, triple v, triple dir=, string format=, real size=, pen p=); void xtick3(picture pic=, real x, triple dir=, real size=, pen p=); void xtick3(picture pic=, Label L, real x, triple dir=, string format=, real size=, pen p=); void ytick(picture pic=, triple v, triple dir=, real size=, pen p=); void ytick(picture pic=, Label L, triple v, triple dir=, string format=, real size=, pen p=); void ytick3(picture pic=, real y, triple dir=, real size=, pen p=); void ytick3(picture pic=, Label L, real y, triple dir=, string format=, real size=, pen p=); void ztick(picture pic=, triple v, triple dir=, real size=, pen p=); void ztick(picture pic=, Label L, triple v, triple dir=, string format=, real size=, pen p=); void ztick3(picture pic=, real z, triple dir=, real size=, pen p=); void ztick3(picture pic=, Label L, real z, triple dir=, string format=, real size=, pen p=); triple zero3(real); triple defaultdir(triple X, triple Y, triple Z, bool opposite=, projection P); real xtrans(real[][] t, real x); real ytrans(real[][] t, real y); real ztrans(real[][] t, real z); ticklocate ticklocate(real a, real b, autoscaleT S=, real tickmin=, real tickmax=, real time(real)=, triple dir(real)); triple ticklabelshift(triple align, pen p=); path3 Arc(triple c, triple v1, triple v2, triple normal=, bool direction=, int n=); path3 Arc(triple c, real r, real theta1, real phi1, real theta2, real phi2, triple normal=, bool direction, int n=); path3 Arc(triple c, real r, real theta1, real phi1, real theta2, real phi2, triple normal=, int n=); void limits(picture pic=, triple min, triple max); void XZEquals(picture, axisT)(real x, real z, triple align=, bool extend=); void YZEquals(picture, axisT)(real y, real z, triple align=, bool extend=); void XYZero(picture, axisT)(triple align=, bool extend=); void XYZero(picture, axisT); void zlimits(picture pic=, real min=, real max=, bool crop=); void tick(picture pic=, triple v, triple dir, real size=, pen p=); void tick(picture pic=, Label L, real value, triple v, triple dir, string format=, real size=, pen p=); surface bispline(real[][] z, real[][] p, real[][] q, real[][] r, real[] x, real[] y, bool[][] cond=); path3[] segment(triple[] v, bool[] cond, void join(flatguide3)(... void(flatguide3)[])=); void NoTicks3(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=)(); void NoTicks3(picture, real[][], Label, path3, path3, pen, bool(picture, path3, material, marginT3(path3, pen), light, light), marginT3(path3, pen), ticklocate, int[], bool opposite=, bool primary=); string DefaultFormat(real); string DefaultLogFormat(real)(int base); string DefaultLogFormat(real); guide graph(pair f(real), real, real, int)(guide join(... guide[])); guide[] graph(pair f(real), real, real, int)(guide join(... guide[]), bool3 cond(real)); guide graph(picture pic=, real f(real), real a, real b, int n=, real T(real)=, guide join(... guide[])=); guide[] graph(picture pic=, real f(real), real a, real b, int n=, real T(real)=, bool3 cond(real), guide join(... guide[])=); guide graph(picture pic=, real x(real), real y(real), real a, real b, int n=, real T(real)=, guide join(... guide[])=); guide[] graph(picture pic=, real x(real), real y(real), real a, real b, int n=, real T(real)=, bool3 cond(real), guide join(... guide[])=); guide graph(picture pic=, pair z(real), real a, real b, int n=, real T(real)=, guide join(... guide[])=); guide[] graph(picture pic=, pair z(real), real a, real b, int n=, real T(real)=, bool3 cond(real), guide join(... guide[])=); guide graph(picture pic=, pair[] z, guide join(... guide[])=); guide[] graph(picture pic=, pair[] z, bool3[] cond, guide join(... guide[])=); guide graph(picture pic=, real[] x, real[] y, guide join(... guide[])=); guide[] graph(picture pic=, real[] x, real[] y, bool3[] cond, guide join(... guide[])=); scientific scientific(real x); void Left(picture, axisT)(bool extend=); void Left(picture, axisT); autoscaleT defaultS; void XEquals(picture, axisT)(real x, bool extend=); void YEquals(picture, axisT)(real y, bool extend=); string LogFormat(real)(int base); string LogFormat(real); axisT axis; void axis(picture pic=, Label L=, path g, path g2=, pen p=, void ticks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=), ticklocate locate, bool arrow(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, int[] divisor=, bool above=, bool opposite=); void drawtick(frame f, transform T, path g, path g2, ticklocate locate, real val, real Size, int sign, pen p, bool extend); real maxlength(pair a, pair b, int nx, int ny); void errorbar(picture pic, pair z, pair dp, pair dm, pen p=, real size=); void errorbars(picture pic=, pair[] z, pair[] dp, pair[] dm=, bool[] cond=, pen p=, real size=); void errorbars(picture pic=, real[] x, real[] y, real[] dpx, real[] dpy, real[] dmx=, real[] dmy=, bool[] cond=, pen p=, real size=); void errorbars(picture pic=, real[] x, real[] y, real[] dpy, bool[] cond=, pen p=, real size=); void xlimits(picture pic=, real min=, real max=, bool crop=); string conditionlength; void ylimits(picture pic=, real min=, real max=, bool crop=); tickvalues None(tickvalues v); scaleT Logarithmic; void limits(picture pic=, pair min, pair max, bool crop=); void crop(picture pic=); picture vectorfield(path vector(real), path g, int n, bool truesize=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=); picture vectorfield(path vector(pair), pair a, pair b, int nx=, int ny=, bool truesize=, real maxlength=, bool cond(pair z)=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=); string OmitFormat(real)(string s= ... real[] x); tickvalues OmitTickIntervals(tickvalues)(real[] a, real[] b); tickvalues OmitTickInterval(tickvalues)(real a, real b); guide Straight(... guide[]); tickvalues OmitTick(tickvalues)(... real[] x); int Min; string trailingzero; void label(picture pic, Label L, pair z, real x, align align, string format, pen p); void labelx(picture pic=, Label L=, explicit pair z, align align=, string format=, pen p=); void labelx(picture pic=, Label L=, real x, align align=, string format=, pen p=); void labelx(picture pic=, Label L, string format=, explicit pen p=); path Arc(pair c, real r, real angle1, real angle2, bool direction, int n=); path Arc(pair c, real r, real angle1, real angle2, int n=); path Arc(pair c, explicit pair z1, explicit pair z2, bool direction=, int n=); pair labeltick(frame d, transform T, path g, ticklocate locate, real val, pair side, int sign, real Size, string ticklabel(real), Label F, real norm=); void labelaxis(frame f, transform T, Label L, path g, ticklocate locate=, int sign=, bool ticklabels=); void labely(picture pic=, Label L=, explicit pair z, align align=, string format=, pen p=); void labely(picture pic=, Label L=, real y, align align=, string format=, pen p=); void labely(picture pic=, Label L, string format=, explicit pen p=); void xtick(picture pic=, explicit pair z, pair dir=, real size=, pen p=); void xtick(picture pic=, real x, pair dir=, real size=, pen p=); void xtick(picture pic=, Label L, explicit pair z, pair dir=, string format=, real size=, pen p=); void xtick(picture pic=, Label L, real x, pair dir=, string format=, real size=, pen p=); void ytick(picture pic=, explicit pair z, pair dir=, real size=, pen p=); void ytick(picture pic=, real y, pair dir=, real size=, pen p=); void ytick(picture pic=, Label L, explicit pair z, pair dir=, string format=, real size=, pen p=); void ytick(picture pic=, Label L, real y, pair dir=, string format=, real size=, pen p=); picture secondaryX(picture primary=, void f(picture)); picture secondaryY(picture primary=, void f(picture)); Label Break; tickvalues Break(tickvalues)(real, real); scaleT Linear; scaleT Linear(bool automin=, bool automax=, real s=, real intercept=); pair tickMin(picture pic); pair tickMax(picture pic); void xaxisAt(picture pic=, Label L=, void axis(picture, axisT), real xmin=, real xmax=, pen p=, void ticks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)=, bool arrow(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, bool above=, bool opposite=); void yaxisAt(picture pic=, Label L=, void axis(picture, axisT), real ymin=, real ymax=, pen p=, void ticks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)=, bool arrow(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, bool above=, bool opposite=); void xaxis(picture pic=, Label L=, void axis(picture, axisT)=, real xmin=, real xmax=, pen p=, void ticks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)=, bool arrow(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, bool above=); void yaxis(picture pic=, Label L=, void axis(picture, axisT)=, real ymin=, real ymax=, pen p=, void ticks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)=, bool arrow(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, bool above=, bool autorotate=); string autoformat(string format=, real norm ... real[] a); real linear(real)(real S(real x)=, real Min, real Max); pair polar(real r, real theta); string Format(real)(string s=); guide polargraph(picture pic=, real r(real), real a, real b, int n=, guide join(... guide[])=); guide polargraph(picture pic=, real[] r, real[] theta, guide join(... guide[])=); void LeftTicks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)(Label format=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, int N=, int n=, real Step=, real step=, bool begin=, bool end=, tickvalues modify(tickvalues)=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void LeftTicks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)(Label format=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, real[] Ticks, real[] ticks=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void LeftTicks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=); tickvalues NoZero(tickvalues); string NoZeroFormat(real); path[] segment(pair[] z, bool[] cond, guide join(... guide[])=); guide Hermite(... guide[])(real[] splinetype(real[], real[])); guide Hermite(... guide[]); path Circle(pair c, real r, int n=); bool axiscoverage(int N, transform T, path g, ticklocate locate, real Step, pair side, int sign, real Size, Label F, string ticklabel(real), real norm, real limit); scaleT Broken(real a, real b, bool automin=, bool automax=); scaleT BrokenLog(real a, real b, bool automin=, bool automax=); void Ticks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)(int sign, Label F=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, real[] Ticks=, real[] ticks=, int N=, bool begin=, bool end=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void Ticks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)(int sign, Label F=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, int N, int n=, real Step=, real step=, bool begin=, bool end=, tickvalues modify(tickvalues)=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void Ticks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)(Label format=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, int N=, int n=, real Step=, real step=, bool begin=, bool end=, tickvalues modify(tickvalues)=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void Ticks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)(Label format=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, real[] Ticks, real[] ticks=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void Ticks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=); string noprimary; void xequals(picture pic=, Label L=, real x, bool extend=, real ymin=, real ymax=, pen p=, void ticks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)=, bool arrow(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, bool above=); void yequals(picture pic=, Label L=, real y, bool extend=, real xmin=, real xmax=, pen p=, void ticks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)=, bool arrow(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, bool above=); pair Scale(picture pic=, pair z); real ScaleX(picture pic=, real x); real ScaleY(picture pic=, real y); tickvalues generateticks(int sign, Label F=, string ticklabel(real)=, int N, int n=, real Step=, real step=, real Size=, real size=, transform T, pair side, path g, real limit, pen p, ticklocate locate, int[] divisor, bool opposite); void checkconditionlength(int x, int y); real xtrans(transform t, real x); void Top(picture, axisT)(bool extend=); void Top(picture, axisT); real ytrans(transform t, real y); void scale(picture pic=, scaleT x, scaleT y=, scaleT z=); void scale(picture pic=, bool xautoscale=, bool yautoscale=, bool zautoscale=); int[] divisors(int a, int b); scientific operator init(); bounds operator init(); ticklocate operator init(); locateT operator init(); tickvalues operator init(); axisT operator init(); int Both; void axes(picture pic=, Label xlabel=, Label ylabel=, bool extend=, pair min=, pair max=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=, marginT margin(path, pen)=, bool above=); string signedtrailingzero; ticklocate ticklocate(real a, real b, autoscaleT S=, real tickmin=, real tickmax=, real time(real)=, pair dir(real)=); pair ticklabelshift(pair align, pen p=); pair zero(real); void Bottom(picture, axisT)(bool extend=); void Bottom(picture, axisT); void BottomTop(picture, axisT)(bool extend=); void BottomTop(picture, axisT); real zerotickfuzz; real upscale(real b, real a); bool logaxiscoverage(int N, transform T, path g, ticklocate locate, pair side, int sign, real Size, Label F, string ticklabel(real), real limit, int first, int last); string baselinetemplate; void NoTicks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)(); void NoTicks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=); void tick(picture pic=, pair z, pair dir, real size=, pen p=); void tick(picture pic=, Label L, real value, explicit pair z, pair dir, string format=, real size=, pen p=); int Value; scaleT Log; scaleT Log(bool automin=, bool automax=); void Right(picture, axisT)(bool extend=); void Right(picture, axisT); void RightTicks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)(Label format=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, int N=, int n=, real Step=, real step=, bool begin=, bool end=, tickvalues modify(tickvalues)=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void RightTicks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)(Label format=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, real[] Ticks, real[] ticks=, real Size=, real size=, bool extend=, pen pTick=, pen ptick=); void RightTicks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=); int Max; void XZero(picture, axisT)(bool extend=); void XZero(picture, axisT); void YZero(picture, axisT)(bool extend=); void YZero(picture, axisT); bounds autoscale(real Min, real Max, scaleT scale=); void autoscale(picture pic=, void axis(picture, axisT)); guide Spline(... guide[]); void LeftRight(picture, axisT)(bool extend=); void LeftRight(picture, axisT); bool Crop; int ngraph; real epsilon; real axiscoverage; real Ticksize; bool NoCrop; real ticksize; int nCircle; int nmesh; real ylabelwidth; real axislabelfactor; real[] clamped(real[], real[])(real slopea, real slopeb); real[] natural(real[] x, real[] y); real[] monotonic(real[] x, real[] y); real[] notaknot(real[] x, real[] y); real[] linear(real[] x, real[] y); string morepoints; guide hermite(real[] x, real[] y, real[] splinetype(real[], real[])=); void checklengths(int x, int y, string text=); void checkincreasing(real[] x); real[] periodic(real[] x, real[] y); string differentlengths; real[] Spline(real[] x, real[] y); real[](real[], real[])[] Spline; grid3(picture pic)[] YXYgrid(position pos=); grid3(picture pic)[] YXYgrid; grid3 operator init(); ticksgridT operator init(); grid3(picture pic)[] operator cast(grid3 gridroutine(picture pic)); grid3(picture pic)[][] operator cast(grid3(picture pic)[] gridroutine); grid3(picture pic)[][] operator cast(grid3 gridroutine(picture pic)); triple X(picture pic); triple Y(picture pic); triple Z(picture pic); grid3(picture pic)[] XYXgrid(position pos=); grid3(picture pic)[] XYXgrid; grid3(picture pic)[] XY_XZgrid(position posa=, position posb=); grid3(picture pic)[] XY_XZgrid; grid3(picture pic)[] ZX_ZYgrid(position posa=, position posb=); grid3(picture pic)[] ZX_ZYgrid; void xaxis3(picture pic=, Label L=, void axis(picture, axisT)=, pen p=, ticksgridT ticks(), bool arrow(picture, path3, material, marginT3(path3, pen), light, light)=, bool above=); void yaxis3(picture pic=, Label L=, void axis(picture, axisT)=, pen p=, ticksgridT ticks(), bool arrow(picture, path3, material, marginT3(path3, pen), light, light)=, bool above=); void zaxis3(picture pic=, Label L=, void axis(picture, axisT)=, pen p=, ticksgridT ticks(), bool arrow(picture, path3, material, marginT3(path3, pen), light, light)=, bool above=); grid3 XYgrid(picture pic)(position pos=); grid3 XYgrid(picture pic); grid3 ZYgrid(picture pic)(position pos=); grid3 ZYgrid(picture pic); position middle; void grid3(picture pic=, grid3(picture pic)[][] gridroutine=, int N=, int n=, real Step=, real step=, bool begin=, bool end=, pen pGrid=, pen pgrid=, bool above=); void grid3(picture pic=, grid3(picture pic)[][] gridroutine, int N=, int n=, real Step=, real step=, bool begin=, bool end=, pen[] pGrid, pen[] pgrid, bool above=); ticksgridT OutTicks()(Label F=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, int N=, int n=, real Step=, real step=, bool begin=, bool end=, real Size=, real size=, pen pTick=, pen ptick=, grid3(picture pic)[][] gridroutine, pen pGrid=, pen pgrid=); triple YZ(picture pic); triple ZX(picture pic); grid3(picture pic)[] XZXgrid(position pos=); grid3(picture pic)[] XZXgrid; grid3(picture pic)[] ZXZgrid(position pos=); grid3(picture pic)[] ZXZgrid; position top; ticksgridT InTicks()(Label F=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, int N=, int n=, real Step=, real step=, bool begin=, bool end=, real Size=, real size=, pen pTick=, pen ptick=, grid3(picture pic)[][] gridroutine, pen pGrid=, pen pgrid=); ticksgridT InOutTicks()(Label F=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, int N=, int n=, real Step=, real step=, bool begin=, bool end=, real Size=, real size=, pen pTick=, pen ptick=, grid3(picture pic)[][] gridroutine, pen pGrid=, pen pgrid=); grid3(picture pic)[] YX_YZgrid(position posa=, position posb=); grid3(picture pic)[] YX_YZgrid; position bottom; grid3 YXgrid(picture pic)(position pos=); grid3 YXgrid(picture pic); grid3 ZXgrid(picture pic)(position pos=); grid3 ZXgrid(picture pic); triple XY(picture pic); grid3 XZgrid(picture pic)(position pos=); grid3 XZgrid(picture pic); grid3 YZgrid(picture pic)(position pos=); grid3 YZgrid(picture pic); grid3(picture pic)[][] XYZgrid(position pos=); grid3(picture pic)[][] XYZgrid; grid3(picture pic)[] ZYZgrid(position pos=); grid3(picture pic)[] ZYZgrid; grid3(picture pic)[] YZYgrid(position pos=); grid3(picture pic)[] YZYgrid; real fspline(real)(real[] x, real[] y, real[] splinetype(real[], real[])=); real pwhermite(real)(real[] x, real[] y, real[] dy); horner diffdiv(real[] x, real[] y); horner hdiffdiv(real[] x, real[] y, real[] dy); horner operator init(); real fhorner(real)(horner sh); surface labelpath(string s, path3 p, real angle=, triple optional=); triple[] firstframe(path3 p, triple optional=); triple[] nextframe(path3 p, real reltimestart, triple[] start, real reltimeend, int subdiv=); real eps; triple nextnormal(triple p, triple q); void labelpath(frame f, Label L, path g, string justify=, pen p=); void labelpath(picture pic=, Label L, path g, string justify=, pen p=); string LeftJustified; string Centered; string RightJustified; string[] lm_infmsg; void lm_qrfac(int m, int n, real[] a, bool pivot, int[] ipvt, real[] rdiag, real[] acnorm, real[] wa); void lm_qrsolv(int n, real[] r, int ldr, int[] ipvt, real[] diag, real[] qtb, real[] x, real[] sdiag, real[] wa); FitControl defaultControl; real LM_MACHEP; real LM_SQRT_DWARF; real LM_SQRT_GIANT; 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); 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, void evaluate(real[] par, int m_dat, real[] fvec, lm_data_type data, lm_int_type info), void printout(int n_par, real[] par, int m_dat, real[] fvec, lm_data_type data, int iflag, int iter, int nfev), lm_data_type data); void lm_minimize(int m_dat, int n_par, real[] par, void evaluate(real[] par, int m_dat, real[] fvec, lm_data_type data, lm_int_type info), void printout(int n_par, real[] par, int m_dat, real[] fvec, lm_data_type data, int iflag, int iter, int nfev), lm_data_type data, lm_control_type control); FitResult fit(real[] xdata, real[] ydata, real[] errors, real function(real[], real), real[] parameters, FitControl control=); FitResult fit(real[] xdata, real[] ydata, real function(real[], real), real[] parameters, FitControl control=); real lm_enorm(int n, real[] x, int offset=); lm_data_type operator init(); lm_int_type operator init(); lm_real_type operator init(); lm_control_type operator init(); FitControl operator init(); FitResult operator init(); real SQR(real x); string[] lm_shortmsg; void lm_evaluate_default(real[] par, int m_dat, real[] fvec, lm_data_type data, lm_int_type info); string pad(string str, int count, string pad=); string pad(int num, int digits, string pad=); string pad(real num, int digits, string pad=); real LM_USERTOL; real LM_DWARF; void lm_print_quiet(int n_par, real[] par, int m_dat, real[] fvec, lm_data_type data, int iflag, int iter, int nfev); 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 barmarksize(pen p=); real barmarksizefactor; marker CrossIntervalMarker(int i=, int n=, real size=, real space=, real angle=, pair offset=, bool rotated=, pen p=, frame uniform=, bool above=); marker StickIntervalMarker(int i=, int n=, real size=, real space=, real angle=, pair offset=, bool rotated=, pen p=, frame uniform=, bool above=); frame crossframe(int n=, real size=, pair space=, real angle=, pair offset=, pen p=); real crossmarksize(pen p=); real crossmarksizefactor; frame stickframe(int n=, real size=, pair space=, real angle=, pair offset=, pen p=); frame stickframe; real stickmarksize(pen p=); real stickmarkspace(pen p=); real stickmarksizefactor; real stickmarkspacefactor; frame duplicate(path g, int n=, pair space=, pen p=); marker CircleBarIntervalMarker(int i=, int n=, real barsize=, real radius=, real angle=, pair offset=, bool rotated=, pen p=, filltype filltype=, bool circleabove=, frame uniform=, bool above=); frame circlebarframe(int n=, real barsize=, real radius=, real angle=, pair offset=, pen p=, filltype filltype=, bool above=); real circlemarkradius(pen p=); real circlemarkradiusfactor; marker operator *(transform T, marker m); marker TildeIntervalMarker(int i=, int n=, real size=, real space=, real angle=, pair offset=, bool rotated=, pen p=, frame uniform=, bool above=); frame tildeframe(int n=, real size=, pair space=, real angle=, pair offset=, pen p=); frame tildeframe; real tildemarksize(pen p=); real tildemarksizefactor; void markangle(picture pic=, Label L=, int n=, real radius=, real space=, pair A, pair O, pair B, bool arrow(picture, path, pen, marginT(path, pen))=, pen p=, filltype filltype=, marginT margin(path, pen)=, marker marker=); real markanglespace(pen p=); real markanglespace; real markangleradius(pen p=); real markangleradius; real markanglespacefactor; real markangleradiusfactor; void markinterval(picture pic=, frame f, path g)(int n=, frame f, bool rotated=); real[] partialsum(real[] a); real[] partialsum(real[] a, real[] dx); int[] partialsum(int[] a); int[] partialsum(int[] a, int[] dx); real cot(real x); int unique(real[] a, real x); int unique(string[] a, string x); int quadrant(real degrees); pair exp(explicit pair z); string nopoint; real intersect(pair p, pair q, pair z); real intersect(triple P, triple Q, triple n, triple Z); real interpolate(real[] x, real[] y, real x0, int i); real interpolate(real[] x, real[] y, real x0); triple intersectionpoint(triple n0, triple P0, triple n1, triple P1); pair[] quarticroots(real a, real b, real c, real d, real e); bool lexorder(pair a, pair b); bool lexorder(triple a, triple b); bool square(real[][] m); real sec(real x); bool rectangular(real[][] m); bool rectangular(pair[][] m); bool rectangular(triple[][] m); bool polygon(path p); pair unityroot(int n, int k=); int[][] segmentlimits(bool[] b); int[][] segment(bool[] b); real acot(real x); pair[][] fft(pair[][] a, int sign=); real slope(path g, real x, int n=); real slope(path g, explicit pair z, int n=); picture grid(int Nx, int Ny, pen p=); rootfinder_settings operator init(); real frac(real x); real asec(real x); real time(path g, real x, int n=); real time(path g, explicit pair z, int n=); real[] leastsquares(real[][] A, real[] b, bool warn=); bool increasing(real[] a, bool strict=); real[] zero(int n); real[][] zero(int n, int m); real findroot(real f(real), real a, real b, real tolerance=, real fa=, real fb=); real acsc(real x); real value(path g, real x, int n=); real value(path g, explicit pair z, int n=); real csc(real x); pair log(explicit pair z); void drawline(picture pic=, pair P, pair Q, pen p=); path cutbefore(path p, path q); path cutafter(path p, path q); path cuttings; void draw(picture pic=, obj o, light light=); obj operator *(real[][] T, obj o); obj operator init(); real[][] finiteDifferenceJacobian(real[] f(real[]), real[] t, real[] h=); RKTableau E_Euler; real error(real error, real initial, real lowOrder, real norm, real diff); RKTableau RK5; real stepfactor; solution integrate(real y, real c=, real f(real t, real y), real a, real b=, real h=, int n=, bool dynamic=, real tolmin=, real tolmax=, real dtmin=, real dtmax=, RKTableau tableau, bool verbose=); Solution integrate(real[] y, real[] f(real t, real[] y), real a, real b=, real h=, int n=, bool dynamic=, real tolmin=, real tolmax=, real dtmin=, real dtmax=, RKTableau tableau, bool verbose=); RKTableau RK4; real[] newton(int iterations=, real[] f(real[]), real[][] jacobian(real[]), real[] t); real phi1(real x); RKTableau RK3; void expfactors(real x, coefficients a); real phi2(real x); void report(real old, real h, real t); real[] solveBVP(real[] f(real, real[]), real a, real b=, real h=, int n=, bool dynamic=, real tolmin=, real tolmax=, real dtmin=, real dtmax=, RKTableau tableau, bool verbose=, real[] initial(real[]), real[] discrepancy(real[]), real[] guess, int iterations=); RKTableau Euler; RKTableau E_PC; RKTableau RK2; real phi3(real x); void write(solution S); void write(Solution S); coefficients operator init(); RKTableau operator init(); solution operator init(); Solution operator init(); RKTableau E_RK2; RKTableau RK3BS; RKTableau RK5F; real adjust(real h, real error, real tolmin, real tolmax, RKTableau tableau); RKTableau RK5DP; real[] Coeff; RKTableau PC; RKTableau E_RK3BS; pen[] Grayscale(int NColors=); pen[] Wheel(int NColors=); void image(frame f, real[][] data, pair initial, pair final, pen[] palette, bool transpose=, transform t=, bool copy=, bool antialias=); void image(frame f, pen[][] data, pair initial, pair final, bool transpose=, transform t=, bool copy=, bool antialias=); bounds image(picture pic=, real[][] f, bounds range(picture pic, real min, real max)=, pair initial, pair final, pen[] palette, bool transpose=, bool copy=, bool antialias=); bounds image(picture pic=, real f(real, real), bounds range(picture pic, real min, real max)=, pair initial, pair final, int nx=, int ny=, pen[] palette, bool antialias=); void image(picture pic=, pen[][] data, pair initial, pair final, bool transpose=, bool copy=, bool antialias=); void image(picture pic=, pen f(int, int), int width, int height, pair initial, pair final, bool transpose=, bool antialias=); bounds image(picture pic=, pair[] z, real[] f, bounds range(picture pic, real min, real max)=, pen[] palette); bounds image(picture pic=, real[] x, real[] y, real[] f, bounds range(picture pic, real min, real max)=, pen[] palette); pen[] cmyk(pen[] Palette); pen[] BWRainbow(int NColors, bool two); pen[] BWRainbow(int NColors=); pen[] BWRainbow2(int NColors=); transform swap; bounds Automatic(picture pic, real min, real max); real[] sequencereal; pen[] Rainbow(int NColors=); pen[] adjust(picture pic, real min, real max, real rmin, real rmax, pen[] palette); pen[] Gradient(int NColors= ... pen[] p); pen[] quantize(pen[] Palette, int n); bounds Range(picture pic, real min, real max)(bool automin=, real min=, bool automax=, real max=); bounds Full(picture pic, real min, real max); void PaletteTicks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)(int sign=)(Label format=, string ticklabel(real)=, bool beginlabel=, bool endlabel=, int N=, int n=, real Step=, real step=, pen pTick=, pen ptick=); void PaletteTicks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)(int sign=); pen[] palette(real[] f, pen[] palette); pen[][] palette(real[][] f, pen[] palette); void palette(picture pic=, Label L=, bounds bounds, pair initial, pair final, void axis(picture, axisT)=, pen[] palette, pen p=, void ticks(frame, transform, Label, pair, path, path, pen, bool(picture, path, pen, marginT(path, pen)), marginT(path, pen), ticklocate, int[], bool opposite=)(int sign=)=, bool copy=, bool antialias=); picture brick(real Hx=, real Hy=, pen p=); picture crosshatch(real H=, pen p=); picture hatch(real H=, pair dir=, pen p=); real hatchepsilon; picture checker(real Hx=, real Hy=, pen p=); void add(string name, picture pic, pair lb=, pair rt=); frame tiling(string name, picture pic, pair lb=, pair rt=); picture tile(real Hx=, real Hy=, pen p=, filltype filltype=); void grestore(picture pic=); pen textpen; void gsave(picture pic=); pair align; path roundedpath(path A, real R, real S=); problem operator init(); real infinity; bool allowstepping; pair currentposition; pen authorpen; void display(frame[] f, real margin=, pair align=, pen p=, pen figuremattpen=, bool final=); void display(frame f, real margin=, pair align=, pen p=, pen figuremattpen=, bool final=); void display(string[] s, real margin=, string[] captions=, string caption=, pair align=, pen p=, pen figuremattpen=, bool final=); void display(string s, string caption=, pair align=, pen p=, pen figuremattpen=, bool final=); void multifigure(string[] slist, string options=, string caption=, pair align=, pen p=, pen figuremattpen=, bool step=); void subitem(string s, pen p=); pen pagenumberpen; pair pagenumberalign; pair pagenumberposition; void indexedfigure(string prefix, int first, int last, string options=, string caption=, pair align=, pen p=, pen figuremattpen=, bool step=); string texcolor(pen p); void color(string name, string color); pen foregroundcolor; void bibliography(string name); void bibliographystyle(string name); int[] lastnode; void asyfigure(string s, string options=, string caption=, pair align=, pen p=, pen figuremattpen=, filltype filltype=, bool newslide=); void asyfilecode(bool center=, string s, string options=, string caption=, pair align=, pen p=, pen figuremattpen=, real indent=, real skip=, filltype filltype=, bool newslide=); bool itemstep; real itemskip; void remark(bool center=, string s, pair align=, pen p=, real indent=, bool minipage=, real skip=, filltype filltype=, bool step=); void usersetting(); bool landscape; real codeskip; void newslide(bool stepping=); int page; pen itempen; bool reverse; void reversevideo(); void vbox(string s, pen p=); void asycode(bool center=, string s, string options=, string caption=, string preamble=, pair align=, pen p=, pen figuremattpen=, real indent=, real skip=, filltype filltype=, bool newslide=); void exitfunction(); bool havepagenumber; real pageheight; real pagewidth; picture background; void background(); pen backgroundcolor; void normalvideo(); void title(string s, pair position=, pair align=, pen p=, bool newslide=); pen titlepen; real titleskip; pair dateskip; pair titlealign; pen titlepagepen; void titlepage(string title, string author, string institution=, string date=, string url=, bool newslide=); void nextpage(pen p=); pair titlepageposition; pen codepen; void erasestep(int erasenode); bool checkposition(); void setpens(pen red=, pen blue=, pen steppen=); void filecode(bool center=, string s, pen p=, real indent=, real skip=, filltype filltype=); void code(bool center=, string s, pen p=, real indent=, real skip=, filltype filltype=); transform tinv; pair urlskip; void numberpage(pen p=); pen urlpen; int[] firstnode; bool firststep; string asywrite(string s, string preamble=); pair startposition; string oldbulletcolor; string newbulletcolor; pen datepen; void incrementposition(pair z); pen institutionpen; void skip(real n=); bool stepping; real pagemargin; pen steppagenumberpen; void item(string s, pen p=, bool step=); bool empty(); void currentexitfunction(); void step(); string[] codefile; void outline(string s=, pair position=, pair align=, pen p=); void center(string s, pen p=); void equation(string s, pen p=); void equations(string s, pen p=); string cropcode(string s); void asyinclude(string s, real xsize=, real ysize=); void figure(string[] s, string options=, real margin=, string[] captions=, string caption=, pair align=, pen p=, pen figuremattpen=, bool final=); void figure(string s, string options=, string caption=, pair align=, pen p=, pen figuremattpen=, bool final=); real figureborder; pen figuremattpen; string bullet; int preamblenodes; string bulletcolor(string color); real minipagewidth; real minipagemargin; real stepfraction; path curve(pair c, real f(real, real), pair a, pair b); path curve(pair c, real f(real), pair a, pair b); picture slopefield(real f(real, real), pair a, pair b, int nx=, int ny=, real tickfactor=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=); picture slopefield(real f(real), pair a, pair b, int nx=, int ny=, pen p=, bool arrow(picture, path, pen, marginT(path, pen))=); patch[] maketriangle(path3 external, real f(triple), triple grad(triple), bool allowsubdivide=); real B23(real t); path3 pathinface(positionedvector v1, positionedvector v2, triple facenorm, triple edge1normout, triple edge2normout); path3 pathinface(positionedvector v1, positionedvector v2, int face, int edge1face, int edge2face); path3 bisector(path3 edgecycle, int[] savevertices); int XHIGH; int YHIGH; int ZHIGH; real B03(real t); real(real)[] bernstein; path3 pathbetween(positionedvector v1, positionedvector v2); path3 pathbetween(path3 edgecycle, int vertex1, int vertex2); patch patchwithnormals(path3 external, triple[] u0normals, triple[] u1normals, triple[] v0normals, triple[] v1normals); patch patchwithnormals(path3 external, triple normalat(triple)); real angledegrees(triple a, triple b); triple projecttospan(triple toproject, triple v1, triple v2, real mincoeff=); real[] projecttospan_findcoeffs(triple toproject, triple v1, triple v2, bool warn=); triple nGrad(triple)(real f(triple)); patch[] quadpatches(path3 edgecycle, positionedvector[] corners, real f(triple), triple grad(triple), triple a, triple b, bool usetriangles); triple normalout(int face); int NULL_VERTEX; int[] makecircle(edge[] edges); real B13(real t); bool check_fpt_zero(triple testpoint, real f(triple), triple grad(triple)); bool checkptincube(triple pt, triple a, triple b); bool checkpt(triple testpt, real f(triple), triple grad(triple), triple a, triple b); int XLOW; int YLOW; int ZLOW; pathwithnormals_settings operator init(); intset operator init(); int_to_intset operator init(); edge operator init(); positionedvector operator init(); evaluatedpoint operator init(); gridwithzeros operator init(); surface implicitsurface(real f(triple)=, real ff(real, real, real)=, triple a, triple b, int n=, bool keyword overlapedges=, int keyword nx=, int keyword ny=, int keyword nz=, int keyword maxdepth=, bool keyword usetriangles=); string operator cast(edge e); string operator cast(edge[] edges); string operator cast(positionedvector vv); triple operator cast(evaluatedpoint p); bool operator ==(edge a, edge b); patch[] triangletoquads(path3 external, real f(triple), triple grad(triple), triple a, triple b); patch trianglewithnormals(path3 external, triple n1, triple n2, triple n3); evaluatedpoint[][][] make3dgrid(triple a, triple b, int nx, int ny, int nz, real f(triple), bool allowzero=); real B33(real t); evaluatedpoint[][] slice(evaluatedpoint[][] a, int start1, int end1, int start2, int end2); evaluatedpoint[][][] slice(evaluatedpoint[][][] a, int start1, int end1, int start2, int end2, int start3, int end3); positionedvector[][] slice(positionedvector[][] a, int start1, int end1, int start2, int end2); positionedvector[][][] slice(positionedvector[][][] a, int start1, int end1, int start2, int end2, int start3, int end3); revolution operator *(real[][] t, revolution r); skeleton operator init(); revolution operator init(); revolution sphere(triple c=, real r, int n=); path line(path p, path q, real[] t); surface surface(revolution r, int n=, pen color(int i, real j)=); void draw(picture pic=, revolution r, int m=, int n=, pen frontpen=, pen backpen=, pen longitudinalpen=, pen longitudinalbackpen=, light light=, string name=, render render=, projection P=); real[] tangent(path p, path q, bool side); pen defaultbackpen; path[] cylinder(path3 base, real h, triple axis=, projection P); revolution cylinder(triple c=, real r, real h, triple axis=); revolution cone(triple c=, real r, real h, triple axis=, int n=); real rms(real[] A); int[] frequency(real[] data, real[] bins); int[] frequency(real[] data, real a, real b, int n); int[][] frequency(real[] x, real[] y, real[] xbins, real[] ybins); int[][] frequency(real[] x, real[] y, pair a, pair b, int nx, int ny=); int[][] frequency(pair[] z, pair a, pair b, int nx, int ny=); real mean(real[] A); int bins(real[] data, int max=); path topbox(pair a, pair b); void histogram(picture pic=, real[] bins, real[] count, real low=, pen fillpen=, pen drawpen=, bool bars=, Label legend=, real markersize=); void histogram(picture pic=, real[] data, real a, real b, int n, bool normalize=, real low=, pen fillpen=, pen drawpen=, bool bars=, Label legend=, real markersize=); path halfbox(pair a, pair b); real stdev(real[] A); real variance(real[] A); real legendmarkersize; real variancebiased(real[] A); linefit operator init(); real skewness(real[] A); linefit leastsquares(real[] x, real[] y); real kurtosis(real[] A); real kurtosisexcess(real[] A); real Gaussian(real x, real sigma); real Gaussian(real x); pair Gaussrandpair(); real Gaussrand(); Component wye; pair[] endpoints(guide[] a); real hwratio; Relation r3; Relation r4a; picture tableau(frame[] cards, bool number=); pair min(pair[] z); Component bp; Component phi; real gapfactor; Component bm; Relation operator -(Relation r); Component operator init(); Braid operator init(); Relation operator init(); Syzygy operator init(); Relation r4b; Braid apply(Relation r, Braid b, int step, int place); pair max(pair[] z); pen Sepia; pen Orchid; pen Magenta; pen BrickRed; pen VioletRed; pen Violet; pen CadetBlue; pen CarnationPink; pen SpringGreen; pen MidnightBlue; pen OliveGreen; pen Apricot; pen Thistle; pen Cyan; pen DarkOrchid; pen Red; pen RawSienna; pen Mahogany; pen Gray; pen WildStrawberry; pen Plum; pen BlueGreen; pen Cerulean; pen Blue; pen BlueViolet; pen RedOrange; pen Goldenrod; pen ForestGreen; pen BurntOrange; pen Tan; pen Brown; pen Salmon; pen RubineRed; pen TealBlue; pen White; pen Purple; pen Bittersweet; pen Orange; pen OrangeRed; pen Fuchsia; pen Peach; pen PineGreen; pen Dandelion; pen Black; pen NavyBlue; pen Rhodamine; pen ProcessBlue; pen LimeGreen; pen Aquamarine; pen Green; pen GreenYellow; pen Lavender; pen Emerald; pen Mulberry; pen RedViolet; pen SkyBlue; pen SeaGreen; pen Periwinkle; pen YellowOrange; pen Maroon; pen YellowGreen; pen Yellow; pen JungleGreen; pen CornflowerBlue; pen RoyalBlue; pen Melon; pen RoyalPurple; pen Turquoise; int lookup(tree t, int key); tree newtree(); void write(file out=, tree t); tree operator init(); tree add(tree t, int key, int value); bool contains(tree t, int key); real trembleFuzz(); real trembleAngle; real trembleRandom; real trembleFrequency; tremble operator init(); real magneticRadius; real[] sample(path3 g, real r, real relstep=); path3 roundedpath(path3 A, real r); int coloredNodes; int coloredSegments; surface surface(rmf[] R, real[] t, coloredpath cp, transform T(real), bool cyclic); surface tube(path3 g, coloredpath section, transform T(real)=, real corner=, real relstep=); coloredpath operator init(); coloredpath operator cast(path p); coloredpath operator cast(guide p); real degrees(rmf a, rmf b); string VERSION; pen Orchid; pen Indigo; pen Beige; pen SlateBlue; pen SlateGray; pen Magenta; pen SandyBrown; pen Violet; pen CadetBlue; pen DeepPink; pen SpringGreen; pen DeepSkyBlue; pen MidnightBlue; pen Olive; pen OliveDrab; pen Thistle; pen Chocolate; pen Cyan; pen Gainsboro; pen Cornsilk; pen Ivory; pen DarkOrchid; pen PapayaWhip; pen Red; pen Pink; pen MintCream; pen DarkTurquoise; pen Gray; pen Seashell; pen MediumBlue; pen MediumOrchid; pen MediumPurple; pen MediumSeaGreen; pen MediumSlateBlue; pen MediumAquamarine; pen MediumSpringGreen; pen MediumTurquoise; pen MediumVioletRed; pen Plum; pen GhostWhite; pen Blue; pen Sienna; pen Gold; pen BlueViolet; pen Goldenrod; pen ForestGreen; pen Chartreuse; pen NavajoWhite; pen Tan; pen DarkMagenta; pen AntiqueWhite; pen PaleTurquoise; pen IndianRed; pen Crimson; pen Azure; pen LavenderBlush; pen LawnGreen; pen Brown; pen Wheat; pen BurlyWood; pen Salmon; pen Moccasin; pen DarkBlue; pen Peru; pen White; pen Purple; pen WhiteSmoke; pen DimGray; pen Orange; pen OrangeRed; pen Fuchsia; pen SteelBlue; pen PeachPuff; pen Bisque; pen Honeydew; pen RosyBrown; pen Black; pen Khaki; pen FireBrick; pen Snow; pen LemonChiffon; pen LimeGreen; pen Lime; pen Aqua; pen OldLace; pen Aquamarine; pen Green; pen GreenYellow; pen Lavender; pen DarkCyan; pen FloralWhite; pen DarkRed; pen BlanchedAlmond; pen PowderBlue; pen DarkGray; pen DarkGreen; pen DarkGoldenrod; pen SkyBlue; pen SeaGreen; pen DarkViolet; pen Teal; pen AliceBlue; pen HotPink; pen DodgerBlue; pen SaddleBrown; pen Tomato; pen DarkKhaki; pen Maroon; pen YellowGreen; pen LightBlue; pen LightCoral; pen LightCyan; pen Yellow; pen LightGreen; pen PaleGreen; pen Linen; pen LightGoldenrodYellow; pen LightGrey; pen LightPink; pen PaleGoldenrod; pen LightSalmon; pen LightSeaGreen; pen LightSkyBlue; pen Navy; pen LightSlateGray; pen DarkOliveGreen; pen DarkOrange; pen PaleVioletRed; pen LightSteelBlue; pen CornflowerBlue; pen LightYellow; pen rgbint(int r, int g, int b); pen Coral; pen MistyRose; pen DarkSalmon; pen Silver; pen DarkSeaGreen; pen RoyalBlue; pen DarkSlateBlue; pen DarkSlateGray; pen Turquoise; asymptote-2.38/psfile.h0000644000000000000000000002211412715037472013634 0ustar rootroot/***** * 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.38/Delaunay.h0000644000000000000000000000060012715037471014107 0ustar rootroot#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.38/types.cc0000644000000000000000000003307412715037472013663 0ustar rootroot/***** * 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.38/common.h0000644000000000000000000000317312715037471013645 0ustar rootroot/**** * 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.38/statistics.h0000644000000000000000000000165312715037472014551 0ustar rootroot#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.38/process.h0000644000000000000000000000517212715037472014035 0ustar rootroot/***** * 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.38/builtin.h0000644000000000000000000000314512715037471014022 0ustar rootroot/***** * 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.38/vm.h0000644000000000000000000000135512715037472013000 0ustar rootroot/***** * 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.38/Delaunay.cc0000644000000000000000000001341112715037471014251 0ustar rootroot// 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.38/asymptote.nsi0000644000000000000000000001447312715037471014751 0ustar rootroot!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" 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.38/guide.cc0000644000000000000000000000222712715037472013610 0ustar rootroot/***** * 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.38/stm.cc0000644000000000000000000002750712715037472013326 0ustar rootroot/***** * 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.38/algebra3.cc0000644000000000000000000010456212715037471014177 0ustar rootroot/* 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.38/runarray.cc0000644000000000000000000020625112715037516014360 0ustar rootroot/***** 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(&sign); array *c=new array(0); error("Please install fftw3, run ./configure, and recompile"); #endif // HAVE_LIBFFTW3 {Stack->push(c); return;} } #line 1800 "runarray.in" // Intarray2* triangulate(pairarray *z); void gen_runarray67(stack *Stack) { pairarray * z=vm::pop(Stack); #line 1801 "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 1835 "runarray.in" // real norm(realarray *a); void gen_runarray68(stack *Stack) { realarray * a=vm::pop(Stack); #line 1836 "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 1846 "runarray.in" // real norm(realarray2 *a); void gen_runarray69(stack *Stack) { realarray2 * a=vm::pop(Stack); #line 1847 "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 1861 "runarray.in" // real norm(triplearray2 *a); void gen_runarray70(stack *Stack) { triplearray2 * a=vm::pop(Stack); #line 1862 "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 1876 "runarray.in" // real change2(triplearray2 *a); void gen_runarray71(stack *Stack) { triplearray2 * a=vm::pop(Stack); #line 1877 "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 1898 "runarray.in" // triple minbezier(triplearray2 *P, triple b); void gen_runarray72(stack *Stack) { triple b=vm::pop(Stack); triplearray2 * P=vm::pop(Stack); #line 1899 "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 1910 "runarray.in" // triple maxbezier(triplearray2 *P, triple b); void gen_runarray73(stack *Stack) { triple b=vm::pop(Stack); triplearray2 * P=vm::pop(Stack); #line 1911 "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 1922 "runarray.in" // pair minratio(triplearray2 *P, pair b); void gen_runarray74(stack *Stack) { pair b=vm::pop(Stack); triplearray2 * P=vm::pop(Stack); #line 1923 "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 1934 "runarray.in" // pair maxratio(triplearray2 *P, pair b); void gen_runarray75(stack *Stack) { pair b=vm::pop(Stack); triplearray2 * P=vm::pop(Stack); #line 1935 "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 1946 "runarray.in" // realarray* _projection(); void gen_runarray76(stack *Stack) { #line 1947 "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 1800 "runarray.in" addFunc(ve, run::gen_runarray67, IntArray2(), SYM(triangulate), formal(pairArray(), SYM(z), false, false)); #line 1835 "runarray.in" addFunc(ve, run::gen_runarray68, primReal(), SYM(norm), formal(realArray(), SYM(a), false, false)); #line 1846 "runarray.in" addFunc(ve, run::gen_runarray69, primReal(), SYM(norm), formal(realArray2(), SYM(a), false, false)); #line 1861 "runarray.in" addFunc(ve, run::gen_runarray70, primReal(), SYM(norm), formal(tripleArray2(), SYM(a), false, false)); #line 1876 "runarray.in" addFunc(ve, run::gen_runarray71, primReal(), SYM(change2), formal(tripleArray2(), SYM(a), false, false)); #line 1898 "runarray.in" addFunc(ve, run::gen_runarray72, primTriple(), SYM(minbezier), formal(tripleArray2(), SYM(p), false, false), formal(primTriple(), SYM(b), false, false)); #line 1910 "runarray.in" addFunc(ve, run::gen_runarray73, primTriple(), SYM(maxbezier), formal(tripleArray2(), SYM(p), false, false), formal(primTriple(), SYM(b), false, false)); #line 1922 "runarray.in" addFunc(ve, run::gen_runarray74, primPair(), SYM(minratio), formal(tripleArray2(), SYM(p), false, false), formal(primPair(), SYM(b), false, false)); #line 1934 "runarray.in" addFunc(ve, run::gen_runarray75, primPair(), SYM(maxratio), formal(tripleArray2(), SYM(p), false, false), formal(primPair(), SYM(b), false, false)); #line 1946 "runarray.in" addFunc(ve, run::gen_runarray76, realArray(), SYM(_projection)); } } // namespace trans asymptote-2.38/picture.h0000644000000000000000000000633512715037472014034 0ustar rootroot/***** * 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); 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.38/flatguide.h0000644000000000000000000001020712715037472014316 0ustar rootroot/***** * 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.38/primitives.h0000644000000000000000000000232212715037472014544 0ustar rootroot/***** * 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.38/runmath.in0000644000000000000000000001115412715037472014211 0ustar rootroot/***** * runmath.in * * Runtime functions for math operations. * *****/ pair => primPair() realarray* => realArray() pairarray* => pairArray() #include #include "mathop.h" #include "path.h" 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.38/drawelement.h0000644000000000000000000002200512715037471014657 0ustar rootroot/***** * 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 { 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.38/fpu.h0000644000000000000000000000121412715037472013142 0ustar rootroot#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.38/coenv.h0000644000000000000000000000161412715037471013465 0ustar rootroot/***** * 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.38/interact.cc0000644000000000000000000001153012715037472014321 0ustar rootroot/***** * 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.38/coder.h0000644000000000000000000002661212715037471013454 0ustar rootroot/***** * 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.38/picture.cc0000644000000000000000000010723612715037472014174 0ustar rootroot/***** * 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" 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()); unlink((name+"m9").c_str()); if(settings::pdf(texengine)) unlink((name+"pdf").c_str()); if(context) { unlink((name+"tex").c_str()); unlink((name+"top").c_str()); unlink((name+"tua").c_str()); unlink((name+"tui").c_str()); } } namespace camp { 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]; } } } void boundstriples(double& x, double& y, double& z, double& X, double& Y, double& Z, size_t n, const triple* v) { if(n == 0 || v == NULL) return; X=x=v[0].getx(); Y=y=v[0].gety(); Z=z=v[0].getz(); for(size_t i=1; i < n; ++i) { const triple vi=v[i]; const double vx=vi.getx(); x=min(x,vx); X=max(X,vx); const double vy=vi.gety(); y=min(y,vy); Y=max(Y,vy); const double vz=vi.getz(); z=min(z,vz); Z=max(Z,vz); } } 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; } 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 { 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("-geometry"); cmd.push_back(String(100.0/expand)+"%x"); 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 : 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()); } } } } 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); } } 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.38/fileio.h0000644000000000000000000004655312715037472013636 0ustar rootroot/****** * 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.38/runpair.cc0000644000000000000000000003773412715037516014205 0ustar rootroot/***** 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.38/runhistory.h0000644000000000000000000000024112715037516014574 0ustar rootroot/***** Autogenerated from runhistory.in; changes will be overwritten *****/ #ifndef runhistory_H #define runhistory_H namespace run { } #endif // runhistory_H asymptote-2.38/frame.h0000644000000000000000000000417512715037472013453 0ustar rootroot/***** * 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.38/drawfill.h0000644000000000000000000001410412715037471014155 0ustar rootroot/***** * 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.38/opsymbols.pl0000755000000000000000000000203212715037472014565 0ustar rootroot#!/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.38/fftw++asy.cc0000644000000000000000000000016712715037472014325 0ustar rootroot#ifdef HAVE_CONFIG_H #include "config.h" #endif #ifdef HAVE_LIBFFTW3 #include "fftw++.h" #include "fftw++.cc" #endif asymptote-2.38/access.cc0000644000000000000000000000635512715037471013761 0ustar rootroot/***** * 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.38/runpath3d.h0000644000000000000000000000027212715037516014262 0ustar rootroot/***** 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.38/predicates.cc0000644000000000000000000034201312715037472014636 0ustar rootroot/*****************************************************************************/ /* */ /* 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.38/inst.h0000644000000000000000000000370212715037472013331 0ustar rootroot/***** * 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.38/drawsurface.cc0000644000000000000000000006733412715037471015032 0ustar rootroot/***** * 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 double pixel=1.0; // Adaptive rendering constant. const triple drawElement::zero; using vm::array; #ifdef HAVE_GL void bezierTriangle(const triple *g, bool straight, double ratio, bool havebillboard, triple center, GLfloat *colors); 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) { if(colors) { glEnable(GL_COLOR_MATERIAL); 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 drawSurface::bounds(const double* t, bbox3& b) { double x,y,z; double X,Y,Z; if(straight) { triple *Vertices; if(t == NULL) Vertices=vertices; else { triple buf[4]; Vertices=buf; for(int i=0; i < 4; ++i) Vertices[i]=t*vertices[i]; } 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 drawSurface::ratio(const double* t, pair &b, double (*m)(double, double), double fuzz, bool &first) { triple buf[16]; if(straight) { triple *Vertices; if(t == NULL) Vertices=vertices; else { Vertices=buf; for(int i=0; i < 4; ++i) Vertices[i]=t*vertices[i]; } triple v=Vertices[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); } for(size_t i=1; i < 4; ++i) { triple v=Vertices[i]; x=m(x,xratio(v)); y=m(y,yratio(v)); } b=pair(x,y); } else { triple* Controls; if(t == NULL) Controls=controls; else { Controls=buf; for(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 drawSurface::write(prcfile *out, unsigned int *, double, groupsmap&) { if(invisible || !prc) return true; PRCmaterial m(ambient,diffuse,emissive,specular,opacity,PRCshininess); if(straight) { if(colors) out->addQuad(vertices,colors); else out->addRectangle(vertices,m); } else out->addPatch(controls,m); return true; } // return the perpendicular displacement of a point z from the plane // through u with unit normal n. inline triple displacement2(const triple& z, const triple& u, const triple& n) { triple Z=z-u; return n != triple(0,0,0) ? dot(Z,n)*n : Z; } inline triple maxabs(triple u, triple v) { return triple(max(fabs(u.getx()),fabs(v.getx())), max(fabs(u.gety()),fabs(v.gety())), max(fabs(u.getz()),fabs(v.getz()))); } inline triple displacement1(const triple& z0, const triple& c0, const triple& c1, const triple& z1) { return maxabs(displacement(c0,z0,z1),displacement(c1,z0,z1)); } void drawSurface::displacement() { #ifdef HAVE_GL if(normal != zero) { d=zero; if(!straight) { for(size_t i=1; i < 16; ++i) d=maxabs(d,displacement2(controls[i],controls[0],normal)); dperp=d; for(size_t i=0; i < 4; ++i) d=maxabs(d,displacement1(controls[4*i],controls[4*i+1], controls[4*i+2],controls[4*i+3])); for(size_t i=0; i < 4; ++i) d=maxabs(d,displacement1(controls[i],controls[i+4], controls[i+8],controls[i+12])); } } #endif } inline double fraction(double d, double size) { return size == 0 ? 1.0 : min(fabs(d)/size,1.0); } // estimate the viewport fraction associated with the displacement d inline double fraction(const triple& d, const pair& size) { return max(fraction(d.getx(),size.getx()),fraction(d.gety(),size.gety())); } void drawSurface::render(GLUnurbs *nurb, double size2, const triple& Min, const triple& Max, 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; double s; GLfloat Normal[3]; GLfloat v[16]; const bool havebillboard=interaction == BILLBOARD && !settings::getSetting("offscreen"); triple m,M; if(perspective || !havebillboard) { double t[16]; glGetDoublev(GL_MODELVIEW_MATRIX,t); // Like Fortran, OpenGL uses transposed (column-major) format! 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(!havebillboard && (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; s=max(f,F); } else { if(!havebillboard && (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; s=1.0; } setcolors(colors,lighton,diffuse,ambient,emissive,specular,shininess); const pair size3(s*(Max.getx()-Min.getx()),s*(Max.gety()-Min.gety())); bool havenormal=normal != zero; if(havebillboard) BB.init(); if(colors) for(size_t i=0; i < 4; ++i) storecolor(v,4*i,colors[i]); if(!straight && (!havenormal || fraction(d,size3)*size2 >= pixel)) { if(lighton) { if(havenormal && fraction(dperp,size3)*size2 <= 0.1) { if(havebillboard) BB.store(Normal,normal,zero); else store(Normal,normal); glNormal3fv(Normal); gluNurbsCallback(nurb,GLU_NURBS_NORMAL,NULL); } else gluNurbsCallback(nurb,GLU_NURBS_NORMAL,(_GLUfuncptr) glNormal3fv); } GLfloat Controls[48]; if(havebillboard) { for(size_t i=0; i < 16; ++i) BB.store(Controls+3*i,controls[i],center); } else { for(size_t i=0; i < 16; ++i) store(Controls+3*i,controls[i]); } static GLfloat bezier[]={0.0,0.0,0.0,0.0,1.0,1.0,1.0,1.0}; gluBeginSurface(nurb); gluNurbsSurface(nurb,8,bezier,8,bezier,12,3,Controls,4,4,GL_MAP2_VERTEX_3); if(colors) { static GLfloat linear[]={0.0,0.0,1.0,1.0}; gluNurbsSurface(nurb,4,linear,4,linear,8,4,v,2,2,GL_MAP2_COLOR_4); } gluEndSurface(nurb); } else { GLfloat Vertices[12]; if(havebillboard) { for(size_t i=0; i < 4; ++i) BB.store(Vertices+3*i,vertices[i],center); } else { for(size_t i=0; i < 4; ++i) store(Vertices+3*i,vertices[i]); } if(havebillboard) BB.store(Normal,normal,zero); else store(Normal,normal); glBegin(GL_QUADS); if(lighton) glNormal3fv(Normal); if(colors) glColor4fv(v); glVertex3fv(Vertices); if(colors) glColor4fv(v+8); glVertex3fv(Vertices+6); if(colors) glColor4fv(v+12); glVertex3fv(Vertices+9); if(colors) glColor4fv(v+4); glVertex3fv(Vertices+3); glEnd(); } if(colors) glDisable(GL_COLOR_MATERIAL); #endif } drawElement *drawSurface::transformed(const double* t) { return new drawSurface(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& Min, const triple& Max, double perspective, bool lighton, bool transparent) { #ifdef HAVE_GL if(invisible) return; if(invisible || ((colors ? colors[0].A+colors[1].A+colors[2].A < 3.0 : diffuse.A < 1.0) ^ transparent)) return; double s; const bool havebillboard=interaction == BILLBOARD && !settings::getSetting("offscreen"); triple m,M; double t[16]; // current transform glGetDoublev(GL_MODELVIEW_MATRIX,t); // Like Fortran, OpenGL uses transposed (column-major) format! 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; s=max(f,F); } 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; s=1.0; } setcolors(colors,lighton,diffuse,ambient,emissive,specular,shininess); const pair size3(s*(Max.getx()-Min.getx()),s*(Max.gety()-Min.gety())); GLfloat v[12]; if(colors) for(size_t i=0; i < 3; ++i) storecolor(v,4*i,colors[i]); bezierTriangle(controls,straight,size3.length()/size2,havebillboard,center, colors ? v : NULL); if(colors) glDisable(GL_COLOR_MATERIAL); #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.38/gc-7.4.2.tar.gz0000644000000000000000000410234512715037476014404 0ustar rootroot‹k;ŽSì<{ÚƲù·|Š-vpx ühã’^˜Ðbà hšS§ªP#$]­dìÓä|ö3³»;mÓ´ç^Óþl²Ú™÷Žf=7Šg¥ãRµüèÏûTàsvv‚¿•³“Jòwôy¤TkÇðßÉÉq ÆÏ”êé#ròè¿èm$úý_ò™Gò\×få¿üU”JõôìAþü熣/iÉøè¬9==Þ+ÿê±"ä_=­èAþÊ ÊÿуüÿôÏåvhRò5 LË--žgÖCsÿ±œ€,uËÉ]»–™Ïüš!ðñ|žå² @Íÿ?[àOä§ÓÔ¾oÔî ¯]6¾Œ ©‘nk¤9äÏ9Ÿ¡ïÊyæ}æÑÃçÚ?£Á/KO >ª¸Ûþ¥rZÛ°ÿªrzú`ÿŸâS>Ê#Òt½[ßš/’3òDùê+¥?ŽÉô–ü@}÷&øžëëå:%B¶Møt¦Ê¨MÍ€AHã—]•\6ÆíQ·Ñ#ð}8|ßmµ[¤¡Â? äUwü’4^¨ƒÞdÜî½&ýyÕýñkÒþa8j«j»…#Ò½öºíbì¿&µcòz0‘Á«>uÕï"ÌCê/-Æ€Bb1² >êç¾îÔ$KBF‰ë¶J‚Lñ|/qí èÎ-ñBØ&£toîµeâÊ%úÔ½¦ÄqË Œè>E6¸P-ÊJtÖ¥kZ³[ÅpÁ§ê'Æ´Xà[Ó0 b† øs KÒ\@`HFÃÕå3˜¬k”+!¨ Þ$++X$`±H¸¡r&S YPã-Y-(Lö‰pD7‚vK˜~MQæ°-ê#|‚ndÎJÖwgÄ ˆéRæ< åœ:Ô· -þ[ Ö2I® 3à§ÿ¶ÄãˆXßt—že#ìkÝ¿%:C.FäÀ[Ø ÈÁ rƒèõ8‰õ9¥´ˆ”æcJùþ]XS²qÄ1àÙXo¸ °ÐX£Æ˜Ô  IaÎ6×tDëu’ ?B2dQ ÷¿OÅ’:B¸xaæ@…q½ÀZZÿ+$$œFî.ucª­_Çw'Œ‹ÃIÉ$Á±žé30 PX˜3t)ªb¢³veOˆ;ÛàŸIKyÜ&Ì(îyÕ}.G2Ó}2óÝ%ñ¨?£FPJîÿÎ$EèâÆÈÊ™§Æ²°\ë…Wï¥E6Og&‘ZE;íñ°Ñi«Ý¶syÜ=€Fòæ4ðô9eÀaŸ¢Ðgzh?@Ñ6¥‚o¹]Ðà°0NaŽÀ}#gÍs(dkú€F©uûÍžÖ¨Ý^û²3Ú¿ìªÍ­Áöh4© 6¸¬'pÉM$ó¸IoÐï ‡ ý¨¼9ÏðQkFr-—ý#¤þ­z˺ÎÌÍýCý^CþhÈ Iÿ3Cö|82r”  pg9Ž6Ÿ'Ÿ×!hœò<ù5†2“é%È›ú~d7ˆ}s3¯œ¬LEÚÈ7QyCêä¸òÕ©xò>‘Rær5Ÿ‹'æó˜bPö+˜iæ.ÕWÝ~­š'ïޥǚíÔXóuGL̘ã+Ë1ÝC®w²Èmª¯ÕqûRëö/„Ý2 v%îÐvÐ%çúòY:5–ƒ%s5è*@ÇǸ¼|&Çd,À´tM?¾ƒ3Ò¦°oC\5Ž@ Ÿ©1/¥×® ßF—ìƒßóÌöæp(Äyiºr^ç¾ßspØ Õv9ñ€NY¡x(c ™F¸¤÷Dø7H J¶lS'—ÕA%[T@Ùl f`ˆoç¡ÅÀØÀÈø. ÂànBEêýîÍEgî¼Ò~K'ú`ü |…,@úÓ|©_ÁH*ÿ"á U àk†çÉ×€u­û.5Ð!à&Í}w~cå îYƒÐ‘‚S‘Ψ”´…HƒÌ]×$ó2Æ“uÜh~÷b0.1uáþ:ŠðµróؾAHöœË…³æ˜ð  @¾ä)H+O¾ ÿÎy¬¨ä%ê÷„Úg}ØfBo'Ñ-áÕ8©Zg4x¥j“!ÆRé¹Á‰—ݦ´£ï4›—ú­ÈU¦4XQˆ¯3ÃÐè‚øÇÔ¾]o$‚ƒBeútˇŒR½-ÍKD…h_+ŸT)µò—–/mƒ 6ÈNb”óZ·C¾oŒÛ3ëÒ…í•[zèacÛ=ÎÕ ¨CÝGdÇ–°\"9®äã¬mι›(g“nòÙÿÛõ߀+£mMÙG¬ßóþ礶]ÿ=>«<ÔÿÂúïo-ýnC8Eªe[ÇHÇ×=8³°ßàKpAý9d}/±ðå³ß@AdP¬V” ByIW6 ‚âN!::[ôšÚ®‡áœ!—á êÚÿ¿êÚëÂÍîê Ù®;n×46rH”0Ñéµ´W£Æ0¿•ÿ_Ù…bqAð« zgÃìfýlsž'<³fÀO`¿¸Öo€e—Å>X.uööÃÁÑ+ØÌЃڻS’Kð®×íO~ÐDҤ‰û òyôtØkŒ/£K­ÑoÝ%¯bÚ…9€Òu@ÒÏZÑ«nýtŒÆ~þ$~Ä7AâœLŠ¿Õ Û}®;EÛ´ã|•¤R±ô4ɾ=|KP„Ø^¨­5U[°>ÔŨÝNúx\C"9-Fç{îUž×É ù·6@Ò'…»w›&bßÞûíñN.î ƒm?Øäæ/‡“½z4P/”;Dv'ªmLz8îÃh`ݧOèÑßÖ1J„ÏÄ(â‹÷\RVìþ²âbxi/O-§Ì´³ö‹I§®dè œødHõù yGôÕ[òäWnv$[¹©Ñºq•ÍV²ðóýyù§«àà`Ø<8¨—ɯå«ø†·’'rÍa5û•}ÿþ Â2§äbå6ËÊ?}öÙóòóröÁ@ÿ:û×MSãG p¾7«t_ÿoí¬ºaÿ5¥úPÿù4ö¿ãŒ›ÛìÆ/º?7 ²•àÿu•‰ñ©%_èa^•³H(çÄ"_óUðíéÓíW݉âòcF6_ÇþžFâ§ëGëM~GHå¡Œ½Ïþ­™†¯w?î€{ì_©UÏ6ûÿÏjʃýšú/iº&cyW¶¬QËw:¾ê^bùM¼Zuã^“¨¢]rzþž²´ø€ŠÚ=Î&ѵ·  æÞã…RNÒ|>ç8Oæ.U&LŸÓõËXÀc,½\¢M‡; åM^&+ ?±±FöóH6+&ãÉV>ã@ªoÖÏb7¶ž¯—“÷`Üjû >j ûx©Íƒcëülf‡l+Ü0c(ËkIXí@ú´½ºÈ®ŸË6±adRò0Ã9öl7-âö=¡BhÁ­G‰ËÄoIoƒâh+oöm©ú>u°9k ¦P 1°ºl¨J…ƒ½ÍU’…ʃsÿcþßq »ª?Þ-°ûüÿÉɦÿ¯Áàƒÿÿ[ùKÅfع)Ýe\Ìámβº}cPOÔ …û)`÷ ,ã-V}µKš%rïç#D|½7šÈÖoMk}Û5-Ñ6mZè˜ø$^AÂBV<öa‘›·ñ%Üù62|ÜêŽà©y¾ËF0«íf¹øɾDÊI±€oõ§ÙüF z÷ŽìžÍLµ_¶Ëhn–j®NE¨÷»÷Ä)2 b>FˆvàÀGƒÓÌ:ô6¶í®Ÿ?«QL¬Æ­€G €h Þ˜½#ðý½ãRìÿy9WÓwišë}Ìà}õ?åøýíìøTQŽ+Xÿ;{ðÿŸºþ7¬ÿì­ÌŸËà4×ZP´@\Èü ÈúA¦TŽ))EÁ¨~8Ì^6¾k“f³~ØÄfF±ú!ÏúÛçòÇÂéŸbg'{ì_©œ+²þw\=99EûW*µ‡úß'²9€Ì-Ç׺m™²û8œúBñðÏ ßò‚¿¶n¹R¾úªŠíV5ráSJTw¬°‘ç £@ºŽQÊdkIÁ),½úœ_T*ÅŠòs=~»†ç—øÁ0 æœ7˜ºÁ4ÑadaºY†LSv#Y€ ±UŒçªõ—,z›ÛéOH[áu› ém¤gÔa/“z8Âü#ÀÀû6rN¨ÅoF¯‹k °>ÀÈé’íóÛ™®“çX¶¬W£mËž-Üùzƒ&^-@À ȦDól™_½œR"î*ð;ˆÛÏ“1o(‹úÎÎãë­ôZÞïÄ6vì•‚=a7Ö-‹/Û£æKXÑxÑíuǯ±ì¢;î·U•\ F¤ÆãnsÒkŒÈp2Ô6dð*¥gÆÞθt|¼¦è–ÍÄžñ²¼)»7& Ê/×ê¢í^™ _“^kžc gØa@ß׋ ðž•Ë«Õª4wÂ’ëÏ!Àq¬ü\ÓÀK&Ì£†h(?¾È&·»i( &0€H(ek1ªd§¸=0—"^‘€Óà…µ}þܼĥ =·jaàâ¬7¼ÍU@¸ºK•å·†bZø&¸ p¤¸6”Áɾ¼Iƒa½$°$¯è¶c>à‡èftFÄÂQÔ(lQƒÏ<0÷J®°›\¶3ì]ײyð °vhS8j88tzz`,(òÕIs—1z.ö±ó+(®ä[QNü)]!Ò´#Kx/X'Ýš(c‚OqË€¡‰#or¡ÐÑ©¡ç٢ב«‰ìjÜœŠGNùó;Kq¥¸õÎ9Z~oBa&/Àp‡xž ü’ž08a¼™Žož÷:*m€nge!c0¼2Ú„$JP#à¡õ#<ÅvVi}èLçT¬G§Ä‚tû Þ~ªˆeÞg°JZÒÜ JL¿ÖG_Ä&ƒ+:-ãÕeçz}j»SͳAÕÏgõu‚q¾˜Ö_¶­-§Ï€Ñx ”w+c•æm¬àõP«<ìáS†À1ù½ø¹Ã¥pEs8á `¼%Ð¥ø—è$µ-Ð0ÆÍï0_ZRïn‚+ì>7}Ä1EÑYßÆFI‰)ãñ\~Êö(|cŽQq7“K;­#ˆUþ ÞsÃ7ëòï€eÆ<o¤!`ÙO PC‹Çg_{ÆŒÉõxAn™(ÎëÑîlбMWSì§dî‚æDBD-¾º3õZ÷ùõ;ü-v#ÜÚ¼¶p¢WÒ>äPP}+§`뙨'¹>j×g 5^Ì-^6ú“‹Fs<µGÅÁ°=jŒ»ýŽ&nK£ƒÁk¿ ÷n°ßµGývoô.·Ö•¡h§ÆÂåqÛg‚ÛÕ,½àã’ÖæS±B64)y ¥£r¡ðäçL&D¯g¯daVȃá¸;è¿A-^^ànŽ¨ ’œÐèuj&Ó¼ËYñ¿Û•É <* '¢ +ÅENh j{éþ3!p—}Îp>æiEž¨Åó¹×„íÛ:x ÑvmÈÜ.µþ×GÞ$/rÂå”úÉE™·ÈeæÂP#÷2øz·£^Êf2"ò-víbHî0N4óÀ¹ß‘¨rÏ´‰2™õ0Ð5C?¦,¢% ©LµÏ-©?ÈDÙÖ97|žŒáºß“vÁ¦Qbõlf aðêçÃ%•Â}²ÎµðOøK¡¼}¨û,®QÁAÞ¡ðSèbÐñâ< rÞ ÿJFáCÀpeLéÂ;ùÏ#ü¸OªÌô,ã1ìü\‰¤ë®·Öɇ۫¸Ú"ÒǸØZÉ +»¹ŒäùˆÝëÉ S!ˆ*‚ÁÖ,8'SŸêoãÅ$ÿÙ™`"˜x·£·B<—‹Ò³¶(Z‚yËxa>Tq#q+='VA|äˆ_þ;Š ËÁx:Ãä ’—ùBø%ÁÈÙò¸VJa?TR(bk"ÔS¦ÓeÈ‘p‘WòÉðT”;JkÄFÈó/ª™õNœ’çPR«×7Ñ£ålßzN &[8:šUtÙƒ‡Æ9x3»ÀâFIŽ›ö<߸`ﻳsÛÙÿPLûovÝ <–¾Ð@ÂÀ¦†®{n| GïÈ€ ò†å¥EfÀ;žÊ¿¨F/€ÔúÑpI@¾›ßr¯œjý(ðˆ ˆ2 QL§1ÛA„OA´Þp&<Ø0ž\4üàÒVàMóÙH¦†¿ôíÈôPßk²×0Ù¨‚ÁYÍaƒGš6–™à¯Ð`cæÃxÙOV#»­Z©çÛÝi‚Ó÷Ö·™R8$¡"8Éc)ø5—+ ] _c§l[Ä»é>©ÍôàuèÄßG胆/ ;RNøö¶0ô$œ3qä×¢½ZøDž=÷Â1)íÐDr+¾±±¶ºª=w½Ã6SÅÓæ™o#„0;·Ù­Ex[ˆ‰hs5YÔÅ1íõ¤¤Ë}Ç ®šjÊîûs#šùKšõ…?n? A‚cÃÏÄÀ³Y4ÓL’æÐÃGf4"W$àϦÙýsƒÆÌähâNÞ‘óÏUÉÏŽ? "ÌÓÁ£uÉ0rå7€xMóç†K'««ü°¡†ŽÛÒB@;‹6œžùï×76?è fÄ Nrûòë;×1J¦šn$­ÚS •Ÿ¼X¶(ÊÓ*áéŽûƒPÕqqw¤ëu÷ÖÔÃØÅÅ1T͵¼_[ßà>I…׺¯ü%r]Á„xjÛiíB›yˆØÕÝ›ärîaàM Ú¤­ÑØÃ}M¼ŒX>Bµý ÷”sOˆLÂ/‡žV’ÖëµÔváÏH°ãÎØ7²lƒ0è{ö'‡!‚6ýÍn_"¤j­ûÞÌ:Fgm ü ¹ÜKíó(/\ü\9þqý>±„·7A¥gq]¿]…‘nêò»)šS”PC8‹hsïÔ‡[Ë„Ã~¶ }˜Shìή“Fðrå¬ý¬“èùÑåãBE9$ÆÒÑÊÓÇ èïtl–ÖöȨm£¹~ùè7Ö·™«oó7ÖGu4ßo6ž}Ð3¢ŠQ¦¼Ê©~/¥ŽßØîeÚîkŸ}%³UŽf°]­tâ‘‚9bé¸ù[×äòñ Õ¥ÜÊ­ÿ–úfà ®ï‹+ }®ûCëÍßÔbÉ®KºCŸ§DÔìf„‹óFë¿­ûÞ 1 kOžê1à=ˆèC&ãlò£Lb6M'Mãë{÷L‘L£{ÊyQ£¹»*Ɇ§LSN£´¨ñûñûU½²½<~zA$™X[U2KZ6Ùwä®»hEöwB¨ò3RIVŒF$Ëæ'y`%l„Αj/“³›8(P *Æž‚ ³&nŒ#Ö4ôó0ì •Uô‘†Ò&œÑŸqø Úûèé*毖½þìB=ÁçØãM+yêõ•B…ø×zú!}}ô8}~üþIš4ØÞ?~òÁ¨Dª—§\EøV…·Le7sÕM66zëM=ŠT—þ:}ýaÂ&ïûÞG÷^ÿƒ<^¾_WMãyƒž´'ïé¯næ2´øïƺ|è;ô„Š|8'à§Áæ5¥ ž®>Ø«½,IõÕKú6܇Ñtíñõµdp¦. ’–šßÎÝ!xŠópc•.åóø)1‰~Éïtj«ŸµæûÕµêÓ’<½÷¯ôwÝå±smÕkwã r»OóÏ3ùIòºÓõ |ø'¼jȧ‹5b•ùÉ“Éð’Éð&zžèKB?¡úaÆŒvÚ*÷[?OŸ*ð›Ø×ÿć>þ$LZæ…Á 8lü:SþÛ#U1ä–üôõàôõƒ§<'ͽö8}fÈ”Êk|±Ãª+ó5—%tÍxËf=“A§oÙ eú1Ÿ´¹f–×B–l–b–G«™,x-dy–Í’ë¦Ù¼ÜÉs!1Ì$‡ù Éós!Ñ,·B†¨¿fe_‹YÂ'kVþƒ™ÍeaˆñõÆ3+}L’üµÕu)åÃ>Em„IpíjpŠÕo4¥É—gñ|ñ/C??i¬ê»LÜð³®^åI5í”b@>•T;Š˜§ê1äÑ zš§kè'~1YÓüGU6 ˆ-›b_ª'^‘ä™û¨Þô>™Þ„ö„„`~ ½'O¡×QH+â­(²¢1ÄÁÍò¸¾ùÁNŸxdxÞ`tLO”Q}T?}Ið£*õ²áxICÜgü$Ÿ¦‚þùWRå©Ÿ>^êǧ¯õ£çÄÉ£›•]>Õ —ÏÒ§~úx©3Ïä!¶Çz»Bè÷QòðH=.Ïù8Ÿ‘è6ýŽúim=ù’SXW‘ ²ŸÌ*Ù S‰Ì|Ùoá@ÿ/%r= ãÏCâ'/yâœ",%e.Cù©@„\À_!$I6;¥SŸS­é`c•Óß>ÆžÉ3Q$#d ù¨4üÚ7þ¥<Þ C[ç†Á_!fȃ—Tåxב«_Î7V!.pžó'«Ò.„yU¯Hðßë.Xá¯,…$ŸI¼¯‰0’¼’b>C IÞÓ¹RB‰~Å~ä\Läá™~0JA<‘ÿ4g"Š~öôÊxÆÊ@PÑÏU8¤”äÁK\dIê_U¸_Ùxœ>þu]?&»Gè†|~úTz aGÀBÉ$™¤L"óHš!¥Y¦‘J„À“<*ˆ¡'y4FÂù¦¶Ÿ~²I"ﴔˡÇÌ%BP6³ÛF&Å~g3©Í• CùdÈ?™,"²mä³m”e{´šË&‚Q!Û³|¶B×YæIò(©!Ìe ‹™ŒõP‚R!C¶– ™H>Êæb©˜ R.£MfÖì ” òR’.ÂS’÷ÍUÿ¥¬`týW] ËmÉ‹«É1‹qúé‘ñø(y|œ<¥´¡M.Ü»~Ö"ž~‡èÆÅY†KŸÖÒÇ(}\7/7’:ìdùYöÓ/׊n '+å‰pJ%ÑPÒX8LúçEEÎñ C­ßƒ¿Ìë°—…ëyAnÿcâ9U³÷”Bó­k#UÍ3£µŒÝ¯2Îb%)°]qÒ]åkV÷•­¦¢È0i£=âéO:ÔݧûÑ°Ø[—râåS½Ý`ÅÕQÒáçÿà 㸡¾Nê!²Ïi,°ÛñÝëé ô°bUjHj/™=‰4øù±{^" Ñ·'CÕéÙÐÕ%úö`•àï¹õ°‡1¾"ã»KH”3¤çy³¤_­ŸÐ€Ë,gÞSeJŠÄ¬9ãßÕÇO«t®ËLh˜ƒWbovÉhFXÌP» â_š­±T™Qce€Rk#12ZIϱ¨>{\"FC2“4=‡7ÑeRÆññ ~UÇ[¹õB^™E< ƒèÖbhU3+˜J5×wªßÔ°mJõrrÉ€U±ÒX,i,jX6NÞº¼¢<Ä0ß캲þ©§a†r©ü}Ûƒ¯ãba7Ô©§*6¼¡‰Ó={pA²b±$KÙ d£¶\Á²Uç¢÷¿bå†õK¶nÍá¸ýIÁ2Ff¥Šð¾;Bˆn¥ñÞÕ=®ªíñTö¬cÑG¶6Ò†Z¢Îh0¸M}ÇÓ‰Œº[V5%ZÃÁš²»*€º.´^Rhý¶Be¥6n/¶YVlóÖbOËŠ=­,&–\Ëæþã¼¹gµIIS¢N)›L“‚¬<ÇOèð÷ìê9ÞyR–màf~%‚EŽ$³]ò‘‘zb®Ë‰Cûú<*mYrÁØͨB•O WÍ–».Ët]9°¡ÍgÓø©$9HÔÙKQÊ™÷3±¯ÕÈEWeTT‘ ÉzJ6bkÐ5¶W¤Wz(A`,ÙI1 ,ÀçëX×u¬ßµŽõ´/QÞP'³Ê–³‘—|‡6™]µpÄô“[§ ɇŠ™ÖÉfãOËÈêÓlfMX7tA~ …|lRÈ¡±©†GÓ’3÷‘Y`Á9u©éõ:¯*~ËÀGI¹ý™§ù~]¥—Té%ÎS1+FqsNøÕì`Ê sF]úÓb Q«òߢc`ì~î ýTñ’WŒÖž2”œtÚb&DNò ß+†ŒpoQèýJÙUç×ëOWK0&«W³ü5Ñ|·²£¾^ù+%K()ä^I,rn£ Œ´d0äQÙÇ«VÙ091AÍ–móš¶J.5QeõxRÖ¢ËΕDf¹k¢ w+x-ôCJ>ªlñѼÙºb×Jb 8§¬é¬ˆñÔÌVÍ1s¾,ür‰ñ´’ NŠ OZæâ›ÙñÖòïU+¸jöóÙÅz¾†‹µŠòJÎßx¿^Ý`~Vž]<εöøÞý}B™Ÿ˜U˜æ@m¦Ž§Fñ§IÉÖ«ƒŸÚÏuXi} ÂeïPíSœ­q­Æ#}_…JP¾§Èÿäé‡g*òHߟmÈÇg_§[<ÇkŸ¨1g¾ÔïUK2oOï¹rS›/Mh³Q<ÙŸn‚èü–Ξ=OË”aÅB Ê•2S°ÁÓ×8ðS†"%‡.°ôôñe*­°»Í'dݬnsé7V·iÖöë2ªŠï7 T®¬%C%Zƒ:*¨^4×"ºPã2b†?wRÿ!£./\9~6‡,l4AÈ\]bž°A¥„ôqUüM^Ù7“46VVMFÄ´¡Í2®…q ›°,Æ„#Å&“Ùt9¦¶ )YIŠ~‹.‚I \$ª œ¨sÛ#6‘ƒÜÕŠ ÇŸ’ pB¯L#ÜÏ,v.JÊdïåÛJŽr¯]ª:‘ë®nS1*[td4‹•2Q]eË8wQ=$™ÓÂîyhOœJâ›Þ%SE–ŠF÷ô¶täwõï˜âÿ+¶±Ô¨ÆSe %˜‹®Èámª¿‘ {uyµÀwIĪ\àGëy‚óó¤T8—I_ZÙ–[&ɞؔ oWmr¦ÔíË&’Ê­Lâ†1‰´nGÊ£³_FsÉg¿Ô¹}{P"ݱIGÎv2ê2ƒpcµTÖÙ¤>Qj Í’ Ï4[wBí’;-Šk)NXº¹.7½Fèô¯©©Ë–øyÂòžž&OÏÊÆÀ „›¤IW®ÒË.xY[­(¶º±:· _öı² 8µŠPUÖ1¸|RÒ4}¤Œƒ"ÚT÷U'Krsµb¬H+'Œš][²²Ô‘dÔumQ©˜œÝz‘Œ3m”ÑS¼±Z¹Ùlp.ðøýæ£ååžÎ+Gðtóìqà ×Ã4!¸pËøtXŠ`{Xb4Â;¥¤˜ãçHBm–AAñ…3ªB¬þ‘k¬ªÜÙDƒ+?ATu,›9ùälª‰EJEñexñ~…²ÉÄTnš‚I”·7‡ë”bUKù›XÎi¿„U›–8v“LýŠ¹5òÀñ?‚J¿Š·ää¤È³§ó¨¹ÎÓXªÈuß“,‚æØe–y kõ þó˜ Ñ51v{\{°1OÓkTC›5¡üc¹`ÇcuÿòÐ[šÇ15¹°„PÏëé£k~߸c]%¼¶û¤$Ÿœ@<⟠õ#&22bŽƒé(þG_>ý4oÒ¸4÷XÛòȤ5ª&í [s]iLÍ®ùâfÓ6¾vÓ¥&¼÷®°ÍLý ùa$[/ü†Fe*×¢¦ƒ¾S¿•ÿVdŠP¤1çŒüÞ#âËW©m ÇòNu™ I©lØsŠ=ΙrsúN‰_Ð{jË«#©¶Ð#¶ž±ª²Qëæ$Ñ›1Tc6ñ¶9dsÆ’>gçQ72g&¹È½GU–p[® xTY¦©: ²å~S©·Ÿà˜Xؽ§$NÞþ¾Jq¹ÎÄIјw.~JOa8›NW´ñŒì6ž•™ð÷lîk•ýº*ÿµYÀ^¶^ÖñJ+»¨¿V>ÌÄ„; ~lÃ=¿Dþ¾ÕŸ£¡SY‚8J.ïGŽ[5ûN¢6tÜ„YR¶M‘Z>qÞåk4®<‹ÆÊFLŸ {öÇe9 ˆ'µ&¾ ÙÄ;‰í}§„ãÓY ¾y¤²èÉÝN ×“³°¬¥Y˜ïg¼^-uf„›(í¸Ì\“yn•Z¢øHnŠ93î–:2Ü}E3½R^¡D#a•[rr¿aF³‘)¶y×b›i±ªÖ.æ´µQÕÖÅœ–6K[¢º©ÍÒ¦JK™m•Ÿ“ŠeC02¬!ýTêí3KuKÏtÌô˃Ë×ìa8óý2%™`ˆ´ôe B„é~•]Wt3™8qxs+îÉ[]Æeúpue±²¹¸Ìî,žcwÆ·îy7ñبë¸ÞxVŽùÚMiÈå›êìúÓê¬UÙ7]_xeöM1ø` æ£7Ö«4 ¬måÓóùô“›˜jDò.&:)!e¯rU&Þ7³÷Mô Ù˧k¢jà©DqI_ Í¥q;úÒ¾.9àÄŒa™¢ó²Ì$›û2!w—ÓéÒ¯—×ôÿ² y¾±ºÖ8Ÿ}tãHÆ"FÕš¿*º¥Þ*ͯo)W½^Ü%#d“[%–IùÅ \©dç–º.¶˜¬´¤Lë»,3BL‘Ë”@übåÃÑ@%X.F ªö-˜/Aé8„›^ñµôAƒžn¹ôÂk(Ŧ•%´’Ê,´¤gU`ëȾpˆG”|c¨x¡cofx–aæ^ŸvÅû»øÑÐþÿ4æÊDÑ8Êô ˜ñp\íp©1tG$ñz÷&ª\si…öJJ.€Á'“`ÿÃ÷­2)I•ú Ò·=s^Í16tDŒR߈ÍÍ…v~}½øm-Âéõõâ¢õa¯³Ž›µ'| Æ÷FP—$žËŸ•‹ê Çx€[Råäe(—M2Ìp0ìIQ BKäHÝ^5r-á¥àÌ% Õ„›áY„êv˜\“÷Äy©Ô½&^Ÿå¹9׳å¯:Û¯"×ýjxB•”z¹×ˆ.ÃÍÔSª!Ùƒ9¸FàŠljs}v¥s€±Â¢Æü¾%Ù~Mä’´z™ìÿM¯¦gêƒÜh—ÝzTÁ™8ÚŽíÅN/š—Žuô¶ÓµÚÇûÖÁ±Õ²–– d‘‹*¢Ö•¹¤)SÆ=¦«Ö8Û²eŸ# ò‡›M™ öR Ï÷â[z0V®¾i&ù‰Mã—´kõÈzæŽÆ±óâ {ˆ_ðHçÄ{¸­Þþ…v™Í“. XKf…°°–f}qá“Sþõf¾­|k«,— èËvd N̸ôgŸåží?ËæU7>—’ç¡zac¢Äg¸z~T2繚tBäúÃ6 œvyMì¥zbÉAf÷0Äû¸š×Ée® v¨‹§™z³H¯‘<„±,òµ¬df’]5irÇ[¦HEB0õ£þjï»#YšW•æ×2;AÒ†ŽÈ€ócQß»¹ƒè:qü.†0˜‰k ÁL9¥÷T»ïfk€ï^ñÝ~.Yœä‰ýë `w-‹Á5½YÉßRëFGÝØQSî8â :dæf<ñ`ž¾„þ¼ád.÷ÍèJuöd±ÊÙ¾®„ø{•Àâ Zrg’›:%û-%Ï7UïH\|³‚|`ŽF6*G#„#3c×ÓKA3ŽîóÔÑHex‘ÍÌŽ ub2xµ-±MãV;gh‡:ÐçäúË;]ƒH]¸±vÚ¯jŸêéH,|r8#åC]˜“Gjî:ù(wænœ›ò ’ú/USÛ›è*J¤yzqfùå[G…)‰¥P™`$yH# v‡n”«ƒÒ‰-‡zØþõcùy"¡ˆ‡l¿rîÝäæàâFubl»#á0êX¤Ê*8„Ã÷6á­bâHä+g»…¼ Õþ§òÅ]ÅZr‡µé€øѪ2÷ãà[ÖìÝ:hMÝø0ŸM  ¿ªR&û"qäN[‰_« lz¤aOöóåÓ§avî•ço¿×ŒNú³‘BÆÌæHÒ³ìæR+•&{ì¼+EéG®Šê1Q<“€Ìäd?ƒÈ¥sAUÌŸ Êð+·cÌD6ºO=£êÕ_3yç7QÉ‘ ñè~“óh¶s=_úñJ?Ö¥7ŒÒ ùèÑÉ+GFKrÀÂ-Í`Ø»a‘)»Êoi©s⣿ÉfRÂÇÎEò=5Ù•c€²{à¦näSO ¸¨4ÌËk2c7ž¦Ö`´åƒÎ:É57ˆ5r£ ›žl:‰ž¤ÎÕ5–KR£u+yi=ML‡NÏ »~:‘^*¿9ÃÁì>jòÎå§[ ™~E—3{ޜތPOÓ…Jµý bbu·#¿±’^šÆ½´JØ(/qSUF…#åhaö²ÏÒA#X°¨§2a1Yi…æJR®õ­Z¾,ê¤ÇPòÛ }]¢‘½.‘»!ìt½è¼¤ñér8:_èg&½^r›Íè ”¯4¼‰*±žc+Dt; öûÆ÷–ŠÕ–úT¥4“f9Ø|­dNŠï ÀQ’$½ÑÝ•6Žu‹Î¹AJÅh†ÃVQdÜJ!„5‹±ÔÛ™cÄlMÖ]:D¦Bk0 Cǽ„œFaqÃ%*Å‚ã†FôTú>åx½nôʾY.(¬­ ÒA°†I-ºŽézÄ:Z8ǧþ>DŒWW"šªàÉÂ],f¢.Š¤\‹¨YªfD`±®Ât"z4G•@ŽŠŸÇÌ\2À'¶fSœÚðvÁá׃©´k6Cb9ÂÇØE½PÓ2CK¨~p‰`ßô5¸p+RÆÓzÑÁ’yB_tÐÀ£/)o~K°vwå¡nÉtä²dÜ“,aõ–Ø®^êg`}”ÀïÈ蜊•WÆêˆo¡Ø™ ó8+¿K˸gæÛI­Ém,“­LR K?žÅ8í\%[Ñ7ºï'ŸGã×þRžæ2Êô êRþ’Øv—Î`r¶Udµ—”‹•²”h”¬/t¹éw14-c—’ȃÅùÕÞµ•™†ö±­^“ ºž¦OÍd Ûx‰¤ÜÒ>Y«§—Õùæû³eÜb &e^éÜ­à”˜^Uïä¸=bŠg}@¿lõ‰sF_™³I‰$(èÔ\p/¹ÍØȲ ¼Ó¶>y­>93N³×ÿ¬U¦¬àø³ªé0`%‡’p³yäd6ɵü¯¬¤Ïä’Sô$WßÉWÃ..“tÖÚgÒÙýC’.Š¿9¯7izb$›d*F¹KrðÑ@&Çpd¦óB&]_¦O²ÈÁG&Ÿiƒ5ò©òqÞ´¥ €ª:¦\º<‰_’G ’Uu”%hÕ`¦¤Ø+%%íülé3ìt]&Ñ­Ë’ê–ùõ)Ôw? 0­G]“OÇ\ëÄî7«á»óáðb´¢vÛÊ·RçÊâ?Ì3á’¢Ð(BJ9ä¨å£ ‰žÓ'‡„§çVÍã ¸°¾¿ a]}îzˆ¬ïÓ óuˆÉþ†ñsk1‰5¿ýýb6Ç9‚ Ë_žß4þ²º>ÁŸa. „rpÑ6=.üéÿÉ£AãI“˜åÛóã¾wÑ|õ6ˆ{^}üx¿=hþÒÓêꓵ?Á$gcýñÆÚêÚŸèÛ“GþdýŸšÈUù—üþù·²´`-Y{Áô&dÛ‰µgOŸ.ãï3ëíGšÖnàŒInny$PÓë>ñC„+3¥jƒ:•y¶Ö ?›VÿÆúÙ ƒkÊNÑãño‘ÈÍÙœµÃfi5OQÍ3TÓq=—fë5 ºƒè>µpoœ+ωãÆ©=¸°Ã!åbçÞͪjPS÷ÍAÇ:juÛg­C‹žOÏN~:Øoï[­½.[ïºo¬Önçäðm·}ø‹u|b½kµŽ»¿XíŸOÏÚN{5œYG§‡í}tüøëm§ []ë—“·gÖÉ»cëì ó£nùÔ 'D˜8œnÄÚÂ(´}DùŒŽ–Å Ué+€’'(˾Ìýk:£9‡þ$ÕÛbE 3wŸèÄÊ…Œs(9€í’‡Z](·²ý€®(ºç7 ²NÆçÎ %A›Ø=Gr¸ÎPÒ©_ªÏ˨ìŽÝXVî×%MGœWM^Ù pI;l:ðf˜Ô=Hà@j€Vˆ ©üÖâ4t/íØY zxlŽÔQ{oÚ­ÓË¥¦ZNoìØSkÛêž½mo-<`µãœl¯Z‡ÎGŒÈù‚lÂW¡Cl72ô½`p!Ós{š@bIA1•SXX­@Äs„Q¦½v׎5¶¾{UzWŸ9ÐØÒv»f› x›¼t#·ÏÀt·ªìÈbƒP"©¯ßÒ"üžÐ43°t×U僔 ÙëßÄNtÛRR7Ž“CVA±(4LjDíU=Z=DÚ;Ô“¦tê8shZÑkDJ{p6§dÓ¯h†i†*Uå[ͦ¹i˜x;°§A7nž»ë·Öc4=”U‘Ü:‹³˜ ×6ÎÕ=¶Ê”ÞúË ÿÊj3]ªáàøðอé§ã$Uµ\_ÏsÎãÚeàë ÿâÙEV_&š—E:·]Þ­ÎHi-bÕκµêá½à*°€ÆêÒx­šOµ§·E3I$guËj4üºõ¯dÉ¥š‡Û9@ñ?¤Páž[5Éör»z¦ëz®Ô0?ó_=[ Ÿ4ŽhßÛÆê+À”‹6"“×Ë-(lpú×M,ƒ@»^ ¬Þ¹GC&=©´&ÍÏ„,bÆ’ÕÀˆÌÌcùªÎרz&ûVE- ꜞÔa¬„9/\u®’2°’% w%=Eª@ õÙ G§oöÏjãñ0¬[xR—À¯Ó鬔kNVÑ…S^áIÁ½=>"^ôõBUpÐéÑ—Óö¾*ZËÖqîÙ£ÈúŽD•NËRκµM0‹N0Ç:§20¶ÈÔ4öMÚ4­o¤ì°v|ÒÛoï¾}ýúàøuÝúõWK'$;Ž&¹Æl ‡)N‹+UN×m¡¤»Ç@¼‹ŽÛg :1$©¤PJá +ÙœYª<Ö’Æ‹WúÑ_¸æ8ˆm«³°ÏUÒÌÇ©4D…Tvp9“åðM,ñð¡kbÎ;<•á Ü[Ö7#Vñ»ÍÝi¼Ô `Ô`qå`ð©›lƒÑã‡F ѧ4Óç…ì¯^…¤$²~V$×Ý\[,mfI/V X!äÇ™g°yéÊä×Åœúì*©¥¸ûBT¬ÀBŠŸW±ãzÒ÷óÚâ«iþefÕ¸a‘»þâÍêÏÿî/.ÏÅ#î²UK†àþ¨ž¥î‡d1¯Æ.q5sñ+–Þèäßã¿L“^Y‰”0%BSiy!¬¥ú¸Ð?iN°Iô©X’šu£7ГjTI"rï­¿Z‹,Ý-ZÏïXA¦Õ´–)DDp‚e5ÝõߢÄ‹ÆÌé­fàÝ­Ìù¼›àôôs]2·ÅåΗ¬+ÈÄ)ˆÚž‹Òê<e5-d¦Õ Ãy=¶Ž÷hû’üÞ>î~óÆÉ}§j(•ƒâN×57b0ª9¼¨DãKTD%¢Aèö…GÇg%H{ ‰×ÆE^ÚÕ5L‘ëÄQòùdó.Â"‡0cÃ3€Nõ¸S½à¼ÆXæŠÕW÷ÂF¨Îýʈç¾û`#IÛ–‚Æèî½a\l¬ñbjÄ=œM¦½Ð¹ePvOã°‹"glƒùu*/@Kô¦XòdRÓ9ÍÍ#Ú÷™ïEÎ Ž Ô”[³Ž]rÑ|6ÇQÓ¶rlyyV£CøG§ŒR÷C+—–æ¸i>üØÍ`+ˆê0E¦`™¡ZW÷áZqPÖwßå;E¢d2,-u(ËX˜ˆ¬Â@:]94;Œ<å 2(oii©#ã³ XaÍØ_¦ÀÆŠ€É 9Õ³¸e±èPŸÒèå ðaåÇdù´ž8ÔW'gïZgûÄYôZûûg½“³ÞñÁ¡p¬ùÚÊèâ”ÜþHá™o¾©ýeZçAL—S2ˆÊŠÊ˜)X*MÚŠÉ þÌɦ|. ‚ÑFrÖnW÷¸e„!Mº ªkäe²;S¡{ÉÝÿ[-K_KÆŠæa A,!·žpº•3û÷8Õ‹=91 «×ñ®eÿü%RÓ<§»9Â’ëæ¼’yÙ…˜â¬ET)ŠÓúbÉ0Í!Ò—цrXÀBE¢iVQ¶…©ú{¼Ës‹™ÀÔÿeøÍ7·²V*Jºö™;îa€¾ù Uj$êã²aþL_ïØi³áåÛ‡P¾÷2àÛf2èÝ¥¬rRj’Pý­€zîÀ1áî½ÎßzÝ“ÞîáÉÞ\ U8DkÖ7$ZF>SúÂß«Œ‘¡f {,›ˆÊv}±£ºVÔò<àHΠ`TÕåÀ4ý _¦µ—ªsÈga ü¶ëÍîÂÕós´¸ý Œªö¥×R.m9ËÆñè—M¤T¤É£A 9åuX§¢9 –?™‡ÝbMŠR#µÎ~ìít{§m¢P»?h僴Œ“Ò™¢û@¨6Î¥4 ·[»‡íÞþAgï°upd¤4\Zƒ:½ÇßÍà¢7t£g»‚ó`Ê¢ûù• ®ÕI*Ûºµ¶‰^ôf>ÁˆÜÞ‚´UR)ð-$ˆý¨Z‡‡¿dÆ£¸9 Z(p¡œä Á8¬ÈìBÇj‰¶ŠÉºã”)ÝŠƒ±Öñµ¤€t¼›?—d—²-F§ó: .[–d¦qÞ>É¡#‡žR¨®j~8oĺql¼”›š{*éú—˜N;ÒNnä9⃆æÜ}¦«zç`AúRZåhB€Cu#&9ˆ ––,ÕäKk}iic=W—Ü°o@@&0MŸ-pÅò`lûðËæD‘Þ4çw+Ñ¡KSG­Ÿið»¿tÛ e3æPukÛ:l½n÷Ž"œÈAy Â{[Š¨ùVîžöÞœíwþúÿxsÁĪ…š0¹Äì¿°6Öë+¹…Mþš”XRéuëåKä-X|Õ¾nžûˆY¤iíÓr •Üq_zÄ‘Lζµ™!)F7õ~P]]+ïªä_Ú¶Ö·JdšÌh)’Á”ô_£U¯.¡ Þ=jˆ]&¨¿>k¿=l—¢un¤vqnÓWnR£g*È Òª­Ž.Z7÷xûçÓö^·ö M¼=öøžEM×T_Š—aôùà悽“x0‡ô\z±•Ûuj¬k7åd±Zšš1_)É6a³£ŠÐ Þ•»FÑ8ÍQ×ÊÛý«µJÜy2?sÚW”^Þsr¡y *ÐЄhÏsìPhí›dË@ц”µË´/ÒÿBaÖH, LRëd 1Äa ÝÞhÐóó0ª†Ù5Tc˜+q¥,Eg•d5qWgGÑl"†ÊÅ’hÇ„Y6Ïé´‚&äzE&$ÙÐŽk‰ReY”T\Tñ,)~¨å¸Në;‘NWµºÂBéÁœ‘Y Iýk¡ˆy Àt\¼|\iN¨*ÏY¥²*€vjœÝPínOŸ­=&®>Ûò4Û@e“ )´½+û&²p°¨ œïVºÌSËj‚™¯øäÌÒcgSá/#}™“mTKó6Jå ô¼"Ûÿz~ž,?;QIǾ©V®¤Ç”¦hS2Çhq™[0òùy¨±r«²• 5U›Ä<Ä66Ì•£v‹òô¨,á´´\Ô(-ZoÞGÚH­Êw\ºÝd•oIÞ*œ¬fFÙñlg”ê¶ÜVuB͆*e øQláøÎßxpÁ¶¯j$ ql“ÌPOOêA3¹Æåšq è±Õ°ÖL ¹ìÅH¦™­§XÞ‚ß}gUƒß4¯#csJÉÛÞç¬TÙÎÎj?gw 0juϳª¹i™jNÑÀ©qœZ¦yHM4ò’»î?ë%œK™ôOa=·•§iãÓ2½hA™(#¢¹¬±Î½>µš|öN›#Ëêók“Öp(›³Ä¾¤ÒøPöã;'E”Ð:\ºÃYÆ°ÕŠˆ µ#N*$1 ŒÜÉŠì»,„.[¹}h¥Ä¯Z{z‹R4ÓDä@..;¿1XÙ’µÇ;Adµ ‹¬WrržZXÔË ÊŽ»®d1­v¹I!~*œ‚‡­²F’®Â ã\µÈn@' \t†”¸$mã ÷×_­o2p«R‹VÔ³&€HªÉÍf–sÑé5Mþ—­ê‡² dšVÙ’i^NÇqÁHƒ]´”¶¾tB8X<ß0P`¤œ†w`p׿ ¼K\"RP¾?öL°w¹Ú´ªó™Ç¾â¹? ò~ÏQ¶)˜†ôtEóvƲðüQŸ“­ÂšGÑš³zúœ$òÝr^^gzVa]x+‹bØT›­(ÑQqc‹=uI.D³ôÃAÈÂVcgU  ‰Ñ|ñXwá8À:›ôo4Ô‡VM¯ƒ•Ô™iÖKku¡ìömêi@¬0 ‚á¹\Qóâï×M$Í΢_tP.›l1»ì‚Vá U•ì.û}ÚYÀó«ï»ìœŠŠ”T%î”F3›oõ‰6Šq´ìµ+µÿto®à/êÊ)íU4õ\¾  1 T=¡z N˜8Ðö¸íEAYUìÚ½påšW2Ô7Êô©4¼¾;j–dlI2`ÃÓo@Š‡ä¸õ½-Ï&!ùF‹~̱ô2l_ °äž gPz™ìîò£xQ#¤8;Ý"¹=të!x)þ¯¨$ÍÛò/[wíË}¨Hù±¿aÇP\—ÜrU˜ÑÜqªó“sëà¾Â Í3XȬzõJ&ø»mëçÏð<}¶Æ•eÉ…ÞW­Ô7¿a[ Œ{„4­0®ã-î‡^é>úÍ‹ð9^ä¾Ò £Ð ²\Ʀæ -În<·?STšëÝýŸ›ëCQ—X$Å㟇ùÕʛäÕ*£ˆŒ¸ŸäI5)E"¯‘Ùt$ È:ãë‘u°¹¡Ïç5 `QØ“Êq²´ªÍ[V[°fQTœcišÍd…8œ“úa09BÊ]o‘ÚešWmH“\Y†¼Æ3âø#†\XAé#Z"åh1µyfF–G`}wšÌJoQ%z1¡›Æm™/ ÂNº& Þ:j¢ž¡X¹BŽ{C¤7ЯImèü*§uSÛkÝ[É’ÐWíP†³©¶×À ä*dûè~Ša€ŠÇ°ª\Jò *©ÕhÍåŠy•zzäÄ=Ñà €jµßò]M!M3ä’#2ãòÁëæöZ¶—$ueøz¼÷ =xªè1ê¯ã©Ä!†Õp®ÙQ1!I/Žõid4Ÿ+7õ:ºë²•]ŸÀÜó4"AbFQMMê¹ãíW?µŸ'š p³ @DøäÆêÛC þµÍŠïZgǵÅ7ÊA€«¬ÅœáskŸà›õrLÎæz¦2P½®Ö³·&Õ¨ŒCtc榕w.¯6ZÝ2Ìn2ZÜãL?¼ d Çæ[6Øø(rB‡Ý‡_Ø2¶¾êÈ?¥ï©"ëAÆœ"ƒÍÑÿåtY2×#ÇJ‘ûF‚ठžùX0]¤†°L¢‡' ‹\8úLÒº™;˜êµ#ÃI”V‚'¨ÆWî5ÆøûH•PÈ*tÎ=g w—á N9°å“¼¾Ã>b!:,[Œ Û#”®ÆqÇTíÔ³ájd¬yˆ t‰l™' ÚûʱÂGX.ãBý¹ëy|¼«u êdž× ªœVWB N1 ˜áÓpÕY¤x×LÏ,ÝEŒâµãïu<5(¸"R#íú™fûNÚ2Š f¡‰‚koV… ù,P¦ÌÎ:‰hl7‰ô‡26‘,øž ¦ëDPQÈb$_ÂN–e8,Nì8f×~]í«…JÊÂyD•WöM³¾Prtà ªÎ¼ª±xîÐc.VçR~ÖÒANøÆѹ1x¿ïƒß9ÓXgTéžPH³„Ì;Þ.;Ç)ð3ÚÌàL@˜ ˜Ù"¸‚I8‚,×U<\O›Ì¤ª&M¾ÉŸ‡ eà%Y d˜S¶ðÙA’ó \*m‡*Ï5ü­ÜÕŒ‚'ߦ|ËLJ¡‚Û 2ÔøÍ£¬rS 5M)]0Nn—¹ªmˆ²Ø=oýe®Î>Þ¿í$¤Œá‚‚“Ñ Ÿ–úñ¸¦¸%jY¾Eµ´²\i-)eÛß U Ài˜:Tiýtr°ßëœt{gm‘­uM¥ZÚEPÍ`ƒSv¼N.õ}‚¢Uæê‰?u_ñ{‘c‡ðX(öï4ÂÂpÒ%ÖE™½*4å…ð¼"|ê¡Siÿö#ÙœB=é†ïÌ\Ñ2œ”sßÒýLu ýÕþÈ€Y=ÜAIMl±¦»¯¬ÚiG¤†³ =uõê¦+[½šÀ¥¯OÎÚ½“W¯z§­×mèWóØTø—TMͲߥ)Á4 ™§™˜0Ê3¥ðÜ }ؽqGc'½Ijâõ«q%zÑ+g¾Û­¼ßAXž‡'X"Þ]™öØL”-82,¼êÑvñ²GrÞÂ'B¦Æ¹¦øw¨_˜zù¬eÉç…ä$Ïuµ™ƒü¨fa…­ÄRxÖ¿Û"á$ Ÿž=Y'©4‡>-+hQ[>íƒ6vÍöJ]‰`¢A€3%럱GÕ§„9Wjâ€`ø1áÊãè0ï>{këñ%›"CýsæàVyro–`ñfr(bqÐ&…ï7õö´–·ÚU¥á˜ÍוË5Ô¿ŒÃV_ÝSFÓÔéHà z‚ woxÖ«ÌBN¥Òî•ú*W8€ý!©ši`ðò¥µ™S¬‰NëJù-JæðÁŒ¥ €Î¡TY}‰n–™Õ@Ãjv¬(Àö…vrÚVVösøÅæ=v!¯g&kµÂÔ0»gSü«áõ†¤P眹⨴ü›’Þ‚iàð zx£˜µ°>pD¬5Aé€1EÏ´`¢ÈˆŸv ËG?cY]˜p*VU‹}î¨S⮣Ìùà%'bÙ«¦÷‹+ ‰( ðõÒ ]s¦}Ž[¦zjá_É*y£Ú—é‘¿þgbƒ2ÎÀl+e‘Rë>¾(ñ@ô¯ãì–ØŽÄç%ÎÜŒ¢öÈNå¿üÙ2cÌt®øLˆÐ§}©K»¤ª‡ó”ószÜ»evðÅv–Hš%³Æ}_„ÄM>­p®ªyfáú4•%~ª4¦OÙMÜ™Ìyéê]Ù¡ß‹f$×üñjµ;¼ŒO5”¤ÝEx6-„©ÂŒ‹·áªàhH”ø¢qfVU%¡;P>W³¡e½bÞÙ5Ÿ•°D„ ÊL¬»*µ´Û¢.ÇêÑ ™Îš8èû—|ŠÊXT´ '?Ê”â™J®¬BéI›lU¥|4+^žOŒ&žhÚ¯ÄÖ2!PFUé%ß‘ãÃÿ(®AŒw†õûàð{J·K9!¢ÌÐbÜŸlÊ`èMÊÆ7ù€»?Õ1St¹:ùS¡Ú’:UÙ¤Þ”×%´r~¦¸S'n,f¹¾•p0‰@SU•}IÄy+!\ãÖ…A³ÆÊükktÅšO™YWÍDªÝ£.»#MqÕ9‡ŸQ¾ä`õ§%GEþ‡­-K’æØaiTDÌ÷!_'éOS§pô-wÎ¥íXúS-KßciC*ròB:¡U†.æù²ÊùÂœÇz…Cˆ\ØAš…òç¢æ*c”à_rÐýMº)*š69ÅN'›ùöDŸ¹úÛ˜•Äâ~³\žÒ79Á,9ÐÏ"a#Y‡9“¾§xq+üSUUÒ Ú/•ÈõoR˯;3‰ìÿLm·¹‡…ÉÁ‰Êœ·|ÊCŽÊ·¬w}ÉY|²4|Êb tªLÕÝ~Ý—´‚ð•RÀï¾3š{™Ÿªüß”¸ÙJF% M «\CTUÑcÃç[œ À&×ÇÛ{]Üw¯çËå¾ØMkrÚ=ƒ²ª’ qÍÄ[/³_棺d`ÙS<(èøô§ùQ*÷FŒózâlG›ô§Ê²MíêF¹ÏÙÒ8šHðŒÅçqÎÏ{Y|]Ó~s\‰vœvoWi™‰ÔÔàÞµ<ÏNB®¼:¤àÓóþB+ÚÓY.op’îõèV5.ß«×Ê3Qv‚ÅßZ)‚HÁ%Ã"To Dèѵ4 pÚªÄk*÷V…©“ªýå-d¥€™†þˬî$ͼÅg<·0˜ÍjÍúcH~å¢_©Ù×B•Ÿ¬ŠƒÊ^CÏMsÅÉ·š¬R[·D0Ò¢ê+ßd»8õÓÖÑr_FF6KWtpJçéëQe”þ¯ÊíP0;ÓÜÒ<Âõ,ÑÌKÜw](ß´1©âì8Ïa—Í/T: šCŸw‰0t«4íuƒ<6nåsô¿Š†Ê ŸæätÆÆ»¢æñob>â„nDÂöÌ QÌ0Âà*7«l{>œ¯Ú(íûËíR…Ÿq‘€R¾sÅNæÌ™:ì¾É°”!’-lL‡ß‹U“¶Xƒ9ES¹Œ]äj{§gCbÀ¬Evk[Yôï1ŒÊ<¨Aù6kèõ‚5 S„=ž:!ç¢ nÎófÒ« ³ä{+ŒŠÀšìRðÚº†U °S–ö+•—ç‚òp1ãlQ÷{˜ÄòeWίR§&p7 ã/Ç]]ÓôÐ0sa†Iø% ÔÈN ª·þ ›í Ã`jEíË^´F\vP ƒ9ƒ˜EˆPSYk g!Çg³âÐæôr¨9‘« ý ãbPUU†jvæ« Ù÷•5žçñMÓ[RÓw8ð8›@…Øi±Èϯ÷*>Ù{øPÖæ;k£^ð–‘oX£v¾#96,F}¥±Œg>&;*=ë¢¯Ý 63hŽ…n©£ƒã^Ek^U÷;³™G~îdsSìùLEˆÀ•^ÝNë­ß­¢ñݲUYôTs7Ë Ó°f«º œ¦hà{xÇRU6¢~å<$!Á›hc¦Ä+«:K?|8Ydg0†Ô0Ç<«Š›Ïa'?Ïm˜µ~ÊÓÉüÆå*^Ö9 ÏŽá¢|Y«–Kï“ß宨Ù0ŒÃáhs~hu ;tú³Ñ7êùÈ¥\B3ÿíþ­}v’q­>¯¯Ÿï=µŸ«À™ÅìK¤Ï)ÿžGnáƒMƒ´r¹iûV@RÊÝÛO°üòƒ«»M‚y¿·BÐûü5_5«RH·Êäï;H{÷‘ô¾XÊûB OÝo|ž^ß•«3ÚöyYKÀU6ÐóDÅr1ÇÞwÊÙCAÜásUþ6µC{âÀ†Ì¯ \|Òr'ì7Ñ›¿&zªÜUC5@¡¬Eðú¼°PÜP©±ÐB"Æ•Y0 Ú &¤þæ2~5/ªÑ¶ø´ªU*Œs6÷æ 8ÙHË3¾¶ÂÂI(A•£QYwÓo(lÆ“h™~•¡t†³è ° R‚98[%Î|04ôŒzK³gôè³é<‚ZØ?è°׃㽳öQû¸Û:\Èî„Ö¼tCxD¦êÂø†]9ºàËÙ)V¾0cmº“X€gCèqeDyôY£”Þ¤Õ\³>1D00Ÿ†´ù”;OL–`lši‹cP^=¾‹ëp ÊÅw®p¬-Ñ ýRf<•dÉ8q½@)¦7‰åBpaë°!÷7‹¾`š–{Âsý& -ª´,1)ãiBÍ-ºæZÑA#K§¹hK+õ¼ù¯hص—º"'Î Ò5°°yâí_$Å/™ª ‚Œ3˜Å0G÷©m¢©x//VpÁ…‘tUòÔ+ãB‘qgݸµÂAxL›_m5›8 H%'6ò€é¼ï¸£q?#Ók€.ˆÈÀìRÜ©Ú¡czaì;bq«¡@`œbN›³B(µN;©K)[d\|XR®…*=BäܪgÚ †g†ÛkßF¨r i8ciížÐ*-Î5à`È˨™€6K¶o(¥þš:à‡Ú- úì‹8ñà vjÚó–†ÙÄ’ÍǶ'G×úJ’i~Mq_†Gý#¡Ì2`ËV7æèÊ|¹ÄöG¬B…ÕÐ ˆoe­¹î-öÎÛ$%$ÇTõPG€ÿÖÛ‰?Ô±ƒ»¦$ gÄ,ó\§¢¸o"œ“cG7ìF+ëwy~ †—^ëìõMR½©Œ4›*W .wýeºh„å0xòÏ wB!ó]AÍóW’?ØÕ×2ç¸+¹ÍqZÒý{û4!¹áNîL²zÆ¢““¼“ZîZyáVyι‰85©ðgr—«ì÷¸Æ>ÿ ûçò‰¤%:%SÙÌBoéu¥9ŽìòCJÀÝ:¹ºÌäÜ4åæP7e²¤ùŠJ|»ÝÑ7[Ó=J¹VX·¼(]®P²·êP•‡©ôVñAœÜÛdÏÎì‘F¬ÅA/‚a±ºš/FÊCd2B 2é̇i³é-2m”€BvÌ÷*[§O•ø(û À•ÌÓCMŠ×½ úÿyáOwû74ž47›ë+8Œ>wiwØ“?}å«ôïñãMü®=y´jþâqsýÑæŸÖÖ767Öo¬­®ýiummõÉ£?Yú¿ôO³šüþù÷€æô&$~8¶jƒºµöìÙ³Æ:­ L5Îh³¿±‰¶øƒ&3Æœ‘/¡9á%xà´û»o:ÖQ«Û>;hͱNÏN~:Øoï[­½.[ïºoˆèœ¾í¶±ŽOp®xÖ:îþbµ樻m¸V<9³ŽNÚû¸)qü ö#êku­_NÞžY'³ƒÎÒì©NÀ+à‹Ñàç¨Ë#öQŬ:.Eà‚O]nJžPQ¹ìDüæ,$ª@| Ò.aÏ,Le—Ì Ÿ¸¸: €ÄNY¡Câ³—`ê­G¦P¤Cô±¾ t¼ã¤¼?cv(^ÜõeiÕãeªëŽ ¶JKc~sWvD5%­°ùùÀ› uìõ´êA²ðRQsaáÁðâ ™2c@R̞Żº‚Þ7 †3j8A®/e:þgĘ`,¿OÌIî'Éš>yb„­C°C¬!áíí'b˜›:‹`&ô<¤²žÇu>ñ…uü¬†#ô"rZµ¾³ú>ëÎx꾓çöm¡;èÓhYäªF—d‘^ø`’í`uI®p±ÈT¢¯È«Z(-Ï +p’àó¥s(ç'†/¶Èq&‘èç.Ð.&À­<»‰ŸÜ«`_<ê6)W•Ü~h‡ X»ãY¤Â°ëºY¤ÕÝH/ÀÐÜÌB%ÑñeU%P%¹Qê5mJà_ЃcÂÇ-ØZ춺'G{ÞÉi‡2tÞîîœuˆ¸ïLì›>¬•í¤¨“Œ:¶ÕBúe¡µGâ+Uß:zuØzÚÖds¡uÔÛ;=ÕßþÎ$²qðm-¦=u¶¾¢öC’…ƒÌw)÷mMzŽŽ÷ö¸NŽÀmÄÒº¤y…v,Ê»{‚m 5 A´›……öÏݳT‚] ¼wØ¥ :k´1,Õ>n-î·y Ó‹Qñ#ö±]ÐÅ_y§õñ¾>k¥²-tÛ.O U<üswD§™ú¶F½á9HÒ,½ýV·…ðGëÆhÐœ0 {Ö!ÃÕ =7ô¿… ˆY¡OTʳ6:ǯÛ=âZšˆSˆÁéu·ï¡ƒ´·I_¡üƒ†cÆfRKÊʲÑLó‰Ps júˆ(¦Gž”h6‰èyØõ&2HÉáßó{Ø$—é‘ZzÁÔñùù£*!Ül””؃qoèLéÃD7+×ü^¨Ÿ^£Q dñ«žê¬Ô£.—Ó{©ú¦ƒP,Îí:Yt0  ¶l/iOñêI]*^’¢xÖï!Æ—°ö°Ç0ÙÓEã›éPF–YÛçV Wã¡í„Jyß aTsÍ«þ-`½ßo¬óu»Ö~§¸f´¤W®O9¤S‘^u*y:¯ÐT ‚u›<%ê}6Åé UC5ì·Î¨ù¹íÚ§j õñ†ºó5s3f2ÿ¢é£ÖíÞ.¬Íi3ž¾)­®O0I”:NjAÉ|¸·²’ç¾÷I-–*˜–/G¾Œ{ý€GÉÆÉ à†+ék¦wÇmDXH±b«sô…Õö¢›ˆÀ;jv’w ýÊŠíR÷;ÌÕ9Æ©†°:ìmA“c\_fÊäÏ®eˆ¾ÑFCax>ó%/ß'¡<Îðy:µ˜¦ý}P$¥hF;„ÍNÔéýí1Ó¾~3æ€?¥•í·OÛÇûíã=F¸i•Fsûš>}[c„Öó†ÌÉÈÖ­†SÃõÏkíùÆóU«á –q`€…Kæ³ìÚ7{‘M2wèP­ àl͈S£©z ¾êhd‘$ùN܆i³X4óƒhÓH[`|ñð!-žÂPyÜÀ€³wzø¶ƒÿ* Ä`:(!x·5K˜¿‡|ã…9y4P9uåÙiRɃA&=„æJB´2éÉÊݾD Tk Źõ“ ¾<[ļ…³p†Ô-†Çú®å(Ï@((ΉRoY -ðù WŠD«/°:ÙÕ¯ßJ,€p¦<³ÑØâ a°œ[ÄmC§êÙW¢îEÈ^­•c2DtfŒ™ø‡ƒQMd®¦„ok„ Q¿°^~»cm‰Cç[ê’ÒÄjP–-êÍ%— ½$‰Ä¨á þ˜e£ð_ó3áÆú÷€u:!rš¦„2â¬M;)⊕¹ †‹/1Q\³;\\ë–·-}ëÍéÊÛŸÅCJèh‹M[y°°«þôÇ¿¯þ/9ÿKõJú}ÏÿÖ×=~lœÿ­óùßÚêç¿Ç¿e,—;\kПMÄŸ0¸¦ !‰ Z¶,= TÎ*¿ÎY ŒÕî|(-ñq µôõγýø‚|çèëœRU_v$ȶZ´MXDÁEm‰ÙR3nhÙAB"|Ô½ˆ½RóA–°Ô-°Sí$A>e¼ÎT Y2‹tØ‹í%N^íúÍ/´sV’!¼ Âce¥~ÚEDëÔ«~Æö¯"Þ¦òtÖTƒ¹˜á¥1*ÚL×D_AÖÂù¨ËY›Q-¸êg\°å@Á¹”…œƒ+KßÏÿvøòÅ.³¯ƒOÖKbå~>ÙýZ§­a+¦£N—N7«§…ó=´Òy¨žs(…a|.sñ«ÜDçç‘“xtS§Ä_M=VûÓCîÊ$E``*Ùþ’롋ߤùO‚¢’ 6³¬ Ó‚ÊJœ0f¦À²sí0„ÏyõÃ<Ùê¨lz=e#ðHwEª‚¡é\®L8\®Y}/*»¤ð?•ØŠ%M°Ð{=×YÅ9ÁMŽ¸"½‡ &bVAc¦l`E wÓÄ>„Ȧ†¶flu%Q#.Öv(:ûOí„Õ¨‚ï§Ó)…‰¡Ï´;UÅ*ïfÒü2ÜW¾Ë¶0›ú¦ï\†`$=çµ*VQ_W˜&ïþ™½C5­›þwç±ÍDDy{¼OìßH4y>MÕ œósÎ¥å³l´â›±æœüñ<æø¶.ÕõkÛ¼=p׸dWe.æß7“­È0éÆÆÆ5+ Á™€Ôåúºš„ݾ…Ù|ëshö°‡Xr“;ðbäaOõqÎ >åXÌâCŇs¤¸”¿ œ Y+w¬$… Zˆ¥ÐñœKXá«ë«iÌ·‚›a8)!fE(»vßžÅyVGß6»…-]ý< ç˜Oæ2…PLäXÆÁþŽ¼iŽ®g™©Lð„RP1±ÏŽ™úü%|c)²¬âh*X‚ùü€Ü†ÌñA|¹'ÏÄp4ëOu3 nÌ ¸IÑ{ùý°PàéRzËÕÀk™º6Dïkõß@!nÇ—š\ü"áòŪ2íÊÊ …*ÉÁ뽆ÊršPèA=í‚A *HB¡ô”^r‹_[òý2৩œL°U•¾úWEþÕ|Á…Oxø ”ý•L3&„²)ßr‹Ê°©àÉ»NoÿäÝñÂ<‘Ûñî®{Ñ´–‘0 ¨|‘fæ¶ûA“̾UĘ̈'ٌʭ†2j(tâŽ:ñò7v"½J¦²‘d>«H­E‘j X_ ÏQäDÅ3RX(?_¼I¨ŽÁÊê{«Í|Uʉ¢ë_N5¬6­;«Ë4™†j‘ÏÄ@‚ÜÃóÄ ß¯Ý‘h¦òU!^TiºXMßbÀÀ|h„ùp¢ ‚Ž9b¯f~|3ÍxÔˆ³¶%°«Ä L ´ôLpMì^~/¸ZÖv%ìHÎf–ºüÍQB“ì³¢(«š’ªöÌK.²è¶\hÈ9:4ß0oŠš÷Vh¥ 8‡qXÈoڭÃ×Çp¢‚Cåù½y„ô^¸ÆP%”6Ë9d¸‡o”ÿBà*‚H»ÛwÔI•…+_‘¢ԇl¥ípÙø”= Ø1Ö0 ¥]fæø˜˜è(½­.è—åãçÙª·“"Þz½¬ò»ÍRÙ”¨h‰ Û‡ªfT§Û˜±!‚2K0™4^ÜóædÛP¶¤µý_Ž[07>U3ËaŠÚ:G'ÁbÛŸñíbׇußð¯É…]s¤"Ÿ µ‘©kEÀ7&ï^Ÿ¢|gE\ÇXyo2 +Þ<φ² d>פïýýN¯‹»M%NÂØÓƒd9l¿î¾y^é¬;ecS½qÜÎ\µY…/«\ó»Ý£Öé}›ß¶Þœa|'•¯&Õ ¶N}^$mC£œËÁÜ·Ž‡QyMU²f½ vŒ;ò7ôÏа©GYz®zŽÓ ïÔd~…Ù<=;Ù{¾PíaZŽg•ó•¡3p§cÌ~Ê\[‚Ïwò‰Ûùˆ\A†gmätv‹z¡¢ª;Œ¨}¦ÌºçÀˆéA6ÀË9^XÓ굀 i8Q:Ðdý¯±*\æ•"¬<ê?ÕK[•KÜÜÖû˜Vrgÿ• =½}jùY½+̆Å>‘öÎt´áZ43USSú•œØÖŠÕ<S‘Y¸DNœ+WòÓÐáx‘ZŠ£Mªˆš=§UW=p9š7TåK‡S¾àU‚—-92ÕªLÝC]úaZý²®²nªšî¢ë¨ÕZ1Õ­$†[m >;’ô¹“Dñÿk³dÌN Ò.|^ø/´ÿk½í¾99ëü»Lãªíÿ6Ö=ÞÈùÿX][ÛøÃþï÷ø§åxg‹cg2eS ›ˆp{ÎpÄN9ÅT¯P*Æzd‡}{dhJš m;$–8››Ïã°QèdîZâ^ŒöÉ@{¬é? Fl„¿EÔ,†¹3.s²Ó5+€ñXª> "‹#D@ F‹Í……7îÉÙ/V›Zš7îƒêënZ•såpÜÛK×¹‡J³爔VŒˆ1´@A¼dª{Rû=àl}±â;fUá—ÎÀe?@¯‚™?ä lÜ7ÆMésÇÇm'äLUçR}k„;l4†nÙdr,××î2u/ÙÑÃÌo°“üè†D2¾À²€ïg³(rû"¸”ŒxÚMà+]Uæ\Ûìx×ñM Z°ëÙEØôØÌôÚ¾$PâÊü‘z.¯îbõ{“Føigr“L”$„Ö)±œA„}1µÏwˆ/¦µo†3#Kgl8¿}¡ŸZ?íp›f6Ç:ñÜK›Ú ð››w7"LGýoZ{a\`ÚFƒ߸Úã¤û˜Û7Ñ =§Çvé„Ó`ªf‚:th•‡4Ñh _v¼ä‹ª_iWü`;ûÂþ¸ÑÞ¡«´nÀ7ô^Ø͘Ÿv¢ÁøÊq?5ƒp¤r¹ÖiàÍ"ûT=e¦™>Z{ÎÐõ|05ÀãÁ‚ã4g“þ@ò]Ñ2õñ»ã81}'¼p<ç&“ïuhߨ‘]5 »ÝìØþ 9švšé ­-rMs ®R —šÓ•|lŽùC¡óWÖÑàG×÷ÐàFÌZ»¦-œgkaˆæyˆüñ8 <ó:²z1ÂO®7qÀ÷Uq3=t ÜÂx¡ºÖ›YÏ|¢·¦~ÛÏâæ9DH+°º¡;ó>ѤØü¾ãš„°f”!cyve”üÒìÓËŽé5íprÓœ¸²Evh½CˆÛÐ#²Š¼ôe‡g6"`Ý¥šBàö—ì‹þÐ9çGÚ©|ÝŒ•rá¡ãÚô÷EŸßvâ‹©‰vvi$­&a×H°Ã‹> fêŽ<‡&"l΢QÔ—’q/ˆã4‰0(ÑÕ`ç*ðÎ1ri‹rÐ| Ä,WD¨Ñ†Ÿ‹§ìY¨š#tøAcp5 7å°”ë#Z¡M `ë…þД;ö¤:²ûw¦¨=DlU©•Þ úä}gÄ ÝØäÈê:V‡(ÎûYípXÑ\JûHs„ÿ(;ðѼÅT¹h½iqž~°C5znð©™à•]Â@Xóý&ÑÓ³€æ™òÑ·/V”CçPˉøÓˆðkÅó†óÂ~ÄÇÛÎGšßf ›úo h‹t•.ÓEÏubd¦·þ{åôÕ¤ ¹tf||÷¢ß—'B­!-[84ëÙ Öè÷ùa‡ý64Å‹Ñì‘cVIãÜ#4ŠáNŒs°'PM@—Æ#XA²¾µô}bO_\Óâ¢í‹fûIÞCç ùú±‡‡ÇÑë… á†íM¡˜K/;à•5drê#ŸáÐù`"?Êë„Cùà ÌD¥¦ºªTUD&ò ÙºàÃÅC¸X¡ZØÕÊ΀6fLÌMs£ïÒðÎoȲç`··‡3*XØÚt€¯ý’–}‡knö u‘¨âVî+ªK6-ÁÎÈ!F®É#WA•ÎyäâÎ &ÁÍÎà†æ–ýBË€öÆ2ÄÖ Å ð<Ü‘›Lêjƒ†2Â$ÓÎؽÙðŠˆÇ¸)ˆ'¼t4¤r‘‹öC@àÊð:ÐßšÕ7sÚӇģ3¶’†ˆª4½™™¡;¶õ>¯ðm‡ƒwßCÜÞ‰"@µv¬‹çç$ØççTJ÷"˜ŽfÈß8Dfã&­†Oµ©3˜<²Ç®ClÉ€ä ~ÌŒ*´ÝA˾M8‡ÐæE茞‚ õf4q¼iöm×êØ$N¾ˆèïÐvw†Á¨éúñ`æ2.fÑÇ)²ú 4=Ž•§Â†A¾W ¡¸côbÈü’ï8\2AQ(¹:3L­O¤žvœ©-(_õú¬É|/"ªšØÔó™«É;åòÌ5ÄK/ì1ÞêÁ{æÎ=†ÿ ™C& ¢NS2$Ùí@WFRà߉c¦Wxر£ã#ôÛ /š¹÷BçßCyÈòäœåGâ¾Ñ7Ð vþÅ—îwFA0ªéÕ⼇¸ðbØ$þ™H©§É6¥¹C«uÃŒý°iãø l:;ÖÉ»apå{{?Ú¡ÿ†²ÇTêŒÄ¾1Énè‰;löÕûÎxš´OÙhׂžÃõžhºf2M7¸»á¿;ö%äk3ýuÈágHxºéö'fú¡ø¼=y¨Bå’¨ƒÅššÉÿõÀÿ™YHêÉp¨>œ:¸ívA:ü8ݹ <ÿ¦9ø¤³Ÿºƒ Úþ”MwÂK¢B5Πl²ÑùK0…Ù#£{Óüø\¢ˆã _™‹ú†XgL| gÌï´…ø]šCžš0Ú®œ! ö†ä± IŽDOH?iGY‹vÊÑ«Ž]OøŽñtg44G$(K‡otÁ• AÕ¡>ìƒ8ˆÆöTÁ<}IrïŽ×c9VO@ì´L*—Kû AÁ/ì Žê^Œ#zÜ™‘ì»ð „ÊÔy£±Kûù Ú» Íß…CÓÆ„%É7ëcn”zhãÊ{S½ïPÁó)ÐYuˆÌ JŸK""iØ$³sÄD“7ûm¦SwFh.¶!­ËÓÎ4 Λ©dŒ\Œ£õ‚¶Á. õd(Öcûò²ñ ·wÁÏ;¶GŒ;eñáí‚*Ø”÷RÔ¢¢âbÎ"ínúÑ1î*ÑMø@ôî%Iª>úÁ¶§XfK?Ò±Âì’OÖñX=‰Ò€všs~NØÂ1A2}ë˜H‚òôÒôñ²#Ï¡3ßȃ&Пõ­±\ð˜õ3ý„£#kb %ì|‘ÆHdÒLß@\ù™œ;ºÀžJ®úÁ‰àÃ÷.oÛΔö ¯AøÑ(þ„5¶Þ¯ªà“Ê} “P›µGºßÈutN|?0ÊÇI¸3a_؉ccÕw·ñ ¢áígþˆÞˆti¤ÞǧkOefÔ`€„) ùèNšõ¶sÕw&Qà‰FÜÈí·È(„rª“7!ß$…#«ô…‹¢\øa=&Üç0Ë]‚}ž¸Ãk%OF0ÉÖ âO”'¦CEÉ"®˜¥èóïÑlàÙ¹œaOÎI"‘lð„‘Ž!É¢!c›Äl@üìˆV„$º+´Ç0¼¹rlVþï쬑V_ËÕ.´¦ÄÒà¾Í…Oø¡£ÛômvEµKßB?ªO;,ïþsæ¦ÕHVÞ·éëixnçã¿;>1Êž^Û‹¬°¦¡!¸6ѹiÀËL é{sÄßCþ\ þ?’$×%N’&ý"Æï“Õ’<ŸHù(Øÿ‚v°éº7A ˜Pž™EÔ¢¾ —Ó‹Þ$õÌÆDP¬ßÀl»üÛ¼Pß }Ø tüÈܵg Û±=Û!F, é`Ðt›³F\ÜZʤÌ›c@™ î,âß=Œ½¨9ö‚T¼úѹ$,„7 fô³3œ–Š‡’£ë\Q«ÎÕÅ|U:qƒÅu^PÉðŽ¸.UÐËÕŽ930þøщ]b(›´é€f¢Š»ˆ.mÄeÙqÏ©ûÄùe%4H@:Ä¡±´«Çè¼°~$1Þê’`s%ô_f«Ù¾“ºã³7Tš Ëw†çMH:T¯?jM„äö¥G@¨¶=kiýâjuˆ°}ÚÅôN] SôB²#É8†>ýÊ×qH¸„DwàaŽêÎéqñ 'Òö!ô¦>Õ€u˜·óz“Ú!P+R9$X 1Å™Û.¯—òfb²CÚa|`uæÆ1è}È¿;w6=œýK£3Ïh›ÿmL™‡·æ'~KÙ¯C"?—ÄÔïA[¬ìч„ó:²Ô½Û·i!^ÄO;’Ò‹qD-^‡°ƒíC'"Ð Ò( F…pðÀ:#üM…øÉpHû;ÑMð kä6Ü)Ñ.Xã8Ìýr>"Þ.ëãå­Ç’e“¿™›Ž©Ål»,‡„À˜x%œàÄÖ+ùÕÉ9~wh©]ŸÈ¶l&ˆ»PHbý'}yÚ¹„(›ÈçœI””@9p*S²ï9×Ã5øgä©€Öé(ÒÛ÷näñãòyåÿîÌúî?“Œ1í;Â2Ÿ°WÆü»SP±¨l„7ˆÐUáéK¬?ì“{h(¡=[­öΘä!#J"ǘ°Á+Y1]ô»3õâ¡"4zù(—KÀË žƒVåC“†Àç]óŽN2î‡Á`ÌÊÝ£¦~Þ9ÿÔøHÐD“¥2ÏB÷“X?Ù„\}† ùÒ¼”/;è}Bx3'°Ú¶J 7²­“ï ¼ È _LWt>c%ú†jÆÈ2ÂF"nñ``"¤?á´ƒd–Ý º=hÿ¦k멲n¢¯íÙÎl^L&ƒ‹ÛDF£qrèÈÙXܧ,a´såBíAs¨kA”Á7|0éæ#Š”<W±Ú“>¡Ë„)ˆ÷¬%(Ï@=R…àðñ•æ4Ž]’§­_f± J<òñºs¹ežÝ T‡~rÖâó‡X}P¹{lê&òé¥Ù'ŒWiýÙÍŒä¥7î‹­Ë;Qhk î´@uÐ~k‚ìà Ô‡ B„Gê;‘“ê]×C×}bæI‹œO¾=a­Ý©Mø€È Q£}:#.ϘÇS’JGÖ)|¸ÂP€^€‡qX¡’Aæù5EÔ0œDá‰%m=&q¯ é Ê>~PY4H„rk?¸Áâg õʨ$‰Ç®mæA\ S3¯‘rþ±=‘çckÉ '@ö†‘ã¨c°Sb±`HÙ}yÑ©@ì»îš>~¦)U”D’+ú}¥—ÁºÒŒ®4°©,ÇP;ðtö¾s=‹@Ôlo\è¢uçß|;G#Šé¿´Úìv5í# BH%þPYØh¿Jnlfë8NŸyëzË$Œ•œ&É7Z3%Yß1CpE§;´{qÜ53[ –$Ä+Ù`gùwº¤8›bƒR9:ɱ^›ú5Œâó- C›ám&æ9»ž;e!’ "j¸³ OôÊ«á¿ÄzPåR'ª‡+wCû“+§Ðü@b‘MÛš†ßW;ð,À~éØŒ C¼ì87„ç8Jdð`ÉGdœ„I†¼g»€¾ I/ø¥É/; tÁðâ„ØT1ƒ ò–‡.m.uÇxØ!Jpé ßtÆg;Ö ±Ó.¸p «NœÎn œ…lãNø!cÌBá’Óô ¼‹À6ÎM%B•‹³K"-È>$Òì"þЌՇT0é °­>a9>O·åi·f°A‚1Eë)AìIn±0`ü´3 bŒ‰…Šœ&I*7DÜS€ɸuýq„UX˜‡jØEHðDüm™šŽ [•×À}Fx%®š_ͧAä.àÍ©¼’xèl¨ÓêÜ#çÒzñ“‹0ÐNDß›ÉçqcØMúÂ5wb眦åŒ9—ˆ_¬’Qr–>LÁóvó“ÅläBUÑ…Ü'>‡Îü‰$Ü@Ø_f_:³Oàp8ßÍü/Ù‹}b7’#ñÎ%ÌŽhîCœ8Y/ðÞLÞwΉÃôŽm º\à'‡à‡ö‚e$+¸w.6³àÅèÚ„ÅN#âyF.¸¾‹`J2Œ2b$í\ã@ïéc;ŽfÔÏ]÷“ ©Ï¿;—.­´Ê1&òU³ÙÂ8_ƒ8~ÀêŽiC‘à?c{‘x|¾CÒ˜ kr×o°A‘oæcMS|±3rGh†É•J?²]$Ê[“ß`åиûêéšB(/¬×ĉrM£Ìfëº8u#JÅ–‰òÖä·D›Òu'4fÄ'jñÇþΧ C5D©Ä"ÝXÇMbÚ¯"ÎäËx+bZ›0áâ]Ù'D‘±§'7bþÝÜ@(P5œ_ÁŠ×sí)ávÖeÉ×fl|%ÒLÃê’,ë[¯'dÅeLJæ¹ú’ lÕö ¯¼ DìFŽ]V+Pë´"drÙÚ¦±þ@#¡;§ú½M¬ãÑì”’Ä£ˆ•Cœªd6¨Ø®†ë0+|¼ð'¶õ‹Á¶Ôz»=S¿ñÖ“ÃÉЙ²:u(Ì®ò¼s@pf+ïMõN«êÞÂàˆà—‘ǬÏæ§ýâ0wÁvá”8GÚÞuæ÷“Ë&ò—¡Ë9ô#D7Ôÿäƶ‡Ó¢ ØÖ—yÊ4äÙC’.B« Þ̹䓡«àÊÞùH›s¢ŽŽÞÙ¬IÙ½Ä|²:E~úüQjSùÞ‚n_ÍÁ"…;ãin"šm}ñÎeîû Nð‚«÷ò¦9À @épÞ¹þ‘ÚK(ñØ•ðª¼IùŸ]Å _»MpÃæ¨~víàbæC}†t~Ù±q;òlÍýõʾ+ Æ3;é„•v®å…¼ìôáü<>%³ Q\pç ’E‰kwšÄ*š=ù‡ngÁìÚzqCM"W×;P†êtõo`û;`„>!BCd_™ÅÿFpéò)‰ãÓ xY"n4eŸðܤÍìÜÌ-Sö7"'À!P‘Ñrãç“YÛ§ÿ÷$&Öï}ÿkõÑÚæjÎÿûê£'ÿ¸ÿõôÿþÿ_®ßSŸïì=ïíýŽÖ‹þÞWàƒèký[ëx™ëZpÜ®CŠ`“>|Øëîò½½\öàœ/NIt ÇŽ6_9Z$6d‘o8-J<¸EqУ|³S¶.YPþ|ˆµ’Õ{‘öó#^¦ã’~r,“¾³0óÕõ16&†ûé̶ @`ãäݸA¸ðK0Ó·ýTÀÇÚ,b§Ô™–’(pð%9ûî?gNTO¼Þ/°ÝqÈ1FTk5…†;Tqar#…Äý‰L‚r ¶ÀaK¸qX˜·æÂW[pñ®Ï^|Þ´~j#”ß«ƒ×½7ˆ£}îë¨5‹‰Ó+íšìõ^o÷íÁá>‡øÃŒ/IV]Ž‰¸Èå­o´Ï*rÜ~×Ûo¶»íÇøì¾9;yW‡s ©×{}üv¯×ÓŽfàçK³^Z›ì5#ù°½M_(‹úptp|r†|ÛÖz½žéliËæ8Õ0+ò%“û%|N`—Dñðùó¾=” xâY'mr¿½wÈõqpS\Õ²EêŪq³ åRÁª++§áJíMi2Ufròðñ雪¡3ÞÁÝô¥d‡#špM;@ÆU/鮶«{ü¯Ãëððd¯÷öxïäð°½×EôYöx"÷ú3pÒë‰Ë ‚u#?iZ6FÍR=ê4ÚÎ SnÖSÒ«³v»FùêügsÈi;–±;3ú´}ÖêÂ$tãÕì¼ÿp·Y¸ë< {FS_aÈ¥c3ß;êìõ~jŸ¡++yžFšvÇM˜ý„£ð/{j±ûðå&ñ¤¢oJ',3]p•£Sþ.|ª¾¥J–V–ËýbŠb¸k ‰€FŸ^¹žsLL¹TáÖK&A»?L‘Ø~{÷íëÓ¥¾Jdë^BNÀA/JÎ/XZˆ]×U]Îô“û¨kS~§öð¡çœ°ñ¤«âú.sÿ¤¹ÊÔBn°»~fš‰;‹¹@«¦P/Árµÿ•t î·VâäBÍ]"¤iû¥³¦½­hdÀs2uÂDØú?ÿK"ÞýÛD£'OUÉ,.±ü·¹ñèÑæ&ä¿õGë²ý!ÿýÞ럎üýäÿÍ'›ùøo×þÿ—_Ez_¢ §M|e¤Á¿À’¿ÞåcâÉ!i9ÌC8Q^U0²sÜœ "-?XXø*ÂUAÖi¼n=|ÅòM1¥³[‘°ß©HhÕMq-‰ ¾hÊ'$`¸Asü2óÍù¶'SÙ é`É×ÎnYÖNÉÇÖQ"E,tZ739Ìi©Mx2Ý7çÚ¬àtOª2ú> ƒ802ä`d›ýN_ð•Ð njeÓp$ÔwüÁx…ã»Î¦HOû_ÍÃW[ñ+W9íé+†™Ã ±ÓÚ¯âƺ>rbbL]å–VÜ‹æ¢`J<2k‰£kl[µì÷¥zç&Ú¥r—ØJ];ºPÍØKô¹âöîsÙ‹ÖëY8³va tjœè¹µ¹¾üèñ“åGO6Í`%hªñröP]3ôŽq½Óó{Ý›©³½}Üe‘íNê_˜vARhïð^Kßš~Ó ‰³ž·‡'ǯ±Ý;t™áåqeÉ üÑi †I•âîº54£?±$·m©ÜïW?l™.Wµc:Eê%5Á­¾8òäiî5ª"=5Ó·8oÒ¼¯‘W1ÜÀ&Þ”¨o™U/YpìjI­ï»ÝŽ¾µÔ{·‹p¶ÌŒ9mÕÔdö;· G.[K1ƒH„eRöp¢èÁÜà:Þ¹= µx®äâ†0‡¦wkTð´‡Ð^mµ^t"Msà„ao:‹£Ú"ì uø_*qÒYèüÝ_4<9rÈ€Ú"gaõ®?ZÌxÚ+ß$´n騩û”c—£R˜0k:Lg\|bÿú«ËC † ´Ñx™Âœg“ƒ«\òÀ¦*¤¶/éOo_4¼QH Þ,s½(.kÔ,&_+yMA•7)ö¯$¯…CÏ”ƒh a¸­ÈñÍ™¯„?µûÇŒ#jj§§Û©© V ˜‹CÆÔïëÖîi÷ÌšÜP ðÔ¤> *[BÛ:”¤lõÏŸM¶0Éi\‡„°ê,RÊwœQ‡·’±I8`Ä9œÉé‘ag!æAšMmz†³žšªçý‡­õoy>ÝÊ8Q·ý¨}‚w¨\øƒ…–­¾Ã½M„ÿ#J<ù+'ÿˆ!´œz~w44EexöNjª܃ÂÝ™Ê=Úxz~N„îºrÅ Ô3?ŸÐ¦mÚÑĤG÷¢‡YÏÁ™¢ ŠÛEªˆ T™$Öë0´¹.Î1Q‡‡0ß«7vh8À~n}Ÿó¥<Võ.ALG|z’éÜeªÂV†£q³©â0ìj°Œ3;ÜÐU4D3wÍWðÆ3X wø¶IB1 ^‚öñöjZ„—£5‚U…ê2I¿ë[‚ø”ss\^_‰©¨¦X”j„‡ø.*Ïw\ÏÚxñÏÁúêyY¨‡H ?5Ö¤krn´KñZ&6jŠ}°œIe¥®¯óØA.ŠN¢?çzQŒÀøÓ9ØgøNXÓÔXmùv'Ö…2uc>–-#M‰7ꇙ¤CFªçg¦£0cjˆ[…°:šàþÝï¨{¸Ï-hîmÚ\zÃͧ{íLf^S.f÷:Õ¦:¼‚Ž]¾'·[B¾ïϪ–Qï"ñÆ”[yÞ/ê×DNFæÆËhÒëè…*‹’ázK×Â:ŽDÞÍ2¼)£W–DzܷJþw.?>—'W±«Xòê&ª$4w›'Êyï&ç­/Xœ{ô@Ñ—{ÒƒºÜ8<È"_¥ÿøñà´×i¿Î£¯B;¾.áÈDïICŸ%8ˆ%;¨lˆßŽÙï‹ÕÓˆ„æ!mù™ê©¼`Õ:ʘhÈÇW­N—O™U;$°ÁÁŠÉÁUhCŠ¬™‡€’¯¶ÔB†W3Ÿ£º×Í,ëõzQyQ–ߟ·T+oº7 ê÷o>i}»´RÄÑcÀ¿9ãŽ­ïß…­ÿÄÀÒCêûJr4K4%ô8°‚> Ь‰3 ÂqTMhg/’Gî%ï²>Ų£¸A9­+øyÄ•H-­5“QuÇðŸ:¦ì‘/-‘54”ópzÄ…5Æq}T jCyˆw"{‘ØçW°‰3ûe‹‰U(ÆV®.¸ÏÑd¬Ù(sq°l­¯®®~%Å„XÕP‘fÙîØþÔ’Mº-Bª¢¢Ø°¼Ú Îðˆ³¼áþ•壌 ‡ ¬%ŸX!Ú‹[ wÊ­±ÇQûh»v§õšK,ÉÿÖXŽÚR“ɼŸî |<4a%¡ÂŸiÑßÖþã—•ÝÛ„ª€¼fÔW½Öñ/¿òÃÞa»Å‡ü 2 ®C*Q5μgýj¥d¿·â\2-I¶ëÇáÒTXGôGª× oÜ'¸, È ¼pL{r|ø Z]Ø=99L«"h#jÝVJ•¢•™”?=;8î"ggúDRÜ^]ÆÏ:$C¶¬Pýì×™ç!dëD駉2AI> ÆîÔÖ/Ü!úyÇ~KrÏÂUãyÍ|6eråÞ’R¾YoÖçg*ô35úÙ*ý´N# '<2[@67ðÑ8–”©™¬¥ ‚ËD…Xâ¬üë~{i4 šî¼/þ—wFÍØRfD¢;U‚ø[s&UnQcçµÅ¿ûÄKØ“Å¿À\¾BhÏaù­yš)&mñÁæ=éÌ·Xä4X-'ð”d1Ƭ:y·îIü á1Ì.#v†±‹ÏÊ{Ì»bN'³<¹þŠµÁ8쌙žE!]ˆeÂP'GG€-¶…U²ÑCŽsŠ!i,g{öˆ»klã’Nüe¨Î 'Ü[‚¯FQÓª¡:‰A´–mÑQ5 ™šYʺ4• ‘;ÏBí©à­ …zDä܈ÌjÕôšÖ3‹#pEhÅœ[jÒ´‘7¯Á1‘tã%Z¦éyé¦\}NãY¶Öäg½ñL½¯66Õã£ÕÆš~~IOåÐLhvh’ÿðã#ù Öîµ!+GI|‡éþ'FÉÔd™Éü•—Gê[ò›ëƒÜ1Çœ¯1*ÿf›¹–¢¦xw›³4^ •ÏêC¸ZêYVYÞ\h¹/!èB=£Zþ¼0‡õEÄå Å»0jQ¡ÂÁ2s8EÛÏ04z¯©‘ß&öµ°L¸¦Òò®ì›ˆïO¨HLð&G‰ ƒgD†jÏ%T—U¬c‡ñ%© */g7¨zÔwG#ÝÓ5¶jRnV”¬×(V§Â‰@,]E!{Ã/®ÆýÉa‘BÓ Æ}Ýî‚i$¡cI#yQ1ˆ¦ öE,ÃÖ¼•KÕ)µÖq›ã0ÿkae%ÀQa­ÐÁelFïd¥“¤wK¡éçU²|ö8Á<ÎXA ÎÐa*êÞ÷ ~¬ LÊSàú qÎWˆÅË¡‰ˆ”'ÎÏì¨D6”¡§¬üöv­„ñgk(tÿ¥À^Ó1½x„oõì@ò{_v"/6¯Ò)ñú¦wX×z}9ÓáL gÁ Û‚[²ýÉvDp˶Á nå3 KÛ÷ï^æœ÷ÞÂ@ÜÖvhàÓ@×JC"¾D€ëŠ{£½¦pÞ5Âp`u2@±`Ë,8Þ…Å¥™ÕŠ5®á…BV%ø[³£·³óg¨†*²ƒŽò H-'wàáuü³¶›ƒ˜»LA!ªXì¾át ] +ÂÞ[ÂR#Mk˜:$q9ŒÜKÇ»–£ä1Tƒ|µMm~…†: $ö)ÍNËv/°Fr¸í£*xÅ ]|“à¿ü"œµ»g¿ä‘"õGS÷Vq-Ë݈tT‰±lR˜F½•™èí*Íâ=¡…ªz©`¶6¨¹ŠðS©yÉ #fïáíùÖóàTÚáxB[ÌÚÌ«Qç]“¼k·ç}¹ I/ÖTkwháåöÚª.÷H•{t§r’rkºàÚÝJùKÇU±mB|ËbÜw-î±_²_¸_º÷\†9«0-ÊYPºßê/¶õŽã¾ÄÂjó5NôŒwòK&Ù«}öo+x«×KvvdúYÎ ˆeJ|¸F"Ï-Qi(°·×ËÍ5^gôÙä,…­L„öF¢VÐWUM#$ѧ÷q‹)ž šã”ýÎ…—ô˜Uá©~BxϹ§¶ó[Nj»Œ?ëš-a9Ù(ÂàûN¡Ùg#0Ïÿ¦=P¼^Œ‘‰Í7îºxJä· SÎ[ñ»‰ÄM¨²^l[ÕTÿŽÈ{eå5QSÐ^›µ&¬³QÖX(Ìë½yÛ×f1½Ñ`NÃÆœkR êíĬ’̤j"ìØe–*Å󦾪ÌçÛ*¿ãäÏ»œéá×ìývRÿ{×:;®-žÌ؇€pËßÀ5Ñð~×Z½C>Ï›ãûƒÂ|Ò˜J¢ä›G >ß²¼Owe‚êë¢TÕ”¶`>W°™÷!f’Gá4UcìŠÛJ²G6³¹Ã“šË,žòQ‰ø)ë¼}Ìwi›Í¦•³jÌuá-;‹ €äØïÇΩù”ëü).ážÕÚˆ1býË2=#Ê´ã ‰7ÇAªe‹p0‚ï$‰ä~[ËI¨`ˆäVrŽŠš!›'wˆ~¸CúMfbèèWn&O-ó:šP…ôYjÁ´h¥+žE²«Ïå/nÐÌ~þf»â6¶V÷äè w}þÖ&j+[±ã`â›ñî€@@lïȺÌCŸï¶É¹µ*Ôø¨LV”Z‘•¥ÖïNo•ž¾Lš*Õߥ™;Nï]Å/?ÊúwêûmP:¥gÖµþ2e­ªPBéA4¼Í¢ [Ù׌xýn¤^øÕ߸t9þÿ®£Û%Š?$ÎÖŠ‘Œô–q~^¸u>Ïe¾T!—h)Á0<Š’ êrœ½­´ŒÙcïȉ%WM•…ä¡JÔÿUì çÝF&ñÉ¢,ÒVØ9L^»5ßÆŠëW[¾@n˜ÇçÑXÚ>«Ç’óÂôX¢9G×®ª¸ƒˆpgÑà·‹÷îÃDW¢˜Ü,ß~ÄQ2jC韜‚gwæ ¯,ȪӼ’Í1gÃVðmWÊá[ó&U9…™#ÁgÉ~ýlò ˜oaþça¨úù7T¦]'–ôÚkß•Úì˨(Õ¶¦_É%®#ûúw¶ò;þ±õS'˜z0„縱ÍGÙª(»0JN± c´h Ýx÷ݸ¹ð…\¸µp'PIÐfV>/ø¸ÌÒ×< •ê†rh …S¢î/(ö…9•Ï7ì‰'¾eµX¾sÅwôz®ß‹‹ͳ:.U7`T]¬sKÙï–Ѐ¥R¡|fŠ·ïÞhNƒÄPz.Y01,ÓZ’¦4‰JÙËÿ5ªqÿ)ýƒŽÜŸŽlßg»ü÷Ñ;òa_¤Wû|×Ó¿ÌqDÙiDI”kZ)ŒÖ$‘*és–ný᛬èÿ)º™°ëíÁtú»ù^{Rðÿ´¾±ñ‡ÿ§ßÇÿÓƒÔåÏÆú`â³kó[³ßÎ7ÖáÃ)ûÑFXI׋²_©¬çöóß8,{øÑbSoá¿uStqo7ÅÔ¹L2tJ³~URŸ†Ýî˜õiøçeã¯àŒîÕå„p8s&Ùjõf’³Æ9vã ¢ß oz¨pÛŠ 4ÝÝÄ/KŠq3|S¡àjÉeBqã¨F 'RÄYõ¦v<&5ì}r ‡™Ï –Xi[Œ☟[†ŽSÎ^EÖ¹B•çQsqµ„3Ñ_hø±s*íœR35«½â{Ú(µ«½>ZèER0S)–Q©`9ä½wxЭY?îq­ËÖâàù¢ÎŠbÍ?r¸f­.ëL_Z‘ ÿX“O3³lÙBKÑÏÀu¥ƒ»³ó§/~$1C÷ô%×ü4mäiÞͳýD¿žRÇþFSú”ú…©Íôìi³5…iÇÒê Ó³ì¶Êzèø#š \+\Sngx!áv|DOyYª[¢ß®)Ï´’™XÑ:¨³/«jOãðoµúr’×t£ónaýƒ+ß #"•T0Šp°mé‹Ûùí•!™%ø]zÃþè«:œÿן¬?Îûÿ__ûÃÿßïçÿ?çþ}uuS"º²†H,>€ož—ýe š1ù·Ãíu>Ƈ“}‰&÷•9>5GõêB—,§‚Q \6fƒYê]ˆ/’ ‹Ub‘vlˆ3_°ô…6ÈÖÅÁ ÆmrÇ:Úþïtϸª¶âãè –²¥]æî.Ã…¼{Ž_‡‡7õ=7/[Cµ÷g1¼äâãòø2Ï n™8ú&ñ´{9ÝE¹òCíL1µ±š+¶€¸+CÁd8.útV<‹ ÷0 ¹ãV!hƒðs ƒ+ ðçÐe›–ç ì}QG6$ë-1¤X‹iºÆ*I"¾÷ÔM£‹[ i¾K3ë-öc‡ŸðÂQäË×>»oÚVçäU—Dv&DÄ"LjX” 'o»idˆ“Wâǃãýe&Â:9£ÊTŒˆeëàxïðíþÁñkk—JŸt­Ãƒ£ƒ.UÛ=á&Ueíª;jŸí½¡×ÖîÑ_p±áÕA÷õ¾:9³ZÖië¬{°÷ö°uf¾=;=é´© ûTññÁñ+’n^·ÚÇÝ&µ‹íŸèÅê¼i¢1øÂ|Kc8C/­½“Ó_Î^¿éZoN÷Ûôq·M½Ã ©4FCÛ;l-[û­£Öë6—:¡z0Bd”>ZïÞ´ñm¶èÿ{݃“c fïä¸{F¯Ë4Ö³nRøÝA§½lµÎ:˜–Wg'G&&–Êœp5Tò¸-õpdŽÌÚP¼#ð†®ÒÚo·©6Z¨ãÜR6”·rÃ]ü‰Xû7³a”gè:›rýüôqïñ&dÍBÄ÷ön´£7ì ¬l„øuŒ€À£ï„7-ñ-Uˆ|xâTTJÔà’ÓðÓ)±TùwÇë½Ãvë¸GkÝ;¢ƒiE|ßà*®uÚ£‰MÄvpQ›Î€žÖ¼.<=vb™ÍLëiq¸j¢ÕˆA&„º7v¨ ½-Ö“<Á4&äôÉ©-ŽnhoççTA|3u”À}…˜‹ø³eΛÑ÷àI)@C|¼™pF5iy‚Š¼âOg—«¾æ5è$»0ëpéÀ¢ ¶O0þÚ‰;7“7„`<íü0›!Ò©Vê=‰½á$ Ú{_çíŸ9póAuø.ð fǬƒÜhRþPÀB¡â¬§4ºR× ûïNÎö­áÕÉTÐ7Bµ©÷TÛ”fùnÛúßÎ/G'§ÝÞÛãýãÖQ»˜çWªG²ž´ö‰ñ$<£sQ´¤Œáäðs®!$ëÕ$Š'ù=B=»­½-­›îâ4­Åæt55Ïc5Ëw>ó6——7šsdU§hem&™åÌ~5'§¹§-È]èv±3ôUúrÔ>:9û¥·ÛêìõCŸœµ­‰õ þJG“,³Ñt¾÷hHƒ¥1žl‰4aK­²ÿ䆸õ?3'¼i_5³Z‰¯#'»¯ž4·l}—ö½bÅÔý“4_=q&Æš60LÐÞ÷ŽZ?÷N[Ý7Ráwß ËÓœëò‚²C”è“L™¼ZµÚ›ƒãN·u¼×®§½j¶’£\LÎÝÀO÷}YR¨×S‡·ûR80x¸ ©¨±d!_­¸±ì.µ°Âp’'ý¥:‰Sýq×Ò&]T•M,Ë€ÐÇÿ¬=}öäéjÓºï?UUŠ|öuZ55™qBFêaK—ÈO£ +µÉ ¨÷º,)*ÇÛѶ·­5bãõðp%Œ¸TZöñÓÞcÝaùZK[üûß›ì«/Eþ’¥Õªz”)UˆñRº¢ì”Í®)931"‚̛ҴF ©:8³ìÆÞ“ f8þkjÖsõÿ–@i-Źm[ 쉦¼tØ xþ ک¬0TEð¾&x³ £&ΨÊ: J£ÃYŒ™¥òy¼™Á\ÝE JBûö*$Ø’ƒè wº¬ˆÛ9§¼ÿ°¬u/ûZrË(r„BP“Ñ›-#hü2\‚V"xéöÏ]N±ºf¬¡=Ãï+Ï¡ •³÷ÊäX¨R©Me®©ö›«jê9¢±ª×Q€r¥Õy·Êéú—Äë uxó=2…ób.ª4 ôÐ; 6[†½ÜN‚ËdTí>M³ÓŸ¦»Fg–åUL’1%Û¨0ºe^7hÁî„åea—õ¬ ³Î »ºwh[­Þ’•vÜ€»ÛËß 0ÕWÎv@ÒË5[hèDäøåÁG"š{?¾:#þQ<Ïs-eÿ²V­Ï[Â2«¯Mì¡Ó½æä ñOeáÞ 8ã­ªå7š,Œg›Di={¯ÛDô÷ˆŽ·{O—·}r~Ž è\PÍ`ãeÛ–äæ%ÔÍ÷´"·ªÞ¬;*«[žîZ·<•ÔÝŸ2µËÎÚÑÙϸþô%óv¶I%ï1q¯Ü°¤­ÃÓ7­/jŸKÞÞ~mæ#þ„3dÏîõ[ºszº÷E9=y×>;Ý»ÇtØeí´o~SÁ{´Þ‰N«–ã » Ê~H ¸ †b9_øð—¿wú6ÅÕìw2E/\KèÆz‘b¤-«TŠFwÞÙÞEÍÔ²U†âÓž—ãÇ”(Y»(.g™Éiˆãßdåñ>µ|aúÀG è4 ÞR÷ú 9§³ñðá@}™ØUµ*¥b¸‰Î3ÔJFĪ”íZVC“$ë²y $dƒ‡‰7k)Íg)·¡J¾3ƒ¾³pÀy¤» €oO{G'ûo‰*J| ‚"œ³UK?ׅĨ50…a>ͳv¦R³“óhæwFSõ|Ô¹UsÓ¡PWIìãÐèhóŠ5™µïÿþ÷ï ÐIKÀ‘|ÓV29É4WÖLøxU’âqèãÜ.³˜I•²°õ÷,e4¬µÖvv°Z«‡žã›–phñ®ÍrÊw« º¶<®98ë»h×í‡^ï\Í*àOjÈ÷,/ó¬æ9¿›I?ðî´—¢$kfзsq’y JUÚë»l¾•ß€iåzùh–°–Œ7©×Ã¥·-th û¡@aæã¤ECT²u;¿í–¦Öµ¦õ2ôŽ®ìÎÎÏð½’s…p µ ½õ ü A¦ZlR-M¸g?9ïˆÿl6©‹ëfÆ#ûMÊ w.cÚ—:Ax®Šó‡øö~mu}óƒNÁ°ÞúûÎaÑVki%˺d¢-Qï%¨R©Ž{Ç'½£NïÇö/:Ö¯fBk'zÓöÞÁ«ƒöY'8 ;iHwVMúL=¥nsOeÖª{y÷ê9Éì‹´xn‡èU-«!‹aS›ÙäwÁ±iµsñ¬¢î´aë3­Zûç½ö)”ǽöÏí½·ÝvO¤Ë3Ý­ŽÚQÜ[HnsAÚÆ{${Ôê÷Ãl•¨ü ±Z%Nû÷bÿrtÔÌr¦·Lô¢pô+!8wKhß]'Ì£ÄÉÞòƒnÌ$ i”!}¹åø—a>TÉÙá ‰{œáèð!áå2‡zEºc fsn¿.f¶¾ã.Íçùò§óf'/ÍÃäK¾‚RÄ3í”0œÜ†ÖÂoiÕy÷dÿä9Nïž<·ÈØ|Q_qÔŸ|/Õ%Ç®}o2h_úÚñÝQç§=ë`¿Ý¼ç!C5+jl#jnÆJÜõñ^Ûðß‹ËÊðMR>;´e³¿wÐxÞëí;Ñ t™®ÌC|7sñº!Ùû̸•È œ,÷ `}š`É»•Mtüa’¤¼ám¥JOLLÏÏà?æ§V߯­?•ˆeyP^Rõm§šqÝÂö­‹ciYê‚¡jÐQü2 ŒåEî›j÷¯ÖªõœÛHæÁÀ÷ªÝÿ«H]N¥Q.[‹ì‹ï¹µ¸l·)¶–îâdqxëæMgGïßX7ð5Fª.æûšïé¢c}Í®¢ê'ùš+’“[’,¤ü;`cîlXÜwº¸Ì¿m¾nßÍùúš}PÈOej™ …êDT8†A¾–àNõ6L[|{Ô°» PeýmT\ŽL9{ŠKMLm$×x€ mÄCjÁMZ000ÇÂb ±+Ša—‡KnYº8Ù¦%íW=3z÷Cû-œbß‚˜VÒ;µ¶î­V.@¢6´©ùƒÁ&TÂb“)qx}×sc嶙Ca»P Ž_²Å!n£ ÎJÚ'K’9îšÍ˜JåØâK’BË*;÷‚Wr)m¡'â“"þ /KfÑ\kÙ U(ßô²iü ¬TGTó /Õ'©×œºb¼îÕˆªÑXÅÔÄ ?KÖ7Ú”³ÿǽßãþßÊW¿ñäÉ£ªû|]‚ïlniqë4þ߸ÿéé¤ÓÓäýß¹ÿ×6ŠüߣÕ?ø¿ßsÿã_vÅSÌ™…Ê߀ĶO¶¼5t./˜Â…ÝD±3‰šiùgÎ¥Ë.eÞ¸¸¨}ó2M[[[Y{¼òì‘eM}Ëz;²ëŸA0™ºžÙ ‡á;ç8ÏâoÖÚl>¦.\8Š[Õ5V"ž•%k7pÆ“eë8¸tØ2eíɲµöŒZ_[¾¶jM'Öi§k)W&½kŸýØéõ˜÷ĨaæùÎC—žOÃ@™r9qˆ¨®îÔøCD*™++^*bÄád©8˜¨yC8º¤ &”-õ¦©æ0zž¹AU4" ±…M‚™FàX© Uí¹þ…%1¤-ui¸¾•TáH¤ û±bé‘ÅýŸ-qiç\ ᑸÓç&ÅÓx!'yvöÌZZí2gŽo¦î€¨ºt'“Nìj¯÷öê #:Ïïv[#;Ù°ç~Ь ÛsmvðؘØá`¼íË}šÆ;@[ãœàÔ9¾ƒË•+hPÄ.x}NÓ»Ç tèú³k«ÆbÙÇÖÀsiGöwSn½¥¢sGßÏ‹¬~@@!ÝB,’/(%­òÆ•±Eñ¨ÓCž‚A­Cì±ìG3›[v#;J½ .`L?c ,&Ü1’ĦªZ¥l«7Ó54]8·Ïà¦{°g~oÿLè8ÉQåD ¡¯iDd+=¨iêÙì@šRnuGˆzF± ±™ô4›+0D7‹¹’<*•OปÑlRFƒ½‰7(|'‘¾ð]LM ŸbÜ÷. ´Éz’óßa‡2Š¢xÖï¡„ŒµRÏõùFØ8W€:4(mº¼§Ãþ¨tÀ´2컲˜à{ŸJKÈT\—|/J?ö¸8¡¡3ðlwRøN`¨›ÍUåFÅÎQoè§Y7|“y½dBmG¡¢©gÇ°µÏ52ø®•AßЦ OÿÁÞN½aq†o|jЖÀZoHTÞñKfg0.íÿtöX¡qnœ Ò{·²3I–Ù~‹à¦^H An¬+œ©EHâîœvßœµ[û=ÚÚg]ü=Þož·Xåý³UÓúØtÉ:S>U.G.+‚¨×Üs"ùr?‘0F•— Ù*ŒÌHn4õ¦ª‚©­+´ä|æ±ùw‚>%ôû< &–=û(ZÀ¤5×bŒ€(èªDü­7ïzƒÒ˜Öã“žšØ³öþÁY{¯Û¡M‘íi>•C™“½š¿žÊˆ1F:ñÔÓh Ž •šå¤“¾¦^÷™ûÑ3Ñü7½õ?èØï)ÿ­qZVþ[[²ù‡ü÷ŸÐÿk »:€î0˜Å´¢¢®Ç:é°³wíèýíGšZËÞòlߢ×}gB”=©td‡}{¦ˆãœáÝO Ö×WH0•“‚±“Sí³’9Øœv׋Ght{}³ÑwcH NÓ¬pc5­°3Ãñ ˆ+RUÌ"ô4 Ÿ|@£Iu[T2’<ø£ÖÕõ•5ªõ±ª•zˆ2‡ÊÓ?( ÉÌèiÀ˜¯ÆŽ¿0óAËØúØ*öäá~'¯œ~8Ã\¬=Za|ýù£GÙ}Ê@”ï|çB÷Hü¯ì·ÃàŠ>Bü¸Áý¢þT{l#ñ &ç‹|Âaàû½“ýö÷|#ŸoÛ¯j™Ç¹¶q8¤Ü¢j äÛ]w"U]FSP÷Ô‘z$~pR{òŒk<![¶*’Ù}uòÝN&Òt>U{%øl-áh ÑfNqñw)yÕ^¿äªMmAܹÒæÑ[øl)–”WaŠý^§òzák2¥Ù°n¸SÇeMw,IÄGcÜu%piI²7 ó¡ÿ9žcGNÒlMuEÊók¸‡G©·ÖÖ£Zïì%m×·JÝ'×°IªÀ•Û=÷þ÷€[D¾³ÉÔâÀòM3‚4Ç;m¬Õ·Jâ5ÉA\Ê»à*Xór^Ä<„0=a4ˆ¸(à ®àý—ƒ½®®C¶Ý.ñEéGFî{óêJ±´´åýçœfPW;d5?.|ÞJ< —W@’KH.Z¨r»A@à‹¤ÙuÙéõØ1"d`¿¢ùÊU$±±)m •+Éqì\Ñ×LŒÛ¤¡ý ¥ s‡ÜÚñ¤ÓC`š™g„;­>}¥¹)D‡‘‚ßmËw=#(¶Y¨´Þ:¾Ò•K¾ÕùPßù-[hxg‘ç6s¦9»ˆLðî4̲mþæò¾q“jVQ²_Ó2ÈämŠ¶JŽ1Öû‡paMU´Œ°`A°Ó¶LF@—4cÊŽ3UÛWQM·Vš…b…¡$àR€ù’ž–í‹rhÁÍ=1I•Î›É½Ãƒ]>ßfŠ™ÞN¢QAbôâ3ò2™ølÊcMx #u¨ç› IöB8Á Ë÷iÉ:™›ëÜö²Aò”ÝRèV­$#]eEÌÁN¨ñó G”îu¶2q04oÕcΪ—rVŠ>&”—¯ÆsmžÅF}â‚AÜqÛóH¦‰ýƒB{Ä[õ Ì¿÷êHIѳHÉ«>+%ÿ‚¢”*Š½vÞƒpºT‡Í¢ît¹ºeøÄâIÿYG©µE–sé„7ñü Éè«´UÍù»þëÖ¯¿f§‹>æL9>4׺8!¹ ¯ˆu, ŠxØ· r,ÅãÊÝø¦© |Ó ŠÜ¾Çq¸Ô„$ ºˆ¾Õm¦ÌS¥>,p Í?F“ÅíúбÌ4ŠÚw’ç-6Õ¶Óñv*q þ¸óAA¦DIOîHÕËr ÉOVnhâ%D*ÓuW’°ïF83QÔëtʤ’n¦ŒÞ®Ã¼ßyGl* @ÀËì#ß7ò“m°–„h‰µ|Ï“e¢×ç–õ%ÁÑSó"&—8ÉMqnªZI¡7’V¤~ÙŽ=?ÈTó9wË2Ù¤pßëÉáNíÜÙ£¾øÖʈmÈGÿ"†’¼ "FA"ûê"ÆC³íßQÄ&À0òË/Ò×V&ú¿²òtšöàwµÿx²±ž‰ÿ¼ýßñŸ§Š†Ï`7±5Ó¡þ7pŒtàšåÖÇ|%Ûˆ÷0@³_lñàëÙE<øŠf¾šUă/4ŠXúž¥ãèĉe—³gqÁJÌ0ΨAã PÛ$ s¼ -œQtk£Á2c˜åþðj4Øñh*¢&Žå†7ží7ƒp$øÁ‹˜[žÈ 8oTM)µ÷~µñìÃÃ÷͹´!†Ã½ÎÙÞþÁY-9_®iG­½³“’ßO6?HJ Á<÷Z‡½nëìu»‹o‡gíÿ©­7¯ÕˆvÚ]D°êœ/´Žx0½ÖÛîÉQëÇví=õÍ!q‚—¶ÑÿäN×i¡ õ‡:tÆX|D̾(;ïÚ{µ*+ú\¹Ž¨«Ç]ú¯}ÿýí”ì¼Ýítk§­½[¯ÛõôËë=Ý="ÝT–vÝëÞµÔ;‘áàõ矓¤V'ùÌqÚ»<,Z¼ã vž[çVK¯sè@¹ xÃÔEàˆmª¤}Œ¦=ᦖi—Q ºn••­%ؾ\@öÐíÇAàiqU”´ÑXÝ°É ÕÔÁ!)1;{¯[¯;z+C=nõg®íøq;¾°½ˆ³RX¸S¦ÞdbOÅI3Š-Þ8Ñ"¶¬>xŽP í$Ζ6Î2±:WLx¦Ôk§õ˦^^¹´û Ëó££ÖisÁh]õç£ë‡ãÝŒ ‘ö+±ÓŸErz9à -ñžTwø”1"dÀ‘PEâó\s›VrŠÝŒàåØ SÚ–×î„göù‚ Å$m£ç‹ß¾ÞÛ[|N ÔóX/m¡Ï[ΘÄoÿ•¼|Îtwq!q)2@¼ÄÅoÇæ‹Xþ§S{©±ÔOg×KVÝdð¤ èÁsH/ÏyE2}HÎ…r}Q]yØî û#;š,¦œ—›<>°ž‹ƒ^{Û3Ï»Á̪ygˆRSœµâ‚¥¬ Rs'u†­pŸ°^©‚dK6'² Ô‡5ÿÂ||V²Ôð`“´¤Pšõêàç£ösY®Èq&‘²òæp©Mßq€›í(Ŧ9‹©Ê1šÄÕ#î ÃlŒ¸Û1F>ßà.7bWÖÄF’Xã… ®Õðw±žŒ&WÍççÙ„Ôè*¡ç$Z\H&ìùdc=l,Y¿Zχk«—êiO÷©ÆžsÉdf aù&In"°õAÚÑiËŒ¬Ö˜ko–.ÞÄFøzãYcéW<óãL"ïèÞÎíñkku1 .F©¤ -‚Ú¶ÍâÄ.éuÆÿD ­)‹ È“ï)åMqºˆH]{Ÿ®µdÚîþrÚþ°l½ŒâqT„8¶d„ìÈùPgï–bä@}‘â—¶ÇÕŸuˆ‚¼iïýÈ È0[à$Õ´I<íî2N]×?¾ÝÛ³—ÖúËïÖhÕ¯Ù+ÿ_ר๵²2ýþ &®h|¢UQÕ,fЄ®Û , Ë¥…Ñ-Sç^g‹W!/ ® ÍÊÕ’© r¦õÆ€©±ADQC  sÉá\ÿõ;Su¬»Êf0Æ÷--ò1 £PsMŒðÛÃní½ˇºõ¡S;Ä5(”¬Y¨…L^×é{Éi|ð EcèÀ\UØ/9O"¨ …@I&1™êd ŸýJˆ(þªŒ^‹d€6‹t«§[ï¡iÚ}ßà¢@Ô¤´ÏÎNˆs;Ue¸»Äœüsæ’b þÚ‚Õ‡z¹00¸õa¡0³‰ç ™¨êiM2b{iý;,P¡ùª 3ýʱI´wÀw¸ƒ1õýØ?r Ä<Ÿ52–Q4†N¬Œ"b¾ãæBë _r;$)‹æ¢uFÜ[ûØųч}aHˆ¶(;â©9[@“`/Í*”iÓá x`ªìd/çê¶X§ê÷é“>i7̉ í€GR—ÏzÝÃNu+ê4U#ꆚK+E;ªéK;tÑ¡¨©gY!™V lìÓܬZÕûj¹¼ ºÉ‚âÝbfk{·üP탟 —4|°{dQÖy5í·ÎÞg++©iŸí&µu^iM¯ÎÚíÝÎ~¦ª’š Å§ls«z}üö.ãls«ysú¶0M%Õ¼9]yû³µ¶6·®ƒ³ƒ»Ôuº×së9<8.tª dT6Ø,½¬®ãv7?áeu;ñm~rÚ>¾ÃÚûskUWkw˜¨n8{¼9·¢ÎÉaëì s[Ÿ:G8š[AøÆúí“þôÕºµžÓÛ&œétc^‡Îè­s{E!®¾g*büÔá;ñ–¹[çB˜†9P†d[ëžtt1ŸoÏö˜ƒëà¯IYFp…Žš|àa<ëD¦­J¦5²zÒGžËÔ0»uz ÌßØ1 ¼lúöªŒ½“³6‘È}"$‡&‹Ñ¾†õ® ³^¹Ãn9ט$g¸âNäÁ¢õACÚÅ4+š¾ï}_¤"Ç8@0«Ç펷¾Ë:¯Ú»ºP¹¡*`Š [áVgïàÀªµê´CdÔ¯÷,³ÒC=äâˆ÷³CL€õÖðÆ·'4yb³‡óS[;ç›!ž8é‡Ù¥$ä“Kz€ÖA€ŠÙŽösáÜàÔºÉê¤ÞÁ1â-,È’SÏv;Û '{vP7H†‹ñy›Þ>¼ÀlCÏó`*0ÕðÂxÑÐõaÒëEV²|‰I{/”–šsW{±¤ÞŸ©^h%0M¦è3KÙü06Voƽ`ìÇ*ýhXØ9®±^>‹šIë8ÒúªÅo“gKg[,í  …ž¤#ÕBÅ0päNåC’kp5AÒgÊví•›"'ÌÔïÝùÿžMaNã…žÇÆÈŸý»†~ËêÿFâó;â•+¯s(ŸZšÐª}bˆ³w%÷_Z߉çlF$K*Yp½¹Š³l¸¾ +÷@V¼¼Ïñ¡~Oôj+ñ®jjsBâ#ó€&=µ à+‘>®ü¨¡« 9ËÆmñÑ€»>¶ýQdTC˧…ݧ)i™Ì¼Øíá­Šy£ÔålPÔàäF5’äT­ÆáÊ, W¨?+ÞÕtåÛbÅšk-ükœÝZô.kí†ÕL”©)߃› ÞUå3*€ÿN0Ùã0 ƒÝ×ؾ„—2\ø$¢K$‡ß› Ä\ÿ¨†½´ÑܸY±Òéìg.ÖnãºBéÔæ4Jf¶¸×Xo™‘ÉjCþ g¾Jú»ï,ÉÝòªiÊ*Z¿&ÏúÀ:5Ïe´[‰+Çó˜b13 îáô«+ù·NoW2¢†Îñwà%î:²¯±¸XÞ#J¿‚2*=þIð³z~­Zôý;èFNìø—Œb°½”i8®4°º‚mM‰HãBÎî `r8š]o<}œÕªª%6ßšÈ@ÛÔ@§®‘|,ÉáóÂ|ñË°ö\O­"nœß†®U̾~û3Í•qêT€œâ™¸yH½¿ ¥žqèRuz‰Œ¶ÐÐWjE×þÀR-º¿ÍVoÿ¬õª»¶ªt€¢D‘•Y;ƒrèïVJBRó+Û½®R×gÃËÔ>W©Z-•¢E>I›sDVœ=š«ßrxË8âQ` A†~àˆ~‚h{%ºýj 8฼¾ ‹(xBÕÄ)³*KŸ‘$Ô;!‘iÓK%Õ$å¨Q\ÛÃ3+[{=cï–˜Œew3Vðäxÿ {prÜ:T‰eÙ§×I;„Þ¯qDS(pZU‚ ð*Jd™å¤\–UDq ÈBé ÝL gpkZv¡„cP'.Ež^%ôä³Iä…®ƒÇ „“”HÑ™Âfp#åôg#&‡°—¬Äd|P hªGÈœ¥ÔÇ‚™V”м>{¡LlZä&©â£¾§,ßK8ž9JiØæ8¢,¶}`ÌâéLnM^‰=ÖsçÍû€[`‰ÜxÇž€Ð\à SÆ2E Æœ&ƒE•vÏ~ÑÊ·Úûˈ1øÞô—½Á wÅ%`¿ZöÙx”I“iû‹ ú•+Œ‚­NïàUí½šŒ\51h÷]ûgÂ6ɳß3Ç„ßJr:TØÿ–Íàµ'7ò³°`i¿S½Þµ·×ëÑË Ã ¤¹Ç¦šÊø‰ò ô,e¾ñåfÂÌPØZ‰ôçýež™L~™”zC%‰VæÙÌn¤Eí+!3€¬$ÊýçÇîn\ÙêÛ.ÚE&qý0¸ ±†%µµ%‘‚NØ“<ñ´ö~ü G0‡š +ØkGí¦2ö¢‰ÁªÜ²ö݈ eâ‡Ò´^Ó,­ä€5€eå½öKÝ’XŒ—ù¸d@0¤Ôž¤ötª²hØ⡯-)qºalÙ8Ï5dêpN¦Àб£Ì×i ÀŸlƒ¦IrV÷+ºp§S'=èSòÐPNøÓI¯¬–ѧªÚÀ 8ÆÀZœ-™àEMD«‘NÙÕÆR(µÝ”£“Ò)Äb ú÷wê}Ò Æé¥ø­¤½ºyù !‚¬w|ajWë±5¶#è ‡^rÆyB’,|a³{€Àññ÷Q"O ÛñãMª™f¾ïàœÚ°Ë¾6ÓÔ6òÑÈeÝïã¥:ào»øÈ'Zi˜`OðAÓ:ˆ™§±Îí G¥ò­"¶°&ìÁGÅÄ¢€¾Oû'´ý›+û†ï»LøD|:|Bԯͅ¬2OÙÝúåŒ%~ƺdè-[â"2oR’¬†7ô³œW ’\‘œ6îR÷ÓiF ˜3»‘M$!;ËÖeqx맓ƒýÞÞé):­x¦Åá΀Iòá¾õŠÃ¦ˆÙ±¦Ò_òˆ*®°ä¸(®²ç ùšš ¶ï¼å†˜üôÄ—q9_ZR¶n\jcªÚë¶;Ýžp® êú ­þ6çnzvš=MT†SâÆE¾+¾ÙÙ "…f™OpøÆ#¤ú)ñX„‘AJ¯œ$îíšb®-×uXy¥®‰ïC¯/ÆÇ «öÁQibÒtDÇ+}“ì͹yØkïÀ_©­Ñq[¶Ñdyá=®ð@vkà=Z¾pæÇp¯bÔœX¡/g›øõPÑ"lßíá0茶ñ@SM{?ÿ,Fd‰±WZ\“?¨gè¢Vê=ò+R]eKú™ò¶€ûÓSÍy|û/£ŸW´W¸olZ«§CxZž,Œ³é‹yn9Ͼíà¿å¼#1ò׌ú-ÌEQR¨Â |å÷Q ¼E"gÅQN9;‚5œM&[Ý°Aé¼=ÝÛ^üÇ·´Äú ‘ýlû„S·“’MÛZ¹2t.Wü™çý£hÑð©Ë¨kQ¸By„\dÔ±Xu“C‘6žJCU« n±áI i³¹`æÙjRHœ£¯¥Ū ¡ÆŒ´‰¦#÷MW=SN!¨¹xX0Ô4=5qZxP ŒXFb*š/Ãme®Õ–mi˜3óÉ(võý(SÍ`@–ÉÈ”Tƒcþ_F¢ÉMüˆ+îXßÁÕŽÔ’14æh›oÛ+‰Ò9§sΞÉæÕê%QŸ±E`ËáP´ïzn|³=v‡CÇ×(Ü5,lnÙ[9V?­3Ùb•|lF^†ÀWÚ§\‘ù,mZ¼'Å·óü§©k¨,¤Äí¹.«tvº¿ôÞìï·qÃ~îl|¨/”íüÊ^ÚcµñKv+”|Î ónèÐ)ݳre«,{îòx}Ù(Ëö]7­àkÚ2ÚF½¡§\–ËáË5Äï,655Þé\/ª‹+-4Æ›—øÅÛÖêM«“q&›(”$@âĤP¡R`÷¯l­¡ëÍ÷ïŸ>ûhœOÏNhM÷wÁ[9vÈ,94¤d×›OYŽXo>cVIfXdˆíKÑM¨?ˆg6l•m¸Â!ìi¸…Ì8”¸r¾GÌâDàðÆ_T‡V­¸TÁ0€Z„˜m6 kÂç:úpc±¤Ç¢{!Š!4Sefâ“g½ùh¢`”æĸÙ3/^NâÜ°ª×èC$jÛÈžØPM=Óþu#†¢}'¾‚Ê?Ðð÷\Ù?ÎÝïAÃܘk¹rTØ­múÇóïÅI3ÛsÑnI¿˜,3Ž@7›köú²š6å^¼¬ >HíN¿Øð†A%;KG5àFcYxíH¥q’L$®Ž'úªµ©©¹ÿ8ˆGþ aJÛjVróº3h8£GÆm7 ­D«Ù‚¥ôÊ­Ìì ‘p—¥?1*S'g!¸/Ð*Ÿd< dLòö@…¶¿M_,ª{^E‰)•è³LhZÕbÞœ¥B4˜–¥z1O*ÿ°ÚGéD¬QŽØÜŠö0BPÚ9mñÇò )‹Ë:Õ2B;'ø CfO¹‡£e6ef’Ló@¥u F ZÈ8"»°u’Pε3˜Å^ŒýMš‹“b‰¦ _ÝÒÑÎíGH³7òÝH\±êÈÀHAç’Á´é•c,¾ÿ¨–DÅܱ:ú?oÿá;§íø-™ÍàÚ´)9„˜‡GíCVÖ19×ý¨ƒÖ@fκ‚ D퀠Ò„âœFÞÌåPuÒdoÀy;‡0ØÿbwÕÉ|•üzïbNOOκy-›Ö‘Mð.ϵ­BNðõTÆeÊ9žÚâ‹ ô >“m/jæ&ˆ>‡Dú%ñ6™Ìæ½ÂANº•±}çàõY÷èàXÙb©† X9lîË'N~.eì©â¬S¸ÎâÔì¡ýÛN›[îÑßãÖa¹UŽôUÌ«þêJwA2Ô^è)ç9߇Á,DªŠZ?µÙ+m÷ืÛÚû±{ÖÚkW8Í #8<šc±h+wˆéU±ü]j¸¯ãª{¯ÏZ§o>Ì;PÍì o{¬ûíq7ß)Ñø3Ž«7ª›©7„]‡âÁM;ÑÜMhv¦‡z®pex{üîàx_4Óù]ÚàÜÄVžΣº«ýî Óen…°’)e+»xÐdç7ïçÙ…l‹£¹,x¥viQ¤QOöÛ$ÕÊ9[äÈxeZ@TC-Ž€úc»}* wÚ=»Ír,bz†søãªB2·:àž’Œà¿‡ì½i–2îï¾î½Ù?ëôøžÿÜÆùü\ L5¤g¨ŸëÏØÂh=ÝN‰Bë=M%Á´PP]1( ëƒ÷rtŒM“ }Ü_¾ˆœ¢\ Ž{}úyºp–@Ìzâ_ ’ù!N^Š™º”™ÊÞ+/3€ÏíÀ²,¹½¶l=ÍäJ0gþ•ë—SD@Û¹Ôî½¹˜\±ÕžT]e¿'!3YÆƪêÎÇ:ÕWZˆK-¦ø‡ì RÉÍü¹7ñ‹Wðï;Ç…A°¿QðL3LÜX™¯¨ÍS~å®z‘’‘¹ï76=þÀý‡1îÒ=úšõV&·`ÝS†Ì |EŠ¦@?+) –¤Ž,ZXÔFx"Q§^+†ž=†V-‰œ›à™z³ÔLJ ÔÀu÷äEñ`µw*Šod*SÖ5#ªÔÐ;øÍñKôY|ˆï{=PB&‡2=F©-..[ß!­¾µð¥,³ P·í«ŒfÃø^à0 ¼É»nÿ°µ¿V8å€VRÅ÷‰&Fsæ ·~r])ŽDAÖç V°%^°=7ê¼Ô$ zW³µè&ZŽzôÃ3Ó53J ×=x`=}ÒÝ{Óz.šÞâH“äbQ @ñY¨35 K«.²ø؃‡ö.‰Stßjì³íµ^ßÆ>즭ÆÄž3rX _Ïe«ÊŸìýüse6•´¸p‹©g‘¤ç8^¬EÃüÉMÚx>[¦éÔÂ]/ªÇìGU¤®Ï0 Öç£}i7T¸ fúnS %nVPÀ2 T‰.ÈØ33Î`ÞÿÐú©Õ£ÇÖáÁßZ]‘no5ëËŽ^îî4hÈȋnÜ:ùBo›)ceʾïªfDÝ-Ê“IɧÓÒêžÀ§ÒÞÉáa{¯‹qf¸¬¢-Åí+™:§´!1IoÝrÙÍù:SI–$)ÿ‘.ÛsQ'IJÒÆ5â±xæ«+WñQK¬$Šeô½õ^É{¶µw¤ü‚÷沪=jêË„ƒšR3íƒ$LÍr*W–Õðn`íy ¨Î÷"t~C7¨UþÞ]ó8º{Ãì"´ªÉŒÅFÚvn)¸m™ÇŠ ?J*'º Ÿ%½wÄÜÜKÐÆç`×·b± èûÿˆR_cÍ°s~îÀ7Ö3ØÑJGW`ÝÌ\ô¨l@ö:{‡­ƒ£ÛP€Ñ»ÊÎ`jr<_¾™¡[ú[ôEëá¨!'0·a3¯9Ñ'¢8—H­œÉª½´ÖVW­£Ý:¤¼)<_„îš:q*á‚=©½5¤ó{“2å?ÏŽÅ® ýÈì@¬I´Y’”OÞ9ad5ç¡#ð‘º3Œ{À– |}ÏTìÚçPQ h­^¼EˆnÌ0ÙN´yͪù’NôPÓÜézÓ"y°Ý{uröã|™_»ÁÕŽÚøæ/z)-‘ žU5;ÞíªØ"Ç'½[ºuc·Ïw®h©ÿÃbïL ©>ñO=ïSI›²pB÷Z¬¼hâ–ùžfp~.v 8GÐÈц‰ J:b+øÓu¬Åhp19Ä­zc[,}„Œ}Y‡&¯±¸é³œIßá0Ãb|J ±kjÅV{ÿbëOîwOÌ}Ó¹Í?ì†þ± ªhñX±«fž´²¸'tÀ´é8û­Dmd´Ïüü9ö!ÏàèuJ.z”qï6+;>V¿½¦=YÚ…ö vYÂ.€X"œœ#Q‚õ›Ž‰ „gO5(d94pòiûmH"“ÙDÉä4Åû|¡2& ­ ÊðNi¥s·=û,îtÚg •Æ¼I”3©»GNfþÄžÞ6rɵ}lZÝ‚žâz¥:O 80æ\^0c£i‡åÖÑÛã£Ö)_-ì¼99Ü7¼Ü—M´-ÆW‹å|ú{õã(ö ‡1|"ŽOÀk-æT3O·š›÷|ÞþR0¾\†xÎÍþ䆰Oh1sáv#÷¤vzvÒퟷ‰q±]/*c1:xeU¼jùõÅì(å}¦ÑZ~иçVü‡^ÕçLH™ÿ…üJðß² |Tˆ>úpÒ‘ÃYo¹l’ïàÝoN2ÉÙçrýA—ò¾$þÏÛ“n{¿ö>_ «’æÌrœœÀü5¸xrWæÊvqA‹,óT™/Q€Î…,+ÞŸz¤bhwÜ¿uƒhkî,/‹ á’„±lÄÈ‘»Å:–Û+Ò¤èxªF™w’YV¨Üöö½¶¥¶Ù¼G¦›¾Ï‹ÓœÒpuV3H",¨;5Ô@Ïh`»\qۡ·:»?$zÛÅoË+I–NÔ·-ÑœL/Ì8_§·}¶ÑlØ ‚ +dOCI}§üÕ2â9+¸®s¾\ÆÖfþ0kNö>)ß òúX®ÕÉÏ8[{eò¾Ç4üê¿2™ûPañÌž¡íÊîÖT_Ÿ ±¬'¤‚-¬j2%¶¥±œÆ»r>xßÀÎÈ®ø>\ÄwhqË…‰9#¡šx)=7ËŒŠq:vŸ@€zâ/Pë]™õj&º£?¶¯åî°å;vH[g\‰z‡µJ•trÚYTQ¼Ä;O`âÖb³8€c²Èš^Œš“MïÍŽ”1¨ËPLëì_€B&±¬NUÝÌÍ™xœ6MǯՎÌäKK‰8sú£:&@ì³·‡íNí}:¶OJòÕÉ ‹wª©¼W8º°$¦J¦kß–fׇVÒÎ{ëŽ#)¤\D“V% e@:œº6+¨XžXLG9.[u˜p*`›ðl*ØÞ2däÄæ=Ÿ§M9Ô5PD*mÞeyq%è«& C—ý ¹>dâ ©IÈmž(õÒbY¿36¢RcÑ&!˜À/Yú›`&ÿ <81î>òuVxÏ`ß|ö¶ â 2. ˆ* k¥þQŸmBààÞ:žƚ*dÏë´1ÞÍ2±¨®(³*Í[[àþ ¢ç&kÔ:)˜½CÝìL ^ÎCò6Y.Ôný.Í áEØ'R›þ}ß8ø¶Óß ¢ «g×}…€ÁÒy0Jr|Ÿ¯Ýô|˜HWï ͧîut H6Cîä ‹³•PPðlÚFohÒÄ7¦N¬d^S ¿6ÜâkŸ*%m·Ûû=c­ÎÑ}ù¶Äk™y «bwr`N€Û+°åVt F@Jø)¡Ù:²/Fþýá ŸÍé@iûT¶½bêŽ÷)§¢Ÿ–\dE Mž>Ë’±¶ºX,§rjyˆÊR‚ùÚXé»þJ4V÷PÙÞžªˆøJœäágQGÃ:yÛ=}Û]øÓÿ¾^üçsßû$¡Sÿ-¡‘«ã?¯m¬¯šñŸ×ÿy•>ýÿùwø·²´`-åb@¯Ó€_|ã\yN7Náz*òÝPÛ‡&³4´ÅU}¥`ÐTÓÝ£AKË_šÊ~µ€ÐÙ~üƈÐTÙ× MU}YLhžÛ•…Ôèfqº—v쬌=<6ÇxëžÃ¹QîXÉ,í¬:O2Ký³qäÛ\SJkÏHÏ QÇ¥¬èt[݃=k‡½˜ÆIâ°: #zI20,9¤á6»QÜZ‡KÖÊ’õM‰K VÕH¼O¶¶ —fyÛZÝÊg,¨²Ùõ€ÙÉZ¢¾ÔÄL q|¬óA·­¥?,Õ)ËÖ‚Ö¿Ôj:ÇwÖZ¬ÅjÝú—fV©û0¹Õm$§ ÚÝ¡ºutÚ#ñ(›xÓ÷9VŒª0I ÌÒ2 Z8Nâ[ 'áÌÏZƒ˜WC̪ºÉU€OŽl4(6—!›è R¸^‘é¹Òêð@sU!â —Ô’Aèmïʾ‰à˜Æ·j¶påJ+L¢plU Pª`ÑpPY\nt È åT&ÐŽ¼õ:†ùªdv’ÐÉ Òa𹉠l[jËæ«‚õÔ²œåó*ö˜ÌaãľÃ2‚¯‚6 <þåĹU:·³‰\xÞ0Jnh%1(9¤”Q•Dþ´$ø§ Ïaoà|0¹tß` ªë”þ/Ãq}Íð‡\£Ì—„ÆõšåÖC) i0T¹…ýSºZÚbŸ”‡êD7âp[¨ŠZÕ:ì´·8˜.Bkq_ÔFÄ/r;QŒ ÄPmÁý½CìûáZ¬ÛV»N•¬Õ·xN|Qʳ«$¹T#Þ´ØsÌPWM ›7鬱g­·Çf¶t¼æ ˜£ìž½Õ]Sû=…J½âhy`„M>§Ã¡8žH»JUi õà×Íê»r%T‰`væF7/µAµÂú…á8­Š›Ôqc•¯¦ap%ÑËÙ‹®ŽUnóK¶¦16ÔŽ7ª ÎÏ.=¹+¤m×õ F›·-Òí§F[Z_°’æï„ìÅ7‹¶æþSUñÞ÷¿À牥­ï„5IçöõˆªPM©:åÁ57$õ¦ªS€QFtT ¼©Ìjre¥ ./Xwþ‡{ $u·_wß,3ÜÉß´Gæ4²Â®®úº\N3Õ¥ûàså®h7i&“fipŸ1óV…ý·^°±ñr`ïÝh4‘„Öj3÷}œaWäq¹?Ÿìþðã‰Åé,AéŽôè=þ~h¹Nns7çå/ë`G¡ÁzY:Od5O•0I2hx„NCž @½þíóx':AOõ„QS Ÿn÷Lƒ]Ò+ÿ{õŠýnÊ2˾ ¦[ÆÛR0U¼ÑV5áðúÖÃmËÄ[9ðIéAJ#Ä8‚€¨æõë&ÀnÜ…Ö…mAiºÔd!_J;¼‘àžž‰=}ïõ?¤©Ô{Jþ® 9¼÷FFæ¤üÐôýzšGë{Þo˜9 coÊ3–ª¶¥so­ÔîdKå3ÄLûµicÝà³½¨êI±7ŸM¬¦Xv®».Ì×Br6ÀàÚÌUóîë¶ù_»n«_wÅJØÞdŠ>Þ¬g0»¸›swï°Ý:ë퟼…­ùô¡†„ªÕܼm5×qÏ»l=ç®æÉþ+Ùqÿ¦=Vlé7ìŸ/™ñÿ’³Y>ãOï8ãOÿ-{dó΋“lÃVä¬L†+ikrPy.+}Òô”¯òe&£ >¤ªöøL=GÇPÈi;.„:ìv8”¦”Í<”PKFU™Qy2p¤„Y,®2§¦eÔuE16íkœoÿÞâÒÕ…náI.–ÑÛ+GßfF,Ó«$ qIƒYŠ'}mN6ˆï?eLˆªLªJÌÌU„CíkrؼûÀ‘:ÛgÅmTØEJ™}ZNÌx]æꆤZÌ°çÉš.Ó¡s¹•|Õ“‘n嘅âÃqæµ”‡1šs, ÷N†"XdŸýùR ÕÏöçŽËëH; æ¤|³)ÇMÁ怗=ê²»Gá³<2»_V•iÎ(HyE]…ìÃ]y5†k3³K³Hü‹¯ãÈq&Ê@ ©bbÇ`'³Áø~LarbR5Æõ­ÛrÅ­?½S¾õGï”oã ê{`•óé<è7|\Ý8րϗŽ­¬çœò+í$ ÅY£B\ç´Œ¸I»ŽcgàZi’±šwšE ÁkÕ¢O&Ff£”õ笭ä]P¦¥Ìênó|ùxYöÅV¡\©Ò¶ºÂ¹Ue{¼ùz¼ùõz¼y§ë{b…,OŸK=°æ(†¡+€¾¾Ly·Ð‰Ù•1+»kŸ ƒovìü­-”ž*ÝI°q`UI57Ó¡O[Ú0ÆáÀÿ½?]lã:ÖÐóWý1Ëe8¡HJbÌé”-oQA Ib @#h@$cë¾Ï}ûd·¾ªZS£ARr†½Oì½#6º×<ÔªUÃW![¾²« Tq1Ou8²‹çÉŒ"ƶ(¤ú%.u¯h4–yGz=Ìç¨7Ñâ;ÅþTÿ(2[ä(b‡#ЂÞ<™ºy`ŒàŽŒð¼-.ƒÀÒ J2Ø/K{¤ºË4VÆk·[ÔT¡9`åS%“{zñyâi™­$Ÿ•ÁJÀÌqeÐ=xšü+#[üÝ×–ŽuŒÝ˜Z,lŒÙãX#¡h Œ+õÕ5 bc'¢ï01bˆ öq“ÀkDp¤pÙO]Qç‘'ÔM˜¡ý.6ŒAÀîÈaMç­°~V"Ï)BúÅÿ̈\7Çé/¬S2E³êmÉïó9Q ã":SÓÍ–°Olƒ$vx}7¦v×öà½sø`òÙB½Ôaô ˆÜàô†]ß÷±a…B/rŒH-6–WÂK… ÚS·² wëñÚ<ƒÛ&zÚã'XÈ0Å£ÏrDzöW¢áŽ}Ö°Z…’.$• ¦Û m&I¯jk¶V•Å‹Äot_IS™Åå1™·¾ÀðTkj•¶êÙ÷\© ÑyJ•û˜ê€þ\ø{Â3ÆE»­n‰§ ÊF(É´}Õ›°ÁX¶ôrûxéªj ¹…KÒ\<öÖ4¢»šo¡as:šüøéðxÛŽÀùCjäû»Nîߢÿþü?Çýëýßú«k_æõ_~ýõïú¿—ÿ×?H“G%|[__]}2§ËÛNÞ'ƒtÌ!»T¯W‹÷G¿«ñþ}Èpz5®Jêà RGU|š‘õÂØîObÿªŠ#°™ˆ"€ë™@ñp8x¥Á+‘ŸqnMȦªY ;€¹–áŒa4ÚñùY0lž¿ÅòŸ÷Ö¸ 1'8›˜•!àrýá˜#H 7yõ»Kó Ž£ߎ¡ÐC1 xÅ-hØKêñ”]LVûÙL#‹Ò¼¤©:Y œýÍãÚÛ;­­ãöáóç­Óy Ø}•Ž“žY<áfLábÆPvÿ°ÜGÆi†L–žD^¹•5¨x4 ©'‹ ¨£©Uq¨˜á0éñíà2í PLŸÙkÄ >OX.…©ô¢é™vÿ¤O‰è{תD^ õ c<èw°?í;+ë£bûG?xÊe¬Wãç›­XÓÊ Ÿ=1N,1ÈÃåM«QWà£8·ä{ç—|ÐzNØš°¾ÂÓŽxß!¦ÁÖ4Ò ã5ñMjÎ'²‹f„^‘ÆÊÝ0ß°XÃI/†wv ’žçR¥>HgÍ_¶¿öï7<½n™eE¦Ó¹ (u¡$;¥ÔxˆLÑk•ÀÖ:gÌ;jZ‡z7U^Ñ<œìGˆ]’ôîo°—ã‹{r@ßXÜà¼t{Y›_ä’Íû°RJîç]ÉÝð0S›E“·}Ñy—ˆ+ »Í¨.‰úaó«:·KЋŠçÙ¬1>.oìeô‹òЖpë“Ñû\㤳ù ‘CŽwN–J©ZE3p“’+&ÁI¯Z5†]2Òƒ-‰`cýÌà>é¡k³Â¥¡·ç…ˆn¯±ßÒpL¯{É̓”Ô朚Ã`Ï·œ¬sJ•ÇžŸop¢L°ÒEÅ.B¡Ë ›ºŽõ†ê–¹ñy‡0bÅØ N\cεv8ö=AYV¸þþñþ• )™Âå æ}-ï"‡"%xÌÕ)•Þ}qpx¼ÃLÈîÁóÃÈ#3ƒx‡¡‹µC‹e<`ÄÙ¡RJœÂ‰F‹zÝ•?œ?jÇš4ƒ֞O³´ ÷ð;';?.•æ[ZªVµ> Ìæ r#÷‚_`Çû‚–ÀîÁÉs*qΦ·åLr§Lá?œŽJÕÜ;ﻲ7f/¼Å ¾UWiyÀGU° #fqî\fµˆ»•â÷L.õCy%zé &<ˆ¹-¼ŸwpôR¦‹ÔJðfcà òYsiGŠ~ jº;fî}ç!@d9m‰]­¬¢À˜ŒàœNpëžÞªžˆo»:Å“Õt«!bq ’¢ÆÄ5A¶zÿ½JؘéÇubâCá^\`À”¯e'Hm1fÀ™w.’¢ntPÏØ/×lЄ°% [Ø€d¡ûñ–³†Ú9nÕ‚¢›ÙNDðî@DÁ9Œ™Ù‹»Érz;Èä>˜FQlŸ¨ëVÊf8¸1 Û‚hpKÿt÷©X'¼‘‡ÛsçiçÖh*qH‡âÙù¼R{.â÷-ÏÌ ›¹ýÕlÏ?¨#x Ìg‹ugV}V:ಋ†^?y©ŠZnÚ6¯½é9Q3–xÑ;²V¬{êp@ ‰Ÿê„cK"n€ähdõ~ÃØÓ¥5¸aÛ°’"Rp‚9Œ¯j#ñÓÆÜífì©](ƒwiüàÿ¾ÈçOÚ–®·U(U(3~ÈðZôð&݇ÆÃýø ý‹Åè ÂUXšc€¨PýHHã*œÊE|¢BŽ !+¨ùCá‰`,^¨]AqŠl³ ¿…›ëlÔÅßUUøüL|¬±æy á­G$=3ß´Òyx IƒÎ-e”\0µƒ§­ t%Ú,/ÛôšR°³™ šßãуB…•Ü9tŸÓX !kr¦®hæë^†î·w‰î;YÜ¢»øЈ±$ÕJ“ô¾Ÿq 5ãñnÕ [†š}}=›Y®Ø`U÷îÿyB·$ë‰deëŠÃýj|¤ã!Î7Û\X¤±w‚±ûüÌ=0ÜZZ1¸tèÛtš÷\ÛÀêÐ~ߌÜÜÛÝV¥{»õ_>—¨†#ÏàA8¹œ±y»ˆ› ë ÍdÌ—g -õeoäïÛÀ0§0…µW²Éh³]g…‰ã?`¡aÞ8*[<Û=aåÜ/jÇw–2¸¹Eu3 BjXŒÐß]1øº…¶Ù$ùh´JꤺW]Åb•Õóbºçàp拲kƳšíôx9SFß/•8d+yá™VÖ«Ž¨ð/Cžùmä÷±à^ҭȳ ¼8¿§k¨Mj-^U¡§£úÆ$x›bîžNýƒ‚Pr{paÒ&Â|€egÚ½’;Û"ÍîíÄËfÉpʪ'¨±¥xžnKry¶[7oK6w-Ñ‚a “™Í?Î\÷—èS¸{D_U“£æ½+vÝãôzä†:HMái‹hyü®`æœ?¢$úüs:tÀÞð§·làÇ«÷ ý¸&c鎃H7a <Ѩ3½ò,È ïËÿ´†êäkÙtË?´ÔøàcÛ‡K³é6AÑÊôñ^ŠˆOhVm(ºÓOBçiÌí†ì?u¾¡´¶Û&ÈDÛ¤¦ë<|}º> [Žâ??ÿ¼_]DŽû>5 æEûójf_å?˜™oMóœkJÉç©e¿P÷âûûw®üÓ®F_ýå¢û_—øþ÷ä‹/¿üâ îëë_þŸøËßïÿºû¿ÌöÕêû/Vþóÿ󿶶úõïóÿo›ÿAÿü²ÛÇÿùÏ!þïÍÿúW«_þ.ÿùWüw²yübçD´-<ë½Á ŠäíÉÏG; ‡^¿ÚÝÖ_«7kÜËozôYÍê×[ëñÊŠÚÎú½(Úy ±ò«ƒçLJÿµsíAA¶wøÓöÞÞöæÉf´²²¹÷ÓæÏ­ö³W»{ÛíÍV{óxŸÞŽRøbN’ —fb„è"Ëž_Ò¬×áÁ(%jÅê—Ü ú°·{ð¯Gð ‹·~Šë`!uwÆE KååÈt&Š¶66Ÿíîížü!,ÖþåpJדNo;yßï&Ûi‡¾Ê’ ÿø ¸ZÞGþm¿¶®wÞã ¸½V2yÏ2“ƒdJg÷;ûÉwFïû“t„KaEû›[LJ1Tb™x÷ð¸}tÈ-ývpØÞy½³õêdÌÑþn«E½Òoˆh¼O\»þ„îð¾Q/v[TD{s÷Àkð<¸t{{ú£õóþ³ÝÍ6ùëhÞçýq©nâï·ö^mëºi4NéÿUtsÏçSìDQëgjé¾KyšŒÓî붜{¾ŸfÓ^gÜϨ ÃWÇ[;G›'/Í2–Íwm †°+èçEŸàZ9÷þœîñïÙ´à“qñ,ør;jÒN¯à“Ñf}²±yiè×ÝvwÚÛÿ¼E?§3Ř¾è³Ê˜]¬ˆ¯ÂeI‹Þ@{þvéj:o¬¬\__7®ÎÑPP¨tå²»RE o?YFé.ûÓ«Ùyƒ.+ý÷ÄÀ¬œ÷®/»Uªôñãøð=î\ɵë ä¾&¤ö9|¥ÙF¸3pJø\o@Ö`,J¯"‹5¤!;ƒË”îWCÕ7u¢¶lDPíª1ňèË÷± y-.å­FÐоuÓtœLx€!íõî‹¥ZÜJ/¦×¨íhÒé²òý³xç†Ò÷=Lß“ñ4žÓ´Šq]âoV¿®³¾ÚÈ·iÓØwHóZ¸Eá;nß~šM·ñQgdŒA<ß^ÑÇMÒ.q“4V™q‘ÚÜÚ[»/ˆäÄ•o× Ä6ÈÈÔË#±‚bt÷:£ËJ¥Cˆ.ç( Ù…;úËNÍv –ë_Õâ¯â¥¿ÌF ¢T¥›k_~]_ûêÉ\7K­1`~v ž3kÕí.ê˜ß+4ê·v ½B9÷vì› c_˜Ž}ûu}}õ+¯cÒ¯ã¤7cGþ¹oÑÕ.‰÷ûY–da´3hG_Ú…:dÔ‘ÐÂqëvH{¡?¢GûŒ#ïwFT8šM-8Œ§Dð“:p@M×I2RÓÌeJœÅ°ÿw´Ò n±)I„8ɳLàŠ6Ëv#Þºê`[–6Ñ~jVg ÆÖuv!Ýb¡þ ãV#¶æ_ÒÙ]¡~n¹‰8™tF™$ŸÔ‹g›hn”o×A50I¹n œ‚­Ñ¯ïþ¥ÿšôQ‹$·B¨Q¯Fƒþ»$7°>¥ßSyæûDèÀTB Š.…–XÒgØ.k‡3œM;‚*–ŽÖ›MŒC+µ¢?I¼Ñ’2oÕ˜A׺i*ƒËK>™ûÒ G-b/8þÎØ99éEÐü'ˆEo cÕ8>”¾ Sxö¦Ã¡¤Rƒïp—Èã¹ÄW˜F܃tâ…G˜Œ©£ÁÅ):ÿ\!SF‡î½ïP㉸ó¹6¤~õDdYÊžCÙ¾Ú³ñܹÀ³û-vâ“;@Íé%“Á­>7]ì› gÑXc«ŸŒŽÂ^t~+Pj0"ðN® xš–>™ê´‰ƒµFÓψŠ8v¦j{k¢HCÒ¡V€ü¯fÁiM/æ1bë.,x² ´xß*‚[Y{£¥îEƒNÙ >Nßøh U~Á!†E| 6jïÉí8É"FÉkMé»ÜÖñŽŽvlæ…³!2,ʶ\” ³3J±ß½­Ö^üÍ“ú×p§ØNg—ñ~ww0IoãëI:uà'E5 70 Š®iºÆ°Ò¢!6<Î7ñ«ƒÝ×ñÒtXU71Ú ;ÂcÁ¸Py=Z~´ Ç<ŠÄÐz8žõú¼&p¼O™F–Nø¥‹D£7ƒ¤óŽ¦rÊïîb~°q5ªÌf[ºZÔ§5Ñ`ƳtL›ã DØûÑaKISTꦓ^IÌÇŽžyM‹lÓ°g[ <ï»æŽ€|Oëˆg z܈7§ïú£ ç˜27GƒN–Õ¢Ò1­Íl#Þ¤u2ÐÃå={ü·¸MY!ƒ2#¯Y‹×Ö£€JiÎÃ/Ö¾¬¯}ñŪçºG³x‹`Üþ0â%:5h é`{¨¡jÒëLÀQ¤2µõb7nì™D—Ÿîl(AªQô|6aZêÑå´;³ÄÛ«‹”ÃX\ZC`\_(WêÝËÛ¹ƒGõð0 æ]ÈòF©2¦å`vYïã.o Ô„s¯dFôE-†MÈ< Íà·8ÃD檉ž^b3¡5I#ÐÿᘭãüX50cí:]\æ(L?ú™‘»2ÙËôšèݤ†ù®fâq»(1½+1‘*3.žŠÚ%S‘À££#9l¶Œin¦ÒP‹ÙKÜFMÑÃxØqD NRâÁà{G›4«‰ië0”Ø[³‘íHljµm%â{›EçX0gŽveá]¤°@¥V`[Å%1_+1胕¸û ì ÅðT˶î«8Søä0f²Ža8§“ãšjÛÄé¥æ{˜ÏÜíHgí–P6:Ñü]xˆˆMM”­ZÝTjɼǬEª±‹$ÁO-îu¦N“¹óÀùàž#„Jr‰Å‰³ñȬ41׃RÝ–ÌX¥:2e„|A ј9ÖþµÙ`X>“™„”` G» ûy²Í ³°bǪíÎÌDqÏÎ ¡<½kºFYœ‹ÌÄ]àˆ2ÂlÑd ߉•i¸EU£ÿ\ Luì,¯ÀÌ%¡Åb(ˆ£ó[ÝÍ|^ø£lÊjŠ#ߜآ¹Š$ÜP¡opÇçy¨Ft/Ñ1ç h·_ÚíÎÆ·‚M&1.ôŽaNQË¡Íp†Ë]$3ÍJŽx4ã#ƒ²Ø Ñ®œu¼1^¦ŒFÇÞê©Gg‹,yÏx‰^g6&6SkÇ.’.kÉÀdZP‹¦nbN#:³à"yP[;sˆn±Žt††ý^e°Q`þª³@ý >u&`âKâ^pÇŸ˜k$ äÐb›‚»ŠÇÉÙÖ>·SiQ%ÔQ¸D¢§éÞ‘«Ç¢Pw¢ÓwŽ åm:cËI·?‰ŸñeŒ „wQ.ïv®Õ†Õ±NÅÌf) #Íí £…Õþióø`÷àE{Ãn&(yº+ÝÈq,gÒ3^—8 3°þšjNxf`–Ìœy$7:oI!µ‘ì÷s¾\ ;€½ÁM,ñ´ ¸3ÃþeÔGš ‡òœDó ŒçžVˆY•>J}°`T†Ý•Câ’óŠ=bªÑGbÛÙ›„JÀ©ÂÓÎΣgbpdhÐ’èÈ1ÌsGî̦)Ýš5Ÿð[àd:[:|gˆ‘·Ù„àmpQàÞ{«ËÆ\Ag@ý¦i¢3ž*É|–ÒV€%¡c…ðvp0Â]n–«ÁšZÀ_©¦öáÁŠÕ[‚||¢»Ï-„8ð´Û÷ ÙnGa¿ }̄ƈ}\ 7IqW‰pïÝÆ»ÏySÍUI']PY,•Ñº»'¦bJ: äf/Ñò–¯×kOÒtšá²¶¯ ÞT –Õ×ËrÜš[µx÷x÷uôeã5oÿ¯¯kñË£•W¯á†6¾êć­ç+kµx¯?šÝÈeƒø£/ÖÇ"¼eîîüÖœó—ɇ¦üÄOf—‹ô!@4“0Ç[8°1eçp;íÁÕj—©4£ON9=úd{ɘ˜0à`YD|ogp÷…Í`fXÉ]Ò´Çb Ì¢1¥¡€¸F¬éH¢Kâã™À~Áóˆ—ŽK—É—ŽbQk:øîE‘Û\…ÔÍ­mÆÀ“I‹ ÃkeWˆ¾áN]gòƒÎ¹ €aÈ$™‡¤‡û–åÈY¾H¤§9ƒ——7]z¾£L̽ 6dTÐ`¾]BΨ2#ÌŽeh2þ”™ùèA.7qÒ5'HªAêh^+Ÿ2™…$BBaE‹µÖ؈öp±dió µo)u¾Î([åž4è=Œ¿l‰µ¼ø_lY–©* ¿£!ºˆx‰ŒÖqSDW¢ZÝÊɪæ&F'WÞÍtÅ l—#8dzÛ]ÐD¥²H§Däª4"·¥ç3ªD[ƒðÈóJ(‘JO3¯ ë–(Ñ˦שnïˆAkUÀRs÷ÌÄËœñåtÌÇÂȶ=ýø¸`I£t…qû­2i)i\6̼2 ¨\ Í>+Ü?ñ7 cÞeBz®Ö«EÅyXÆéìQTS£ãÜ*ûŽµ™fÇ™ˆp%ݺ†qR¼àa'Ôœ(K#M§4KÒV2½œ]¨ü„V¸~!éOhÿÒÒ͘æÕJ7&4€ç'w^Øì'4»”9ísL ^²õ¢Cß&SÌÎãÇñ.¢K TÈ5}”‡.Ì,Ýx3Ï ¶WËÍ¡g´ºóÓÜÇ6ë¤fƒ3 Ô…ÊÖ;#»R°„i{\ Ùg.ÞØD€¼²›a‡«wBy÷ãÎñ³ÃÖŽù–8UŸãhôÀŽ®ÿMawúF¶=àË µÎ€I’g­í|µø/„Qñ—Ÿ}e…P"*ZBÑüˆq¢úY*K–í­xóõ‘yf|µ¼ ½XxðôB4j‚ÄÓéMŠsjx‚([Þµè†Ãd¤¤ T¥—òþO/¢@mËõ*cvä…Efœxø²„%f¶±׫FÆ€Ó{äGÑŠ#,ÚÍÉWìÍͪ Òp£YæØ+ºÝ™ÖÐR…Êtªï×u+—P? #X. '_²QU5+œ¶~ò/„ËI*·žšÝdT½Ñ=)2sºV½ÃN>©ÞpóQ#Ùî©5LÓw§2¹A4ÈÛ¸D vïg³?qXñî¼6A e¢M·Ùyq¨¥Œ´1ÆŽ«3¥{<Âúè ¶œá•A*u Íàd&Q„Ïà•x7ó=I²È L+°Ç‡ Ë ŒZš"EijÂÀ~Ä„˜Žõ2ª˜ÿð'2¿"W(H3/Döh:FüD–y-¸ðnÐgǼ´ÙØÈg² Q8¡Ûªšµb ípZ ÓøØ£ñ‰žfÆÞ¡#dl²˜™¹Šéd¦1Øom¶"¾ÐÖ¾bh°˜¾Ù-í3þCQ«i«Ð¯¢yÖ\T~±úfE”Iâ» H»+šŽ5ZbóeKì=%Vª0ü›F8'Ǩ%$Nw*VG}€œá°²‚y°]tìæͽ0)w*Qx&àC;ÌœÙà*¢5`ƒÙP‘ 0ÓFÆhPæ´ôÚŠžAù"& þh2 Gg ³j÷ öÁ¡® ÊþX.¢“éØj$ŠfAfÎL¾/©w2é(ï ´¦3A:îâbt&˲üˆCÆßô‡¾M).Ò–ýKFWˆ‘š ÛØ ÀÀá¼<Š6½vdÆÂÇâ³Þ€xb+¸ó çÒkqÆs ‹«Î`†‹T¼%¹BtË ŒJ왹 ™È —5Í÷L]øÈ27!¶rŠ¹%³4 ³HÂ[Í ±(T’Ò7ׯ¾#S^tÌa]àV|žðÂg YëvUÇÁúe.[Qd%PO±Îƒ],Ùh ˜>á.ûÖ(“JŒšì""u1å`¸¬U,s#Ã7«¥ÓŠ”ÍŒa»Á\©³ß°Z:}{ @kn«Â7rM'ÿ6£å °ÍÅWøJázi]‹É\¾¼Lft;V°l™2Ñ0IöWÜ›qglÉs¡+šk0pOÆž-\®„¾á—Xaê±ÊЙ¥fP H ßîûbó>Ín¥vYÍVÖ‰»ô’å_ÕUX/Ï®vÞ踥ôÒkµ_–íîبÀ›x¸°#û–²ŠÚOÅÌR¯€~Þ š§¸&¢M”+ÜÙö`\¬­§h¡ì!+ú»9ìV UÖ‚Lv–Y×ñÒ«jt’ÌmšOocÉT¤Ü¬ã–³±„‘Žñ²î9¿,¬(÷=- olVºtwˆ_œ˜‚:ÄÇÞÒÔ'Sâ¾E«5›ð3¹ŠËÉsËZQë>oÆì²Ø -3ŽàéŽy±Tm‹µBÛ-@l<39Ψ炥—cŽÕµCÜèm(%µ~êÜò W…u 6!\'ËWÒb˜„ <îîÊf2BëdH‡•Š#‘€ºVqQ#¾Þ 7:+§Lšõ§b̳¦Ònˤ ð„È" ‡VsKEaô{=^ZSs¿T2¿Dì5Ws–Ñqq‡+(ˆ«ÝCÁ8ÎFÌ…žíï¿ØiLMŒ·Y¤å„ãxG.ªÉÈØ«ºjˆ‰ºí’Ü  ›Ë  í ±£žöYécÝ1ˆ»áé®q°4XŸÖÜyçôˆnJG6Ûü© 6/Õ'²T¯¯ëÔ®Î5‹ ŒŒ<*cIC¸§áº'µÏo%ñyp¼ ìÕÀ°X ˜¶ý|ˆÜédh_½Èð¼z ¶¢=Ø`ß´sÕ'z‰Ì\! X¶çÁ4&±âñú—_))c¸‰!Cßãig¾wse*R‘¼7fÛièAPÞ§P7 C¦Ci'‘/ZêúÅܘ¹Ê§8õ“ª† ™õ$=Sò€(nÑÇK{;Šržsmu5þ;oÊ‚µ5b-ù;TxM£ZVPV%PXcbõg˜î¯eºéÊÒ†hYÂÎsHf;É[á.¦áRMˆo§™³"Šãj2IìÁ*S¾†]šiaË+Ypž…M/1~Rê¹£»˜9è¶ç¾¶äídþ˜EH%§MîëÓcÌLpøÈÁîŒCìgèÈ5]->xÙ°*¬?™Þú*GË7µpu”ÏK„躿æ{OgJ¢0JêoCs.Ø-§ŒžKä •psSwŒcê†Í›Ñ6M¥+gKËUœŽµø¦z&ùé—ɸµÔؘٜ~Ö¢ÜÆu•b.¨¤"®VŸÊb‹jÜï·.*Lݵ1A×ÒI/áÅÏÒµLîOЧ±6E¤;—:Ö¸Äõm¾rµ<œYCB–ý‰$ïV:TŒMßÿ1 _aïÀêD¸ÜzïôÇ®‚·k6ÔˆäzªÌž(žÙ*[Ô}æz׌v–/ªxÞ?—Ø‚N.}ÌyvßX«¢{×dd‹`FéI™TžyÆ`–êÓÜè S¦ihFºý,2 Ì{·²YwáS±È³e?­.,  ÇáÙèÎBí²"7K”³‡9Àl—i¡åð˜‚ð™â{k¬Ž*fCµ‰˜ºɤ‘ƒyyJÕ« ³|;˜ûF¾.CT™V{_$ùËÉg™zŒ ND(áà\Õ† i›˜ÍF,T=Q5HÒ•·ÃZhiX]¦”j™"Œkt™?øq˜UÎÖ’Ûš‰ i&7h\Y}ŸÈö¼Dï'©gfjŽÀþHé,ÌY¼¨óm=–cSk’OÐÈsÛQGèÊ1“„°×Õ³Ftbbô!'kÓ‰%„\½ëIëtñIBQACG”HtLÙ"¥e´,æ+¶‹9õlðo>ðDĦbn ¸¹ÖÕŽ ¦‚Ð0ETÚ—o‹Ývàb© ”ÓãÕgDÞŸ~¯Ð{g0ègõ—°/Eò~>y`cmÎ鶗û¢V×"ËÝiÄúbídL¹ºŸN‹à‚YZ†Zb|kc«°À ÊÒFÔbâΘ€WÎÔ’Í}1±íŽ½õšÑÔ(ëœ|Y®.2"4΃ä"ãA™¿DcË`ÜÒ,‡+4+áG\¯RêËA­¥ ¦ÍΨê‹Z¹2f\|ÅñÝ"³•ÈïØ[7'Ï3BJñ°›{ñ R[³G¸ÕìÏmCävÉ­`/ðmuÞ%Çê(eUBÇJä}àÛêž·að)‡ª3ÞÉÁÉž¦âcýæ¬Ï‰OZ!ýâ=&”fç¼j>$N‹ì¿)øZ#/(Ô_m  éiV¨—²XiìÙó] ýïlþÀÆÖê)²Æ(±U«Ê_n~6IPe];‹”¦X¡Jþ„± ŒLžØ5€-ÿÏ9q‰h†äœUø½²c\zææaæ”üVcX:çd>á|ÁÁñ¡Ä•Ètgâ%3¢‡ÁöQU<"ÏéÓšqíà]$«­•ÜgP’^ˆm~/‚é±×êL=ÕŠqÒ[˜“øîb'FY‹SE¬`KœŠG ¬(´ÜÎ6Í‹»“Û1 D¨/_#ùI Áíð<ÀK±9üŠv‘½;6­(þUl‹•$‚,5 ¾HÓ’ ‰±VPn§Y#¥LKÖ”¬#;¢ì*­Q뽚(Ÿ‹eÙ˜ïJZGÜžš 5Í‹¬êX*ÁóÕP­[øRBÍnuÓ)‘­îÝv§Ç­:ô ±÷8ºVuÆ`úÅ_HÀ(ÀlžŠ*ÞÛiµ”Åi!/vðbüOfnä*GÇZÁ·3¯û…N,"šº¬°~’xxÆÕzÉ’àPgXsxîH8¢*b0e ¹á[›š¡×¥“·ì&0¯‚þA­ñIÓï† ¼bD “¹RlM:ó®LD¤·íè?·£/DÚòÄDàU¯‡çÀœ~Ž`Tç=iç-E–zÎÿ¼CÇ ' Áþ¢ótÇoTœk”pzakÜô²ŽØ`lÈb³ŒÕüÔÕØ•EגܨMàë3D¾¦›L4·Íd!Mn%ùÒ¶…Àu¤Y°+qßó1(ל9Oì¨Ú˜ýšsáS=–™³ØL"ÅX@XªÔ"ë6äùªáH|íždg±Vê âaÍU"·`iS06söh9A)íˆÌ×!H¶HÝ’x9ÔŒA)˜:µìYy¥ž˜Î/.Kã®/×aÇE)”#“ÎÍ?¸ sL1ÖåpŠ(H·‚1c+a`ßᆊ+Q 0&»#㙕±ŠZµtDânó/8åÁ‡ýŒ÷’ w²èªóžÝÒÀGÂ:e·^>:ÞWp•Rܯb”N35Þ^_^þbÝdõÓÑOŽÕ¿˜A±ŸÂT‡T´jê6ùù£HLhx#_D\?ƒŽXp-îOŽÿ(â‘ËdxrÁ肬ñ$ñ¥_!„¦œ*¾“¡%“KbÛ¤²L6ñçx—½ªl5ØT‚°ðv¼·Öð–Èšó£f5ôpÈÉìDl4 £Á@(W^ó~´7O÷wÍ»ã?ÅóãÆH>j¤â56÷vÿkçøÌzFZ“<;:ƈÐ)Ý­t½c,q'DxÆ©p^K#z0„¶jHu}qD^7<¡zÁ9’3ð¥;²±Ò¡™°ŽNŠËÆ· (ï{ÅÈÌpß_3¢–óm Ûï°ml"¿ b%+–æ:L¨—Øyâ#$‰“©?~‘³bÏŒþ«hú|ÓDÃ{àQ@Û AeSøìõa/:±#ƒÃ~Íh&‘×_ÄhGu] ªSÂÒodÄú‡@3ÝdvDQZò ¦V×âˆ&ûÐ JȈšuÆ™)±´.½bcSè4ºÆ×jËV^øª4‡˜xXA»õÏYe'qT¨$Ç}"_‰Q¤½ÏB–âùs³AA0}ŸD²é21ƒ”èl`l,<Ùb@ÄŠ½9gl눎›»ç–|bIoQ}cEÚwƱê`–‰…%(bótŽ)·›âÒPL©¨tP¾Ô,/•Ï'Ïäâ$X¿ gÍxwª™‰UnÀ-ȘSå¶c‡K2üžËzŒEþQˬÈÙn¨‘ˆ•a‹ÅMÑcÓæu¶gŒ˜æt²Ø%Ò6Ç ú7_xE2Å—eÏæ&gMÌ›OUðS duvÀ9A…›‰Á<3oÍxtâ^4g§6c›À°Ü&1ð(ÈF­5h9’bù =MÜÏ™sZ±£5gäbö¡,ZUv÷eËXöªšx½ñZ|BÆéÔóBy€Qqp¥Ð;úÑPË@(˘FÇ2V ‘CĶý•«Æâ›.9.vüyÒx]uv¾·_iëcàv§V¿§ü+4ÞjQV^)U°’XÐf3‡ªzíŸÏÐÌùZnsŸÔë7jA!K©ïš×éUÑo£Öfè±¹õIWѽ‰Y“œZgÞ)BC3×õ“9ôâ’‰HSŠ¬½˜±3ÎC•Šj2ìÓÞò"6…²pqºÒŠë˜TçÌ$MKÎt »‰"7Èîp<çPœ‡†a¤=˜iæBÏVÓ–nœq7Î3½†ñÒ0JVœn‘gËêðÒô¼µ(‡Øº½ ŠTy/õøÝSòe!h”.f‚´á‡H¶C¯— °ÙáPPp>ïg]qëу`”Ø€C›‹¢Øj›Ó±zg7ˆ Þ™(6ÍÏÌ"Ô°¼³>`[ -,_X‡éD¬hNŒx à™:šu\£%¹bT­•|rDs<™ T$D§˜9u¦5ÃôwhÊÔÐœˆšGVj¢˜I¶õxa'¹¬¤9ìMmls î ;äTõÆÿÓm‹pbŒ«¬ˆÞý}¥ŸhÑwUg M²üˆŠ·¼Â#ò†¢Ÿð꫇½¼Ì«ª<ç[cÙΗ›Ÿ|WAõ§Ý>êVÙì\³h„:E]O LL]&ª›žÈØ}¥¼Ù\é\i ¿˜£±}%à1dc2_`fí‚w”uØiDíUx5nÈôKë$¯î«Èøñ„f=ÁpŸÿ+Ÿ"éOïß"òˆÛéföö@¨:,Yxk° ô/ÏDÛ(KÎÁv:œÛºÁÒ žN*ºW¯18¥óN÷ÿ0@&ý‡3idüºìºm,:¶Œ‰¡ÁD¤™Ç7ÒÙÞÏ.g}àð+µ;F}&&(¡/HwÀb‡Ð‚QY+V&±pC„"!1³Í¸Pjiì ÙÎS?€i£Ð•1¨EDmÁg1˜é³qap"l¸ƒÅøIÇ|…Ì"k£›©çè<±Ñk¦öZK¿‰^"–fp¢^¢‰¬ÈÑA&Xly±Z65p]Qqì/ tlT†Sµ½ØR†U·EjÌâ{RÍ—1-èn†Á‰<ÃÃåõ—+Hˆa .¼*¸¤ o™ÄCÄμ”møžÁ-„™õ˜ñ•Eœ·*®n#v(…RBå©"©G< vǶV‰DuTJœÅ ™Môm0M78¸ËŸ±æ³F ™ÛAgÔH'—UÖ)ÂÐB<ÉG¸M :Š¯'ÞšFªUãtbgÄ·5ö‚F ¼þ³w¸K3ÁíãVlœúx³¹ö’øt‰¿ÎǾŽàæW•rjš­t|;áª>‹‚—É0Tñ²÷a‰ÎK‰ÓBÿ~¿¤ ¾‡±¾I=Œÿb‚´åüv­Nÿ@ˆ` ÍÓ žÆ؈“ã“]Ø(,æ+ó-+%i¾h ã“Θ®9ÙÇ”òm}}um ¥¼L®ÉtZ?¨:mÜmg‰ËA4:£[•Äñm`Wü¶ºdÄCj h±ÂZ`˜?O&—t˜¿LØÝrqgm™3Mè ­€[ðG}ÙDQ¾6»EmÇ4­/iËÐ…³± c·*u©§=ÇH8xU÷ðW ÞVãØzàDÿ9Ì<†Ö, =¬%š¦—n½`QëÕ+€o£a$½’ñ­^­Ž³Àf)^²ÂDì½*¿Š€%9¥N®£&ðAæb¸¿{¢ýÔTµÚIf8±á¥-LíæØðžM[ÝÝô gN zq´‡É|¹ÛŠ÷7¼¹ÓóÑñá»Û;Ûñf‹~ÖâŸvO^Æ›ÏZ‡{¯Nvö~ŽãŸ67N~Žw^ï´Z;ÛÑáq¼»´·»³esð3Â袴͓øçÃWÇñáOññnë'xmf™J0(ç0&í\^æ©&<ŸÆ€ŽogÌC0œž .š 1iÜ‘ Ç^ÇŒ]3f¨¯0.rÖ,SEŠ¶smW…*ÚÚœ*eqdÁuô›ï{Ùc·­ÈÖÞzÛ®Åðm€0ÔõWVƒHÚ<¬ˆÜn‘è7ˆ9V#kÓ0·,ö¡“û3„.Qœ=ã>1vì¶O­af•–VÅ€Fª&ÕA6FºÝ”•_‚2e¬1}„×¥ð ê&ì %‚V½ÒÁ«¡ïz\:2 Òô]¤ã¬ã®œ Tãr†“;b ^¿‘]Èo¶W8UjÅsfî1Ü|·ã ¥Á&¢£Ù9ìjötç kåL5†(ÿi,r»»Á¾R0%»2XúÏ×Xa#^D`‰[1‡@+z[ Üw%0Ñ”ªú=¤ã§Å<Ú:®›óð_ÿquýÉê“\üGúïËßã?þKâ?F°kCAz‹GÆ¡c9â¹ |Cà ´­H0®Æð±µTB×EA>Ö¥úN£¨­££ç{›/Zq3./iÌö*=n<ß}Ñ6Ÿ«ñiô¨¾M«°}pØ>Þ9ØÜ߉íï—‡­“í£öÎñqôx‹3ÚÜúaóÅN»ü|w Q³N0+Ôåþ »š™È(å;îN bŸÌ¦Cf‹¨'Û»ÇMZ4«‡ÏþÒYUú6Øð£ËÚS 垉vꢾ§6þ¼¼D" ➢mgœN7QÀ@ ²i#5êL¼µñàSUcê`³èñü’C®SÆÑàïúhÚ`í©æ̆hO&ú{ñH]èöÔE…OmÌ{Ú[­ã­¦gl‡ «Ñìu˜º|cWñ¾•ó;`@;*ò‰LhûܨtݨtݨtݨtƒQéz`bvTºnTº±MèBØ{£Ò•®ÐÞJ׎J—.?/wööšñÊy´’]ÍQü»Ák÷Ù_ªn`ÒèQy‰–yµ`ÑÇu±L‹rEîyÃf”¶µE9»”)ØöU?Õïç?ÿ.S€ÆðÉ¿6þóÚ“õÕµ/äü²þå—«ëˆÿüõêïñßÿEñŸ 0h/¢L·%YñZcíIc-®/×ãMEºÆ#žtdKåF˜O–]Ä…² HLÓÅ•Ç_$Ï4ùS+ý(*²B¬Ü£ÝâÐðqp!æ›7]XW|÷+èk”5#Tn®êÊX¿Ÿ™™ØUrób78+ÙylMóŒñ¹#od*Ñ‹–•îÇ‚†à>ÙÄá«8¡DÍ¢.ß0œ÷mªR¡Açú©i:•¡x— »€ãú}­2EÜ©÷wŽ·^R‰›Ïv÷vO~F§ŸïžÀèÿùáq¼IùÁ ìn½ÚÛ<Ž^¶v¨sÃ'íþňèõқͭ¶RáýÍ­ãÃ6ÿ­·µø %¡ï³ÑÒ›öæ~q’·U—hQ1…™—Ê®¾¥ÿ˵cóÕÉ!Ò¿µ{xð¾Ìhf{ Êë¸qa>*º7HéKÒÆQq U*a½ñÕ·okµ(ÁÒ›©]¹½jö xÌþ@N—«îG‚cøN<&©ÅºfCšà¦@(Y¡¶5± :£C%¶X¿á¥&jº ÷äÁ-{ƒ²×VÍ Zœ`Å­ô, $¦ _Aû!³]T‰™ŒŽlôxÑØ^¨kCƒ>ÿìÐԃн¬ÓßÞ?gTF‡Ï•mº!| #h‰Oñ`6qëÊ„µøËoã“„=UŽØ¼·f(à‹/Vkñ³4›"éþf¼º¾¶¶V_ûbõëZüªµ)Údg51*ò%”é=ý¨)’9á-lG×¼XȹxTV˜Øák¿È®ŽrŽí0ÛÙQ)#K0[F—=Û>b?ÙFÛx–9ƒÏIbPô:6R$ËG?¼hÒ?ô GËÒ›ý݃º¥é”¨~ïÑ&ÌŸ¿:XzSPâ[9Æ cÔ¦F÷{KoþÚþÒ¼Ù¬ÿWûíçe9ÁL"Æ+¡4^»ÚKG›'/ÝÛ}FÇÞ¯­Ÿ[LJ‡'8…qùOmzs²³ß^’ ÒµªÕêŸî-¸½´½ÛÚ|¶·Ó~u°{Ð:¡Òv¶=9½]˜­n!¯wò^/, 6ÆIgÒàïôjqy2B¶5YOú‚Ræ—ÅÁYÁ8,4êKh‚¸tSîtÛÝ÷ídôÞ›Mà•â?4é;žžŠßí#j úÑ>9<Ü›[-•Ñ·5ÔGq©ì’Ú²Ú”¡=ìÚJ€›Âvà>¼ô¦¼†"Wß6V©4Իߢ^îlý°{@«×ù¾DÁœå|á(„䵃|gʹê”VÏÐ…ùM£MKŽwZ¯öN–ÞÜ&ŠNDç>ŽR|{äêl–JÑ#š‹þ›·`·ÞV 7§Ù³ÜÝöÎëÝÖIkiÿpûÕÞN‹ù·Ú´õÝçõ燯¶ß¯Oôu•i!G7ñ"ŒB¾Ãt¬ß±¡jb ¼fP5%7}‰XÑe(Qê5GÛ±¤±ß­-Š±À1›„C†&ŽmB—Õ„Ælë!ÈOÔa8‹7ágð_íïS)?Z™x©!®`‡YMTÕ.û÷õ/¼¤ìRÀŒI%3.ÓK%{×a¾iwZ(YJC”éþE©¦G„ýfÛÇüt¹Ðס¬AuýJ@rï3¬³E[1þì³ø”‘`PÌ«ƒöÞ!í­p“Èz žÏº:*–Êk¥·UÝqlÝu¬È sWyßÐM¢ü^ò6‰cúÁͺè {œKDçvA§‘~ëpSV¸.»UþøIÛú£„îeáq uÈv' Q|ó¶¼ÖäoQœ î¡hÈ7·m¹çQ\ôß¿’³pÔéÝ:UòE)^ÿ~¥—¼_̓3"&Š-¦¤ûOJ£Wy*Qž 6‰.ÅT¯¦~¡AŒu*b?ÓlÄf:yÊ‘%þÙzyx|™ýáq«ÝzutD?w¶ï›o!ßQʃÖtô¤œ®E«Þá?&îlÜÛ–åܶ±40<‘›ûÒù±Z08!M7DÔ,öúÑñÎs–¹ƒÊS‹é<}t˜BóŒS§R¾÷í-j•’D1Єkf͸J©˜‡†ií@údñ‰ŒõyÁÌBó-Ì'ÓÚü•44ã¡dÒç´ˆy£º1¦D±‡5yÌt—×jÅ|ׂâÀ¬¢06 øˆ‚"oÒ’›c†¤ÐÒ€’æºÐåúðDºZÔ5ïÜ%›#Ÿ';¯O˜åP̺)nÝEl€ÀDh¤V¾y«MbLþz™Vt­ÄÊlx)yb‘ÈÜr=öoûúÎeÁåÖgsËnãfL›Ü‘„B®Íîþ;¶tì@h¥Ž;HEPé#““»¤ìü! þzâæàz]æ“0_tV¬ã¬ølí̶ d,~pe[:±±ˆx( 툈¯¢Ø8yÎ0g^ªskÊ6q@,}”t¯R>xƒv•âï?Ûlµ÷wZ-È-‰#i?'òù(`1ž¨óÆÙ–¢7G"Œ3–ÍŠð\^¯Æ׉8[S˦QD5zõEÑ–b *ˆ£ñåÍÝÝ W´¨r¾LFFÅ–ç£tTw!52®¡»”÷QU3¦´ð—.Y=›ý“¬øº±pœžoîî½"ú½9 wJ(º>ø A J¢g¥‰bõN©±é’sŸtb7¿·° GM%1ðGˆæïÒþEÈ^R±î³xÛ~w5Ž7VV¼l O%‘aî¼ò}£p|qSóèP³ì±aŽ:=²¤)Ÿïl‰Å×ÁòsW¼àDšW­¯®®?HEôø»ŽhsŸu û›?X¥Ä’þ½·GnVÆÑ*|ÝøYÚ<ØŽúßïëß­ÿç‚¥">·â‰îìDt|qáOa‡aÖ$hr:³›v¯Ï˽RÎ&]z^¡äqÕxöZ ³Ãl;DA&G¥æ27v`ò^àŒõ¡CR·#\¥#ÖJrø;åú-­ ‰D[ ØQÇQóûƒ>‡ô‚Ÿ\YËãksmA㉄¦óG¡“IÌsŒ©±@çGp1w‘·ûŒãECf@ÊF£ô–á‡Ø\¬†ì¿î7äo¬½žf‚Ê}œ‹ïLÛlÃX ÐícRkÇ Æö Œ}ÄŒ-sÁA¯Ï%ttX¬éëü/V­€e2•^kWxÑ.é-.ú ÎÐIÊãòlu‚Õ¸ûýe4©eS¯Úº|î©g¾3Yµjnß?ò½T¨>;D=vD§ã†Ç«O C²dÄiÀjeîÅ.A×-棂‚ط陹”Ri’ n¨8ѹS‹• vQbÉêЛt®î`·ŸbΛ¤ r™ Óåâ@˜ŒC_a@Ò÷†ž˜êYs¸_†·uŸ¥lj õqÂX3άQcÒÎÆñÖ6ï2 p$X2O¹C,æÒ›õÆ—«Â2=^Øù°?‘·ðϺar(ü®{gŽý".a{LÜæ^üÿ=È~ùëÿ˜ë‡7ŠKpVªÅ¼ÿëöýƒ5ÐâCêÂà .4w!öêSE•·\Öe¹Ä æäø´ã¾à¥¼ºapÁ]U¬rÚgÍþ|s¯µ£×àd7ª¬Ö«g­4¡ÍõÏ¿–rí-š?´OŒÐÇËWüÝ+ 'ÁÑMgïÕN[úP^·† åu+×:šòÈÅ5++FŸk>ã•—¶JŽÇV“ƒfaÉ3ø;nyZÂÖ¶‡ï¹¬Î PN¼yãÍ?ÛN°´pÊŠÐuñöéQú̄ɤœ^÷3Û+‘ÈÌ[¶¹2öÆsÛ÷Ûÿ„í+¬›ž‚z$`{W@L3ƒÓ34xVÅ]ú+@zlÇî)éL<0Ê.C°èM§&LÖD9'q–1kô‚,O/ÓQ¸låõX•”4]—ê3ë$L¢Ç0˜6|ÊAþ㲡+°iÔ2 Ô°ŠDë­-‰×«× ãË\Ó0Ù;b7 8° й›?Hâb Î1IDÆ>ï*€°Áø²Ø n-:98ö _±µUªÑ¿¯_ãÏ᳿l™¿òæÕ^P“K/èrþéä­Nø4é^úÍÓúÌà2È ŽÑ%ãßw½Àf²ô˜"ʉ„  †½qòAFù‚pÍÜ£…}p±[æ†qk«úÔ1¡ŠƒÕíOØ$ÏÞD1J²\²ÄAL@!`øJâ$$€9á7Ö!.zñDù×vÿÊ7.o/¡R[JƒSCøýχ¯NŽ^¸B~¶d´09 wÕg¸0\‚OŽ7·~Pû‡àøÛÚb‰Ù¢n·Y*Ó‚‘‚Ymm`5~B³½~͇¦ÍFëéÙ°òØlW³ñŠœÏV¹ìv¿ˆéŸJQ\uP*ÿˆBhÕÇ.x@ã_lý%ÈF¿‹²Ô›³T3àä*ª·ÊlóÖæÖËÑt.½ñö¹à”Ð]ºÌåÌWX÷=ím_ôè*ˆr`°‡Sws_–É«ï8¾ÀEpˆbÙǼ»Y›§]'Æ}l‡YiŒçZÇÝq8Ÿùft{ó ûITtNŽ–â—Hˆ™‘¹‰ó˜L…-“¨Š šËÀŽbJàÒ­n`2gŠnæ•Ë`áÏÉdöÕXw¹ »[îX§iAñ2aã€Èe°.Y0™%l¥E”ÁÊãÞšyÍõ‘ ñ‘é]w%è ·/(bà‚I‘AC‡8“عÍQ:ˆX—ƒrž€@_RòÍhçIÌ„õQü¦’­üõñòéÒ›Nýï›õÿZ­ûvù´Z-¯œ®­Œ+oãïâÆŠ.+sÏ¥µg£>Ô¾Aó¢#÷h ‰ŸóÏ®ü sy%¥Vô@ãñxIÚµ|×áGqê?UsL'³$~úTr$YÇP<9ƒþYu Ø´$'|ÏôS"SúÑcg®òG €7º –•O˜$)+Ó2X¨ÄðÒ±™{;ƒ1cŽ%<˜ Gñ7«ñWsZ•ÀRÈuâ›Rt¯R@pv,má¾Ø0³Øî­/Õñc-ê§Äó÷ì2&¯‚W ­Æð0ò:b-¶±$”Mvnµ *³ašhg0ü}ãí–žg]EÝšX¦Qì6´ž“ŠEÛÜ}íi(%ÓFü=¶ÖŠ%k]~†÷1£kñzüEü$þ2þÊÎ%-˜ÒUƒÜçΦ•r¿Ò¸*Uâï EÅ¡T›MË}ÊËê½ÓûºÖ¸²hÓ²”}mÕ@[4‚†­,ë!µ¼R™¯ˆ“ö„FhºSc¹k>Äòóo3º÷|:r”úŸJT8> /"· ø–!ƒ^©w+L†+õ´býæ2°*é/õ:ÙÕ0›öˆ*—´ ‰ÆÞȈ¸”±Šßrâ­Ù舮çˆûi—‘õ‰1R@-HðÎqÇT¿0ö×nÅê9ëZ.z5Y}Ê:Ð2l(’«¤šéŒ5k¼å±º ]…¢äÍ`ØÊ¿ºóú¤ž~°‰†ýÑ,㤥zÊ”?d˜Z•aá—Ä™Tí8óIÐUìi7$šf ˜šóÝÊ…ÙÀ”ZtøWRóŒU¾Ò½QŠãQNG×’M 1qç²æ@Ç3t´9ë’µfŒ]*ƒ-EqØDxÍÛÞ‹>¥aÞ30.Ý”5ƒ#ƒmI mõèƳÎuJ,ÏiϽ‹¬‰mÐßaö¾ûuü«üf·™<÷!7êŽÇúrób§A±ËIú{AV!؈/6–6a¤Ò›«NfËÁ°ávy›Lm”nW8S{Ê ‚6üò0q„žÙ¨•:ïìöHM‰X·XÔõ‡ãN×d³’®âü:ί–QRy|Í+œ›‘Οv¦iWù©¹¥Èn ®rGM³O\rÊ晣Sñt8.ütBßlæ2 › c`õËÑsWB;‡¡xý{›$™@e`R]Ò#OÒó þ>ö úlíŽì_}Bv;r‘±ü du\ä>Äõ ÷=¡÷s™—âçi -øD2)ˆnk#Å𢳲ФŸe3`Y0¼…Ûl2(ª,^bO~&¾õŸØö½ÊqAÔe„8t_l NÕ0Þ%™P…uL#ø6(ƒ¬¤eÏJãDа9A™P}ÿ¨ÆÝûº±Ê'Ê×5‰|Ýám8Ë·6cŒ¤€¶ÜŠéâ†ÔËÖÒ:¨*O¡v41ª,j¸G^pcë\‚g&LÃOR‹¾i¬Þ]³ ä†WßQ%ì²£¯K<¢•\+q°ÀýÕ-H† ¸0y5Ü*fÑÄOãÀì!wC6l¦BΘё«kcÑ¥[kðÝŠ ‹0«ÙÞ9Ú?ÜÞQ±“¶‡Y¨”Pƶɬä±Ü“¢øAgÝè° e3Ò™ÒCš€Sò(j ®4ÎþUäyÑ3»8›ƒ½Ûrè5½ ™Û߬«hUræ«´nóÂÐóU„KI÷v6·w^´·Oò:2“/~£ì­ÚB´{éô54+9{:鶕ƒæz¶ÉIK¥I0 Ü9€[¡/…«›©á5†µÚtÖµ['Çð"ƒÝl½.3Z/̆b’H@XhT¼!æˆv˜xA–ßëgwWÙN‰n¦´°%Ð rXµõ@6K–ž=œü¨é[‰˜#.˟Ѷö6[/›•ÓŠJ F´sÆÍ ý­°ž0·98ôáÍ 6jXïBåhQ2WˆmçÂü¹¢$|aàûØZ0xóiÚÞø‹ÿ•cûNýǽ¶9=ÌšÚÜ¿°0îpg5;|õ…§ž`Ô˜p’"ëxßP"‰o$በr9€&›zÖ0RM÷^ˆâ!è¦Ô¹œ*¾ÉO*\„¥lãe¯¯ 7‰õzææ¨Êõç»p/æëãòie¹ÊE𺻡ÃÁOT’Äú=,ƒ¿*ûž]õ/¦*û¢›쉸Øìlÿ¹Ü;Txî…éXÑŽ¸êÈ-ë¢y¦BˆáE‰.U,y¤k{¶²ÑX.¯¬TδxÁÖ0 ÆtºTc ëüŒâU™º†“OÌ4Êððñ {Àï"з!ú#¹±Eæ>E=')€’& ÷rª§Œ|¡á>¯FMw  þ1²­xAœRÅø=Š8ógFÃÈ·º ¶q o{‰€¢¥°`Ík©Àã÷"?¹–ycŽ1蜚Òƒu–6çú*$–<0ü[šöÔ’wƒehÌèqL®ÄÊ&‰& ¦õÕ'ߘk.V[¯Â1ìXSÚWF\b7M'¤{²ººÚ0wC•=W²Ú_7–('c ÐX®½®+vÑp›^3˜ÊÒ–æ”Ä@¾ÄÙ«²À<4(7ù8ޑ㶠ò¨°µØ¢i´#+Ó"¬áµ]ŸÖ0nÆaUã zW‘¡b­,¢xyE<ÛÊ õþ;é¿´ß©ê$«é‚žxÍ õÞßS²—²¸xîì\áü¶°h8ò`œ8F‘=U¶Æ{Ò‹•lñöe³Z™è㸼$}®ª,!v¾'‘Õ*€7þ5Ž#d{|ÉêNPg9¦ ®S¹e± ­­„ƒee0$&¢:KLÔÝ›07Ÿ7#N–-5ŠÍØ”t­ÑùÃ*÷t0Òš*aRë¾”*ª‰¿3à4zäQÎSÛÖ•Š]••ËÊ™'Å~ì9óš¶ü¼‚ùâBVõêZ)£3ó €:Ê–“Þ#Þ›Ó¾­Wv8›ÿÏ#º8¹éé­£ÉÀqù°âP /²nºKEéTÒÍ>nÈÝ,„^>Éï<*d3NcO†(Ðc¾ïw¼{‘Ç¥™P)œÙ†c¾ÂÂä1°wa»âøùîëýãLaÔ |"TG=T¯‰ åg)9-W‰ßSÞ4OׇzÏ[³c–¬ƒ—»+ÝÍ_Í›ò Šw·±ZVÿ&´?k_*AR}/§>³6s3,ÉÝO‚ËJI¯ÃãíÔ„÷V/tbùÆo7ôýê?ÃÐ×Û6Ê«mv0œu¯X7Tí‘H¸yÑk”—>:û@1`%w7™LE왡ÆÉSÆ¢GuÞ‰Ïû—´da ‰A¹ú!xÖe°T  §=[2MÓÞjŽÄžc-òÝV[ã›\~g?ºi«ßl-VGWºäÖi'íì0 ×¼c·¸~F—’(q¢—)Öê™i±¾Êön#‡$P)ĸÆþȺ4ž$Ö*¿{ûjÍéŽÏF×AÄsvÔ‡ï»T£®!ÖùÙè!®9Ô-<*™E§D—9­Øôˆ?‡:ƒä£yhfôÝÛ…pZn{f‘·¾oBÒA¥’›©»TLÆÑóüÿ`¤d#vj#ÙÉŒD®ãHæ\`O'{30›n 2‰9Û™I:¶c.—îälÐñ9ƒö¯¾ Ö¼mýug$>©¸è³Kžæ¿svn –r?&‰]5ŠP@©8à¾ýœ}^Ë…&‡wú¥ÏgÐ¥H¢!Ê^‰=5Ô¿I½4§íŒ=£´W4ºõÝò’qóaÃÇ©{Gª¢ìˆka% Ì·Tל3s—‡A™$.Õw%±G÷ÄE}*b«Š_{åmu숓‹'Ôè¤"Jâr¤pÒ9Ýx&?Ĭ,k¡ëÖtæ¡0å æóÅ?e}d‰×=Ž ØjJêÅ—XæßnNŒè\HJ¾úuo/ÙÏ&°,Üúù£œþä¦ MK¤M•ð9ý}öze‹jVlökíåÎ¥ûhìæË&Ðó_ Æî¸|jšõ(jðþØʬŸ]›^s„ÙAOƒÆ‰mâµþbo܆Åk GÞºÛ»›/[´Rø%%Ó$o½ÉÎ#Óë´®”…Nýz „R½;ÑšK¬É† i!Ûº/ttÔx x Xi6û¬Í}õpà%‚~„…·–l6'Ö^%Þà2Ï;É’MïELÉú“ Nà¾f¤ïÞV7 SxmE"€§ï6è¹fp,.:SŒ’i’žWÜ ¹†Á ÜC;w`ÅkÎÉ&ß‘*wie¾ùSC!”ObMWsíWÿ÷ÕáÉÎvÐRY”ðë@EsÚ3ìä¢ü^ÃJeýÁùÔQ𢠛’´­…¿ƒûyæÎVö’nÌ›4ö?‹esáa• „ãÍ}ý¾ßV÷O~D{‡[pñŠß¨£H]”@îÏQ¿å2*àçÔ#sQ:9s%ºóU¼ÜÙÜÞ96™%èRQZT±{ðü^PC/* Àüñíi,§99Þ=Z|ÎêÝ8OÂÔ–hì|l¼ooš*Ð%®–ììi¸4¾ÝÚY^k|Û¸a”÷D̹ÀA¬¨f¼ #ˆ’/'¸¶°; ‘ è˜W¾Íg št¡Y¹š+fèWèµ^_ýze˜]r@Ÿ>ÿ› Y{¢…¸É¶¸í1ïÌò’NòÈCv®ßY³Ä÷™’µSÏZ‚Q¢„%æ“;°Èˆ—)“ñb¬”ÍŸ~¸cÞ@+‰ô.d¹æÔ¥9Bí¬ÏàÀn .ö 'ò^!ßäwnæsâ%ç3ð¸áç÷_¿•X+÷"£(wË¡u)åÎ^k'wC …ð)ڀ؄™¿¾™Ö^ã•éü56‹mµ‹>ÞÙ0ͼ¨eȾ°ØûÛ&Î6‹Ç_ïj; yRÀâ’ÖÀ»ÆO¿ß×È»GÑrWùz'¿©v÷p…9°lÃäœ'†!éM`cDÇñÜVv^ïì¼>á'¸J¸ˆ NùVñOÁ‹îþÕ}¬i؉ȦLá2¬ÑÅUª2GªºÍR·0sÒ™T7 Ó½ÈCä°²™ÝÄ Z#¶E¦-æ»ÊõÚ[Þ•Ü0%ù°µûZ¬Ã²Žâ‹\̦UŽ‹ïgFmR‚]ÏEIyHgB%’ÐÞë_Ü~ ,‹bcêUY6ŠqDŸ³‰ÕÓðõ¼Ûó¹•Z4ËËI’e} …$õÀù‚U45÷3†ÏS˜Ã«-© 'õ¸W2Ð]„RQÿª‡¡'àïiΫø|vùxmõ›õoØÎF{Ó71¦ãsõ}?ëŸÃÕÅ86ƒæàvÌ€ˆØchÚ Ê—"úW&Ê‹ÔÃ0ÖÂOU©4\â)ÒA¾–gΓ Ð7Åt*ð²âZHXì.„<ƒ¸ÀóÃÄ°º¼sñ¾Vg{6Ì4¤ kÞ_´R`„Þ7—6/Ý&™ïì$j£­ j8dA½žp'®;·Š0åb)ÚnëÎ+hqí/·"—W~XÑD~Mob;š£©%@ÍC`E;’Teð*¤`JÐà!òÇôz„(¬<]Š£Ì1šº4=ˆªÃ¢A@SbÞIÖ™\Ô LØx5'™õ¸p+ðúúÚ2ÙFA±bË^ùžš¢ä %fãÙDãÄvS½Eþ/¸dÒGÜ<3[Dz í]†/ž§ÈLOM%Íu ðG—\^h6Ol„™ÇY>™Ü6œ< ¢$È/aÂ!ê+ÇpEÎaWGOSÞj’ãXð^¹$eÎ@KJE²Âƒ<à¦gPeà¡ÄÉ’a˜Ôió t¯ÂD^9TÕ­>À²[EŸ«/QÌH(Â`¢Lkë3¹?×pÊ2ÞlÜ3)õp\¿Rƒ#_F$»ßÏT/ö—€fÞzÔ "µ!ï{ñÍÕdc¸½° D˜=¦½þÅEÂ.¡"i]Y €çù`”"!h¿<<ü!^âsG‘KŒ0HÓ±"½‡ƒct¼@O":×Ô* DÀ´~@ã½Æ‹Wv`&· U‚ºE»—áÌÖ*Ê^rÃŽÒœ¶‰&µ¬4¹l–×ø‘klwé¶?m®E¸-ã­¤.Èq6[ó¶ -o̲–ÿj7–ccO8¡¸×ù†²Y9÷:þ<^;ó àØ@ì`.«c—NlÅ¥øûœ„ùð¶z¶¢ëñÍÛ|=EP2ÿy@´NˆU¨Ôtù²ž]m8?ÎÃÕz°yÃñÊX M"~âWô±5 £ß2²P˜±¯¤…õ+ýy´,ËË•áƒÚU|T;MRÏ®*ÖþòŽ¼ÅYKf]J WB1F-¬/þ3VÞhTÍ ;NÕU§w1é)ÓhÓˆŽEQì¥Óò@¼ßªo¶ÌU¨À}Á¹ÑRTÿ“Ɣ֚§ÃŠÄËîµU”õø›odïû34žKð¡…1*)½\fÑl—a†>GÝL&uvØKm˜OÇ*ÝE÷9lÿÒÆûÉmŸ¢ÿdƒ†åÙ=8¡ÿÑq ß!8¬<ß|µwRgO¢ÆÅÒE3g§Go²Ý š½—‰[%쓳m.÷Ö@­Ìé¦GÞ»"Ó^ᶋIÆ€kÂøgªÈn‡Ãd 3‡Š–Q1,¦fQD`X(Ÿnð”؆d䋇,nLÆÍâ[±®,qF»yšŸK ŽÊpóa.µ$QŠDZjqQÅ™¡¥MáµÍ+Avêϼ{PZ™Ÿÿᙬ6Xc/½Én)1‹Ýg# Ne]Ù>æÏŸMÿœ#ƒ78ßÊËÔ¸&ovžM—ùÍ›¿Z€Çö[¶á2B œ­ð]Í`û„©™l¤„χèÆÙÏšÑV·ŠŽ*N´ŒGŠYj5·±‡»ä¡÷{½2Ï[#|bqZKú÷.ZŽpK’JâfãN7©gɸ#ÎÈ°'Äáj­Öhq«[Úl(Â;Ý«öµbp>5¯ž·ÍvIª~oœ¡œü¡uÿ¼NÙ¨ WÎv€çÁÉ9éb1Ki8¤| \ÅÕh鎼çûl§=î_PÖ;æ öï1LÓÿ£õç}Íæ'ÞìÔÙ&"xÛ4(†¿rŠ?AÓ)Øš.Ëù»‰;c|†³éÕô[Ng…²)ö6Á½j½\z³e_ú˜Ö°!3²¨2pò-n@€6œˆuD½LDHYdk0¼ín·Ým§jŠ¦ÕA‹y²ÃP0¦ÂÕ-½áµ:EŸ,ò»ñ£lI†â.w» Îø<…TZ/ÓÃ×U }sB‡èˆó[´Wš° ¶ÕJ=`Tc߈“IÜHc @cPSØadoy¶gQ@VºŒ6,º•72Í[&áå2l´SëN;Ÿf—82ħJ¯wnœeá&WOí»u~  ¾º¦øy^xQâ¦f^y<†ù¶Ò(ûåà¾âØ\‘T1Ž —éõl¤üjßG7*Ïχk’ t€^…eëñÖ׫kºÐ»ÀÒ£öáÁ–çÍ`hRüfQTÑÿx¥ºÙ¿jÅ»€ ·ÇtsÓD´´±ZTŒ0Õ¦„£.·å‡XJ ÒKj°‹×m"Ç^gl£~Ž¾".Ú" w‹Ö­|É@w²ö0Ù(ïíìBkQŠ¿ÿ (;­Ü¢(}û9Ë\p%.ú,˜Â ¶?ÍòŸ"†œ«ñ´ü§¸É±À$ñâúy¸\ÂêÓøÃÛPž=ô7Ô@X€ó}›5°Z‘hSGÖ³ïVÀ…ÚwßL—bE×Â`þùXÀ÷èì2qYÂ) ;%õÆUwLl {2 jt†˜ÒM¶ê–ë„Úι 5å·i@¶<¸hV¢ŠJtá̬¢‰7oNOOK§O˧ŸVNYî9¸xûV%¡™¢6|qÛ¸eo«Fp+âõòŽúNãÓGwש…°µð† wëê€ /!Bì ÅXMÄî =?Wë XSqà&ëyIƒ»?S‰{}OµU  BËZ|„-Ìn‡ƒþèÝSq¿kÅb»NútW9sG<-Þ˜é8Ö¼hÆRrÉ»ÒîI"ÐåùäÌ!H–Š˜ˆwøy!ª,g 5Ì܈eZ0Êñ(·6•˜«>¿çlÒˆŠ#ß ›l1F¹À<;6ð¯ã³1Ö{SÌÓZ)ÌŠÔ£“»üfù-Kñ_1ԣǘ^¿‡ÉÄòkD¼P¡ÖaºsuÁ×ÿu8uF±0\-–h¦Â-†Â:6A”^ì<JjbÁãÌxàÂmîÄŽÛk²1j(˜Ýu^Iáýú«|.ë>¨'‹×ƒ+„l }ÿeæÈB[Ñ–HÆñšÕë¸Ý&w#&áŽöàs5r÷„Ãw\ø†‘¯æ(ã(¹Æ]{"pæ$Nc’X‚‘wx*ÎÙ"áÚÝ6j×¾¬V[L`…gin&±öøãô}nÑ-¸Ø|ûŸÃzŽ—Ötîy'Ä›bÐÄVGty?…°lîóÔóÆ^‰Ý~ÒXkÀAϾ"ŠnäT‹K£´„î%ÃñôVSèÇjÞ4Ôw’Î`„:­s£‚ ¦Ç§‚.ªµÀÍeº¡P.?6×JÕûà£çKHÁ«%ç6+L¥Â5Kqm1°"Šüç?nü9^ZB¥4´UâæáæųññÍUѧÒß׌}ÿ‚ïAPÃ[ÕÕ·¢$0ì¨ÅJâà–jsú?! Aã²Q‹ÒQ ت‡->¬’›ikšŒ«\€âvªG/q¾HÖ©'ð˜9§Îo¿]ÿ†‹Ïõ/¾fò:of“hå¥Æš5çÚ {*0EÒ¶&mKÊv>%‚­öÎÖËÃ¥7o*Œ¥W^z¶y\^ú±ZèaUC}ÑãÌŠhq?å%d«ÎöTÞ¾­ÂuÚoÐUwáñð€óñ úßœxë _$X~@¦8”b%¸S¥ücÅ¢ÓqZÁU„'ÉâÝãÝ×,hˆÝMù.¿ì²ÅÛ¢e\µá•9o¹(M¾¨âDM ³H*shèö›ŸÞ–xG¾|šÂü¦E¶œ>Èôìö|¢ßkæ_’ÐyŽŠ xŸIŸÄ5^­h–¯ªbµ×a?a\r*p¶ó`Ô6^‘q;cxðóþˆ¶P’y¾Ò çâ› ¤Ï£”3ÀªOÒ,«‹ü¯¼KCVSÇ7+B£5× .ÿów‰xSj 0v†K3 ­ÛFˆày:oÈ"ãW#*”«t„ wÌ£†q´ôSÝéÐàÁ5bÊ°Í‹ËÞ7XiöÚ¦.¦ M÷¡¿#¿+Ûò‚(¬þîÎŽ%0$ç·ÖŽ¾z§ûãüÌ+í ƒèÒ &Ê=;@Ì(Ï4R:waœôԷ¿+Î)^ÍúN\Øwšñ—é5Gh5Y‡¼#õòÉÐxÁÚÉt`-‰Â… ®ÁáRpá½:ÞÄ—d—}ŒJ±w°ªÚÀ’È~ÒÅ«àn¢—ÁÑÀž~Üœ¶[—|Ô|XiéuŠ˜ˆÛs˜eº[m.7‹!¼ø8Òq˜·O÷–ÞèÆoxÈèaƒ¯}Á -&kgœïW»zVòhha¶…z’¯þsÔîá1òãæñ.ñ{ì'T2AôàBY(# 1ëjMQ´HþlžÿŒ5íA÷χÉ’³sÊ~!gWâ7Ø~J7ЋÙù ß32BÅ\ ùëKP»±Z */ÿ¹ê+?8H}j”Ò˜ÛžwØ3è·@(Ó"}òfЬç‡Çû›'w˜aÝ9æX}À¡³[ âcŸ<ÄC¨šÁ¾¾ÿºR‹+ ÿE`Æ›ŠŒh dýéŒK·Ä´ ¿”6¥¯ZùŽASÁ€Lúk– Ç¡»µöºi ‡Èô”»Liè7šÌàôü«é”Ÿ}æ×ÿ},fÓ úuo‹g#×f­D÷§îy;vÀE•MN—­Ëè~ ß…µ˜ÓÐ$Šÿü¦pzŸ>ð³hïç„#ç1·ƒÜUô8öðƒâúÛýè\Š„buÄTD?U|PœVF#à³¹u€¸+ÿB˜•bH*T'ãà¼ÇŽê7¤‹gÚËòë-V¤=Ú;Ô\^TlS# Ù¬\ŽfH\Ñ- GÖc치^Ü÷S.Y‰¢ Ãû¯­ æ¾é·Aq§,•uù”*±¯0å ¥«PI êBV‹3–6KqåF[ÐxÖ¾ýæ³OÌöêgÖºšÉÀEÿ&éÕ3büè1ô²†ÚÏŠÍ;çŒZ¾¾F|]Ý%´ŠÁ|µ»mL4â»Û•KÛ™ÖjÍ‹t˜È.ºÈZQB Žß`è—4uTÎ åC™“>|óÅ“/lYV ñÅ—ß|Smøns7íY¿×\_ýöëµ/×(éú_©Åu#O7i.!µuéƒX†eÓ™2ZâîÖ&r,nÞ·íE›†Œë¯Wñ<Ô| ñ½¥µª¦Y¼Já ¼a‹aì3EÏåð.¸8§JÁhcÄlÃífÆu ®³¶œ%¥zDÜߧýž‰K9IÔ;)ùãˆ1<£TõT¬ÅÓH™g.Ñ¥It¹(ÑBí6†˜qfè14ÛuŒØ ^¯º\­w©/™¡ÖA{S*[æ×Æý/gÄ5Ÿ£³ÙŽŒLpj/&ïÂî½0Ý»ü¤î]æºwùéÝ»«w :§t†a3…¾8Ê£Pį4jªß >?7$ùã¾¼æS`Éô8~A‹è)‚h&†gWÆàGnžý»§‘öR,sŹ“E³K²;„ýŠÒbn)nÅmõF仼[™ÄP­¸©ã4ëß mº¼]ñ™UñN­°Üöo.¸ \9½‚q"–ÂàÎæLv{Øò"{׳}ÚPÿ!ÝÃmCÍW6ñà5kK“mkX.Ѹ’¹ ÿ\PÙ‚¨D–#@Níûâ! R-NżBnd:7Õ|µ`[ê{4Ø‘õë;+ŸO»¸ œv’kø£¹0 èªëã Í_ü«pSuúÿ—\ßÞ|ƒ4ëGåÔöI’¾IÒ«DϵT4¹6ä_Jñþ[?À¸†àÚ½ðÐQ…˜Ñ!­ ‘T!kì% (:«K+Ždk¥kxAÑ  ž§YJŽ&h)ôaEJèHÀ*w©™ 7KÁ6 ò¤rÊ(¡(n1Ã@0nÌÜkæØo?ñ-~`Øb­~|º¦×(?!ºÀ~fe3± oÎüø ³:ô,ös‡k@YÝWPM˜Þås²)Ùî@;?—ªˆ^,6"Ï÷Lås¬rûQAmùgL÷ü˦=Þá0ÌÂG|è,c¾›ÉÅ("¢Jän$^ÆKÄM¬\vÛ´t .}cøD£BxIýs´°øÛÔ¸7Íf—É‚owÖ9ýÿ˜HòýÿüþßÞ—Ýú×'ugt÷¯Q¾þúKü]ûúËUÿïêúú“'ëë_üŸµuºù>YÿòËõ¯þÏêÚê×_}õâÿU¹*ÿÙ¿ÿKþ{ü‡xå¼?ZÉ j{1cËw“›7 `êË èÔëN€oõ †ÔJ‘×_}+ñ'º1¯9d'+lvÉWúïÎ{×—Ý?K̈õÞ:#€Ú~Ïé‹Œð×ë°Ä¯áñˆ¤× ’vͪó²þG ¨k¾hÇ‚è[ñà($ÇãÓþ“슚¬:ËŽDL“O‹rQ‹ž)ù³t6%VŽIÌÇö«Í½­ÍÖNsí©í5¯#—&gÿ‡Vœya¢˜Íú¯ÖKG=ùéè^J†³æê®B“‘x~õ6ý8xµ··µ¿ÝÜà;ìÑ$©Ó:°Ózÿu˜.¼Äc6ôE•CcYþeíóRùÏ¥ç΄3p߬HœMõ½Z 3J •…1lÖ"¦ÄJ³‚¿`’©wtÜƇí{‡ÏäÀ,ò9œX \O«¾%¡Ã6YæûÞr•».ÖÝÄ©óKb•5ùj[·+êdíÑ€½tfø+ºú£©8k³¾K þp“NvE+¯•hWfñ×ñÊ,›ðnæ›ÂEE‚mVNÿ5ÿUle}¸ïïGg°yù\@¿£5#¾ 0G˜öG*!‡ß&âãu€0Ž±†´žtØ '‚¯ÑÑ}…Çú‚ÝOE±éïÙU# ŸölÓ틲·GJê‰M"šç×gry«ãþ›>œ‰±¾ùYªÆV³“èQqïÛ#÷eÄŸ’Ü‚Š/â?f¿©Zp:*ª_¬i”Uµ¿>[âÕ8랯ðˆ ý¿©3Ü=Òï³oìkê;O{·Í _‹æJ.•×ʼ[ô®îµ1Ÿ6IWP6#Óକâ ú{ŠPЧ§Õ|Á^s=fŒå§&Ž¹ ›L.ê,$KÚÌåjôÈÔÄÀÅ~]šæiôežåÓ5–%mÚÙSS+ˆ‰}^TÈið8Þ}Þòb[±×Z]Ö4¤¡FÇè¬?éö³Äâ| p4€ÿw–2)ãÈ'âBgäXÍ&’^ ¥ +T9€ª}Ř^@7¨:v2Ý…]B«-á7÷~ˆ¯ùÜ‹ÌG­'ïš8ïCýi€Cq˜³…š9Ή5¤”üˆ|ð‡`»mf=Õˆ^6Kq©ôÈ,ÐH£Õ__±2ªÃ€·{‚é¯!© "QW 6bÑ8Ý´¢‡¤>‡·4ZMµ^•=ÊGó›ÓÓ•·Ëq5v©è»‚ á%tÛh_™þyóS8 ªN)ʼnOBtD,ÔæÄ^Qì&’ƒ9+ylúÒ®‰M±R^5‰Lí_¢Â¢”¹C¾ƒ—W¯/NH,n$ŠÊ|M7‡JAÐÖ‰"Œæ&fÄ?ÑêVŠèÀ%ø0¨Ì*ám.À/ûSåíà›²í  ñ ;Ø&Ç`¤\òrÙ†˜ø_7$*Êô°¶—òéi§  îµâÑŒhШ‹»éÞV{so¯¹eØkùáÕæ‹a›§mt®i{åçm”‘¢ˆYÓâ“„]d©þ`]³3Ä CÁ0›¢g šÑ³¤³Œö&-¦„Áƒøªdvp#ŒÕóK›†6A›n²”XÑ؈HZÏÌ›²ï)ß=F,Ì߄ݤXøå©ÊÝJÌž»M4ÀF¤—t­±1.%(Î&HÂÎÁ£dF÷:sëUm %3³ ;ûSµË`F!Ãå@àc:ÖÒdáªm’é‚"Dð§¾bô±@gM¨Uõ÷wscL& ”]vK‘r‘ÙMçZþÒÕcÒݱ~ü ¦ÇS'xéð õ~ù†ÑñnèIÎ)º°fÍúû=¦r¯õíMðÖ¤õÞÙCsKwd×Ýȯ~Hg{Ò0θ—ÿcðáÜ¥ýž‰ê$XG‰Ú.éÌœwú‰B áàKF¯ˆ’ž¡9•FäÑöÕ ÏuÖ®ýÄÀkô›r^ŒÚL^Ö¿üÒ°§röñf“xHWÉŽÛ¹ä 6©àlÁ5^ã!%Ölÿý’ßOusâƒÚ…íËxç,±i;‰M³äIbNd˜—Åœþ;„1§˜{4çϧÿ@LPj¥YÑÇÉeN 3§ÿÉLI¦f’Ðzž$½fIÖ“ ÄKUZ?rZ^·lÖåZœ Ȳêa‘ƒîÏ'Zs‰èMXÚ|9H”å—¡u€_n®æÚF'é/±ý ™ vX˜Föac¾Í¸-ÊlÒp!I/Èïwç®øéæáwø®†øéÂÆ@F«€6à|…·öX¼¡=Š…¸F­j·’Y{sÕbA)D4(ß0aÀfÙ£ÃVÅ´¬ ŸdJ)Xu||'B½{ü¯ÄlF \â莄߸ŽÒöZ³ô4øZö)¦Î)J~Yæ©æˆü:Öÿu¬u0ïXáNŸ–hX¼¶TøqêDÀ”侯ß?ûÌܪL„' JC|©Ó³ÓR|w‘oR¢øb\þÅ Mˆ>œÿ2iì¿Lèk{vZÆŸEÿ>4—šå)+"xîý°¬'Ç¿ä/î²|Zz}ê‰=µP3ѯõw)>58y×ÂeTAí¬ÕüF=-/-ÅkXQqµJ‰×Ã] b£ÈÁÞQR$yåˆÒ€%vgŽïU›ÿÆ.´>¯_Î'i¡„O°­p›²¸^…z€„‚×Vã PñX.ƒÑUä^ÿ6i‰mĆ—¶ þQ¼É«Aó!~«#^nÄçð-[4 _²â#c-M¬ £Dù·¾50¶v&Jß#>h šmG' Ñõ;MØ/Q¦ÉKv=¯ÄJ–èà…“€Ú¿äsÌc)\mtk¢ÖìøÕ¡Ìâe質M›¡xur“¸Gj”w"|l«$¦àzÄñ=y(! °2p1EóÖ‚,H–”ÍKaX™y)_ÎÜúŽ«½\ „˜úi¢Àì÷Ûüï·ùÿ!·y{‡4Ö_äÅçžqïåuVËöjõ¡Y2u— (4üQOKsE0¬œ·wUÔŽ|ШF)8žç¸F#õ„ma5»# ü´ß¥Ûû¤Mtìë›þÒb6geß³RA1çˆc~9éôÄâÅaKý®•`­°¤+üŠG|åtÉ1uÕººÁ\ýÞRj øJšé°â‡ñ“+Á"®|“>„ñ¶q˜éDÚ2a/âcD˘Dt'íA‚`Y³Ò9ïWryÕÿïwƒá(ÿm’Mgï¯onÿ^Ѥ{;'';Ç­feóÙÖöÎó/wÿòÃÞþÁáÑÿ=n¼úñ§×?ÿ—Mª¥–ƒJÊA9š´×¿ìO©þUøî}ùÕ×ß|k é F³¡)b/(B2±€Ú×\— !ö5ÐÅ èù¤ë~RO,¦¥Vïk4º|à&P÷ºoN\ºQXÎ\Ù° ª˜ÛçãøÙ›a/IâF¼ßÝï\Ñ´.­}ûÅZ}íÛo¾­Šè#²™@l%ŒÂÊÒ8†'›jƒB é„(¬j˜/'–l„ˆ>Æ·4€²¥ 0‚Žh¡ 2fЧF\Y’[I\òŽiKv½Y :Èž*m¨ð,¢+€öV“Úú÷Dý ÎŒWÒŸ±®§>âp=^ŠÊÍíi·b u—«¦˜Ê£ÊÓ§ëOV¢Á…å\çÜEAB{nn«bQA©PaÆOAQ(¤žwÙÕ7ß°q7‘MZì_5ÖÎb/ŒŒQõùÕ«¨¸ÙÚÑJ}T±„\p„rYÿ@QjìÂ/öÌkˆ¾ ‹á—Ð0‘_LVe6òi"xC^1ÄQ`‰{þ½W^±“%Œ P†¦4]*J/GѨMÇ竨­3qŽìE(^6p~˜^§ñe:¥éÊ64ÑZ5>Åû­Ÿ‰û縖gR7WÊÂ>¬m¼to8Æ‹æ_¯ÆÛyqto€'¼Ù‰VšHHOµ¼Š’=Hg¯' Oøb ÛI° ³š¯¶5áèñ¬;ŽëããŠdZ4Rù9°¼æ¼©ÃÊ°ŽOvµ|Ö:É\|ôD F9¾|É´"ã~¤O÷¬âܪ ÷dxÇ:Ä*”…Z‡ jàà"b¶fÅ&µ"<{7¨±BŸih¥Zü Ëxqdjß4+*2Ç\ONÖ,±^D$ ‰õ_vÆPŽ‰ËqÊÎÐÞŸºE+‘#«q}“vw[jýxüEc½Æ1Þ_¼ZÙëf7UÕ¬C{ö’Ž)/8$ü—3@¢¼Ëdš‰¢3MiºmSSólÉVJÍ–ÔõQ5¼8ñP­ý w†$÷a`G•:´if.ú7M6ã¤Ý냄ØÆ‚hòoW îø<=ÿoµÒÚÛ}vøì/-:,C0nرe³sÑÓì?ßÛ|Aig¬h0(€©Éã œÞN÷4ÁÑÑæÖˆ‰ÀçÍÊe·bßœlÏ¿T½y³Â8`AÚ8÷åÙ+¨Qéx\¨ßv©_ï5+•C0õÿ6KxLš¥Ëî·‡ƒn£ Ï­çÈß9 R\`ÂZ÷ö¾Ã’Ëx"¹'3ãß,FõeüðpÓÆÕ÷ôê‚Ä/7¤ÎüÜjŸü|´Ój¿d=“ö6[™ÞŽé"‰ô¸i^ÌeƒŒj>Ü|¦ÖÉöVûåÎæ6n†~ŽiæÓ/)j…¨l®æ“mZ\oq1ZoA›yÞ¤Åñ ð«ß4PNóžóìïìÿœ«m˜ ÓÉmP›ßÌÖ¢aã&äÇšs,é݃“‚ùé¦wNÏÉ6åËWÓ£\ 2¼:Ø¥Eøß!ÂK|õDþÒ&9:Œöw¶wO¢íÖÏû¯Nv÷h¦vŸcè8Éñæ•Æê´½yÑÿSùü‰VÜö«ý£hï Mûl_Óàճ݃ÈüÝÛŽžãüŠvø_þ§µ³ Ê¥` _t omm¶¼í¿•¹ §í£ýÃmyÖÞÑSþõë‚B襔ñúµ)BÚK/ðÒŽTXuQsLcl9ôq”Ò'Z«ôÎ"’Ÿfiñ³¬zJÿ·Y:MøI cDŸ±ÿiPiõFBÔL·"»ö¶µ¥¦ó˜gå)hêˆ,É¿ô?Z¡hŸÝ€á[nŠ7)* å¿Ä#‹@ÄL†Žç_ăAzÜî¥Sšä“6v}´ùÓ‘Ñéïÿ2tTÈ$’0E.” S݃ç‡Ñæ«“C9MùQÊ¥Æhskïpks/2à¬P´õó AÎ&][ïöæɦkÄU{bšÖ(AI3ó$a‘̯îx¦ø[¤ã¿šŠŸ‘Ç*ByÐ4ò‰øÉ‘°~G “GI'ÏB·Y\"T$D+èy+‚¸¨?‰˜-Nø©Ã(güoïzïûøs5ð·?ºHùuŠ¸]tQÊGûÈ…‚ã_ÙUg’ôÜÏÛ ,7—Ó™vÌßIšNµ¸›pJº×à¯þQ\$º7uF4ämVø“Ïeø}wž9Î1Òy~;Ï”l{”s(áûWÅqr«¨ð€Âˆseã<4 Lœà¤ sQóÚ Üuo1 a)<ÌöŒ'ºD¿í1=èkЦ¶îùx9šÑ'Ï45˜“X?Ûˆ&kÞM¯ ¸µÍ„©õ` ¨½›¦;Ì2üOJMº©>鲶G^É‹—¾æÆýCÁ Ý]N¦øwDËÊ¥£Ñ8ŸÙþÿwç}‡&`doƒæCgšû¸ätSjj—% æ›ݧö¨›v˜ûYwÐéíH ázS4ï$lXÆ^“:M;ßEíLÎFÃÎØuRÒ6®š^¼* omk:Î"‹˜Ì˺ÛOg™r·þ.÷6@p„Ó{<„§RãtôKðÂxœåb¦Ó°¥ó¬kŽ¹5»Œ/x°f%è6ƒbØ[}"¢gŒ¬ÑÍ Ú¬Ü:ûÓöU27í/uWi_piÓË ˜dOνÍ*@àœ\uø>ƒ,bÄ‘Þ;¸]› F¹ˆÐ.@w¢s` [nCˆOídti¹`‡2#£88<؉Fi[Ä¢MDZ˜Fâ©5÷ìí“m–+¨ m|ÊÖY†l‹~¿îË{á=»Gûdô¯ü ûêŽzíªk†vgñ‹Üoú™k]Àÿá=»GûdÌ0zìÈü(Öeù»žoÍe’ I¡ÙôààŠæŸÝc8Z&¥ •9|–ýR‚_þÓ“n¾+ù´ÙŠ‡?ƒ_vô…÷ìç{eêq=3‡îr¾-soò/¼…`Þ…I‚_þŒLmã$°GuÍh~ÙNW£†0ßäóM}Ùä1ÔY5øÇÉ[¨œ³å×`Q#ZQñ:t£Š^åÕ¤µ+°ì›¿Ö?o„ÚÑR(ö?ð-é¤N…uâÊ6b¿‚\wÛ°çiz æ†Ã·íòÚ)JÊJ¶ò†šúv¥½r©b +0ᧀ»•ô’´©D‡™uÄ’crþ:#õç_— .9nz˹ž–¢GqÑ­ñ=ý:–˜oms”Ú%Ŭ¬§Ü£yÒ¿¹­#‰u×·ìãÿpÏöÉ®wI\°Ô™£“Ô¹Gûdôo®’K(üá²WžÿÃ{vöɶUòÍ·UXw¥ùñ›R³À²ùö÷mù?{[êdý3våiÁÒ¢kI]®%²ºÜ5Åþ®þ¶'‘}üòxÏî1Èoôo¸Óü6ÉvóZ¥»È—,ç[>÷Æ;GíË\¢ðgðËÿ‘+É}²Ofwû-œŸ‡K∑Þý•?UÝ©‡þè)Ǻ¯×!mBbÙ"Á%^Ø»L@Æeøú®ì ;ɇl!æß“e[‚÷ìõéj²\P˜Ê­Þ'~‰™W¢{vút••˜]Á^×ôF'œÉ{пáúq²QÓz¡ó>Ú'3i.kÁœ© @²Ì=»Gûdôo®•Z‚6Q…Ë~éÁ/ÿ‡÷ì½¥y5µÒ’æ{ã¤+œeÑÏà—ÿÃV&¿Ý£}2a¿½Š¤ëž˜g9×”ü‹Üïð§×yãöžÝ£$¯Â¢qbá‘æÉ?»GûdòÝ–¬¦Ï"‘Zö‹ ~ù?¼g÷è/™ç[.Â(NŸ´Oa#5™´QeYË^þïÙ4E¶DÅ“&OáÏà—ÿÃN¬üvöi®¦Û#]Î5!ÿ"÷;üé­1yãöž½1ÕŒŠJ¶Â_þï9×]›U{k%ËaѹßáÏà—í€Íº ýF¾ëò.|“á†Ò¾ ¿üÞsÁHØx£aÅÐËó -x7ÿÊŸyû6Ÿ,÷;üü Æ×6d~ŒE$ÌóöÉ<è_ùŽ‹æ•Q1ó²WªÿÃ{vöÉ<˜hþù–.„ qïâmÒÙ´~1ö¸›‹±w©¥uu—â’ ù?¼g;küÓ>áaTÕ€³FûæqS”ÆêáL¦…/r¿ý*åUðËÿá=»GûdÛçT‚^ ç¹ûMþ…m¦{þ ~ù?¼ç°ûdô¯ü —dØXY™¡Ògy¾Sïæ_y[Õ½Í'Ëý¿òÅyÝ£}2f„ÍŸß&Þ]+ÿhŸÌƒþ•?áh×¥à4ÿÃ{vöÉ<˜,¼Â¨¢9löݯæÞØ‘õ^æ~‡?ó½öuâ¶÷~#l¿î{éM³ÿ~>éÜ›ü 7rÆ~ñŠú>(dÑ«¹7s¦—¹ßáÏâÔúÂT³‚å‚–½,A¼ŸO:÷&ÿ"?‚Zçâ´Æuq#ñ Ë}Ê·0ø¼ðË]Ù¼_œ¥ðí¢äν “áU.Iø³x]„V$¹õmnç>Þ9òwd¾;ëÂŒwe[iq– ‹’$Î'Å˹dùù]³è)Ø l¢ …äí“yп¹Y—\:Ëbð°ì•çÿðžÝ£}²m—|mÍlû‚'ó sí˼æe^ƒrÏîÑ>ÙeÅíùÒýmÖO„‘ ŸÌƒþ•?fFŤŠßåí“y6¨–ÇËežþþÙ=Ú'ó ÃaÊ»€,°(úåÿðž½E›»Df$³…¶¡]d»ç•«É{›‘ûþœ+Áÿá=»GûägÕ¿¹ [¯ãZ?-ô³è¥?ªÞûù¤soò/ J “¿üÞsXˆý`'9ìOÁ\÷ͼx¹Ñó¾ëWðhëÃÛ‚Z&VZ”´OæAÿæÚ0ñ¤Ajö¸ì•çÿðžÝ£}²-,ë8ƒ9ɱàgðËÿá惻Gûdôo®§®>í­3à[ε(ÿ"÷;üé¯~ãöžÝ£}²cæjž7±cæùGûdô¯ü ûï›CëÈ+mÍüïÙ=Ú'ó`úà—_Ћ÷H­ö´œqþÙ=Ú')Ú˜ázƒš4›„¹g÷hŸððc¨K1fѦPV&I·äñ#tËœá‡fY=°ÿ'j–YÄõÏÕ+óDýf­r¾¡E:e#¿s+Š}ä¢BžÿVD¿/*LÔ?~]9aoýæN%ø'$¾ñIåQ ]ô3øåÿ°§ÛÓ^ò£}2áã|&ô¸q5ëÙ±øEîwøÓ;po|Íåè.í³{4g”çÆ1¿]oêÖ§Có-úþô#oüÞ³{´Oæ!?p®b3rÎÝd9߸¹7ùÁxÉ»0IðËÿá=»G7˜® ó£)èé©ðwZ’oħgŽìU"Äm¢7«jQQXIÂêÜÉk„¢H=ËMGO“Ñ{€!/"§öpnþ©¥9Ri€@_©ÐP½Y­û–ÃļùCHW—ãê=´4¨Ð ‘TT)Å…tÃ¥ðO"Cóa.â5V‡Î“绯÷w64 †&É0}/ t&bHüEcµQ ÿ´y|°{ðbƒ£ph)B˜Ø<½¦æ%5Ëd˜Øà •ôžÙCµ Zãc3¥¶¸*®© 2«ýŠ³‡Powö‹búÁ¶]º yˆ§“£=ÅÙ€:¾‹2ë¢X^q”­ë#¿Ö„ùˆ \ðÕ²ºq³”^øQEÇÏàð8I hgÜw4 Â%XÂ]Ôì7§§+e&ÕÚÀ3´óÔÒ¥ 'OJA¤½ê„Y×BÕËdƒÐvþþ ‘¡Æ!BÀhQ‹y9ÖëZÓ†iwII û“N ð&€è“t<"gªxÄ çóIú.Ù(EñY´­BÅÌÔUô é¦Ê=œ=Õ®®‘=*NR=#Ĺס­"^Kå¼3v³<ç’Ý,®Ùwë…ÃsåâÜ{i¼êÃ@Ý4£9ì²açö<1(†…ùsØ«öŽÒÙú̯Ûf¤Õpz0t~€ÿ&ô>×¼®T©8z£ñ@«ÎÃ-d'Èë^óŒþq°áö¬¹î1F2=€SØ<dðq‰gúšR˜OÝ^)vI 2¿Œ¯%ô’·rÆ÷q7¦Édô®Rdq̵ ‚›^öë.×@߉Ü%™Æšc^Æ@ÒÎÕ^âPÏ„––ÑlÒMš!8.˜²âuG dÚ‹>â;Û#a\DŠœÐòÊ€¹i0GlT±rÍH˜4mêÖÕ$´» r°%—£!U!`a¤ ôo>Xùò1ñ‚Â< BÍ'º§˜²]ù5v'7à.ŽLý‘ŠÍ[)‡€ƒ>ÑRµ`)J<á¬@éKAy±Ñ6”¼® ªY£Q*Ø«º÷Zö^/åê¯âÈ4û ­¦ÏÃì²Y2:|Û3IjŒÑ{ º¤o*Ž`ÿ—P nó,E˜ŠiŽNM:Ž¢°KeiS)zDÔ§zF$å'ì\>„ ôëp˜irgU9l;CTíðÛl4–ךlðµ9¾+¾˜¤C͆Ãx;á’h¾öƒXn³ô+=çÛ­æRÚ~è¬ÈÏÆñ~ý&¾ì#ýΰÓel°7ª"iy¥jÚjù93´Åü\þ+ø9ApÔæšãÐ\4›áIéÂÚ.ÿ"é? .ñ€¿ØˆsajŽW ŽÖ¼ñRvßdÑsæKW®Œç’O)zu;1á/és°H¬O/¸¸õñ8>2¬Çš’:âKªôÏÜg÷³0ÈÆs /þŒ£"òåádÄô4ÙËE B,Fo_Ã)­¼zMWþ5º¢Û<¿û®½¹µsø<¢½hð* ‹ +Šìô:ã©4ltÓÝË8¾’`æ6¢èB,íjüFÂ\¾÷›7›Æ ?£ˆBEb ÁïOÒÑ0/%ËF-ÞÚ¢ÿ1ºåªÖôPçCyHD¶ÔF·’„:Œ^X‰½DŽfG40uÈ¿Ä_Ì~Pâh[¤\=ÔA]1¬¨)ïÁF[:DÌxl°SKͬ‹à¿^?#ªr+,– Rý©^†Œ¿»ÿä2™–h+ºFßæÃ"œORP/À\P6WŽ@hŠ1cMcµ0ð=õkžîm¾æ‹'¸óûSÿ[͘“Ôœ…U™²i52Ù7‚šÙŠYÀ™íŒÀaëÔ+_v˜ÄÿbRÈߨ§oï-êߪå]ûåæÊúQ6<; Ê÷}ü+l ] l®mÿ¥úV£P1j[­Ôt{÷Ødº9Vn3>¿qÐzðžžÑ@¼¢B´¡~ÂÀõÖ¸õèx‡®V¶i6äî¤{ÕŸR*·N5+ˆš6uKÆ0žxðß›ò®4jàn¸cë/¬¹ Þû+–4Ï,~QFÅÇLª ‘­TW±©%jØzFªÅ…ŸS#àFñÏéŒQO”ÄDÔÛ ¤* 1¨‹J¬h$1,1}Sã“‘ËBŒn÷…Θ—‡û;¢$Ï)Å9³ó c’j,hõ)Ó6¤í#\ÉŒï JÐúw.µZò%þƒÊ‹DÅotŠ0^2ãYaN!õtа¸€Ì–àyy…¨y_qfÍ¢-pæ^~óÕÓb‹0È\Ø›+Œ $qf°I -z´ aÚ#j*áýíš ¼n:ÔN,¦]^ywµŠ;4³¢œ]7íáÄ7º"p$·gaï•°¥ åº!LšXr†æù&s.'Vì(Õ/»ÝøD%eø®z7-ÐÆüH2ƈiÏŠ+n~,Ââî˜ —žPv38â –ÇžŠ½´;³7ƒ¬ŒåMp~lUÆZ¿£v…µ’BÔM(7¿pZº£ ôY‡$íäsÊpúÙv©«ÞøÁ†E°“n¾‡[vè¡!_ïûþ]™Ôä5— &·weÊ òÄãlQåQ-Ïzj^)5áÛ‘9$߇Üa).,FÕ/óI(8!¿¼ 85Êo½zž+N£¥ê‡––3WŒ],üÙˆ%'æM:ZX^ÔbÌõJíYZûìÕîÞv¬ÀdÊg`SÛ‹.*iÞ\Έ÷RÖI¼Å_¶N´g, ­‹0”ñ‚…¥­à šK¥q¦7\¦¥"aZ/vN7DËÖ@ šú J³s^¤ær÷«œzËÿf­E„ùý5vÜqU‚2•穹ìl”DA RþÜ¢;äC™®mÏÌCß ÎÈ™]·"¯EÙ'.œñÂ~¥¿òλ£mÀCï€Ï’- õÿ)^ÒyÜ\¥{—èn.3Ác0º5vÈÖ–·ßÜ2Ñ8¶HÀú¹™‰>kTAôGï̧Z I\ßûvÇ4ßc¢a¨É¶RnùÀÖ3×óQÊÒH °{¶ ¶ Ôºû¬e¶(ÚXcZõ†0IsLCß) A~~ù—yßÑ)R·VÀ¥àú=I¡ Ms½ÙýÎœûÚ£\ËmÿLt>ônQü¢Ð¦×îÒŽVÍ…Š˜Kbfq#¼ýŸ ϵ€ $»`x¨¶VØFœ(ÎÉäòqòªŒ¦·†üÑ“6ÛïùÁ¥Ï.rXNÚ9˜Äw—æð%f`ПÞ %äE^…e¥Ê¢ì…ÞC%aq1#,Û’Ò=pÒ†Ù/ 7®¹2çcnäγüx‚¤ºLµâú‚9zHX¬¿íXdôJ¤÷YÆ!5©åÔ KC*¡!-emðÕ¯ ô)«ë¢>ó3¬Hr[«ÌJa˜"ú›€¥C+†—„®R5×Ä_s;¾[7óû†»À|„£š6Ë d0 n+XñµÜ‚ʯ!˜5JÍXzÑÊ¥¦¨/ÙFìÄF!ãH/Œ ì¬QŸ¤c{À Xƒx(ü.ToÉ&³!‰óv$y;;cÃálL¼‚žÆ\YA”€/‹bÿ!®~b6UíœøKÁ±Í†¾Rµþ[cD›àa +9¿*éªZ—ÿú×ÓÛ¾þú+Û/=Ž7ãR£QâaNôm¸¢Õxm®yój¯Þ•7e“Û_W_/ŸÒ mÓå‹^¼Tª~äˆyyÑ×¢ZVœåxlLWÔ¨ÇOÚT«ó-ÿ>ìwôX„šÄ_cÿ ÑÖ;gں嚶ËÄm™3ωcZ,4a?Éš³Qj˜gíô7ŠöìÔò#`’™.{Ia’ÉãæÒ¡å4­cÏ,±ÃúµéáÈ<-j”ü]ÔßsfV7¹„ÖZ0–…-¹ot¼wÒŠ×Hy©ÂŒ¹¦ˆ¡qHšˆ(ù÷©³9?¨?ø8°ÄfF4)é9¡º ‹•’_øæ+.]b|;ÄX¤àÎë†ã¼Ý‘wÎÌDœ}÷Uü©•.¬ÐÞÜîð)¥v|:Ó¼ÅJ?óèóàÔ¯ÁDsÅÆÓsÅC™(¶Ãq¹@_!†Þ}ñÛ’"p²–sÎëžZÃ×<\v=E +*¢Ëd”L=„xÜ<7k×zã«oa¦4¾°Xsi«¯¯®­ÇÏ!cl¥ÓkP–çéŒØŒJ-ÞuÛ”¹jÄ’ #ƲÉLóq ]Òdeñl4èûhÜ&ã6~|—UƒIÑtÒ?ECÃ:ô[ΣÝŪˆ]|ÓZ(þ/~üŸm¿ûA°ô†~¾+7Boua*JarÛ6 ¯½ÝƒƒÃhqÞz=R3ñÔðž8~9+Zc2hñ†Œ2í 8“­øyZ~ÑéûZïëN¶!ýPßÉ¿®ü¯Tæ¶'‰¹*Ö":u: ÷ÄÓØ@yµñùÆ"]°·_¬U|†Èž2ve[C}ˆ iˆGZnn>–¸ü£ÉK®¿˜ß Ì¿—ÀЂüÄ| ‰ wržÄê^úâH 'ÿÍl —ò/&)ö4:YHeиÿçH wêwúòOg`Üâ j)•s¾ÂÆ»ÎÕS¿)^¡R׿™T=Ž·ö7Â=n÷hse÷è0^ÚeëŠ#¨ztqÄ›£Îà6ëg+ª¦çKUÕ¿LsYâÁ—P”wôb×Iã—L“Úýq盶m`šV’•n|ñ5ÐE¸ 1€Ü˜åÚ(l„^(•b ËS‰FÜ“öwLÒ äq+÷llííòz„æ©ó§znO!á´mš¯Ùy<ì@<ÅgóU:†¯Ûà6¾H®±s§)»ŒÖYúªß½âk:Æ`ÐïN…0t)„*^ª>5èH~4I.¨>¯ý0(/ü¢ék·['Û[í6l¤Q½| ºbµáeU9Aò>a/R°cà*CAwPL-º’?|·àç¾üéßq SÊ÷8ÞÍxnU ¤4½Š>~àèF ä ö`»cøüdÁ þÏ0; t¡F}Âàþp=ÿUðÖ“!Â'Ms®ES^„G:ÊO<]²d4ýÄY—ÜÝäîI7©þÑsþ  §ëãÝ“­×£â¹6é.šåþ?vrµâ;æÖKa¦¶•þ‰\Ž`vžÎ¦CÉÿY_ÚÜÚؘ/scÚ\œ! ÖÆ(ÝÐP?î¨u·+¯oàIÆ?cTSh3÷Ň)øÃüä\ù~cÙëO?ü†NqYIÏÊ)ýʉ1’™~P\’i0_ŸhR07Ë¿if”(pÐ…y.â­¿¯ˆß6Î|O².®&øÕ:Iþ6ësPm…ýøÓƒÚû‘åý¶Æg‰Ü¬b€cú öÞ_ÄoßLp£âÓÒ‘Îæ3šÍ-™Íg‰„êѵú¡CüqEþ¯ÜŠK^c?œçWÇS5‚Ã3Ä ¡7îñS-(]bÆU…](á2;×[ü·â<œØå‘6×*PN‹ø  ÏýÛ%—‹?õ’ÅìÔ÷`^º@ìŸ}¡Î€ÀDÍXyi‚(`m÷f]9¾îõ,J'³ÑH”«êÞ]c•^¿çG’¹ð¼¿£Jåƒ~Né±E»SŽ²å‰..»± ®¸¤×T{H©îñN'¦owôÞÄî2ðI!ÎŒÕP"å?G†äi_~ï ÝDM“Ö«ƒÍý`é¦:t¦¼Ì9ƒ³÷7ÆX×،ϖì_¥Iã@]£j÷ŠwÛÚßÎ"ý>äŒæG.ñ¯‚w0½¥×#›gâç™<,OæçÉ–罟çý=y"{?ïV4ØsϽ½§?­€nq)þÛ°üWÐd`¨à?[>Í—cÿ›o–é—Yç——ûTTlqy´ß'7+—É4»ÍdÞ–7÷é¾a3Àä¢æÛg>4°xL‚‚ñÓO‹†pqûÒl¼OE㧟6~² ú€¼H Úg>-hàü‚± "j”uÞ'íÝç­f™þyóÍÚ­£ÍãÍ“Ãc‰Y•¬)þ*¡S9±W†¡‹GȺhBE§˜0PtŽ“IÜ›}å¤n-l€fIzÆX»¼6jnοZ-x·ÆlÚ~GÃ݆ĽÉü ‡Æx‰´¶ÖâuYYú^bxó aÖ‘Ö›_uv8PûˆÿñçF?O–]˜Zw¹þ7|åXLœ,|2úWþ¨Å =ëlþê&Ö>Ú'óPÍ¡ÙÀϧ•e/t0õ/F¯JŽ}­¬TNõ¿Jeå²t6ÝŽ•Ž,¿\3aª5ÃüäCYÑê\¤õõ0^û¢ÌkAfÍb„å¹@ôk:™)‡Ë ¤¢BÌß G?# ÈaX¹b÷Ô08IXHò«ƒXÛå&¯…0ʽØÂ?ÔY’¸_ˆí‰WŠ,Ÿý—ÄÔáÝ¥,´‹±,­ —5¿œ–ç× ¿zÏÿ$“s—•±Y¥N÷hÀ€Ý{÷ë¦*L¼ÃЛŸR üW`­´ìÍ[\ZŽÃ òÈ®«Gz/¢¿u¤šŸ2L(§°ëPõ²÷¯ž¢Å.j>øŸ_ Vnó©¹:Ì}¢›iAŽµÅ9Öž²L‘c^²Âp2c‰[¨ö§•^-î’Îh6Ž¤²‘ ÙeWÎÆ€SØW:þ[‚ß' G\7‡Ñòk AÇÄ=ÓH„"Æ’H5­Äa†Æ Òô]ÞêYk;~ÒXxf#â<ŒV`/@!`i4Û»²iŒG;ÆŠV±Õ%îÞ…mÿKdÒ¢OQ 0lA ËËá]Yy—.ˆr0 ½Hq\² á/âëI?§'¤»Ÿ ­gfˆx™xeµhÉkþól‰Ö;C¬)q§ƒ s—­üõtéM§þ÷ÍúµßêÃjýÛöÛåÓj³±Œ¼c$<{jNÇEaì炾ǗäÐá øhðÁ=ùÀîš’"þ'œ/Ê)PMáîBnFê^iÔG•´þôƒ¡Þ¡xGÛ4þÄkÆ wD|ùÓ§îã³ÍÖËöæñ‹é3?·_oíTdƒ‹kYx°‚φÚèï|‹ˆ]ûëßK´ñl †*câ[›¼ÝñÏÓØf8+šj›ã4¶³®ËŽN p`(ðóô—_\>•Ï=¥UÙFõÝI»3͆oyiäßÒ"=åÈ·§Õ•ÓÓµ¦”¸Î…y·í˵¥´òׇTÓô˲£g¢j„½ú1tŠC‰³s/¥( óÑ}³Ù9‘í ‚¿™ó…ÛunÚ%Åó!FbÈ•ãé•Ï!úóÎeé¬hgä ›ðœiÁx,iûG`¡2A¸÷‡6zJ:ΧbkyŸŒXGûyŸCP!ýéL eK~×ÍÅâÙð£‘Ò„<*ž‹Gùixôá‘=pÜçGÞ_uýÜdžÂøAc¯#ë«™‹nÎc*³ Zf1¦eUpœRü‡f¼êa›Î‘}bvpøKòØ˧¨Pß@Bc×èÙ),7Ô\a’4¬ÖzÙ´DÖn{ÙöMžÊåen ³²ŽLÞ¹D•xÕÜoµrÃ×¾ˆ×¾Ôƒ[%›¤Yq}%j®ÙQôZÅáƒ]®Õ(ògOÜp²ø° ‹érIœ¸ “µ½C§œš’(zÑc@óëÐ+þ‡xº“ åc¸@_“ –Rš…:ß{YéŽñéÒˆ&mH¬hÂýŸ%+Éyx1'ÄP„%é›O)ìÇãÖîáW˜¾ù”ÂZ'ÇÄéxeÉ‹O)êÙ«Ç;G‡Ç'^iöݧøêxÏ+Š~•|!Ú^"7V³Æ%KzG<’$<’a’ù³˜éAàITCÖ Üåx!B ÕŸ"p-—BËçBã*vfÓW„.ûJÙÏ´²†l‡iÂÛr­ypx°¼Z—WÁ9¥¡Z»';>$¿XnâÄ2¹N I¥‰²€-­w”Ý°`í^aÎ\weÁ]÷ÚÖXñ!Њœ,^º¢TÕø¥‰Å¸Å›.Ý”¶› ï ÆÁö6W£†|æhv+^7s)×mÊdÚ Ò9C"¿Øù Ò¨a>S¾2:_,…Õ|z=jLõ¥Ü‹õ’½øöGIÀå%˜¡tvÉR.«5ïžä?y§ðƒ/QƒT‚äñ®Rté\…Åw¦eüJ- BóîRAHÕ˜ûrYõÂ/ï[Ìo`Ž$.øøºWÙXÔ…‰al G#’Äå?Å%µ_‡× uqߣV‚ðâNúP»°½„î’ƒ¬äìæâ/ŹŽ|`Š™¢å&ø±¸w*>yIÁy'»’ìì Š€aæÞ[LKâƒXÛ>¶.¡Õô ׉úÖöR:t¦8ÞþË‹££8ΖAsNäj’\Ò SÝX¼x½æ»¥{± _Ÿ°p…àÕܽ` 3˜…*DÖ}s7£¢0 \7žº‹yᔞèè|½"ÁxBÛÃÍA –ø¨a¸;‡ŒÃ÷Þ[|×xÌÍ©Y_·o½ï:ª´žJµpõ.ëÁÝë¯HªDÏÕ›,¢ÏP[ã]¨Le|ÃU–Ö\§ÒA.bŽB×÷dô¾MCÅù?´%D¡I;J®]Ú»¢P¹§ÊÈkS'µ·yäJn_7ϸ·7±Wß'ѪrIô-% ¢KÙòJ–±ùmcÓì]Á‚éª3ºä¶Ôݹqßxø >°0Ìâ£â)Œ‰²ï#ú¤žA\œå÷n²¤5™c1¸ÙÑl Úû@v|êMvôˆ¨þ£wŸ¥`Ãd"´~‡$bQŸúíèÎ&‰ûÈ%Jº\ïhǽÙܦ¿è»Ë8¨#è¾ ŽC§|IÏ"•<ò»ýñX {XhÌÁ |£º7³–"ò5þ|Y~…ºþR\.Ò©:éq¨äG¼),ål Ì(‰[Uý£DÎàO0›tº· Ç@}„&7žc£˜ÖH>¹ýmúßpøøJ½ì‡6 áx’ûáPâ’ÝÓ²O,QšŸ¿ðô f©?ˆ%–¨§W(ÁéÙdèó—ñ|d•/‚/7 °™ ®UJ¼ ˜ó´ÇzQ¹tÝNˆm°ÄS¨ÉAÁºãq³RF|β ‰Z‰\p|ÛŠë]ú*±AmªBwdÎ —UÍ—ùZÏU61dçÊ,sœWS²1n_ŽfMåB÷‘ˆã©÷z Œa'ÁåQùy³ZÿöíçoosKgvÃörQäÑEb4O+QèýÀoeÂó¡Æ Ð—ƒA=»ò¯u^…šÐ¼ÖôíìJ4™WMŠHä9²WTãÌËÐøUÜxpÅÙÕ4M¿­R)#ÖÏs{$-Ðì®îüUß ŽXêF´»NÖ`äa«OÍLŸ–Ü3Myî'¿™ÛÀ[10é@(2w}j62>4I)Ál¤a¬“^ Ï ó¶Û@ÜmflÏŤ7é\$¾°Z*ZËõIB4'c ÊXE2 c#–,™ð‘lYàº(Mbr‹xdŠ–ö5z±õ‡AÌUšAk ØWÖ`6še3:"}ÛG{@µ0£É•Hzþ+;À JÌ:pÓÕ0sÆÃÖgÂ/7ï(>?¸,¸;Šâw—OœÚa´q¸Æ4"?†`Qc³ÙèIìÙ‹áÁ¯‹/*¸güuø ®¶¼(¤~€z»Ã­f.mÞÆoÿD®9á§9٘еmFZk–½‘w‡ô^³DY´„¹Ìgẇ,ų”Y<3œ_GCñ”ƒ‚ó9$Ñ„o¡5 §Çœ;ÛÆóškÑYñ:¹sqäËP ’Üš!âõIîI¦+E>Jþ7õÉVÆÞ|ç¼\_®3§Y¦×õ¬?"^œ˜g¾—€ï¡OGÐLÎÌ"«7™Œ­_«¨æMð+õJAÇMШ(»ê_L¥bšˆýXÓï‰.§t¤­K’§±¤„WÝ0žÃýwÊÊ· CÑlX=™eBÖÕ˜º¼ ºðXa.Sl-X—gZgJËYÍõ]'t(MïeXÅ6ә΃yáÂ!¯Ä+õ•ËÊÝMx¸>…`Àóãô"Ÿt¹@ºO£ž` …x›×׿iáºpôÆ|¾Kº:ÎLäíÜ®„ÂÍFâ7ìG”¾`;šOs»‘'é7lF)¸`/úCŽç‡îDN+Û‹GK÷!?ÿk·!Wyç.Ônš,fêïì¤käeòÐM8ŸxÑ6””¿y#J1‹·¢|VF°õûý»Ñ¯èS÷£_Æ?cGJù ö¤û8·+uÖ~þ4…ìÌpä×Cw§¦–}§£§;Týk÷¨Vzç.µiÜ>uÙÌNµoîÚ«bªÎ«EÕ~qF—$Á¾¡¶OØ©kÐØ4;; ™ˆ“iW5ÖScníTõÿ»0g4n fBUtªàq&F¼ù)áÜíÏé¤3Ê i£]Ø‚bK« ü/«ÝÐÿIÁa‰Íò/~åê,iùxõbËJfF3LyvšO¨˜«¯öþæ_uÊò&anÚ`Ûqÿ³|Z}ÓxÛX.æŸ&3WàîÁC |ó×ÆÛe*&WðâR·Ž^ê‚ÒmÙ}Ý(çGcƒæwcÚ‹@&BïOD ÖD(¼M‚¡{J‘òÏ{­³:Oªi;¨Ë"7lÍJ~ +!¡3ݘÜå0žRgz÷q¥a¤ã¹±ÿäÒhJâ¹I²¥}ÂÜ ;ÿ Â<74Þù÷Ü»\ìÃ~w’6ç•ŸíjEIE4«Ý÷ÛJ:š•µÆÚ“ (ôsü:ñešZ¹Ÿ!sâ#6VSÈxË¢q.]tˆ=šTqÒd)nîƶ °ï™Óºú_1ø$ÀeÄ`ˆu“ôBLò?Ž;Ó>ÜhŒ™Ò|”o³c6±ÓfÕböWÏàd®¯l6:lÉ/-àÕŽw_ÇùÔ›x—{5ì_vPÄ–«HqôågŸ§éô|vßeî`ŽÇ·Pct3-òIl]é5ÓyÖ3ÅôÒ$c‡êtò.VwIÎúe (/”ð\;йȮ3¿S„ïÊE£ ¸Iö¢›\¢­µ³îy>ëtÒãL5~—“t6ŽK”áâ¢D%¶VÖ!ðî7WÒsoÂÁ­µ:€Ä°3šö»TD#ß$ Â5JÒYF=Ö]LÒ¡ËØÈ®Ìÿ,¿&ÕN\ÅJæã6lŸš%öjèÓ@r:ñ³ÖvÝ[ŽZü=Ð9‹²å/N¿{Ð:ÙÜÛ3ÂxïRAE\Ñÿ'Jÿ  ´„»Ýt6ˆ€q’b*®iðá¸Dü#ÇÙ Cl(s•lÀœh„ŠFdÝÈpßpÆÊ:ý+øwåMwëí Œê@üx§ã‡#ö—ý¾v[Ë¢Öyi¶ÎuÐóÆ{‡-ù¬Sf?s3Ì–ƒ…Ÿbfëx¶ž¯±ž¢µunŸÄ_4VÅȦ’=½)Œ3 F3o[º#&²G¨X5ÖèOyʦÄÑ‚ÞNˆNiç'ÆÊ ß »|ivNÖMñh {ê\Â4 {XíH¹*âôáÂÀáC2b’Í9adœDlš±]9+emBÙ+س òÝó¹¥M»Ã‰ý~d¼{Ùx˜]ÞSl^sàªáKTÛ ;­ú©P·QxÁ®_a—èš6eÔ Î¿Á61ƒ‡¶w|X/¿©½Jþê"-ïwc7|ðò-&ýå‘ÖV¯[½LØh1XšyÆ)nšÃÁ?÷'êw‚ŠtßÙ¼È÷}PŒ|¾©™/±qߨԻw4±t6¾î­øå–ìÐÇó`ð( ôœËº#›ƒxe<,­í¿›J#·ñ)}óÎ1`¯æe5o¬Hi°¼’-ª:êzFŠ±Ïæã‚€¨9û¤¢ƒ+K¦æ­•”„AŠŸ#Ò…©{|S°âédZ³¼Kˆ•1vJ-ÅŒ¸£%ˆ€L+5£ÌµúÛš=`ÆòCBy¬™ƒÇî;Fisq°¥F ò9Tö~¦ù\¡Çjó¾@ùH»úb? *ó^¤!¹r깪}’PÍðyyš÷Þ ÖÂÚÊôf@˜µ~BãíóŸç€&âC¼üËûΤN]úvm—±Gï2_\5€bœs78Ó1PŸyß›Öt<î¨}t|øâxsŸÙÜ;ºÞþ¢¯>Ð-f>okëx÷è$È*¯î͹½y²äà ?€ã¾z‚ËÓÇs™7^tz¾EâtFwI¦ïÍð›–ž²ÎEâ™ ðÔ‰yV&CÿŸgé`6MøŠ‚º|ë^Ÿ18}tOõZˆš{V´ÐJaµX·¸BT¯"F"XáB¬R‡«E›âü<‘7Ö¤œª‚»œº‚ä>ÔãSêh}O7” \è€AKL°¶®ã·CØš=¹Èeñxй¥ô'½ø’¹N‹ž:¤›:¢²©œäE3–’K‹¢"±q²¹äL%KÅGýŠ»9ª6p»aÏCñ+œ;ZFMû ,&$°·ê‹ìØOÙU¨Šèàp\‹9^1%Ÿ×`…m˜Æ¯ã3âŒë{Sg毙ˆÛr®HgQh‚_^ÆAVzíÛÓlôú=s£'æÊ«ïÕi æÈj‚Ùüëx®„°8»=2\Œ—-ìÔ|3´èÂîE–6çr~v‰èmã42z"rEíq¿×=äKaE)Ú(­ä–CñE0Ž—ÌìÆÕ˜m­ürË`åk.2OhT¨c²¡®Åžj+T‡5KÙgý,—󳧋”gÊHvh•Í '‹øØ…}Bùæˆ>îÁÍ9-–Ëzg{¶¥%@§<¿S³úÌJGØëŒu|•šÁCźÀ¥ƒfT=ùù¶Ñ¬d+ÄH”ß®|öÙÊåÓlå©(Ë++•hA‹}·‹E*GuÁ(ÛŠJg+qÇ Ÿž2^C[žw(,/cC|Ö “Ó)öËù ßÐ…m·ÕÚ=x¡·4xàû÷4•ÅÙ2Mä¸XBÆ=RvI i–NË¿0Éÿ«_—mE‘ûaûë‹Æ òäÒ<ÌUÁÜŸWû asê°pv‹T^*kÑq½ÞÏê µÇCÿz6ÏöV€ àM—ÅF}Í¥ˆ>ò¾¢%T<¥È4MYïBÜ‹0öðbàq½ïO²»?~úû&ènº*þ|9KñJ8ÏÅy‹³–¼©…–gõGV_°Ux&\.¨+ÚC‹È(~Wp=Y›*¶À%!=¦"$,Ñ ÿ2½NÞÓád² ²Ÿ²þ/ ¦îª:Á1‹xuÐÄÀ€ÞÙŸÕ„_àÈj› ò.1 WéH¯Z ¨U‚û›½SUpw™ÌjKmq‘cæâðÑäŽR;µyÜ+tÁ|`çÃSï®~ ßôB%:^¶2nìö/ÁÌ0L« d“wbœ\µ7Ü› ‡·qqIO!Cm°yùÄhZÂ}1 4Ù" .ô€QmŽ~›5—SÊo¹š&EìðiØú%5‘ÌÛg¶ÿïÐã|ŠÈŸ‡á>™?f¡Hæï‰Cý‘*^ÅX[ÅËå"ñÉyG,˜ˆÈùÖ=ç™…¢RÄI3Ëù†Gw­‡ÞérÉö­Dî£ ¥ù‚剒Á=Í» WúT§Nšw…ùd‚ò?‘~xÝÿP¯´BZâv˜úwº²˜®£ö?Œ˜Û§¸ÍÑýKäÓ níÚ)°·õ¾ýsIMïÂÕìCDZNßFÉW) OÈmXÆX 5![5úxf^˜L®€ÙAɹD%3™b{U¬ªAr«O)¦‚.Ašã…2£ã_äSŒ€Œ‹m«%Á[«f!Ö}ÉqòU(cëY)údûx{vzu–¬‹J¸>¾×º¦(ÓbÛšý¶wÛÞÖÈ[×pÿbÛš\’•t<]É.®aòÛɪ±é±¹ä?bñi6NÄ÷pˆ0-<Ý#³1ÏîÓí×)³-ªîŠtg ѧ€:›öY5®ˆñM˜æ¾ï‚™ïOkËUi,¿.šw5ØæR-¼†#ÐhVã‹ ¿ß^ÜXqÃ@3<¢ÉÞË…ÚvYÈźvÝnÇÛ ØqÿPؼËYDüÝw§ê("êë¦8 dW Ñ£?s*þóŸÿøÇ?6u šò³b|Ls¤L.Æl»@t¸Ti–D¿Y{»ï ‚™†°dcnJHjNÆ™1‰> &À×ëq-^|=ca£-üÓ²6N¥ñ€òŽ±ÄÂà?$Ë(5WœÚ‘eß"B­ V÷iùîâhÔцOÞ¿÷¨~é´sÒÆx6ÿ9;Ù« Äÿú³W²ÚÙÉEܘÒpx³ g6÷Ú·óõXm :BMÕK§Í†§¾ >´Q«r”ùÂ-T«Ùí6®˜Ä«C ‘±~ô’§‘¯„øER¶%e›SÎs¢¼%%POË™žò°È-¾à3ßâ%é¾oî··wžo¾Ú;§Ó³ÃÖîÉÏÍUAu¥ ¾¯9»…ßyCûª²ß@{µ¼XÑ‹‡)ƒ©€…;z ¾·vjˆ}Æ[Lsµ%SÛfúdËFåäø­ñ¥g›Ç奫ՈV™—×8üZôcsÏzi BZ^B¶jÔ8zyxðóFl¾Uèl°]Eć…VèÛº¸-qoòQ}*»ÿ€âçEBËÈ6’)G@c¬ö›ÌN%Šƒµ·E{ê¸qÞrQš|QʼnÀ¯í·ŸmnýÐÚÛl½D§¡.±¡‚ÚVª‘‚˜±±¹¨¯©„濾[^’ÄU19ee¯{G5 wŠ@m4F• ÑMdz)—¡&\ãt0`#$¾M’±X,•ê»’Ï>Ù¬øV¸n5Ò¾ƒjË;H¦n9f/„º mðÔpÈg¹s–TùËrAOY±}Z ‘OKj¬Æ÷ÃO_Ѭs» a1¦~ÝÛK6# ¤h[?¿àÎOmIÓ:ÁM5ܦöÙë¤-ªY±Ù¯+¾Â¥ÐH=Ú`X/îdt7MûÓ[czª2º1©§s³rÙ¥r­4G5¯DWÄÅ)}Œ² »2nEá÷EÐk¬ØÌ Ñf6·ö·6÷è¼Ñ§z‰‰·g‚ò¡øΠÎ|Þ¥ÔºÍW'‡°¼DúXTˆ‚àÙ,ÊŸ˜ÇYÐØ»*~¹³¹½s¬åÈ%]Ñ2N&œõíN…O*?Ÿò†Ò¡Ù7ýˆÎÆ×b”unœJ#æ#ŒvÇÏ.ñ½ª$Ö(µÞŸi‡?».? Ö »JÆx‘I¸•½„ꑘæt®šM€­×V¿Yÿ†±:µ'0à$ú0Kd³¾ïgpѬÅF˜œØAsfóf@¸1‘ïk$Ä•É°be¥ÔØãYŠ¿>[Æóp%7c:ÙäKŽo*‹…†·Ê¢÷ć°Ó£u~yÅ7&¹³`Ÿ&æiraožF_4ñÙ:1•ƒíJt˜Ž³?DÑÏhDÐT¢OCà‹šÉS` ؆;«—+u¥þ§£¹pò5ºžÃêßØÎUêÊ*K…ÁÊ3Ï¿/^ˆ/MSArHˆ‡è£y´!†P[R笫>ZÃ|‰"æA– ½¯¥1µ‰ALx{À¡ GÛjÃRNšb"X­¬1J¦+ïûÉuc|5þS¿×üòÉú÷Q¤p¤S¨+(Yݬ§?+ÉÅB yFç@·íf=£c ÔNÃR\›¥µ'\Ú8Í°în•»¤þ³½Oú¶ ­ˆý%-xF#¨ì÷‰Ùëv¥¼ âh¾=æñ¦TÞÜÚÚ9:iÓù¸s¼{xÜ>ÞwqMJpF²”;Ù–®}1OdBÃîH1kê?øMfÿ2‚W°î¼‚ט+r+ry凧¢×ô&¶£ÕêíÕ˜|5Ïíœ2Ï”Nû]ëwÄ”àÿÏÞ—6´q$ F¿¢W(+„u>6(YÌáð,6~ I¼k9b$`ÖÒŒ¢XÛûÛß:º{ºçÐNœ,Þ ’fº«¯êªêê:ê´3hö€üS¢%'_,¬«C„‰q¤ 0í$ÃX -¥¦ DØ›Ii‡ÛgpcàÕÕ•æÜaЮ8[˜„ÝøºrDh£)±Š“‘?Ly¹E¸&Cc.¹uO­ž@&¾Î4Í_§‚ZÞ|c·Çߥ åÒÇ4¹a‰XãñM=û|"fa/léÝÕ3¹át¦µËbá6Úmš‡¡ã‘ÿ™;Ž]äqæTÒ+ÅñæQ¹,5ƒ Œ9Ê5ä’˜OӯŅÛXxn[¢ÞŽøñô ý|÷èÅüwðªýüdÿ@Æ$r³f•bÝÈR÷)àRºœ2jµú#£\BÝ‘xÛ&õTÆóÃÝãS8+®jMGfE|ŸWWN½l–²ªKoÿà%ëM>ݘŠÙO ì¢M¼?$W¶7zˆ²1#o¡­¤$"Ë›Ûï©LkMÍÇg|œ¼~åKyRH©äˆ>h‡)ºögÁÝW»Xj*{«âßœS`HäI2~øÝs—ÆF7¢÷ª1âB© gÜ6ϬoíYRþpÁfqµH¿)õH“ ŒÓM<P̬±ôÌo|¨5 ¡^Paܸe¹.Ê]uØÇi%‡(>¼x¸ÆÐS§×ó¶8%_kd™4ZúNHkICuç2ìÛ>¬Òf– ¥—³%×™îwÌáÊOùTZcØ0ÊBIbU¼®hôèœ5z#{MÜùÑ®" u5IE5Kåxš´!ÑüƒF=þ¸…=ôzÄ{$£¯…è°¬gPÝ0_üæ>Aجí„ëtï ”å ¤P…ðÃtÒ¤ ¦Ä–°Îwÿ{E;öŒ˜Ó­|Q™ïŽD¾{‰ïžŒÏ–øî¾ÏnÃ΃˥%S‰Ãr´à~ëOÙúB¹µÇ …üïC 9m7EQÇñ$´9_je5’6”»£”-±\_ÑI†©ÖÃIÜ =÷Áà‚íEØÖ.º¬êX^*§§OQt(8E·}Ë ê&dR#ã>gõn–èð3F) 8|˜Î, ôNq@èØó0¸*\º çƒ6H.<‘dt@DÚ!MC]9&ºïÈÆTã2¾&Ýuà8ööð.5¨¦µ£}#)Ý+™ZÄ…j”ém›\қʢü©ô÷ØÕðH`Žb.É2á+ÙÔaCÂÏ!vÚ@oë2™êžÝ‹Ÿ© Ÿt÷"èçA…=†ØRNÇ4J”PEfÓœÿIŸì{}å—®¯üòÌÿžÒÒò⎛M¸rß«6ïXµ)™¹ä´˜‘ÉøÓ1 Ì {éªWÞÎcnaê*M£iñ¾ghh÷!&Chß:—v‘ƒà¢Lä…ŒÝ{näxƒÐN:Ày;^Žƒ÷H ÉÃ#Ûj62ecgiðM-Ö Ëð£ÇÒZ™§…ƒÞ—bƒÓvÙ–$Žv<ˆÃÜÔÞ‹ÚO¢ö«ü-é".®þøFÁÉvK1h¹ÈvPŵµ—.ªðµE_{Î-LLhÌÍ–,.Ü­wñ+B4åû®ß[ÅÖÔ)+¥ÑvÈ&@ê ¸O’¢®É ÅSÆY[q˜@(æ•ìDØ,}orV#ÿ4 …[ØÜpZdðc,Œ‰¢S6f=í”{äs£þ›¿–- Âì˦¶ì6Ê¡‘*$ß&Æ2'2¶`5ijxäŠ%i† ÇNÚ„O’ȪžI½šöÙ3F!­_ uÌMc¯z4 Ï hG+Ö€ž"ÝF¼á\ÐTá“òñÃDÌ6Yhd?L”‘è?NrBâßzïôŸÏá+°`ÑÁÄül|c:5ù"´ÛG-`I´Šn¡c÷]µ"gçá@ÄÒ!¡ç9>'ç¡\ C6G;O$Ô+ܼф  ›Õoc·}i‘BòÆšÇ0;£šmÅɆQméåc…‘ïÌ|Õ0eë Þü"Þ®7ås•¶Zºz¸ÚWj›‹È‹cõuœ§C®ŸÓÆé×+—]gÛßñA)Zɹ|BkF"Œ:Ó¹|ÏÁ ´ù»úu7è÷é[Ô é³GG½¿G¤Â/Žü¸ Ï¡3¢Oà\K• øoçß*µ!´(ˆhªNӌʺwÅ8n;íD&FIÒF&)½¹f:òn i:HPòÏB SÚ*ùÂ"þÕ¶ê›e¶éû#ÒrÐtï9÷ƒ2¹ç2œb9¨|Yå€mW^( 8’ šºSýƒ×¯Ï†(/³O¨£&ê¦K( ‡úhgõðÅã4 |º”I‡ ODåˆwŒ£Z×w'^$ýðp^psiú&&>ûŠFA!ž”zî„oBåÓ_Ô¨nÅ<üÝwiaEnÓ7Nç-Q› æËÑ}œ*åüsªèL"IЛpvE76ʱf×£ Éà†Ãá× +tŒQÄ ¾Ž ¤"2(Ó|XÄ©ŠÌ"*p}a…‘t'NMikž»×£±9ëÛ¢Là[k­z}½UŠùy¬Øž…=!9HiÊ“(Äð"`ˆÑmyf‰1fèÜp Ï"'A¼$‹jdç5@ï•8{WUfü¢ª2§ ¢6Ghë`4 S8s„‡:Ö>@h䘊Ýб$ÁA¼ƒÞŒ'ýèfÛ¼âpzï?B/Ü Om+÷[™(-¹`¸\ñƒ˜Dg® . ©;Ì¥(÷Š}²[.g™ù1ˆiÏÝž´ÓÇ1ÌÛS¬´k@)¶Õ…Øü/¢QÎ4¥FÛýßùŒø·¿‰¢!ÓÈÄÖRÒ‹7j¸ÌùpYUÇŒHZ‹ÊÉ;K*RdW2ŸßTuå,p)EÓ™´I=W¢¦ÜÖÖQ˜jã<¡Þ4Öé ˆÉsB)ãl±¬7-–ÞNÍò Êª“TgÉrJîw”ÝŽú¢r–87e:©éGeJ’s.]öËbíÊ @<ë€xôW®òN—BØ`d•È5s{7Wž_¥¤†q ­w•Œö‘k^Ý­cê¬>»ÎÚÐ+âp@A=®È‡ÜþWÅùxXN‰]Ù‡©øØ$5E_º,&L!i qFªÛsWãÖÔý Ðr*¶Äó’eRŽma”òœEwÖ2¬âš*¦lºº0¡ŒÛó%‡rN(»”f‰? þ`ð ~ʪUåDùmõ¼ ~ù]B}uxt| Öû@\ú°máa1N÷=‰ŠUQ¼*V½¤~«Ï+»Ö¯àÆêsgüEF;s+ÃÒŠ.«Uí¨Ïrš¹uéM0Ï´?(Pã9o<ñaÔ˜Â4A›Ó˜bp3³>, Í…ÇŠ¦PÕÀBBkÂKesËT^eWÌLdåËŽzÏu?‡ú˜têzjËõF&U)Ëø“Í7á7r>w œçÑútÊÞhâ9»ãª ÍI8Êf“õ _»Ä€,úD£O°a]Å’º*˜ŒI½8?Cë¼VÃûS¢–`ŸÚduÙ¸§©EHÌJÆûi¼2çTd²‹ßäpâ›Û•ºþ¹OGf¥<;,s}‹€å¿ÕmVbyãkçßYç=‰”Ö[ÙßíÔ—w2²WdѳÑÎïp8ŠCê,Ä›!ó,G zkM„Ìt;Ù‡Ÿ?›6pêYʤ3ÉÃÔœ¡ê%s}Òšå"d sÎSñK"›'OÿÏ87ñK¤þmJüþö2|œ\ÃøĪÅù…ù<y\ÀŽ£ñ¥pƒU¯ïÃkÑnÃ(öÚmíár '(B «ÄëOáhÒØE,fªªøߌ&#Œ˜¡Ú¯8ô˜BѱkÛ£XƒÍÃجio– nƒØ6¨OJw· $üržíí™Ó„?¥…%Öns¤—fé¡»7ÊY™ê%Þ&™ÁÞž4d Emžó®]aª}q·Û¾X2#Ÿf·}E´Ý8¼Àæ“‚¼U´JÉsA¢|ìrÞŠ56©ý-E°7“ÙwKÔd«/sæÎO­`za +Öº¬ü‘–嶔ì÷®/æ_¥[PS=g9„ÔzŸÐ™Ùô0™QB›0ZDØh!A„ãvž±½¶j#ÆKQ;Ù²l·mRc˜b6¸ÅÏî¶ßPgik) eqtz"ö¾þf–ËÈ”ª³È|÷ëo–&ô6òeVkÉ>;w­HwƨIÏP®‡Ñx’8žÝvÔó€ kÉ( ‚+’ ¡ÁäÄ0 0Tòa}µw*×ÿ†áòÇ]Ò/ÖCÙºÛ™à1­C®ñL(•÷bm}Ü Q{_kFÉõª0ºƒ?¡fe§€¿¼.¬º3ë®XÁ ‘Ÿ­øXF-y;@ü4ݽñÞ"é³``þú=¹¨¨²½ªZECâ AãG!6óÞicþñ^þÈãH¬½¯ŽðÚAàø‚úï`Þñ ‚­Èâ¸Vkï+i±8÷'§‡âQ}CìaZ‚_E·‹Ê2‡Çd¦Vs€6MµÝ§GFx¼C kœ„þÄïªØÌQÝŒÐ(Ú #8}±‘¶Ê­ë~(‹K÷šÆætÑ––¯N£Ì§Ï.ÝP…KÅ ßÁ;6Ø¥ãÝ ô£‰ïDîà¦Jw®h)G(Bi¯7""ÓÜP”¯Ë2…CŒWžÏw# lU&6¨~R¶Ó^MŽ0ª+€‘yhüîMÆ^0 ¡9ÒÆFù/Mh&ŠR?k“i20…S•UD”œñع®þÇE3&Œ·ÎÓXƬTÓÚaC嫱'WÝln¨Ø۔°ðÒêa2©^<ãx3 Vaÿîwn÷ ͦØß‹M±-j›€§ˆGOŸÃùë õu÷è5MCæ²óbz˜ìv4pp‡Nwˆ,'ôÎ>ÀÊWE„©ú²œi†L•qxr²v]Á£¾_ºOtßßàK§‚]lj6;e‰¬Ñ>¬îLÐüòšö0oìMñ_®­÷+\Ì©ì|Š_o™¯eu.GŽ7FتêZLWÖÖ+³É ýU”…:0¾èî$(øñ~'!H©›D±†Ñÿ¡@UlÐý!~³ñV ZÊz½¿Æ‰ÉĤf ©;ÜÕ~8þÅàý  ”XƒñÀuä}Ñ*¬ÔvA\«í:¢¶ßþáå¯Û§'?¾Ú;(ÂÃ×]|Ø>x}vð3øœ¶ÛE¶ûTÞu’јM¥#ßR!²/ gA¹L)ø¤ï˜’h]£­œís–s=-]©äÀè¼*v÷Ú{»{?´Ú=–*Ý̦HmxÍüd ?Ÿ׸½´¥Ÿõ åV¸–lmâë„$ÉÖ¯âÖd°`éî.2f`¹¾dMåTAW–P=#hÂ0:ž-±Ð7îÏŒöO=¸Ûék&>æ\ˆ(„< ¹Œ! .¨Èœ:œé@ò’Oj”l_þ¥ÚØ=בmÈRmü.d›;’JH—åK¯ÕR‡€ Y§Š‡Z.Ú‰¹7€˜¶÷Ú'U›¯ýÔEt… L”-:ÊBT?64»”þ„%ô„`Š|½`Ùq¨£Ø«"%wóOÍ– ³¿+ÃñFQïQÐ\&ïOÀ?NïQ¢v¦0³üJyÌ ¸®ä¹aÜqT Ü2 :ÉÄéŠ&"\Q™ì¨lœøS‡òÎ^œ%ä$kÀôN´3ž´•D¶8³ÁáÓØ“ì.õn#%@ÙÚ(ºçÓdqÎ¥«ìÄ¥S£9× |ñÃËÚ¯©oÝ®L9‹|)ÝGF½Ñ®=QÞ‡ã\M3Érí9<@3¨PG2ž™Ø×ûź¤ªc㌳O9­zâáªØ F¨ y¦¤¾<«ªÑÀœÄ«8ï'‰SyÌŒ›/˜ƒ9p⼽أîÈ^Ïd7º½tÇ~vepº &Íäë~V>˜èÈ^”Üi™'Xvç$"/ïsjFh1àùÎh4ðº2é¢Þ¨ öÿƒ$Ÿ³ñäÉ£rˆ5ìÂÐyZ°,$¦¨Fç%‚A ·ßÇ}É.(6«`'¨“뚣”n'c —= ¨ˆ¡ŠWÈSG¬Ea„€©+hÑhê^ç„?V,É£’VÔÈ¡;GË“šOÆ'«ë­µ7Ní?»µmÔ¾y»ÞªTJÖfcTߊºJsr®¢(pRQãd8™[]ð% Å8ñ š[‰f;m™ß* 8¤r“69lR#BH9ÉÈ61Œ8ØÞ)HÐ#DANWM,ˆ9͉¬Z’n,åJïËšBg$˜ ÇDLJ•‹Ä¤ &C_|½!Ö¨™V…H W–û0Ð_=Rnmίvéu/eêʾJ…Œ^†ŒƒO*GMÀ¡#Rå2©Äéq°T…ôÁÔöæCçFŠEw7_ eŠM—yJÐ »“±SuŠóm^®uò)Uk,\¡†Ó°6)°túb¶¶X®wuŒ*%勇â‘x,žèµTI˜V­$LQ•K^¹~‰©˜2rbvÊPk5 â…Õä$d½®ñv³Î* ä4€µ‡¡nnˆFÇóáeÝêœì˜G¬7Ê醨¨”«õÉàƒ‘àé³tÎêôÉÈËÀ|e¤æ2£‘R~%œôr­ËþVåZPÖ©–CäÊòÚ§ØsÂËaõȳaHe;ˆ½xäTùP¥¯ÃéÄ9ÄÞƒ†Ocàª8Iì]%]BÓb‡ Ê•«*ë¯ÂXIæ «…Ø„A•±ïÈÜ„¡r°ž¤™ŒŽ0S‘Xˆ³„´iM[é[_Õ‚OºÐÐó'!-‚ Y’õŠFઘ°ÐC *ÕU¢€ññ”Œ.$M¾xVeu#͘.€$™HeÂ),NÝSŒÜ‰™SÜ“Ý>¹†Sàç¢ rG&Þ ‡|‰‡ëÒ¹!¾Vãª*°ìMy0ÐPç;2Ým{÷™¯‡—;c÷× tÙí©Ì™¤ª)®ãSØJbPlØ7u4b=Þaø¾û7ñ‘?‡áMÈß½pâ àà!ßà‹Äº±VPºïp/0"wÙŸ ¼U#8ÊÐýF%#]µÜ<¯òtöI!ù÷EíU„ž¤ ô§wbW!`ãêÎÉÁ`ê½áojô$+LÎÅâ$'±Åw¥ žz¤ã‘ÁúÉÁ45–kõ3H{u¥pÒTû$..³<6tJDÃQæ«3x§+—N88>Že%à‘Ñ\‚ž›Êït6½Dè)8¥¨R ð'Iz²ÃFZ>ÔãlN©þd‰êzæ¨hfË´“&+Y*§aUFp6ˆ |D„Í B =M‚(Œæ4åÀ/cÂ@§)5‹kœv›ôx?Ón…°£²ƒfˆ#tñÍëJ-­AÑ.ñ®ÖQ ÃiéaS¸ôåF]×ü Ç­¨=Y¥áý­¾AåoõMN[ìÐ6Äëám]Q`Ñm¼e×ÒŠâ6·K£¸/À¨Ê;fÂz"| ‰÷ òâª(THg€Ð^PCêÑ×õé-óDní½,ÛCŽéëÍh9ÑÇDt³l'\Ág¯Ø[E!Žb¢ÍsÄPdCWÊ ä±‘OŽõ¼3¯²–™÷h#ƒ'.«oœÚBŽrfÒÆìíí¼¤Äš¼ÎQ½€Y;ÒÙy‰üjæéb˜‡fÎÊvßÁ;‚Š*s¤ý4•A2£g’̪Çñ-µºp42†¯_OÕ¾~ÍJÃׯVbÕ½aÚ­4‡××9ù%)˜çë×9Ñâ÷ìLEPÍÀö²¼‰.9üw‚‘³·‡© ‡¢‹Ï8 ´8„gÿ€ÿ^Á׃½öÿÞǣωGÿúõ]¤7ÑÀ†Þä·÷‘¢§Ä¤§YúâƒÒã¶{]ÈG‚%âÒ#–$Óó³ß62=¶934}á£6S8˜”»£YÿËñìï„.iXÓ"Ú«Ý'KÞSª™1íÕŒ}‘AídJ?-ÌÂŒ¥ãÚg.ëÍoÙÞ"aù¡í±X"¶=.-Ыûøö™ñín1Bé÷êËoñÝÔHßÇ|¿ùþLjù~×îàÆ.XÚ!Ü€‘ëž8üþÂaˆ_¤[xbêïØ1<=Ï5<£ØBÎáÀ0Lçpøi9‡KU º‡Ë¯ q]@}»•Ññë׋z‰[5¦ûÂTÝÖO@¤<ÅígÊÓ5Q2Ã[»£ÜÅÕ,þ¾ãsn4k¦Ï¸Åïë5>s&iÈXѬ¥Fßqk‘Vþ`kô'q Ÿw¹níDŽ7Õ¹FÈs#—Ø’r$×3IBóœÉ±¡|or>!%|¿ LMû“'hM¦Gù ¨y õ9ãOmš¬-“q–þX–ɯ_ß›&ß›&ß›&ÿO˜&OÝì÷¶É÷¶É÷¶É÷¶É÷¶É÷¶É÷¶É÷¶É÷¶É÷¶É÷¶É÷¶É Ú&O?c|Fãä97·µNžÚDžyòÌJlŸüúužòTwe¡<£—SL”¡f–2<žj¤¬ª¥­”uM¶YOu°5:a¸”¡òoü@:du‚†î°…º$>©””öövO­T¢ 4á3ŠöhŠïµ%íèÇVP‚ÝÓ?^X‚ÝÓ{íß½öï^û÷¿˜`ênÿÕ÷ºº{]ݽ®î^Ww¯«»×ÕÝëêîuu÷ºº{]ݽ®îãL?|ÎHsœEnK`j¹ÑfÖ’ñvOs# Lqg1fttZT¨šWžO, *fÄÐuet’°ÎGW½så[#Ø©fe}ÁÀëÚGêØë ¯S,ŽvAÚÈN4 ÎT0G#)™µ°ñÖùLÏ«¥¡níÄ1Ôáå}hKq¶YÞª?ªÃ›_—å›± ‚Mò•õo¡é/‡ò—!^ùQ=¼$E(àE8yÞë#íCBª¸87 |xŠšÌþªLQ£SEOå¡@×ÚŸ4ÚÀ³àw8µÏK­ÖÛV¥ÑjÁý¢ŒmŸ¢S.ê<:p’d«ÐtQ}ñÎK¤v»}w (‰‡Fn5³…tØ/,âE• ¨çœ”Sò¥ä+ ·†]g„¥/qtè-Ò#5Û,ëCb[Õ1úÿ+5ÔçÒƒ¦ CÔÕ$?KNE¹U.ãÙ4ýÌoÕyx=ônQßàÈq1:Ná"Ð ê`TàÊÈþ ~ÐÆÆ(×qlëÔÄÁÞ'Írë·ùWææJø7ëÏŒ×\f Múep…7cŽ‰õStèYÅ-í9ÈH„¹9¶Çú$%k‘/;j6#”úèÃÂrÕc›ð×çkDmŒZàš/ÐQO³îs¤Þ¯á)}ƒU5³ÍIªVñ5=Õt¼ÌFŲaV®@öÅWá±ZËלu/.ŸSuþ#¤xêt€vI"ÅY(&>J X¶­Šðê®!‡øÀ'ôq,£kŷ߶ϰõ6:@”6 ÆOäFŸtçÒËÄ”V¹-Zv‰ä„àñ‘Oy•x8ò¿š(-t1¡‰¬6Œ5NM%dåbÓH±vïãÙZ¯,îKÍ5“<,~§¡gK7¸‘Ùˆ|nf2Y¼X½$pùÈÊCbÿ[.¬ƒCgšŸGpÌïRR(͈ø0„\¯2'ºlŸì/wsÿCG wß Îìά /Ý©“jWñ7Cñj4ÎyŠè;öÞÄ¿¥?—ÖqŠØF0 ˆ}8§ß|ó«á ª³Ð£É•¸@=Ù‘ŠëZ¦ØŠŽ¡æ½MÁ´í0¦FPn¬RZPxŒr(°GãG˜Z‡\n¼Ø}~P;>:=Cè¿_È ‹§îþèEZ.¤†\[5WM+˜¶eÅ´P2ƒpÄP¬dð@H÷H5De£ g¿stKG÷‹%o ãÄ'v]³y–H´ÇÀ“.2Ö¡&.ìýØLÔL£Ì6Ð ]žDÍ {Ïnln=|ôøÉß¾þF|WÔ8ìù8Q|K·ÇëBneJü2 DÃÏõð½°ŸŠd3|ÕšÖ$¢š”éŽ$] 9‰Æ1í[»ŠÙU¼@°wõGC#Ðóú}‘(œ•P‚YÕÑ@,Çì8jıI»C- Žä+[\ºv1)Ö‹;t®kŸš³§Á€Ò}•Æ|#˜ÂËèLóÎuGb;è¸êß5©›Ž\醽hê^ åɪØÜX_Ûúes£BYôèRÙóñÒ#tÝa(†è ¬È—zè8î“=êÍTø§TøÏ&~ cm„¹lšKej³è¦ÄCó¢kj¼›·gЊÜDz[–¾ÇÈ1Ò››Žxˆ¡]•|…;ƒGr"¸ÅØõU<¶Üë…ìãÊ%»ë9¡Æk„Fómz‘)lF‡ÓµñÕkøӤǢæŠÍ°ñËëF£x{©‰‹$òð^H)oøê—3t¹3¤¦9 L•šž½:xyG&-àÓ/I6HiLÂqãztñ¯šïNn %¹À¿w(9àTÞè@ë4—ì€%—°vJzàÆçÔ€­ºˆõ'” pt3¥9™./•ék ¶ª§¡u/+µòŸH® 5ÿì‚EÚelÅ?‰l.lv0Kº ‚™/f’ì¹$ZPâOw"{ð¶Ë>Ô{–>bl²Þ/-/¸8U3$*3•çÜŠéSŸñQФŠÚ(¯9;•r’ prplºYTUikÅj ²eŠƒÿM¡Â½cyâàŽŠƒù%ŠƒÛ‰™2ÅÁBBÅA‚¼ØbÅÁŸ[®8˜K°sÂ¥K& âà·!²‘,kÿýI¤ˆƒÏ%F,&G¸ŸUàee¶$C¹ÊK·(fI¶Hq–)n'Tôç*ú3…ŠÃÛ e§³Þ-Ç’Å¡z2‡`qh ‡Ó‹ÃlÁâðS°èß±`qxG‚Åáü‚Åáí‹ÃLÁâp!Áâ0AómÁâðÏ-XÎ%XÈ9áÕúóH‡¿T‘aY›ïO"U~.©âp1©¢ÿY¥ ^VæIw(UÎ’*m©â0-U*©"¡åÇÅ Ò8/…ŒŠÐªÐÀµZöÔ.üI ¦ÍÒÉÞÜ°Ë*}ÀÓ±=è™î߆%`K6KFÑ®ëÕ ²ñ £×|Ì᧠’?5=݌埙y©Ô¨ º×ÈJ§†UkèY õiXhv…ÓW_$ƒ%j å–X‚L—Ëì–€¦|­(y[×ÖkC¨y% Wi$×ánGc‡Ò5@½ñØs.\ÿ¶*}&'#X‘P•íƒ¦î|€¦gëþúº° 'Ê­ÍÇåseÏ´ YIºÙðÀb!FŽf—6­p:a0˜D.­ƒô]{Ój5Þ¢ô÷ÛüUù5]SÜAÔ,7ÞüÒx‹ÿ­7ZõV½QÖt|Ïñßë:ï?ü!S¶÷=ƒÓP¤EšN{-Þ–ïÐ$ó«ÆWåsY‡ùy²‚‹%Ý¿b†c È+‰V Ùf1ü*-Uñ‘A$ùÖóx¿©À˜ŽOÅ¢B›#®ú€.a•wèPÅe'Dgì¢o ;¯Ãª[ë,gËDÏ µ§»„º]P»WrB£Q_¤» ÙÜÓÒ'n‚SB ’;Û¨³DRk¢(9˜•Íˆ YÛsÑ$/<@ÇÚ\ Ç­Æ9GUéà Òäþxÿ® ›€MÌØë‡SÎ=úÈaž|ô±‚j€ 6¾rµ¢Ýâ#ŽîS_j›ëcþÛ8t±åp/¬‰j&kÅ„‚XF|p]êÒ ™] Ð[®Œ«Üc‡¸#Z0ëCFUC"_ÊÑ7ú‰’÷.YÏûèß— Ø¹”…Q{»u=%i‰ÞòIèJz¨C½FŒ:@Lj¼ê:Z<Ÿ…¬Q1õ ÔßÆ–ÊŠøÂfÆSú™”ÉŽ÷éá~ö÷ŠbÐIn»X€\QaB…®€ût®Úï2ö‡ÊÀ‰ª‰E<ÞŸ™¿KÚ$KŽ.Sø`] ”.ÊÜ‹ËpÇiÓ–ãýÏž*Ŧ‹Ä€8S€'jr¯`8qX‡5èF%Þ0ShÜÔzi}•\6Œæ.…Í¥hÞjî'§š¹{¹OajËòfClÌÙ_Ù;K£s<™ÛBéÒï)Ç…:o-uÄHÁLakf Z“Q§‹ÝÖ”êéé~ ý\ŸŸÖÐ!ĈŽ úCÑC;üae»œH.^!9xñü’¾xn÷yvÊ2¹BwÀÚíµ¶“DÉw͸Ô}†áü Ãñl}éùÐUOKéÞ¦#ÇâäPcN‚ÏÓéºÝYyÒ37F¤WY½Ÿ“ŽýçC¿;ZeÁ›’ÝÚ‰F{ê5+?º5s_bŽô,Òe½)̃1ËæKÏ#f©·¿yÞô4YËÍ®‹ÚùÓõÒoßgPÏÊ na^ŒnF&uuDS¬AÔ›a;P»tFç™~`#óÞÉ᡾LI`i˜E;`ªê¶ý^Ž‡{¬pc›©}ÂGŽäPcb†G@8<1 —Ö–‘òÀTiØ L|ï;Ýi‡3jæéÅüa[—YŽ+¥á4‹xâb½žBÇCW¢´â*k"…)§pçŠF~xž¬m3Ws«HRÉÌû^LÄE¬R™ÕÇVÒøü_<­V«˜‘‚gô+d/&{eNA0‰–ï$Gá0úbÁh¶ מî¯Ë ¹cßÔ×­¥)'jÅûÔV*¦ýù©÷ŠÙÙê×o£D0ÛÊÑ$$‹®ß"ÓöÀÇè““gŽ,ÛFik³¿h3øíа«Á礱¥Š·àÇ@œ“"Ý’óV%û]M²áÔkÍ“WY÷B‘fko8Šë_D—2|RÅœ —¤•ó‚ŸA8ç“GEÛ-ûÚÝa¯ 0–u㑹)eu 8[Íݧ{ûmTCJþv ããÃ^öþ}1i[_ìÿß³—/«202"œÁ•˜ŒÈ$º§7¸½êr\¯6ý ¼NW‚ZCÅ™ŒÙ¦ƒº×]×%ÅõÖÆƆèÜ`Üpº3é÷ÕAb¢ì~zŠã‰!×âÐp@õÚÊûowŒ'@H8:1c ëöTzà[™úQú1ÛCS¸#ƒMg®Jsskëë¯w¤±åÖ?HíM/ÆÞÅe¤ SàóŸè9ýÑÁ‚.˜Œ{æÌz,L©h©:æåãºã~ó:„>Fœ´c&Ž) £ ÁHñÓˆ®áò‰Ú&†j W—N˜­cÊÀk›;Æèº7WžÊy68ƒ/]÷¢Û5ÑègÏÿæºñüÀ/bQˆhT«Ñ”Oºˆ !ߨFÎ;W˜'õ1E™Ž8+„ÎV1:ŒàÈå~ä9ƒÁöÏÁ8t«ˆz]WPt@oÍŽðRðw8âENˆ›¸*+ß™jDYûãà?®_$ð„T¾Ï7º$¯*…Ša—³_¨´4`ºŽ™`çô`ej)¯[¼œ[Ÿ¼«¨aù …9€/ T—CŽ5<šøѶNÒ³Ã4 H :JG“Çhj2h½o+F'‚#ò0Ü_o~³%Ö_¼8klý£ñúeeÚÀÒ&& ):Z¼êϽg¼àtýÀig(fEäa¤K˜YŒŽ« ºC™YcÞöœ¡wá¡Ùä.>:9• Ñ{^š(GX”ÉÐlàÁò™¨Â1˜õÔRÿ&”UÂœ[c…°?‹ô·ãº^àé9c¹gzcçä™Á þè]·öð«ïFò[0r}üZ±óC„@ Ð/fLŠÆï‡_?Q¹ª³F]<öÞ!v÷'c¤# ›©kÑ)õÂMØVPÉ›åñŒüD¾:Ð(Ä憱BÇ»×E[HÔÉiE‡sËóäñã‡OV0¯ŽÌSù­H{f)´­åwñr§×ÃÐtNß®öu¹•ÓO ª„ÉÄKÑjˆGçKW^Ï ¬!Zí]ëõÿÙåìJ¸‰A„¶»õdkóÑ#Â×KgÜëRºmÐdŒG¬Qî}e_ûæÉ“¯á–}®¹—Ìý dãä´1sGX€ûðþ¸.~ÀÜLïÞ¹8 ñrà†!¥âÊÐu9I¢ƒ;:ë{]¤ ”OÞÅdìjIÁe©6¿ÌÇàâ¥=aE0ªÍlÓ`ÿév»ŽY;˜+žëu 3d³ùÊ´•æÀ±Ä‘Ѭã{S”åÔÑtFã„obåTãÉïÙj2·.ÜÚ[¬,I”µ_Q<ëæL‚aà'Äúæz%—û‹›<©æÖ·Þ?^ŸŠd[66ŒJ7!Ô@­M7xüþ }ƒGê[“+…}ï˜4ÏÉMc÷Õ³öóÝ×¢áF]JÐèöë½FMÑÍ«é[S ¨8=¢#„ª¡´Ja£¾þfE¼m4Ês¤‡[{òujª¦NÑùÚ ¦†ŠöñbÚ¸2áuˆ[}[Ã…#ŒÄ¸OV›kræ"‚·$ƒÆÜ®Šç(E¢Ÿƒ|<‚ÍÔñ.P‚ï¸}tl¢Dtx[±¹eÖ%/Šf±ù}8öíÝFÎX×ÈJ¥$þ&¾6£zš'­RüÝøš6ȧÌÍÒú¬•>ì¼8f”º¥úÍwÓ:7ß5mæ4fwC^D U×ÞËf± ‡÷~ñý~þS³8|ÿ~õ¼Y$}-üÆy]kÏwŽ›O6TbüYA»H÷Ú‹rÒªð…•oÒ_㚀Ÿ²ÿ>çÃ@U!­ßÁÓ½ý£=4Ü=Ý;:’†×4ê×£±x-Ê­ÍMy5´[ÁÝEÇAþ£ŽÜ¡ÞZ¾"·ZkB!2ǘ ó}ÝèTv_kkÓF4æNž¾ÜzqÜ,C›­Gðgs«Ìo^o¾”o6ã *‚ÿ•Ùv¯ª±$zfƒÞÜÐ~ð:/ñ¿²a~ l¿ä’÷î8’ZÄ8í*¥ eGDÔ)8ÑìTsƒÊS—FAKµ±&bêrúÒ|JQ1®k¹“±/ŒQ 劮Ôð`B5Í5²»Ù¤(÷rôüka¹«‡[ºrì2M)e[eqØ\5:õ_ç«Å<—!q±î{׋7•rZÒG€Scú g™¾ó‰ö‹ÿFó›=‚ÄS߃Æöè~>D…|9ì«A¶¥²¡YÍ3É"ÃÕĉqªb)àÒxI@9|4«_ä}>ò‡zöî%fR»˜7… ’‘ÅíÈàªÄË`Üó|g|cZ{T)»œ+õBvÓyhò[ÐØY™BcÍc¡² ³”ÝÖmPٔʩb·Ae²5<ÞWŽ”þx8–ÇF8ËVqVýgÉ[4À™ð`€g{{ÿï>;…Œ¡7ð:¢t5ÀœK9Nè–š4{¶ü<—3ÆtÛ䤟4JvÍËØ*çÀúÂl—OžþÚ½ÝÕ²„”i¯,ß5ãR÷6Êù6Êñlåáãc­¬ºZJw¿0;ç ulÀxþ™í‘“¾éA'Ý(ôü¨I™AnAp¾LúbMÃùFL£5öÄ'kÜÓY¾zæ¾8b“ØRy=/̃0˺Fä¡ÔÛÏKŠ2ütÛ¶¿ƒ^NÚx÷>Y>JÅxdÆ´éI‚èóÑTïo½°ÁU=¹™î@Û;v»Á…!ÑT:ì­;ÇÎØsçHö:µzÞ ŠB™CE@W£Ë w›s"þ ¯K‡øréùî³£½öÞóýr!U'–~7 ù½i–e¬„raU¼p1¥e@V Êí²q«vRÀ\­x;«ìí,|A÷ aÑPf”ƺ*¡tW^ΩÐ@Q™T°‘eAÁ;;L¾J`°×V«øVá¾0ºp/iâäí!Õå{ÏÎ:lÍÉ}I² ñ¬‹7oÆî…{ýö­]ÓŒœJJi\Ló„îúx탣R6 ü^¨lcKöš+‹(ŠI)ˆ©õ`Ô&¥¨í“Åç%Fn¥n•Qß…ö¸˜÷ÙÇø®X`,oaÈà ~—¥=iˆÆG«Ú€ß˜B²¹]礼ëdÓ_¥–ô=ýÞÆ’©,T½>§;Þõ›GµoÞÑ~21RµÉw=…Ž+Í#¨ö¼7ÏlÉ\·ƒãCñfºGÖk"ß@`¶>¬|ÿqäÖœñ°v…†¿ø†Y{ò¨2m˜JHµ~Y¹TÑVÑz¾UmN>êâÔu¥Â°^Xj„²ÿõu¶ßJ ^V¾Ïß8‰±à0b£êñ¥3 ƒÞÍ‚¤Ï0¿ŽÍ²+FÖ‚v(]»1[1‚í¨éð­êU¶›AÏ»£‰ºÙðÖ5+Úæ…ä!šƒH1"Dg<©ŸFWHr¹¢´ïC/DCÜØ°í˜üd̹NÀ†êdx3ñ#oÀhŒù—èò$ap4s ×a– eo>îÓTn* ïÍC ÿ0¨5ŠÓDåûžK¤hä\ ù3É»ËVˉ¶x@^Á˜°qU2xA}ý<ÓEWoîùCï”KÇ{7Y«.G“ëÍúÖâýØ4 ÌuâxΓG–áèì5 cîL>²ÖâŸaqiÞ§5q´ûäQ=1˜¯šrÚÃ-ƒ ËI¿œõ;éñQ3žTÖPΨ|¿&Þ?Q£ò½= f,•ïßT¡Úºx¹[{utºÇrJ«Nónälm´Ÿ<’£äXð.1,Ù-³W•Ìm2O/S½“èŽh(Ýh‡JZÿòhO°³@(:ãàÅ@丠xX¿®’X ôäêòF|lÕ8>¶G^ šAü):Y[±Mì FÝ~°ÖA€•’¢Þ´Iàø…ì¿áÐF`ÕzEï„ã}uqüpëãzþŠb'Šæ¤ùp qBZ–ø\ÄO”yñpKxòß?yd½~ò(a<öÑ'®FÃ1gv~2 w†è^ÔqÅ®Uº^aÆ~·ŽÜ£çãôû Ù°L=SŽ„ó·*݈-»Î­¨O…?¼öóâéhdÓ¤Úw¯‚ðÉ]bb=ç|G˜$Ÿs÷úƒ0>Á¬ûQ@1õ¯\vå3µ¥ÓY%¿û|N\8/~ H¯Û­Ñ`:–i´ÂþCòª ûäçã'wÜ[øP­öñ‚µ Ÿö¨±üc&¾w}Œ¿£0öã‹£×Úof]¹Í,ÖÜ#íwóРº$¼wýzA³xcÓBÌo9-xnÔ?ÉØËó±ïl¡pý œ5ÚÚ1¥¬}TÈÄ•) g\Ôd¯ë_ÿ*2aª,'Ùÿ>ƒõQo0ÀŸwb}$a}iñ]ÏNNŽï"¾+CÊŽïÊïšq©{+€)ñ]õlåáã—àUvµ”î~a:v,àU¡N2Àküü÷³>ÊÄþH/¥êä, t ‚óeÒkî.2ëZcO|²Æ=Ý™™UÍÜGl[*¯ç…yféÀ¬9D(õö7·>Òm'¢­ªå¼·>ʸj¢TŒG¦õ‘MOD?a}¤W6¸ª'7SáÌàt='r1Ú‹ŽE1À°BšJnD>:|C±v ±ÇïðÇÒ^V³ ¦Eic¹\6VEtP eSS%.ûÃLk‡ª×s»È89 % a»} ÜuFN¶N„¦@Àà V¯¢ôòQ«A«£8Ÿ6jÝkÚyý›(èFv ”üaO®› s« Ì£í ñДPe)`mXÍAÇé¾ËÒ({Yd[yqJØâèTèVçYfÊäyGÊ…üfòb L­@[`Z×g1èô–€dÌœ …¼‰œÎø>ÓI¶¤ºûêÄÓÝW™2éî«&½»—>ó¥Oš£/=¡ t²dõ¹»ü‹.DiâG¿iÞlrVÊ’$šG¸zð4“Þüg$¹š¢@M9íª½Ãåî©Ì¬3®š¯/1ñH‚Ĩ‡…8±ì6ƒè˜/~óü"ùÉM-‚¥ìs..éý7÷ˆ«°ŠPI§ÁÐTðÆ’_ÛäPÞìŽ'Ÿ …Ûf¦•¶Çcñ÷ããå˜1ƒºfWÊ;‰:ã¶Ã÷©·9yÆP8S°NïÇ°~)jâÛoÛ»{'‡â»TNÆ:Œ‹×1&™˜ð$)Ö¯‰ñì4v£ÉØ;…O†ˆ£H@Û`Ç7Ê[$N+mŒ‡ #ó…™çbF±}( `6ËÀšQ¼àÕ¥Hôª¸#þnVŵQ†¨àYi1ZÅœÅoÑQŠÛl9¡‘]#~‰¡;éŒ Œœh6Kßæ&­Ò÷°ùKº²"¹D"âÇ”E|J¤¡Ý5÷W¦6²vœmöÀ'‹c ô¨Ð°ïx Ì'ýNpPãp4õŠƒÃ\k’ +–É\1æÑw³æQGªLo®¿ë—ò²Ùø’˜ÉõÄ"¹REÐ{ÂLá’5ý©mz]B<„Ý]€ŒT«Í¬‚±4'Q­É…ÚáÈí6yÊx•¤£ý}–pÔJÝMô ‚ô…Ié§g¯ŽîÂ'žàdÊçô¦©JÜKæù’¹š©l üb„tîf)ÙñÂ4|XœîHtIýô÷»çÎÀôH.wo…Yš |‰ôÃþôói‰9Ùvé{º2ëÄ/gí #&ÖöÉîsa6Š,{ôÏ&2‰w¿ù=¶lÙ>ÝËå»Ïšy¸7HaywmR ‹Œ'î­åÌÃæÛŸO¬;>ÚHß…\É ¾0Æðj÷ÅñÑÓ;à (“ð«¦.sÏò™€ž«Düb8‚ìh)Õ÷ÂT´Xœ(¤IP¬øñï'cfá|¤–PöpÅYžÀ|‘ôÄœ‚;“4§ÐkÊåïéÌ,aSÍÛ—F\ì”Ó혲¬Ä™Ct’/s™S5m jï¥ÎL©ÓÄ#<¦Üi‘›¶'$O5ÿ°e%%{®Š}7rÇCÌ5)ùP@«.à~äŠ`Ы…Ñ '¨Š¼®Ò˜E‡WmùK…8¶nAJPv'~pdc¬0‚ið|€5ÈJÝËaÐO=Râ‚ß*Z˜Î¢3¼Ëâ˜vZËÌžKYÿÛ’ ‰Z$Z%Z/îg1e¸Ø<˜ R³ÌðÌG¹°2fÅ Œ=ºïÚ&D—y>Po…±ã”²~W=ýE@ƒj{:ýE™A%¼×÷02¥‡Ú«0w³ô?jÅÒÞæøɨaµCÎÇœBI€øþ•€ÑWH_èî³MïíáÈ—gT®cÕt:E#Ú£ rÈ$UP,€õ;œÚ¹áÍ° \?ÀÖ(dŒC¾A›DáëKEF›#gŒëþâ¹àã ¶¤çŠýz§HN Ú–]-A›GØy£¥n“)¨…rx¯ÐñuJK]0¿£¨‡2-¬^ß½Â$CèQÌÀ7ã‡çò8~¸® ñó%]JËTmPKeèæßÿå/b§ò–WÙA´‡÷Ý¢qsØ{œ6˜$¬ZNŒx‚âïÍ¿5Ëožîí<{uzö¶Œ ^a4ÀÎ2Eµä€”PÝíº$NEß#¨#'j–[koÚ»µ9µÿ¼U_ÈuºU)3…Gãk9 5¹7º:R$"rF@ÚôV¿ÏÞÊð)s™„ÇU1ü³£Ó³ŸUýKfEt 2¤†1ö)þÙ€ÔäÅQ0„K:‚KæŒSy•6QâÿEÌ F±ýWq 3íh\$ž£D>Ѽ"óDYHÎf¢‘øçg?¾µòo±¼r1t$Ë*˜ÞVyï!…ô0ãmSáÚ¨+ì³k?Ŷõë‚Â…”‰(>=Ü/g®ú+Zö¸+±›8“ئXA}§ë’ÏøóS<'Ž`7™º¯g˜ô/iñðÙs"'Þ)Œ½G†K“œ(hs¡f7È5óªþr$ê뢵V‡­Rj´6£r±ÀÙ )37RmÊ­›ØÕÀöüPFU ¯'#Ù €nì+îQÏíÚ—Að®YÌlÏKc_´ÛX·çZo0`p î¦\Û‘]CxmäÓ‚Tß*¶6[p<_£DÁë±ñ©šfï 3¶ÚàÝ,`éJF ¨ŸÓ•úGìsR`]‘ )Šg¯djrÓ³“=X’‹€—¨5…g%’®‘Ÿ’¯f,Œ€Ø Ðd%§ÈD$kkn8ª#ûAZVaGBT‡Œ—z®ÆXí%3¸©“Bå]¸>f‰ÇÜ”ã8 Êx”94t…а‚%k:ZgÈC¬Z«^eKr«ÏõŒºJ.0“¦ìƒ³";½œ-éCå%”%“cŽWÜȶì5ôꆘwìY ZmmJ¤^rˆx¢+ŸqZ%¬‰©Ï?3„ä *{’Ô&ø,5•dÄsµÐŒ§Éˆ=é?Pž9±÷êø•Q$Ð!\P³B0‚±›#Õ—qXtAž%Ëœ“÷(_·>lT7[ŸÊÀÞ¢±¸eL™Y>Ç„zœ|ªKº4Šä<²ùìÙø†Ö$e"´¨˜{¢]•ä¸:A´T§¡7î_#ÐbQÛEÒ›Œ‘JNQU°ÔWU[HÖ$Jeœ0ð­£ufÍ×ýñˆ}k“-ϸr«µ%à¿"7øóØ‹\}\A({BúÐy0Šº©ÞY„‡SfzL§íQ‚MU€Gá܈3Ö-ú7(ÇÕ¤¶AG –öu!Éu´ss¤ß¦xq]Ø„‡ƼÃX©ÝîÃY¡‹AÇ&ñúùéOPD5Ì¤›Wïï¬ûûz"¡zú ƒ~I?ÿC0Ö“Õ'¢vèò±Y~îõ U?íèÒ_öNÅé?Ÿ?=9g»O`”k”ü¦\iàÂ’á7Þ[³ò)UÉŸë뫘jªÖ××FTaª*TÑìÕÛæ¦Õ±~j¬õmÑøŽ^´ݨ†~µUÜn+0¯N:a4^ ý7[o«[•œ³›@Dn|‰ Ï`‡^UUõªÜß5DÎJä­1ˆ£yA`—ÿòßÆq2@ õÖÇƨµÙŒØx ~|±p(Ô;xÆà¨õËÇ·­ÊúZ%Uïƒ×_£ÉTóXÉýf«¸ß*@ìÈ­µV¥N}À7gø&.lL²Sm´>~l8ËôØÁ Í¡…o6ßþ·ñË›¿ÿVML¿ŠéÏN²/Tœˆ‡lˆŠF°˜§ÅT"‚ÀKßí©ÕðÊŸ41(K1j/o—Øby}ýÍŠxÛZKñ‡V_àëF;%&‰%&ä¥FI’:)ðÒAqÆ&öOhнrˆÅ…?i¢ Ñ+KzÉ*JÅàò±)c5TH„qîf$ø¼MÏѾ4Ë]/°müw)ûZ´?>k£Aûª‡†ðЗîh0 ñ¿‚ÌŠ{Eñ¡°êú bHJÒLрª'HZ‰§Vr_|ø”ÕÖ'Õ¢à¯U>Í4ËNyÇ‚UÙa«üµÊΧ‚ó‘e̶QÛͺ§,»íøíoj¸mñ¹$Sù'™ s ²M½ÆþP>[f>àdže¡Ýú(¦£uQ´¾%êJÖDÞØßtðrƒoB€KíÛ&ó,…   yÿÄ÷~xýÊ‚qõI¿Y=°°Æê™_asª'gʵRÑÇõ7 ‰h ôeÐ…b}Ý¿ç(I N—úΆ2GñÄÀ"|…錮rÕ²¹ãKå¸ïß%cì®dÔÁí:½“'M‹2úëÄ) 8à³Ì_Ðq£+×¥d*(¡×‡ª2~¶ù$]¿dÉa†ìêDHhÿ|ôâá–øø1~ÒÞûç3xŠe?&ʵÞ;ÀíïžíJ¡PŠwûÇǘþD0¸®ƒéh:ä÷‚h­rIÈЙ̳ëp4 T@@Þ±ÙVhÿ WuÂ*ˆðG¡;é5)wñpd'Ìáþ1ˆví½“§g@Væ@á˜Òo·±÷ÊYfé2 O7@ƒQ6H5»óMã if›¡›÷–¡(r?/ßÑ~E‘BÖjÈS…ºæðP(‡"Dlò)ŠÒsËâ[s'2êÖÞߥñ°\ÈÀÖ tå vÎh„t@!©qJ m…\ÃÄDl4éF0BÎ<1ßu¬Œ÷gÄ_eviyRG5sûå«“g¯vŸ·¡‹¯ñ䎙`Ýž}øæ­h>Ð-}ñï²èß­³¹øT5'œRo¡Ë(.8Íñ$·¦Í2´¸a© Ÿv ·YPrÆd›Aú68² eúR§¹cI  _À‹öÏ'¯þ±ûê„ó‚<3òpK0ÃÆœ‚2Z«Ð*I?ÁÙ+°Ë;S…¡Ò#ÿÇ^+Þ‚ñq8G5–†‘ëUFCã–†n⮀.±ÉÉñÑÓÓf ÿf½Uwœü‰%¨|lYZ]ƒ–hÊ‚ %DÛ~ÐFµ 0MÎ •–—ÜpJrÄ6|õ»I j5¤%LNÌò,±CÊ®ÛV[ÊZcjKÙ TXa±@º!]'å„ÉÉlK1dÍŠvéãúùµAHV¶œ¨¸àzb†ˆ§`$ G®â’¾mrî^¦.ѯœp;®«œ€­c¿$°(/³‘Úë|ðÚç„T*…PƱM&òøjØR]©<àñš²¢ŠÍ1ßÙÕ°£«Ëìrê4ê&gjùSæœÓàÎf¦ËšñŠ&M¢â§·2- Þ%ómZ†æ˜t/tÙMXy¯/w­…(ÒrìüYþ{¹@R]wªpbqÀiºüæïoÑ{¾œ–ó ÆN¤Óÿ-g K=‚Y®ÿ²”e©¡VT¨Z åÉš,K&9”ÁÐœãX¤-‹<¾ú ç> k,”½Y2Ëî(Ô0¢&„¦‡ÏôHêëÍbHÊV× ¸uÉ)¹•ŸííYç=Ú9囨‘FKÌXW ÐÍDqg‡i°É“ C®‰Ù¥¢Ô að|iÿ: "·MÊ2Žú-ÁùÁÇr¹b<`ð‹›yÚ­'ì“/ŸHï|i{;£5ô÷¢xFb8Ï‚ÊãøÂé„Á`b:&¹¬ã â1÷\Þr,ÑíñDn×üàSªëY? …,u}Ôê×äI²†–i9¨Ê%Û²dKæ`,—$œÍ¨´›TJóŒBE<‚f<'©Aݳš/3¸v\º_v.œˆ 3‹m«ÆJôÅ |x=(!ÇÔ/6ßÁ‹-¼€®­×´‘ͪ8D©¯¤®P­°ûôˆr0¹H íÞ¤Ë6h±êL^.¹€pv |õEÉÞ‚1fše…&­_UÞNYdJþR5ÛÅØÉC3dús•Î~˜Ò¬üðòÇ×mÌxÖ~~²Ð|¸UX‘9ãd1Ja–,öä‘.&ÍC3%<p€³[Ý g£Á*]r—åä–ý@—¼‹ÉØ-þoáF’7±PBç*º@èÙšÉEPieÓŽ!zÀd}®Ž÷kƒÞ'QºƒþíN8DÜ‚•õŒq9e¡¨ÿp+.Í Éò*Yq[\<Â0œi¼, Ýø{N•K0B/šHû¥Éuz=;%¶éfÆ®J½Nº— ”c¶níØyÆT)ûñÙ³°ï70èFï`´­‚˜HpÞ{]W@C§²£äÈ!…ÐÆ0^ó»&C‰¢^Å\Ö©™¸÷r·[Mql¹Pæ©°Ž1¹å€æµ1ûv»‹\Ù\ EmŠ•9û·";ÈÉ»±âJF£·ÚÜ´¹Â R­œâÔG³(Ñ£·rÃ?yç5»Ë™F£.•*f™D&¤*׳k·±œ]IÐ| ·©¬Q›ç"‹ÍÜ5¸üœÈ‘ k–çY(XN˜æ¬ÚóÔMVÍeÓ€ä,Õú<˜¾R³Wtº²|@Vʼn/N÷NÈmãÔ#Ÿx\Uõ¢ÖvÉ ØP2Ôú®ƒ¹çWy>gƒÀP"»?$/pRw4 ¬¸ˆ†UëÍlï†ïö1”p󕈳+çyu»m*ÕÆBË9Ø3ƒivÉËz4j–K{/_ üC“R.Ä<ßí‰ZW¨ Ó¥2/¨*2EY/ȸ ÊU:ÞÏIWs²¾Iƒ ­¼Âí§ÒäwŒŠJî Y!Q3–”YV|Wû5«s &Ùb›žô ñBüÉ1áa4­eȉ¤™*#•Ä¦Æâ/͜░Ù÷Àÿñ¶Þé€l|Ñ튭ú×õªp/º¡Ø¬o þÒw-ì ÜI„EZ"F‘:ƒîž}@dMO¼ßäà}/Ûæʶ±øbèyÒº­XdÒ…Mý¸Lé÷ /•ë¬‹5såÕ¿irL\JË[±D0/´X2ȧÏǼÐÆ»UßÚD …mhl‹|8Òü#ßR)Ê{ÎwÚ)AÙïéŽü¤®δ|·rª.UHÇ6†€B‘ÕØ“G Þ˜„n«n„ÀrZÏV°¡MDZŦ[Ÿ-Uñý’ º5 3/b>K¼´at'±Ò†Ñ×èùÃӳö¥‡´àeF6²J4“5îcåÇ6JÎ\Ž~1‘Žì¾–òFQ˜yw8•tRo¿HkS¶K”Xo»Û³Ørôê‹#OqgÑ×f“ª¬eÈ®}O¶f…dKÌâ—D«2wÛôæǧeCµM§a9e~óÀm‰ØñÛk~Æ-3Œ[â%±Í ê–EŽ2¹I"Ä[b¥€J؆ÑôéµÏÛŽ:¾×Ç–)u>˜§zžÆÐÚ¨ÉÂ’4Á·É@”†Æ™ˆìÉà H ¢\û¾¬èOÆ+8Y.CsL¢BÂЙJ¨Ø빚3èXÙªÐÒ&¦SF…º9ãŒe±n¡YJ7”£^Ê.¨Ö6KÔQCÓÆàí؈63ÚŒøÒ…AïYQî>ɱÞ '‘7¸“s£ö…‰gû§ÿ|þãÙÑ]Èd T¦ ¦^6r÷"W¾ÈeÌW.Z~1â—îl)c…H²8ÁŠ(A Ì¿ß‰0{Dñ’ê~΢H·!@_(½±§âÎN‚SiObúSuîéЬ£_RK({8‹â,O`¾HzbNÁÉžSh‹5å‰ò÷tf–Ô©æíK#.öFÊévaLYVÖÌ!:É—¿¹œ©š¶¥LµŒ÷2f¦Œiâ‘FS¾´È‡MÛ?§l9ðFÁH–è ãÇG/Oî€þ#˜Lº/šòý=ϧórž2Qï‹!÷ÔÉR¢×…)ˆ°8YgDIÐõð÷“ Óøñ’QßfQ”e ÈH/â¡ß™Ô˜K;Œi¶ÊÞÓ‘Yò"ÏÙ—E<ÌM“ÙáÂLÜXVJÌ$*ö«ß\Bä†mù—í^:Ì”cÌ‘èbJ†‘0)öç” º¾¿ ± }atþäŽÌOr O¤ÍÏɽÑá š~’c#ÍøÅø“”±áIÚ¼ð䶅'™&„'¿¿ùóI–Ù³œ““yÌœ—&(_"ý0†g‚âÉ ãæ˨ùž®Ì'+ÊYûˆ‰µ}²û\˜"Ë Œ'Sì”O~7ûä“,»ä“{{ä)Bã‰i‡|’²?>IÛŸÄöÆŸSp|òèîDÇ'¾DáñÉ£»a®rÈ'šq©{b?Cˆ¤ÙÊÃÇ/K„®–ÒÝ/LÇŽ%ÅID,’ŸÿÎ"eû#½”ª“s –Ëœ/“¾XÓp·âe­±'>YãžîÌ%dâÌ}qÄ&±¥òz^˜an%nf¡ÔÛßGäĶ3„N\Î{±3_ìTèãPJôÔ´$AðgDÐb™hXŒÇ {yô&W‡ÛÆT'Óér~Å<Ÿ6g†1uâš·qjËÇ^m–”Ž”ðø¬ýüÇã³# #ýãñÚž+«â©Îº¡Ê®¼¥&* Lü3˜³Tôatn„ëQ`0à’‘Jxãúï½qàc6¬8Mk¢#XÓ½ºÃQt#¤›E¹˜w [R<ŸFéµ!tÓSýáPé‚WQTõ:gY÷1Fºv£ëÝÀ¯u•)…²ZLq(Ccmî`ÈùØó®«JÃÔíí ü›õT ÒmˆV¡Ö»ÑÁëâ¯Úσjbãd2—Eá¯1w ÇD ¦ èÃà Áõq*aÒÉ=3^N0.8ŒRÑj¨ˆ59J(¥Ã8¤NN†Ìãq=eQÔNrs mfÜ›drŽÍ®‘9Cƒ2vFº”{%ôíÇtå…€F^ßÈïG‰ºÀ#Eα!ÜkŠ½  æ‡Ãúf þªÊ"ƒ9÷V(Ew<ÓtZ¡ ŠýÏv1îsþ¦üB*3PöÐ0ÎÎ4·ý>ëëqÒŸ[x€ft5Ç4§$gs¸™v¯9§³ÊÌE V!×3ä‘íA¯Y÷6´;fLÀ9•Ô¾ &¿XéšÈmÖ"[© ¢B©˜‘š  ©Èl³jÖ/êà^_j0ÂÜ©KÅ%œ6ÉŸ-DáŠ^3soØ/o9;pZñ[oCøÓuÛ˜$o‘½—]kʆ‹+Ür—ŀ⭕H±ÜÜ*‹P§×æL€˜1P!í–‘ÀØ܉I.^ëš!Ṏj]3ÛÕTd@£ÍÝWÀÅ& pŒÊVC3Êf@µûâøè©]ÙUÀ„3k’9ut<·sέ)!)èf3DçâU¯Öùc¸[ÐÙò–-mÍ)÷û%Kèɉ(Áy8 ÙD"W$I4Ù³ÛÌ ÿ—µ»8òDœ—pJÈ„ aËe#©)››•(‚õÞé?Ÿß–ÐÆ#ʧ®v•fkÞ˜›õ7›[o+~À‹¶3Wí‰/7Ë¥«AMÿÚx5ø„Ÿ0{lYÅTT×ç‚47jSFÛ‘ÓÅôjó6°^Á,ôU<®_‹ Ω Ø6žø(ÕcºãÍúcJZÂ5Í(B÷ÜÑ ¸¡c`äŒ1üµÊ` aȬW'§”¼À |’ØÜõ×Oøèp%ÁÅÕm°Ë×Å~€ioàÈ:€ó*ˆðß[‘K?<ßÝ;9}ÝÞ?xy|òÏç/ÎÚg»¯žœÕ úƧjžW׿~²^ãIøzý#?’¿ß|³ù–ã/²šòˆ¼›Œhʱ%ÂŽ9 -¸šúNú˜ˆïIOô¯ìÌGYg+©ê’q*—¬Ã_¹`PŽìVråžÌ¦¸( ›eš½lá¸Ä§FI× ä '½¦òAC-øZN&AÊlæ¿Ò³ ÿ|p>Ïû6Gщݷ—é鲨Uz"¤Ç>vMA¢&1‘Ývö T³S1þÌѹ—™/1t@)u9j>lÈÑ8è® ÆS¤æ©õ,¹™Lüﲆ.êÍB½Ê].½ÜnŒoê¶ÊÊÄXSëÉ'GàG:ï¬U"y /—“Ö™ŽïÔRM ëMÚ#A#¡ œ-öp·§¯r°€Gãœ8(ª/¢•Ž§˜oP^kàWæmê<CÓÛÞ5©ûyI¿AÝeÀ–÷E(ïÈ|9ÝÙ—.Æœ˜–Rê`ÚÔ0]t»tÕ¨ô›¸Ä(èP}©„ê­¾dÍ{M'WЩ‹WÅ˱ۇ'ß¼¡Á)û;œ‘o0tÇþò07ùéÙþ^»š½ñ#çšEì4©!aX =v/9Æ<2ëzáN4:ƒ;Ï옚Á†ÏLa•Òx¥gX%{_áœ8fçsT0Ê M†BûUñt¼s}N«Œ)¦Ä{gàá}p†zºyþÄ5•Yz /­…à…ûG•ñ!‡Žïr&(ÊsuÅ4JçôðŸPå4Æä`È›ñž A].L+§;[=ÉݶÑœìEfÔœËpÒE2‰cöüìùÔóÿ×hMû oƒí'_b莺%éXÐç«\0´öK8t½:ÙkŸÀvé\Ççí‚Jêð7¡Æ9Ñ´7E_…M#]¶†aÌ“Ž$¾›¼žFºtžNRÌJök#%KªÒR§/âD‰Ó–|F<îž@ßè{}O ÿü:6e™›Šzo#ÑkÔ«^y;ÏÌ#·0™p$ÅÛ§ÌdD¹U”›ðÕ‹nK §® ™zÖÁE™Dó!Þ­fby+¡¼²¯ùS§rZÒ,p÷Åéø nθ^ɨ‘g,ÈeÚaÔë.wT»SšÝK„Û|æŒ/’Ï!ÛÏúƒÀ!2´ì5£\¬Lb•š,ór1ýrñûÄ45RÇìR ¼h¢,c˜ÖÃiÿäT<ª_ 51 ȹl¨Õs»Ìè:t‡ëUlNÁãä؈%õ»_Aµ2Æ,sb+6ãn„Zä¡»ÝKTˆd]8tqÖÜ«`×D]˜Ò£Ó=±Uߨo …“é)Eì7™Rµ)n7¥ØÝßoB)“È¢°-ÆÞuíQ¯.Ü($#"YÝèf˜ê D-&þ…6?¬9~èÕMóˤ eÑl‘öìög!QÔÇ…ÒT Vf­,Êâ¯bãzãð°"šMü¶µQÉ‚|À­ã“Ÿ^­u+b­ì”Å·MßÿúWú€_åÿ”âg'?¾|)‹U¿åݲxíÁš@±*Z N·×bQx-§]¯¬‹Ôø®•ÿUlœ*æŒbžaÐ>Â,=Ú0F@r{aUV~}òj öZê®­¹ÔÊ_Öú• µþùTÔ_NàW`ÝàšÇÙî<ñ­Øz ÌÐ{ð@‡„_ƒV D8Àĵð¥RUS‡?*…h, & áÑ[Ô·ËAñ{y ©Læb:¨ÐÍ?oÌÁYÖë’ÁŒÝzlã%.†Où:úÈvЄe*+ê¸Î0͘pß/k;–O¦=wª„•/`­1€)䡳ã»û¯NÅ&ü.ÞÞLÇèÈ|ôêèµx\çï›°Û<¤Ã ý¨_Rjt¬;ðºh×ZWJ)iÒéªP¿cŠEüª˜ˆfÐÀàP¯ž`yÞRFsPËãÐB8eõ ·½€Å‘Mï V›çñˆ­©)éŽa{a¡æëò¼ ðdFU:%ýðb(´ÀºMùRRÀ°-¯Z E\%âL´T­âu«”¨Ù"Cù",˜)_‘qˆ±,šDk `ŒòLš9:`…çbSm5ZZ:ÔÒ Õô»¾1£sΉ¬VLÌ5=n_NÓm ]&Åf_³§„æaÿøpïEû‡ìQÉy>ÇÞoÚ]¿¯è"ßyo±]B}½"E¥Êyé`ï‡×CšçÓƒ}Q ¿ú¥´ùÕW;"üªÿJ[­ÒW_ÏéÒ-É‚BW‡Ÿ@lH÷ŸíûAèu#•¹UüÓí$gˆì ‚‘ë#¹ÄWòá•ç?Ü‚Wõ<þ·*ö,íJ­Æuj᥃I¹ñtá½wýøάXú ár™¡}Â…„Oc¹ ì ½’‹ïˆQ³ôáåîÞ?vŸÔ$¦˜†#º¢2ü¨ †òªÀ·~|éê6IÐwmÇAð îQ#Ç­ Ùg\¹â"ˆ@ú™¼¶„B£T{d/º#gìDëe.²tôú¡éÂn\Ueþ{sôŽÔ´ñ ÉËj…j)[)ÏþëÔÁéÆo†)uj‚È@š[Òêmé)fBNç&•L8 Ðt=™†:@û½î Ô¡2ó£¿%êŒ<Ôá—iÔI¾ÿcŽžŸ»Âœ å´”F¼W¨rq_·G¹è‚¯ YT¹œÑ¨"+ˆòÑj£¡ÛÔ’¤D—PLîKA³Ä Ù÷90‚+I¤À^è‘ÞJ¤fÍÀˆ)¤¤ï„QÍó“`Þ¦,Ù–%ç&+f¥ÛR‰±Šäó¨D±?/½INÙQXÛarUœñ]Ý‘[Ú¹‰7@£|J°ˆè“µÛ+=EßK4¤®à!á쮜›¦=˜ŒEpå«êuU§Y.­þpp|\¥µ(µ©•ž7®4dÑraú?ÃwñEû”Ì”ðK³8ðE-,&J[fMþuúCû'8û¼à›½ÁO!Å‹“ö³ã“§íÓŸžžÑD-§ªgÛ½Úy.”çëÀo—ÓųZ SŠ­XÑW¾COùôs=M=~©çÅìJ“^Å7pÏOkû'§±6”¬Fé’íËè&½ã^À‘×ä=Ø™I mJªŒì¾ÝÂj;k´dü’f^vÇzÉ84ûüu|Ö>yúûG¯ÀE}#8 +pÇ»~HĶÎÑkÃHïèúhÀæJ+$aÏöö€Œ n7ÚRá(€Ð&aU‚3vPZI% e …½“ãヽ³ö‹Ý秙þ·lB­Ú$Pïß /‘Â9b4é÷ñ4ï\SûŠ-µé«äî²{À¢lÿj¿Q*•8•gƒ Fu4Ü.ˆbMI.`V}&"¦\NÄh ÞùLƒÐ¯(„¹ùuâÑÞ£\wÊÀ2º—À;i'JKâæ\s¯».Pƒç§?íUÖÕ¥×½”¶†eÄÐr¥^€¼¡t ’².üI{ÐSøC¦/ü¨P s{{ÍÒÞ•^`{Òÿ‹O°tɯ-Õ±S8ä`ÆC7hßÞQ>€Úíš$ñL¾À/Ô õŽTïí^åö¹Ä~ún…Zaµ ‡ÍP¿š«TºÝväGÄÕeg±(#dÈXºˆt™cÊG±þ¦Õj¼w‰¦Å/øgE{ïvõkýs4{ýý\þÔÕZµõJ,b°¹S¬b  =ì@W‘|ÅJ ÙmSUQ_o°ªâÞÎÎÀsÂê, ¬B܈‘;†y²ðA²N¢®ö:æÇ°é/ƒžÂN ‘•¼÷ÙÑ^{ïù¾LÜ+5Ž$(è÷4S*¬$4˜c,Ò:^—hL, Æ/ÚÝaÅ‘rÜNÙØ´K¯IÆLÂöfE²Éª35°îð²—Õ8uÎ"Íú[Xeñý6!M[V“M£â¬h6Šõ!„:S6—¸, …\4ý†´•|¨YlLÂ1^­%ÊÐÏbAǶQ‘rTÅeìœ)VZÛ_‡Ìé!s Ÿ2U¨‘–‹Aö´ÊúÅlI9ßÆe|Ø6[Z™¾?VŠqeQdÜؽp¯›çÀ¥ÆÐN¢Ø&ŒÖZ}½U°"ŒZÊ*Q òÄ~­ÌAHç{ tå¦.tKÉ~3²CSm:nÈ ¬Zi†+ÅæwÝ*Ö××ÅÏŽa[ðúC&hwG6,R/ oÇÀ¨Ü°J£ª¢lÑ›t¡¦Œµ@Ò¡ L%È±Û .|ï? b Œ3hœ%:´/´* 26⣊¬•ê AAk¬I¯oéœÃ‘Lú}WÆÿ¢x ƒ¾†®P£¯ƒÑ/9^Ñ™DJ YÚá#°]” Ä€©háÝ¿pÆ=ºâúl7)å0´ös @7ñuÖ ŽþÊA¿9=‰Q†ø†OoðÞ„À¹0«ºs´ Ö°D FgrQ“]û;*õ`|QÐn¶´È7LûoΙlW§ɳi±wMï )Y³6Œµëc®x‹pRkMœ¬7Ÿ9¢yFýû¼-`8ZÞu\Š% 3ŠA6‰4ôl÷ÙO»¯ÖbÐoÞV8pá‹“—qŸÚû‡»?Ÿ©¾áæTñÃF'À2# SB o^Vg¦ç"Ò/% t†Éd!¾aÈC¬b†­±aÂÍÅ‹d’mšhKåc¹ñK©ÑÛ_ÄúƒF¯,ìÀB†AÓJó<tç¼PzõÜ´â^t`6RO–½ÍXƒ?Ï€jcsL…UØ«»?잉ƒç/AìÞÆ'g*¢%ì×ï:#`LÁ%ïˆðˆfl…^ŽK·\ÝKÇ¿pÓnÆhMˆwz*¶¤ŒóC@Y Ê,íØ1ê ^LsºÑàA]¡˜…/»{†Ö1´R]™·¢mÞ2èõöº‰ÇìôÄým[Š,0)°ªµŠ´½+q­¢ñ¶˜ˆÌW‘ïƒ'¡ Ë—¯Î&IªíVé{ µ% D‡$_-Œ%¿«ÄAvByÅÊ;ÕRÓð:k2DA¶ñ†eöK¸ð³-âõ…u´ï)H§€PpŽÎç©ÐÎÈr”øÃì ñܗʳ Ì+¤­”ºÍ5Š6_·ØùõHÂÈäûö¿¶ –ê/‰èˆ[èûÓóú¦‡÷õÈ.ñ]R1#, ØT2ªãòYœÿ&¤§[©Lm<ÇvefŽæš mzec~fòm‚8µÈ®‡xÚV®DÊú1õjÐLË;#¯›ñTÚØÌ ™òOv3e åYÎ~-A—¥=w¹Ü¨ˆw­ Ùm|(@Ðê—G{õ„jÕsž<¢^¨îhbãǪ Z9Ú…âÚŸ"oæôö©ênB£”9¡åZúVŽ 9Ìлp‚PÈ3t4ôæFÝJ£"tY¡‰GN½ÐvàÉé#Q^'ÇdUš£s"Ž98|òõ»d£‡G¯Ÿl£î G¸($<ùzckCF?³,Y9fªðd®$‹åÚ ”9˜=€AÛ¬ÑC²ÀÒL,ëø7x ¸þEOÅ„8ðÞ)X6ÊõyÆÏíÂ1Ç ½4öpKÔ†Ù]â³ø@Íy”1C†JQ-jÇ…jí½ëÇêËüâÃþŒ‚Ñäaÿ¡ü|$?˜ Šâøp/Õd!îtµ­jvr…€º7A-w®n1húèºú ÂìÃË€H… ‘l$ųÐÐ5![ŒÜÁ@›L{¤À&U†D¤‰úGžY¡TÛ4×—JqK§É‹TŽk(WêƦŽ.ãè94 $ù1ž`r@š‹PíLHHŠf2ýô€ŠÜ âwkµZÏ ÉÆÛ™DA $qèAÅЫOEŒýýããöÁë—'¯Î’›WFj…‰Õ!g§._àK…8°s4aÒe÷؆ZMŠ¶ùd ØóÚûÿÄÀÏfbVÀÙÉÎ^:Þ»Élôú‹Õ qEQ’å"oJŽ’Ä÷ˆb¦ž×-Å5Á-0³/OÕ:€l/wÅ/k?¾æ&qrðåÃ-|ƒ…ê‚M‘†ËJÀ;yÅàuiL…˜žFvɳãSÎ’ù¢yÑ€N8õTûr4rÖŸ<ÂÛ¸Uñà_&䊦 øz*U^™Fl< wýæaí›·Æ”ñcñ°~M[§Öˆ ¨|úÄ…ë»cÔÇñé®ÂÈuzU$ôcwt±d’ž#õO|´®M‘£°„½_ŒFF·þã]©8“WìI€$z9xèµAÛI¨0Èâf8u¦ ÑžÁ[!yŸÖ£èÃ’ë‘Š(/SÖ­Úÿ!ÇO kÝÜòë¿ú& ÿ¿¯ù*ñÙ‹ÅÞƒY]6ú—æÌÊÕQ&¢ ¨Æz­8¾sÄ÷ièpÞ› GõÙb…‚œÜô0;ï­?©;jØ£Óºïvãiðµ ,´ %å=%•…Èfº®¤¶LéË:Nz’H>¥í½÷ð±UßÊk”„Í×2éA9ëž=«Ÿö~ÎXŠ†Z.JÆWKæ@°€¡ˆ#µÎÑ6Å…Aw!R„ærþ!¸q.¶¾;ÐõXÚ^/vŸ¡B4v|½âùªÖÿ«– 3^KÞŸ{ݦ ¾ tqQšop€øesCÛœ æŠA±0CBˆ”Šb‘H×W¢‘–…æO>â®_ZHyð¯ DˆP©ÂäA-ÑxÝ9.£vËéLüÝOï}?Cº¤0ú‡Ï—Þ'Éšv[p‰Ö¨‡µÀ÷Jb½f‰Áå´ÚÎæÕ@òù\øn½öÖkþ`…0€àªgð7¡0È$(«x"Ap@hqýõ“ö“GUétÇ'IÉa–i~øMèsôô¹x} ˆòu}£¡0zs£¾Y››õMõ^¾Ü#îùt0qŸÁ¹w©¹üuÖ\þÊßPz/'˜'ês²û‰-6>â]¡xüë9ÙﮟNü–Øn¶Ô®¤s&<_W¿[âÍfíooë/¾®¿Ù¨=”Yl(`¥ApÒ©ë°>?¾¾R'Œ@ZØá©CfËœBÝçWrP†Þ 1&ø05–Êgî@íÿÉó7pÇDgöÌéÛëß|î¾0¾¸ØB,×zïðíº¢}9Ób™Nç¹xQ³¡Y‹)Ùmå?s–´•îT¥—ï^…Aød†ÞáÆgnú÷‡ÔóL½J˜C¬E²}rzØØÌ"Û˳ãžq©µ %ò~Ž%ž"3K~/¹½äõáÄ—Ïñ¿¢oSd7“ÆL?DéÕ˜†ðÐ\>š±¤]›÷ð¿ðÆ "Î~Ö·&Wt°ç_çGºÏ±go­î,[úÎò2—¿f_{&¾w}(N³Ô Ö·ø9|üžN¢'pÄûñÅÑëßwò ŸÝi›vfòU꺉hóFqϧٕ¥úfì9´•ÈЦ®R0¥)Ô· ¤qQ× t%YÛ—Jœ!'.@<´;\7/B² .tg¦•ÊÖ]s³E‚•ëKÐúmͼ”³ŽpV¸éµç3ãÄðkwfº‰“–9gwgY„jÿy¬‰d9|æâæÕ*Vu$;˜Ð¡ó/Ȥaâ]8ÝhâýJ³ZXàÎã–¶ÀºÙèI=š×xXs#R›Šß):1ÈßÅxÚæ¿·¾·¾·¾·þâ­€cú›ÚÿêfçåÕqéùm~ãjÆ<°<™IºÕ¹³ˆËZD¿}­‚¯Ù`Žá®hªœ&kÎ'$[ÄìE™/‹È˼q¥ŒSÇ €Ñp$%|fw­ ~Çï[ÅÂm—Œž–Òm/&±Ìl>‘EV»c©Å„*òœ–ÊMå©Œ/Ô³¢v_ÎR1S²Iy.fŠ5:µŽr`L2 “j§­Ó¤[ÚÊ|NÂmSH›>Žm’·*vG\ï )±›V¯Ç¹ÚôHŠùmJv–äiOÍ4'iV°,3 Á.IôçÀAMùcʼn‘—zúIÎa¹©Ø\2ñý¹ŠÙ«¹K²Âü¼ÅªiÌøöb¯¬oc ~‡nŸ]Œ„@‹Ì–‹º|fA™VBé»#‘LRÆY!sÑƉ"ýª·$Àö¬Ÿ\ ˜Üæô—ã ؆*½eÎûýinúiîþ f¢ÎÔÃX²àg:å¡2Öý]NgËÀ6ý–žÜÄ“¬ÓX²ˆ>‘%[N—\äd†40“³v/‡AOL\‰:%=LŸÓx~Ÿᕨ]…®71$• ýÅÝŒo¨žGqÀª¹6Ʀè Qß< QÐQÙzVEÄ$ì‚lŸr¸só¹ê.>³‹Hò]¯gþÏy…™žKZåXH¸çß÷üûžßóï{þ}Ï¿ïù÷’_:ã©rP qœ5}ø¼nNƒ£ö”£Ì htÖ]S°ª¬T¼7ÞY@O&v-®ƒ÷ò～ ôúFÇó]V¼¸b'Ì$JŠ¹JÔ)-!BcêÇ“<ðc>ì)vMçÐZ¨×4®:füþ˜‚±lÛ‹cc !…€ö+9m ä2Ê,ÖúçÝW/Ž^<Û³‹Ê¦Lâ`™˜z™îjÿ.S€WŒèè‡NßMç#¦öî ôÖÎ'i!ª½‰üM{¤üh¼“7K‹ÖÊ# 7P,KôZéx¿‹ÊI7æ);ã6`­}ƒ)«&>EŸA/~È•±=ñÙTµ'#ÚásŒuÑf︶ôŽc,•.Uù8l¿¡,”ÓãP5˜Ï‡¤nÄ,Ÿê6¥õ‘êLé<.[’­÷n|g(¯ÚY³¿“=ãVË¥ÏB{h,Ä™òß»¾‡—ôÈå/(ѬÑy#WóþV¹6êë¢ÑÀ¯h‡8FÆz¿‚DP²+Kúƒò~ƒH ãú93È̇m§ƒIä&ÞBÇ¡€=ÌäKSÏz9ôüIØ>NÀ /¡’^lØÊ»‹’´ByQ{Œï%ÕÂûÀ‡¶Œ5(±¼ya2ˆW\þL,8æ\R¸€'°ðWù/¹r¨ D— XôÚ¸qí¸º  -]×|µ*dâgMÈY†rblÑ‘Óukrâ`k(WOvªYgL_7ÁõTŒa.JhάƸÒÆF÷@æ÷ƒ¿_QÔòu%nZÖ+˜¦ßPïjìŒFÌ…Ëb­L2q¹RbBø®NBŽzHŒŠNW24&÷yc´oß­ qÀ®¬@FîÇúz¯¾^æÆ”qP<ÎJÉ;Ýr•À9ЃŠ‡tƒ%'„ƒòÀµzT'1Í2¥øÛ=nŸž`ÜاÇíêiûðÍÑþÛ6ô§`yɬÅñeAnñÔú‰= ‰[d„ qê,þ­V™kN§‚%Ð=Ø';2ÜUîÃëŒeU‚upéûÇX~hÆ4ðº? ØßSŠª‹»ŠLÈ\žã½Ë4qPAy–KhÜk/*s(t¨w#ÈMÂLjè ϸã<(Œ¸áô4ò jŽBþ¬Âsq‹òß@U„î÷¼Єþ¡Ö›W-;@“ìýXÈŒ"ûqk×nåÐmzrë˜P8‡˜Û Ä´/òÍì¸p˜¤]öÉðc>yCágʃ hÎTœ"t'c˜{\' 'C©–¸â“•õŸ{M6èGâ'Ìj vʼ\ûKF´2Në«òÌIÃ`y-IF2ÄŠ,´þoÜ”—ÁÈmènÁ‚ÃÿÑ«7)H¾þF¬5å„pe³%uT£6ÐÍÝ~Ñ¿Í‹ÆÞÅzº‚ìšÄ•Œ5ˆxSz>ìÞ‰OáµeÆú¹J®*@#1iìP  n>ímíÃó÷ÚŒ7Ít™âB“÷vGV^£ÍNßér¿NÀy?à›Kö¼­Ëð’×Æ Ó†39àVX³€A)Õ€Êqb’G¦ñ€3#oÌ®9jèÞÀ‹nÈÝ2sä°Å®pWV‘â{©_P,‚[A:¶„ÐPU@…‚êHÍÛV}ó›úãuhØî`vh #OÓ¨áBÜ(éiÉ æOȲPyï‹Ú{ò&d'B!Ö[¢µ]l‰§ "DÞ lUZª7d]4¥Ð›- "4µ” 4¤ÊT8õFÞrS²]‰´I¿.é “_/mšŸF&QàvS†E‘8ÇûUÚ¥{{@hðÞ%Üá„ö¾¡2*¡L*‰ÌJ*)‘3eØ„YŠauDXÿéœê*MÆ8°tp%(cœ½œD‘Ü€C ‰a(Ö‡›å™š§ç²FÍÅ-Ц‰æ¡àx¿ýêÇmLœ##…剧gHßJü¾l$ÍÜ©N_×ä벚¿ëaèB9w=¯gÆoªÕH¬©|¢.Ì 3Ð4¿véFʶDùcÊpR³*–3ÒÇHºŸ#i–hÕˉXÇ‹².“j®0g™"Ïj>£Nsm]â$1uV4ßÚïòCÚçÆÚ/•ÖƒJ+l=€³LL ä£í{²øz%¿ #‰8íú7›ÒŘˆÂløøçæFv?,_—RMù¾Å·›1üUÿæa}£¾Õ³Û€¯~ø[ý¡¨×ëI [ds^(ÏÿŽQAðu}+˜ê=Ûââ#=M˜æš«8†ÒqR"rþÙ|j¸¦d 7`äÀÞ/_îUcÎÃ:àåЩ¹-+ˆÓ_2£8Åâ ÖÊ\ “âV«q¬ÏɈ³õà/fvU¶‘—çM„"óxøÊFJ{$üJ˜"wWgK'­ê¼/Ÿ9’}²²&²HíUj!Åt‘R:â¯ÅÜf"™Î„0fyf«¾µ—eNˆ*]›ÁsàRb"$œ:v‘ƒqejöJõ1KëŸÐÆ"•ög•÷~vê[«'3Êq7üíÉZZ!NŒ#§7VÈHÅB¬Ãjs¼ä a@®·ÈHä×Z@U˙͘º‡ò\‘j|õ\”ØÔ^%w¶¼kÉ£ë='rþ+ïŽTöqÌœM=ÂÞá=ï‚õž¾Ú}õÏöѾ؄ê ×ÿéàÕéÑÉ Q:ÿÆË@xuðÓƒ»ï=¤aóAÙ}%࿶²ÿõ:zMÿ[zµûßáƒÿ®u{ `”0/†'j·*ö‚N/jÇ–L‘ª¡´^†ùèì@¼†/p®È°mB’Ǧm`yî Ÿ%<¬dêPMuˆõÿ„îèRˆî(Y*g}pÊâ˜?¦÷ƒ2Õ‘}LË™Øö'ÙöwóUî{ÿÕß-üË­ûû¢æ¢È~þÙ%×ÔÅZL”§†íμK´^Ø7|é÷ST6Õ…XÙAè§ûn›¢ªÇ1Å«ÒrƒíÙ>/\ThodV8|FTñLe—¼óÀs”/)!ÅÚÆõæÿ L*à*¤qW1Ê{Ò:솎R¯©—DªBL·Hgç¡; Æ10(N†œ]¢'úcçOCø[Â@þRžÞ¨î§9yÝwu u‚a,~l=~"þá=IÀ»ð±KñX:nt…÷!×Õ°Áë'‡‡{ü3" ÒÀ(ººσ÷Ø8z“{¿1%ÎÎhRˆa/EØ¿C3Pº ­ÏFû‘rUœo.™;9Þ½UÎ0]ú‡„ý“çµRé“øJ<Úøæ‰hˆ-Ñ‚£ô“­ÍGıùðÑÖæßþ¶õõÆyrûd²¼©+†ùØþXL“¹BÅþ{‡c»xªXaxÞÔÆ?Ï)2‚¡`AÞбc£QvYEnЩ³ç¹Q$‚WÃwÐf7„‰tä‰ Z+B`%RÔiè@üvvVV“@YSή³ˆîˆÛkÁר&®d'kΖ¶:ʼnôÓ0¦ÃѩΪøí®RäÑ‹åÛŸÿôžNÚ)ä](S„Lé—m’?ÖÐmg\F¨{Š:Àþ¯¥>ÏÒ 0vÖ\©­µ:+ïvY·ù€¹Sxêl‹õñig±úŸwMð©œçZØ{£ˆÞæw.}ÿ„&'9‚.PS#9å8(y_E‘–ÙŒH®³:;'¯BCéf7•2L3LÈÙ u¬¤Œ(wçëId€©úQkÜ+‹ïŒ•Ï²)>㶸ýÆâV“ÄúyP~…°ÝäiŠÉyTm¾áÙÓ¸u£Ùh·ŽÛm<­!“<5­&W¯¾Kß³¥ð)M ™Ìœ=66â²´†w§ ™Â ²•ÛwÛíÞ´R‚Š$°;AßÒ!‹1·Õaû}âZãéá¾Øjտμ]ÐÂm8õõçVýk8¯K›GÆBKe@B¦‘œò8Tn@º7MZ“Œy-J~vÅd|á’±HˆÉèbìô¨‡FÙŠØ&1ß ±£¨EV¥»>Å%1|™‘Ø”„$:å/kYƒ˜ ²,«UG@Ð:´JÇ_²/‘v%)ë˜Ç;¼ ¿ßIó_Dè¨àÙ‘ÀÍXᩨàÙ6¿:kÄ,»=øý~WÞ¢¯ ë„ÄÆ=LI ü'õo6ëõ‡Ê‚í¯f›|îüÎ;5îú·_Wè $ÅIŒAºÝÉØ‹Ð+ż «2Þ¥wqI¾*lÅÕ£œÈÐ4N0 ¼œQÞhdÁÖ˨|ɘYî›á8Ä@öÏÐb˜Á†£ë÷zÆ^*T)¶yâ飥SC»¿NzJ|JEŒ‰ É·Æ*Ž+êõ=vÆ­§ìÓæ§I]zÆ1rþ#r#i•_ÈOÜÕò??'/H½Ð 3\‰<ÑT÷Á`l‹L’½4Z¤MȽë7Ls”y’B£YÈ.fóÇqìØ…d¸ »s*í5ȵùÊåtíäÒyO½}Ž™ùÓb »Ï ô‹|¼¤‰£„GœP ñ«-õ¿Oå€òùAÛõ£ñoS²jc·FöeÄMç«,‚©nI‡T±kÊR`k×öÈâíp‡šbÏÑ a «±|KPtÎ_J-Q.íATe-¡pŒn×Î;™A,öYxï\éªÂj.¬(„"’‹ò l@ L¤K¾`ð°øs±Ž÷hm?ãë ɸ JŽX”k?Z{:ºÈ5"u®Þ‘™Ý µ¶Ö*‰-Ñì9+Vðê!~°Ÿ|ð4ùàçb…BN­…“NñÅÃêfu³BÞ-u|ûÏ °RøJ|ŸL£ÑÚ$Ë`tE‰1SÆ·÷ÙøƃÂWþ!GYÚÅ}å6 û‚Äë€N©ŠÇ`êo¶¾ý¨¿Õ×ñû›ÇL“PÌ„® ˜ÏÑ}—lï¨ä¡`Ö5÷æôº$ËÓµ—|‰—«éKßœ=ŸÚµÛí]¬4Å;2Kyš"MÒ„©îúm¨å4“"§øŠ“Öù*ödâ›46ž£ èLT=<…k0D_1öÀÀÅ€Hn”7‡1(ÎwýÙJá‚£œXãœÒxêàX=”A‰hõŠé\œì‘ßi“¢pz=Q×ô™jQÐlÐpö^¿¦Åkì1óǵ½xð Ö‚Ðöµî’ÞŒNŠdÍg<—NìF ¼¦r”UnœVºã]pÛ Aë…ÌsHyþC2¬KF‘Tø–òöæ¡(;·1úˆqúìWMcó”¼ad¥vÔÆæ–ÚRøµÎ®ó?»* »½áE1ŠTì‚'Õ·øÞbÌÛ)6ÉhCÀ¾þ¶Ô¡SqSøFKÇèá¾æ2(Ë5ùžœè\ q©FOU‘só’¨ÖxoWFñŠ¶ ÐOJ©’|­ g0xOëÐ&™Õº"ôV§© ý1v±ßnO÷_o›çÞ¸,&V7‹M“¶ø&0}G*ž€w÷PÓÇž†–"ë ÷;c‹_3Ò@0öStš8d<»bl—}Ó+C@rw °‹bš¢mÖ0LIwe^™•©Á‹ÒL+Ò%iA—DòlZl\špŠ%ã—(ÒzÆLÒ­P#q£Ód],² Ę¿þÄ×lâqý1mÜ8éëÑn eâ§p06.¨¢{ [†¶ѦgªàIû‚Q|8P?ÝN¯LƒQ¹ðL%€©É1U;©|TÓ7„z"c>5Ý’9 r|‚ƒ½º®Ê¢¨ÞÇßœ–€ã€G(Ck(D_BÌ+ÖÚF–5¡2V  û…ë»Ê eÆc"ñœ‡ä§zU©ÏEºµqä–çµP8tÜã£ó‰&Ês$–†)SŠEÜVž6œbQ›Ü+oÎWÅ26·ï»0iCŠJt©#[(ÚÂÞ8$H šåø ›aH*õ”9 Æ»Àé“¡qeàÕ§X‘c¼QyG*’Ÿ[ÚxÛ^.¬´ÊŃ뗰pß~ÛÞÝÃK‘ïRžëw+.äw½Q(K+ ½¡X«>àþ@ÖØ&c_lì>"ÆüH}¿Ým£(H‹[”ñ‹º×GÇYèöšjÙGäY&QßvÊì°QÅ€µâîÖÆ/òíkø‰·DÊO¬—­Í†z=Â/Ÿ$äOeeÛl¼yŽiªE퇌´‘VœêH›òÖUŽŽó¦=yôpyÐcõ–¢ |.çQÆ$¹ÍâßO~<{ùãÙßmd‰ÚzÉ‚g''Çí¬ÒÌÂ,¸¦ŸY$»×ë¯*fôËZÙhÝhØŒpÒÅ“-¥ŸeT´úÒŒ9(uÝæ¸ÄÏw_œ¦Ã,“}Öí Aèûbá´Áˆš*Ë@’=ÖDŸ¢…ÀdÜu·³Š“½¥?Ü´çñüNZ„­œv¿*vY†BÙC&~ß ò'*l ÿ¤B?©§—Ô¾h§tµA·Ä”à\HF]üï zM«õ f’êüìGŠ4ÇÓ‰n¤3íIcãe¡Œª€%‘Áx@+¶%Âœ%üTFD °‚igŽž3–'†ñ¥3 ƒÞ `n¡£ ™#Vœ.‹=ó%«Jgyè¾ÇdµÒFÝ›Irµ:Ÿ/ÊéâÞ,.ƒŒº´°•;„rAªKr¬Æ2Ée?…¥l'Þ¦8ÄÎGÂFÁè:¾Ä)+S@v 4I32Ô¤—2]Ç\I)½wÇ tÛŠÑ6­ù,¤Ô#¬+Sé%p»´²o˜€Î´Jü^Qš–[©–J yj•È¬ÑR¢h«„žötŸ!ô¸B:¾¶ApàG w Ë!ßšiոϳúYëÀ›;W3ÌT,bŒƒ2‡ÒCɽ•Ý[ Ù½¥„aåä£"ë}¹óâa…ùk‘šJ«qw“s÷ .˜¦¥ÓË×ëu¶9ÝŸ †ñªË ÝY΀5–òBèÛÒS³©\|ñ…zVTq\…ø †˜.Dªú´‘xáåg†¹"¹ »ïÀg¤*ÞúÎ4ˆ¬Ä÷a† ¤y!ai”Ñ0M:WŽ}’àáØŒÙHY…“ê Žh× àHø”aUœ˜ Ù’ŠXA–2qX°h«Ñ/ì°}E²*vG”mÓ¸“"’ãƒõAp¡=t”M±¶ÝD„Qwl–CªÉU;®æ^wc<šôöÊæt+˜×È\dG4~ë°¬Õ¦9ý[…øê¨çõûL³ÚV:p¤y™•…h†Žbcæ­÷¬Z\‡ÿ¢Œ]‹mg×MD-™¨LÖ¬sïfv­Þ¥ì¾ØÛY+ȳŠÑ.d+ÔSåù›ŸòÞ–ûè©ÿœâ 'ÙÜï#Ne¬cæ—q±²2í„l ™"ç ö•9NÌà—<=MqGÎ[D[iì]S`EüBq}Ôþ#Cß¹€ÆàNãeÇ^IZ‰MWNi?¤ZèF*2ˆ+p¬õɨä·=v/¼l|Sá­Ã ­&Ø åì ŠËø8ë2q¡Û“jn ÁœªŠ3åEZ»‰•ÑO¾jÙÊúa›nKµ&”ÈðFÀ)#ܵ§ƒåç‹ÃUŠs¾›E‹jŠ0 gŽ¼/ð¦Úñ/&ÎÞL‡(„‰‘;®aB5ìO:ó,.;]]ºÔYlT‡RlÝévÝQ¦æjŠhµ ¸<É q¹(»œô•-`­dKXñ9+…#¥WƒOý ÈÃE͕ɹâ.¼–006¸†9¸0VŽvX :,)&Ÿ5«Df,I5³ÜÏèL£ÿe ·%²“#Oä%Ü\É–)2ëÌ—äàOCiãÝ")âÔÀš‰Ð·Êš?ïØ`Ž>=ô¹8Ì„.ý½Çb/àœ¡Ô3­dÊþ<jÙfçUf{>0/jã€3G*Êß.bÿ¼Ò:Åg¬ÃâÌÒKdš®ô%;>\à†á3Ü^ùîU„O>÷å{~ÿîý接ëG…$ÿÕeqõóÊ;ËŽ›ö"%­«UwÕè¶Ýôêa: e*ÙÓ§¥éG!Ó›õ|Î qn¸UÞñëÊBŒU-:]Ü¥0;µ4s/‚”YîvòÿKFs²·eŠžý4ÄíÒEn÷ú:6ÐÑPµù1¸™ºÔ6°÷ÀÒD5Ÿ:&s¹eE•£ jWËsDN©‚¹<·­€'1¥sÁßK[…ÌýQáivnGå@š•ÜQÕÌKÝ8}Ìøs{ ,= äL™ê˜ ˆeÞá¢JÕŠÇõ"ß ÊÕÌKòù,Çea …ÄÊ©;ÓÅ“)6ó†OóÃN,“u-km¤Ìsï­f^µÁ—0ÿÓ»ðüOÝ(SÒûå(¹23öhRLù¿%uóA}Ýðáf7á3²ÑQ–fœbüTáaã /»Á Õä}"_׆ÚÆÓ´ç*E2´\Ýôz^Ø…!a\*©Œ0SÁH`@ßú“ µ×º”<§ ÛSS<ôÐ3R¥ßܪ?kC禃9ö×7¿¯¤ïŒL3#‚˜$ª=cºQ*ˆ˜,!M d)CÉ”ŸOù?",³H\^²³9Tí‰Fà ›¬á9 ä mý¬=a—ßÀ¾v³éŠ™Ï®|¼©7ÛhTU^ ë?»ËgN7ò/â¼]^þ2} Ôãk ßíN¹x\r5§Ü™+a,„QÇ,A×HñEÂ× è䊳QŠ`üW=øÑ÷®Vü·:eù}³¹ñÖLü73§p} m=z;íðGü²Š„¶<íì©WoÖêæ#éí îÛTïì̘-/•«péfgr<û,zö9DzP ëJ"MãÏ®ØÛ}ñâäŒ, ¥¾µW®z—˜ /ô0Ù³’`(ÿž•ãIÒÅØ.*Y2Æ $ A®…&îj¼˜S™C¿Â°¬”S« c}¢J/ÌIûˆ™qQ?P¶¨ÜRœs꽺U’–Á çÌ✂qE‹#’ƒbÓ®UâöÅ¥jžL&áà_IlÃ`9: â±ÊÁx:Îû›Ú¥ƒžã…jnë íøL¥+—ãPñwCf…²¯Î}0W­é·Î ^sO·þWèÖ$šžúK w¡ûša‹›Îy§ÈäñÃPP ø!Gõ-CAqQI ¨š˜±µ(S!¼„%,gɲ´&艱„íªÎõœ2U5ßejvŽh¼2À CÅK…+™†³GÓôü($þ­0r Òs•ÙR…Ü0C@†ó=”£I.^—²Èfçýúãõ :ø‘—ÛÑs3¬ÞÓ÷Üøãvd¥ªAª%+˜¹ü¼ø&L…ëåÿ– î-ã–!—†ã‰NÏ GFæÄCX¯†·‘³¢ëjî#Wžv¹ –òšFñZÉe¸àL†šáKRÀê ‰³gÃYª6Àˆ—ù¶u‰uº}´Æ†º”ª_;8íönÄ• !¾ŠÙ0°y8[/匄65LF)‹.ïL`¯lg(tý.³ä9d¡ÐrŽ¨TÝVRn—r5gx^’ðü|/H«Øâ9msfµUÄú²…V°ú“`Å؇S¾­àý¾G¨Bš„ÍÒ÷Æg¬_«ô=l¥’®\”íÐ^‹Ct;HøŒI ™Õ’_â# ÉßÈ[š¾”TVJ6|mÐL§¿¢L–êæ)£¼âä›&ƒlÖÞsã1“ôÝ)5iÝ•6ë²ÃéAÁò£gBvº¬§¹ù+dΊ¥päi[­ïZÝ-eÙ*Òö–‘2…Ke¢Ò²À~SÌ3³˜êŒ*9rº•KcJQé`'s_d®è´õŽUíÙîĤ:·©Èmî [8ÝÈ{aäuÃ) lzE‹i¦œµrn×d¸Ò ¥Ÿº‚áN°_t0¬íFµqüªQVË4­dÙŠ[™ÙœÎ¢ ³'õCÛ ›£¶ûk³~l¶ÖÞìÖþåÔþóv»UùØÚüx‘h>U£ñ±¡ Éæ©¢]›38¡mæMæ—5 Í¡ÌI_Šf_ךcl E5;q^0ÂN'›å±¯·v¤ ·*#pLîx~(Š;E–%07‹´]*Nuˆ—@(Ò•Æ®À28ÝY‰áëjbÍ«»€,ÛÅŠ¨qª×‚Ò~`kR+„þ ÎXÆÓã4öˆNuVgQ­ÂY.µ~ºõÎÑÌc’wƒ1*q(Vƒw0é’RÿxQèú*í8ÞWÕU†«Œõ“q2^ÆAÂÆNC4.ÊçM^äÌ/  „JöéÁËÝW»g'¯°…¢Ñ‚ĺUqò>_á*ÊÐz¼ÐUµ0ÑKr†dóÈÑÍ#^{A“ ÔtVÀ³4úëcÜ j†èã]¯3¢GÃQ;klü–êÃÄ»•fƒö@iïåK™ÜEfVy{ð%k|!ŒoÌtiœÔ Ú'ÕZŸUn‡£À§4BòÌà⺶(µ£1½À =‡™1¡º¤Æ¨QÌسaÏ^ÃÑû{î»Wî˜B=òù±”üNöö,ò-6vDIS±Q¿©‡ë)hyÏ¢£›5÷)lAƒDìÑMØæôä~fÑÀ°¸¾a|•“]°5S„·g¿S[`ž=°²„NíEfÇI§Ð*¬ÜE‹±†í1 ³·{Ô¢äåÂÓƒgG/ćW§ÈLx‰CúÖøØò‹;ŸÄnªá)Å®Gi'˜%ÂÆŽ\á5xˆJ¥‡;‚¾~‡â'~«Õ*„Cé”è%†÷gëLý³^TÅÌ‚M|c¾Š[ð@iŽ>qÒÕf鵸“ÐK³¾9`tÜ?Šó§@ÆíÖjF±‚ù‰?tóØ }Ðñ÷Øýõ ? ·Š¯°Ã›X…Èê”þTfŠ´ûó?Tx¼…ò‹q{|7˜„Ì莈•ATf¹·ÝèaƒXUÇÕ”…Ñ¡ØÖ“bc,­‚Õ'üØÈzÎ-jˆ”s Ï_o¾<× ò@Ñ3P»Ê/hŽ†?‹xÖw:Y:”lFk¥&ãës¾:>ÂËBVÖƒ0(¤²…Г‰o?C»šðÒþ‡L„gjŸ°ìã±×ƒÞÉ»‰æÄ,Ù/H#çvt3ráTDB)bY¸nã èY,¨‰ê fLU±À§( hÖ÷®u£Z]ÛJ ]XE‘È7Á„RåRme„á^•mŒBŒ¬lÄ‘v¦Ñ6Àb[pn?6Gav‚Yý‚قî\!…ߎwÍÖdÁüL®a‡È; íOü¸7«Ÿ>u¼ ýúŽŒ1ådÒC•¥ª“ú¤S(b'.ÔýÛ ~|ô”Lxß½I‰ â«ì8vIZ˜S 6d¢Ä©ùÇáÔy'ªÝ®bå2S]zé|éâ%{ᛂ@ç½tk1ª(̦ö•wž3w>2£/ Ãi¢?‰#º'uC˜¼JªÔ6½~,¡}/€Ø#ÎÛÌižp¾àô…‡/ d8®¥ ë·8ÜïÍ+@ÈÖá<ˆ8¿wèúØßÈ F°Å)ñ9Å0‡íAâ˦›& v³Ã¶ß»™ƒ²%i–ý’A¹Ý1ÈŸ0DÀ!(çúÄkÞ${®þ0,˜ÍØ*ˆM+‹ Wz>@ÈZ’Efý¢-îʆö‹r>½›²™s¬Ï-˜ Š³’[‰‰WÅ)ÝZþ߶ÆÖÆÆßâtÄ,U×#Ó[ͯ0¹Vd>V¾¹Q6ÞyU¾ªlÅÜ+@¨kÇ!^%mÇ>éÊ {½ð»¡Q¨8³ñ´>Ô㜻Ʌ]{ÌKä›Oí8ã¯#0Á5¢!Œ¼(Ϊ$†ÀMî“”vÑçƒP¹à5Ö–MùSª ¯Tö1Žcodûê—ú:ž~i`êÂV ´ôUkó+ÊG¶C¨º‹ìáì`Êo #Ån/.Kêãm•Í8³&о…ëYîHíPN)yù;®Äü©Xd¯þ¬£IÆž3¥$jÖÌ|·2©%~þ{cqRež$Ë8I˜@ ?·aM=ëk:—Î’E§¤©jâ(ýzs3þÊô±×áY§í|æñ3««öª(ѦŽC ¥¥ËOu#MbmÕåWOèñšúÍéÉ`ð&.UaË|äç“o? l€ÚÁäXÅ£ÉGÌàI ’›Pbí\9·-l†â½à*¤õJ¤VÌB׌C•fJdÿ“Jî†Búöº0›cÎ[M~÷骃5lúTZc,«4êõà^ $U"T=UûFQ՚纛­>8W‚½)>ÎK§?@ãèÏ*j]¢´uQB²_[% z;,~·J½)pèÆQ…]ê‰ÕÏál˜ÛÒ•¢_ š“•¼£PÃ#õLÕÁˆ¸[²iURýV58¡¬óà:¯€¡Æî—膎‡G#7ßa¼ø‘°Hv V¡dƒœ+WÿVéûBœµT-[B™UƒAÞ¢à*L_ZÒgL#PÚù¢Zˆä!:­ÓyZ2rûÅFg{ô€²Ä“x_†eÁ{GÀ‘–mÑàèQ6ÂœXô™Ãé¸J…NGw« Ø(ŸËR’†›ùŠÃÆ›úÛF ïôbÞa1„Ø3‡—ò^Ź»€Æ8#¯h“ª^=+Ï=ÿÙÏñ¤DcGÆhäM“¬o3`«“Dã®áOc¹FW3W+‹”ÍZ´ÑÕ-×,ûž{Ê?{>Œ˜ïZ¸Â+Ýjw Iò 'òÞsZ`EšÍùfmôg[‡™Œ€fÚØq¬—HÞ'Tf!q|ŸGD^?l–ŽOåcøÖ,ïhëm¾ZÔ׊èr(éHìÒ‡UJ8ýbUß?9ÕÑ ÑbÒá#,_¾¥Á%*'¾®?ateHM¦Ô¨º³Ì‰ºòê¯ýŒƒ™Aînì‰"vû+ŠÑ²F×^p„ø;­ÎWÿ =yß¾ìF×­ë‰ðÝÂÔ‰Ú‡®Ì¤€äúç)³>k¡ô…L^‰¢¹>¶à°ðoÑ‚sSûÏní_o[­ÊöGÑh±ŒL­ |§|nïŸ4ÕŽ{Ž>nˆÃ*˜PÚ»Ð|Òqºï¬’V6.rw%EVã¥^óiÃð— ꢔÒ&!Að.4¼Þ¹)=¹ã7º—¯Nž½Úýïæ6?dc†éÓ 97MM~Pcœú©Æjãh¦­QÂàa¹¾MCÃÆ(ß¼DĶO³:aìr´_ž Y¡ZÞyÓ­ýgÐ ¸r³¬Š#Šh0D燑Ò\:âg¿iÕ p$õÙ;u®MbPbÓ¨ÇN7rGmÌX­6ÖÖýp¢ìtØ$ß 'laB ö/· êð4 tüºXsëuQ|)¯®1Î@QÔ¾ƒGr—+yž+÷Ç‹Û/þ"ûé~¥ä#%I÷”ÄÕ¯@Ç3¥–å%¢Xù¨Å˹$:ÂNï®1:»¸ÊkCfC©KVWÄ–i¶n—÷BJycèŤÑ+Œk|éŒÂ Ç™]s5n½›A¯˜T:0ùïhçR’‘¶*k:R%¡Øš¬<첧kÿŸÚ.C»Ræ°rõ§MQÇ›%æwP%§cúóçuÎI^þ„6§^¬l—–•†º¬×™»ë‹ú?„¦t–Òg07=2°#ú}¢¶Y!KX'˜`²p¼—i°ô ¹­¹tkí ù&Õ7î?‡€?Žï…C¼¯!ßr”Eë†aCíšX\#èü›ECnÑÏšçérç¦5A¦2DóÍÖC 3CÃÁFéñ 4fÎpi°MB­•t5­4Ë%:QбOëç@¤ü‹¨,\ÖO“hoˆ)ªëwÙ﬷™½´ÂGÅft3°;’ÉÐçáÔÔ¤¬ø,(p¯È°’òÙüsm|Rmm¡R²1õ°}¤ªÅ%SÏÕ7뛉"ðdv¿%*Ìê6lžUŽ6ñ¨þD`¾,äÜÙô·q—Ž÷nò»ÿ\ Ca´1“KÖÕDN‘”f ÇT.Þ ‚¨q ÝßÊ1§§|j2°3³bð¹˜@kOiïŸeªoõmS2¯g¨Gt”½¡B‡¸->›ØƃJ÷ÑÃûµâÄ]¤ÉbGÆ^q.ðž-b·žÄ?Šm7?.eQÈÔ‡¼g Y ¤±ò¬]’/ýê çÙÄsæ^…9ùчÓm(øë¿0(¯ã¢{}ÏíýŽÆËX¿(14hSõÃË_·Ñz²ýüdÿÀ¶¥šrU¬n ’-Áf?-&ÍŽæÿäQø'Š–1OþÆÌ•ÒcJg¸ÎÀÃÁ-ñp0Žý\©s#9bù=8¢œþ¥þW1uü9[m… Ýnh>,ÞbLň%–}õÄx‚⹌Ý_'ÞXÆ¡@IÄøì©­7ùáeíÇ×(I„bƒS®‹p\ÁAlˆœ2¬>|ÄAºÑ47ð]™ÑJ†W^Ô½$©Zï3fÔn}\/Â_Qü¸^â!w«½>5~Š¢¡zHv Ÿ ¯Û|¸Uëx‘B»šÏÐ}<€“/¬é&àYÜÈ ÒÐËvà‡näÉ# W5ñäQÇÿJ‡ 1pø¡a?ydŽ¡2}À>†a¬ 1bbÒcmIéƒúiá_¾ R’0…ýÃ’XÕã™’Ó`gQ6ŒÀi0LíŠ ÇDC‚A#_¡&°Šü°ôûõÑ—uz‡»ƒb™ø̺p 9¶e%¿7¼^š!¢ç"^ìð{Ò²bð-ÕCY6éñyXá"¬,i…{Kî$ÍØdÂs €FêfL€NI™CÅ…ŸS†srsr2À°c—²¬åéph:É€•ÖÛHe|32ŒN7,JÒ© ¯2X¸ZBþÍ’Õ>ERs‡´13ã$²q87ét†a’˯†V/f„Tdd§9¢†Ærqø A(tÔ}·Žêþ°Pü™FU†ù þÞËn·7>¯ù ÙŸO'¹1–C#“åu8£Ô?BÂÏxŽîÇûg¸U5bßM¿\¼™`•ÞØÌÖÞTÑIâ7œÂ;Ì[-züGÏç¤çæ½jz]5¥É°¢ýú)é²tôn6Gn)'ó,ï§<ßØäšÌ飞3ħ“Ó†i䛂ûÝ(‘ É“ØOÿð÷Iâtu©áÿ-/kc_Æ.œTÆ!<Ïó h“AÌУN»ØÅÕ÷dlƒ\2–ÃÌiN^E¹NR<)‰›Äz2XM¦•?æ‹ ¿÷l̤Ÿ$ÙcÞOi5[©8Å`9/5¡eάó{Îgý§ËœQ>Û¸z®å2‰rF(OÉ'ÊfÑU¾Èü\‘XõÎÐsny£>FÔ—;¦ÌƒP‡µš–ÌÏH/‰ß“))9ae%Ï9N™¿3ŸûCp¸9iò”m’‹ð'coŽp%ÔÒ'À“ÊÓb0j<ªÜÊÙmDW2õ¥]ôÙËCûCJÀZ„‰Ê"R7Ö…x ¸ Ëæöä[ÊŽÖŒÕpõÿÉﳚZéô{÷’AÒmÚñƒPñ96´TRœôëTâ¼d‘¼ìy*ÂFHÑ'zí~0n)g³HÖÌ%k DÉTŠÓ3¾L]ʉAcÛ¯öÚ/_½{'Ï_¼bëjs($¸îÞ$c'Ôåqqzå>ŽÌg0 6=£å4Ëi;ëÜ;  ý Ë2„e˜5Š²¦3Êt+f´µ))‡€båÒô ( â‚•"÷Z½(>~,h×~,j¢¸ùRayÜÐ$ (iŒZRudžwIºÿ~à×Ük/Ä;PÓ˜Æt$õ9#A)‘‰÷m!Ž…‹¤”îØ´g*Ýâ¾G#Y'ýÌM[åK*‚¢’Aò^«y|tNç8c3Vaä2(@*(lœÕP]±qU˜­¨µŽ[‹aè˜7««ö¸ÛÇgí³Ýg?í¾ZËN°Z•x2²§l\'lÛ±Åe§äÍž*Ê= °¸¥pL{õ×mG‰RñõMîrYÞS\,ã½GLòƒfVÙŒméù€Ê^Ô&«µ VÅ¡Cér ¬Ž;§/ Ö mÓdœdF53EŽRÝŠ1+ääsÒ/c)¯_ o¢&-æöIä/F³½Þ¥ÄÍZu&†Äó6fÅšú’’z]]Æ2°’ÀY6ž°PYÈ6éÖQjPÐ)µíôzíÀO½”S©û†nAL‹æ™hð<6ˆ]Nƒ ÖŠ|eáÙT¼8;r¨SÇÈZl9uzl˜´8«¦ÌÔ!´I¨ zƒ)9]8­¸¾—²Šêr6zf©‹ ­ŽžžRt©Ó}-bE•;-hç!ÿ†ò[Ta# ("‚f¶@X1µÏ˜èö€Ê˜Q›Ã ñ³R2p—ÉèȶŽÀPr;h+£@Y…•ñ1#N›b4­Ò?‡ÂhD_èùª‡ívw4˜„ø_£½CKŽb¨srýÖ*; ã?Ù3ãý­­3pv£±ÂÉ×@+>›éãO6^-ÇÚ2Fbo9eÔŽ!bIƳŠ5&OÙ?Z”%ƒªà¾àIÎ G72IâBôSÚ0*Z¥42±¥xD©D(nË C£xl¨·Á˜+2µ‚•ÉŠ1C¯£s ¨]“Ðñ(C/-@ˆKÎmHãß?= ëËÐÝôP¥>ÛŠ]¥0‘#ÈǸ.Š P¸øÊ+H!æõÓô Ûïg¬°*§vÌrô]AQD»7ƒÄ§ÊO§ò==œÏJè{÷”~1J¯—1—Ö[%î”ÚÇ8‘Gð\šß3vò²o›Fù{ “†òß3æ| ùRŒÆ$^òYéZ„5ÝŽlÝ‹¥÷bé½Xú§Kï‚$„ïg 2ÉâÓȾÿü„[¹' Ò`àC6q0 üQɃ1†)"Q*ŸDX—&å¶d¢ÇK<ç'U~ÖGU¸?ð|Y„B.ãRa”¸ã‚àÑ%þÈ5ˆ³ØôO\rÅk—wà¡K¼?¶¡¡}ãÇóI^’$¯Il×ûöíÐ×&L¾Ûàï•Ø|ïåKéJ¬¾Dò>‹§ëÒŘœ­ßõÛ—dÈ¡+umQÛÿa÷§ƒöþñáÞ‹öÅ /ö«A3Ë1½Ø3ÝÒÝk¼*k+»Ã+Ýl+¦gä/M4­”Z8Eß–¼»¸ºt)–¥£ìè¦SÍw„½)„ŽÚi6R.ÇVÒƒ¤ílëL¡ÅœmÀzJ*lܵõòþ­¹±Ã¿ý = ‘¶47Õ4N“϶¸ÞÝMB ¡À¾KQd:Çgm$«”iZ®L)¹OÆ.cåŒ]Œ¬/fh6ñ2.÷-!týò;EÉW˜„!ÀWŠ¼:;Þo?;>yº{\X˜SûÚ?æ§++Vš Uœk¬½lÔÍ®mQµ³‹nPê²ê9°ØŸ10붮0+ïþëŸí“Wí'?£œ!Ó»)½.‚)bó JèÖ^Ç.'Ï}½]18Fì®Kþèãð’ħ9Á7éÑååÜ©rñèõìÅ ¦±ÊÅ@¬¾ÈÞM‡”,iÂ2:eÁʇ–,iC˯·aTáÅNýÐ_ÓØ€;¸Öï…ØÔÑMóÒëõ\ºÞGïûªé-Nv˜é»ãº(+Á¢;l‘`ÇÿÜÈJñn†`Ê@ZZ’céÅ9ÑW¬­YÑVèa:'úÃJÅNŸþ>BiJôý`Œªb€ëD˜¦s¹íöÚ Ïãñ­ešÏb¥–š «ò%q=Ú"ªŠ‚¤Ó„ Ùs‰PEu²Û¨š{ïcr‘H–C@LÏ ¢EÑv$»_C¨Ì{?Äù‰Öz˜G~Y-R7¡÷ÊæÙ¨‰êNVþŸ…âš`ˆídZLw 1&’ÕÎh22"憸òIÄê ºƒŠñvpáñÍ'S:É‹»Ü’y%M§®€ÿëg6ŒŒŸ8q«˜Ã‹[$ž XÖ*1~²[!Öˆz…_è1üV,ç{ƒOÎà÷­Ò÷8gºrQ6Bì3~,£sÄù5CfB¶ÀlåÓ2ä¼µzCÞ¡lš;¢‚í˜ÅÕ¥¡9)ë]—ôó؈þ:5•ìËUå§WˆcÞ*Õ?b0ˬkÍD2±í‚Nÿ2a4U·7ívÔˆ­UÖYÊ^ül‘j$u¬È,Áöafèk;.§YÜ ½¸¼›*ÍO-•¿ï6b+ƒ¢,òdŸÝ»¥ »¼9D[9ÒßEÂUfe÷‚î½ {/èÞ º÷‚î½ {/èþ]ÅЗw§Õœ*öªŠw#ýÆÐ>¿,Ûš- I“ÙSè3V-[šæ,YsߤôæiÕ6õ„‘Öè£T²œ2ª¨Ì[ù.s5-'aVÔæÈïOÂËÁèV–÷]ìb@¼ý÷^¿¦-±f»ÔËÇ|nkôîâÁa¼çø öÞýH<<å×Ó@Qk¢vªšûÑȘýׯ§.Àë×¼¯_/¼X5gÒÐnµ ××öB,GêkìÁŽÆîh [x0ž;#¯f¶¸ÿ^}LG ãGºá÷ËÝ (Á •ÿu@«Ú P®8Šî”ó \€/Êó8ªeOb¬¨E‘ŽF̃z* tY¸¼kR_ ‡ £Þ]9cŸl˜j¹Œ4ªÐ㤹hóè6»¶0p9Ã.,©Š`ÑíR¾Au-€OIk¨¾ Ñút™ðe$%wÈ™8j•øvà ½(¬_~‡£ÿÖ ñd¿<4}<=ÛG%T©ò¬r‚`T¥¸¡pß»ñ²eÁã¼Á:b~] .ˆ/Ü×gUÑíbŒcJÚ¨U´ÑåÏ*JOuËpbtÆÐ5Žºúúc¶UÖëôÆœk6-b§WÐ-AWÚŠR. ¦­Ú@”g ÎgúbEÏŒ¾"ѯô +ííÊ !ŽÙù´A( š„Â83,BãÈO)_Á¶JNé‹÷ÎÀCÊÑ$ª0†çO\Ó4ËþÓK[wòÒý£Ê„CÇwi6C˜°í‰hî®"Œ ©-ã2d•¹:<8>=€-Ó¸ŽÏ[¦3G`6‘¦PI4íM±Ʀ‘[Ã0æIGBb'E»›’Æ“à#„z˜*gÛ0gXJÙ)LR<‹Oº'ß÷äûž|ß“ïÿòû;ÍMQ Å·‘ðµÎ êU¯¼öÊ ù…·v€Ø†¸|}Zú^“§¼üdúÜ*Ê=hëE7Œ¬…S×°LFëƒà¢LÒú[A±|Ñð9ŒôÙÔŸúÐ-׳—MÐÖ™'ϱJQWøŸ9ùLÝa›CçvqBPëFÉçÚ_²Fö(ÁwŽÕ×–'ÒDW“ á-¼aÈTK·LgIr êFªVž÷ WMD]T•’N Ð&$ù>R2U¾]`ÂNŒ¯eÜÂT+þ!½5Cò¥ƒP*V<õpô&ט.ù 5ˆ5mTäö\¼H eÃl:‡WLÖšâËRòiaìRÐ6½¢%ãzW7Д #®.è«j#1Ï–^±M¸YÛ§”Äw ˜q2îº,¢;¡’j€úq4W*ÂœGíS¨yB•USb^/»ñ5ùEÎ}WIžúU¢çs¤ÊÌRÇq”Èlž«êÝçÉú åZ€AzØãZJåÛG”4æÔÃkJoW¬ ¼w®­Â­ø ¢;Ýn¤Ý'‰D—L™-2–F‘›“D¨Lõª#5É,“hÓ5¡ŒÒ¹Á¹‘Œ='¤P  echTÙQ º^H…2Ì¢¦f Å=|IyDÙ ÑŒ³ej ˜§RÚ„ÒE¨Úø¦©Y$ +˜¬¶š,²¸)f´Ǽ² C/+C°5øRe¯Úõ7oc{±µ &™äÖÙŒQôÎ JDÈÏÈ,ι¸p{úìBö+!žf†ZIE1¬ ÿ£à±~ öb$!q¶×÷ðXBª¸½záø µÆð£Ì¯ø)³6î@8Máù „¸’¦&ÔWH_è.%…¾ò¤Æîxx?&aÒY8¬kê‡Ð=y;‹Šm'AÀž°Ñ ð5b#‰vrmpþù@L"Ü¿Í WÛBlk“‡!Å IšÓþ–bŽXd+ +Õ-å-S^ÏÑøE¬?ÀŸß™Bcp\±0c0Ís%Ø«¢ç…Ò«ç¦õÑâC³qsú¸ØGwùAqòy†T³mª(™ìBHÂÛï;QŒÊÝV™<©Çûèk.Ÿ[FmsÂ8·ŒSx`²ª¢]À/)ÿ»P'UΙÀAR‰ú`àëï·ù«Jñ3æî j–o~i¼ÅÿÖ­z«Þ(kÌßs@VG3ï?lÊ„‰ ƒ°%#ËCQTJ>(*q!üªÿ¾j|u!Sš œY ¯É ±™iI÷ÖUØÖDÈW­*1aŒA@ËEÕ°¾*1ùÒñ>Y7 ;’`ÌleÅ¢B‰½ˆ•bUÞ¡#@—CÕÂY ‰è$DTz¶·W·ÖYΖ‰ ž‡ÉÅÑ(ý½+¡rÚíÓ÷ÆÐÓ?0 C6÷tìåfZ3¥ÃØgfªZn»"œk‰ YÛóV±žðè8WÃqA«qNß’~–³o° )ôt*‰Ðë‡ÍÒÑá鎀?MÊÙ>=x¹ûj÷ìä•”T;EIPÁ÷;ʤj€ 6¾r5ÂYþÚ¬ÛV~}]¨al®ùo W’$S6¥ÀD­˜P‹ˆP$ —?¢Rhô–+ã*÷0LäŽxn¬Õdb©ª†Ô™D¨|p¤J"Ôj õ‘ê0(>#;L÷jïëºúS”¤ø­G› Ù.öƒÅHÁ׃WØI¼ÑSõ‰¾žma·ˆOtúVÓ¡óØf Rzð2Lžî—a¯X¦Uæ¶ÃEãÛŒíà¢+håǬ’!H [µÖXùô"ïcŠ–ÝpÆBå´ùQ #òB”9:;ÀÒ§K¸4÷Àâ7Å8Ï‰Û ~´јËÆ”bÉÛXAÆ2Ò âôƒ‰O„˜ó¿Zw…¥ìÀqÎù¸,Ö •xÃL7ϯ—çîm —£y«¹˜®«™»—û¦¶,o6ÄÆœý•½³²ŽÇ:c]Î{+1Û-¼¶ ˜9îZ‰´–ö }<×®&)õúúœAš@I¶$1CmùxpÃ>ˆÒÄ@ŸÆؼçRÉŠÙh‡ŠížëD ®‡ï°( Õõ„ÑèŒ4—Iëq>§¡T[É[Q“VÃ5„ò&¦,åí¹#yc’Í8|‡/ò J`Y³ˆ>Õ±&²t5¨qr?üZ’_kanö-yéñûuŸŽñ®Ô¯É{®]0`ûþ+Îôû§2ÁFúLÐâLÔ’mL»£º5.R“EŒ†I\5šmPŽ÷«d[²·ç¥¼7’ƒ¹ÃQtcxýúµ8ÂÌšEe¥iƒ‹Æ>z†#iDÝ~­{}ÍôäH%Á1zúp|‹¼ Ôý£w`+DÌb~àut]¬=g4¥öhŒÖ˜¿ë¡½…Ü=¯‡B¼¼qÃ#<^BÕä°…Õ…3¨b}v,.žçœâÎÄ¥; ©ùˆSBc/›ÄþÂSþeX‰ÆVNtpfȇÑa(ë2©f Vð€ùZÔŤE¢rBÝ`/9û»âÂõݱץ[$à%7J‡¯´-–«Íè‚Dú–† 7¡ÎH3ÕɉxÌ™4ySRÊLJ‡-†¢¢èÏâ:½XÐD™µ¯'«|û¥.¶Ñ 0RŽÂ` Gx9ãôÞƒèŠJ… o´­8w†3.#¬!‘ø,¯Øä 1&ÏP´>ƒð~Z– ¬JÆ×d’ÁDòJJßÁ^èMÿ`b:èÚL¢Ñ$bÞ3ðøöL¥„GE%QŒýRª"ˆ¯`ÙÑŠ»ƒW—4W¦®N¥#tˆ£fŒÛoËîð•Ì=mÊXä’øŠDÆfµ¼a¡@ñ—='¦Gx¿mh1Zµã¢¤6ÆþxÆ÷ÒS¶ŠÜ(æ4¯Š—'¯ÎžlãD J:°GÂîØc=-`×M0cvÑÈ–CÚtI‰—ŽN7‚]Ô²Þ2ü&¢¦Æ [þ\Æ‘ñ6`Z?üzl>Á;Ae‚ËIzm8Ôñü’Ÿï¶róĹc9‹L{dGt»9ƒÎéSZÂã-åõf9½¥H>Ù}í>yT5e}ŠC®Þ0N¿Ù¹Q“4óWR¥oAÓá{9’/rMŽFÎp¶3ÇGrŠ(DšåÚSÊF ?h[ßp‘<“ß–Õó3š±¾Ô²aú)²+è ’š RÿŒ‡ÎÀ‚±{ôZ„ÑÍ@—«#e¯uÆeÝãŠd¾Š˜§P•0T6¾9Û˜š˜D8å£ú›­‡o?êoõuüþæ1#ÇŠrzô´³²Ébm§ 9.¤ž¯Ó0 )‹{B—‘:kW åŠ֖®X8­ ä£Cg:@? ßeS’06#Å`Æwîv'›±P¾*ö?”\ ñnxª´Â ÂHYH =lf¨> ¥ø ó“ó™> “ΈÙÇ,ÄJ~Ë ~¬ÕZ|4¤õ-²¾àìd$€>²ŠÀøÿAªõkQе%Xu©Ù¼WÿâÁƒÆE·‹ÝðµøJù…X&§ 5ÀpˆÄIÌ‘.Õn8Ö*wàçAµÖéxܾBìzaŠQN5 9EU³Þ[¦r™3âÊÛq“™†h&(Ú(9$Î-ýª!Öϼԛ²M76·Ô>ůuƒvËËRRdÐ])“’ r ê[$£  †ãŠwÈZp0€ Ü"â®ì¸ø”>À-¨ÊÈ á¬ã†*r^XIè‚ÍÊää¹¢ãJø K% (p<¼§ekÓÉÕˆhBWô¼ÐV»Øw2Vbˆ\`?ˆø'ʃdÑ,¬3m %€#yøS>ñ“i«=Þ<¾Ô™è× “eö]D)>}2¯%L´£“²~ÒpSÁ@&wµë†2‰1æ\¶‡dZ}jZ<ãD_;ÖÇø•Ù› ËèC™¥)–¡DØ`R’aþU.dpœîs¿’„U2~”IÃñ¬œèK‚÷³K _—Õ3ÞÌ”‘V°öO^8q»äðZ?IEäãúcÚZ¸Ó×£Ý QOÝÈÅ+wà:Œˆpx¼„ H»—H峺8à ·-¤zÍE¡`u݈ÐØžÂgåD”3ž›%¦39žCnF¡ÎóíÓW²¤µöÆ“½ÎÖ!‡­R6•?^î CfDªDÊ‘êè}÷ÂcÓV<ápˆªQø/±Ö®´ªN¸QÄ H'€j‡¶%YöI°ÀCWVe[Æ)8×vÜd‹-‰EôÙÞPÔt®wF[$_´88äÀÅgÔ5’Ë*U LP}6™µòÇ“Á:/Œ¶©ŽÎŽâ‰£,<Çœ¾Ì­”­–÷•1u\iX$­ã$øâ½3˜ ­0¢ˆ˜ÆÒä‘ä¡Å²zÆÖEÓ flg†S-ÛIšo”rÜxd\¶f€jãP—»É¸‹$;vÒ™y2ÌHï©œ3|uaŽ/t{Mµ„£!m°CÔŸ2ãnTÑ“C46~Ù߈HÀOèekíÍ/âíz«"ÖKÖfC½áyñSY_š$'·yÞ› G¢öC–'ÉVÚ2´tÔåËÄ8ÈCÝnÐÕ·xò¨†ºZ©ßáãÔ¿CW‡Ôzò¶=»¯iãÅÜѼ¾r'2BÞynŸ»tcŽ1nÂ6þ‘Ik˜Lß{T»`ò¹.:²ú¶”Z¶ËLiå㢠nêÕ ê¥ºæŽÌÔýIZyy5(—¬3f9¥¿<·n«³(§ÚŠ”ú”èr¸"^¤äçà’;0§çÜó$¼ÝJÜæ”EÙ“ò£yÄŸ¹–â•Pk`နryGðÍÔeÉœe*¶è ÍR±¼Ð²•L®µpÅrÖ-Zæ¨úS'½˜)žÝ†*Ä->¸rÏïYà= ü²À•»â~+ œ(DúHQUnŠX‘zÙ¬ÓƒàCàvxˆ˜Î/ti]tË‘•¤B£%ÒQ»çÆ£òÀ™s#_W€¦ÝV³aCþå8½Nß‹§NÞ«âàZêyÔyTÚ/Œ&¤vr$ÔÄI$Ìp¾Þ}‹Oõ+)m­éZ­•I«â 'o4¼¡7pè@ÂP•ðº˜b ÀtrŸ„ø†í3óÂyi;Ó9ØN°óLAà¿¥]uv_µ¥;{¢}h ;€>Ǩù©;9=,çªNŒ;ù½ã!^¸ [F¶ØÊCkOËÛ"V Fx—…Ûuः~–­ÇÊ”-–ЮŠÿ Bwt‰a-`Ow€½‹oÿ=î<ü{É'Läw"tnB¬˜†M注h#ñ~ÒÍO'Ü鹡;Fת›ÙÞ@º&¥Îf› É€3V{1û­µõR÷¬+¸â¥)g< =½vñRTñ­¯²¶]èÂ7³Ö•˜¥d5zvsAž#Øýînág×…¥ÀžpgŸ½~]Möx¥Ú`Q?À/²Ó/Ø|äùéO{ü —)! ÐÁŠ‡Õdà†aUZâUgÈ0ü@¹°ð Äwÿø˜·ÿ ¦'Ê‹ îtEÝJöõÎßËÜË3yûH+C“:·i[¡ÁÞ¦_Ôux‡~øÈóóôà™ áåø)¼-–´G] û¥ð¾BN*2[§3×}WŸ²Sæ ”É£¶)«a‰ªµ£ç/žnK ºmÁSt;ŽóTü¯îi³lö+uü¢&Ý ö‘ƒŸ+Iÿ4Xn•Ë _¿YɺÑÀ_æ›Æ/­µ:ˆÜ q÷’/C|{ð­YN[¡ï¯v_ý³U1€ÉJÐjcdVü•¾$XÁyQ¤tµ´ë06Qâˆé³æº[ÜIv13jT žÚNÀLœði04£zN5’âj<3Û<§ß&‡ æ·i7Ù÷þkýV(—;ª9Юø÷)“‚£^1­ž&°t•®d¤õ É»¸Ou”X”Ñ9ÑpãËÔz]ª30Ì s¶ûì§ÝWkfÓ@¢º¢]PÅëùJ³',ÍmD1 {Ê®`À|_Òl-3›·[÷rôà,øH`T¥¡Á²Ê>M„ O$9ýÿ~òãÙËÏþžœ¿¨m̹,zvrrÜÎ.¯3mÄl†ILÖ×ý¸^?x}P±A$K‰v_mð+«B²Û¥ô³Ìª‰þ 7¶‡H½(``4À¢Ý£Ä”¨Ì6{ã<ß}qtxp ˆ³G'§«u{`C`³}xW̤L6 QS¥Lr¤ì[zŠ×ñbf;«8ÇÖ¾ö"±™\ ³ßÑÕ(KÑfEI¤vN®PÀ;'Wô`@†üqÑþŸß´z¥ìîïHxayp"!/ÜsOHÝji»rŽ ¿¹éoŽ¨BóJ¯ÉN;n ÅXQ{-‰v ñ‡ƒÝÑOK±*š\ Põ!WHq;Ú©*ÉUÈzé1žA»}ðõÂÖ\y!¼Ç v¨´”²F½>ã4ûÇ—z’ÂB¾È3S:!Hö7_èHAb­rJh™@¦Ô’Fé\h_>¶Ç ¥¬3%+zü²¦æl2_ˆñ¥3 ƒÞ ÐgÒ`N‰¶—mLe¿°#ɱ½ÄœÑèòò¢*ÚAµQuir©j¯sŽªæ¿—q[´¬UlQðn ÷c«Hï[ÄŠIh‹K7áeâ­[Ü£ª¬¼Cæ­;‰ë¾tõVñœl õ6™:Œ² {3Å”1—ãPÐ3Xêv¢DašRáEë}羬W„‚‰md3^v úaÅšH.mºŽ¹²y~ÖÜ2Ùk•ÃnšVömìKJ@ÃiS·ô®n¥v±’³i®Z%rŠk´ÔVn•Ðs•î„[HrJ¤q~ly¾BLSä~Ïêk­oî\}Îh4WõŠž/åðã/ÛñœØJ[ "ÖRÇ.Å^ë ô¿_îüãxXaþšdÎrÞ;œ »_虣Kܤü%¦°žP±kÌX~:'s—{zçï½÷N„3¹c?4x«NBxWâ-‰)&¤;@—̉úíöÉŸfg¢ߪig'º•Ý½‹ÉõüJx·ûàrXYLŸ-8%”—Ýëü³1fŸþÁ Ø/nOÎÜgkþ³,碓tÂÞVÝòhÃfR©êÆ®º‘¢àŠ}Ç£/‡;.ˆ.šØ†p~í’cÉÁñá\.ovWjî otfº”š¥ÝÞعüþàÆöÕƒOO÷ÅCv¶p"BùÿâSéÑM±#(±µÖ`V yM5gˆ¦ýpÜ¿KÇ{7É]ê(~ë›°¹cŒŽ&×ß=œmºð “1`º·Áö6åK8%ü%ðþ+ˆ”“†Ôa–jaeeeÅ:ˆÊPBáÿgïÏûÚ8–Åqøþ÷|Ыè%BI€—$%GÙæ†í‡ vŽq†AÁKE#ˆíûÚŸZº{ºgÑØNÎ×¹÷˜ÑLwõV]]U]‹iÞ•Vª´\åA+]?Ø>bVJ¶µÓ~Þ•tâÞJP7Ñd íeH±ÿG¸I«-×\¼Ä“äß; ×ÿǯÓÀè‡ð²þ~ø zï&Ýc“~w'ôûtEŸÕ!]–‹Õ:&õ¨ònÏcCŠ†{åRdnX $^ÊhFi½0Øš]¿åc@Õö·ÇÃnÃÊÅ•r Sèî4m)g1 x"áÕŒ#záTîÓ£Êò¥d`mRÑyƒ#´g$ÓQãŸâ¢©È‰çSÝõK¨WmDùg›´ê5±Iêæ¿Hß À’¢w<}ˆC,q]`ÄÑ3¥ðW~sS,ëø#¥žÚéÚ.•/foöØNŸÉµñv$!Es¬‚ãüwÑŠ}ç-iöªm9cÍÂÇá±½¶ºüþ®¥„ 0B¾& êæ>䦟ïé³­Á8~Ex9¸ËO-@³õÄ}`ì†.rUŸ‹oHeM¤1ß“:;©«™ Ó”"Iíè¤S{††Lh.ë;0M Ó9¦…YØ¥Iˆ>+õ©d27‚žDŽ3ÌH é¼=óO—)üú=P¾bZT‰¬·è¾ ‡\Qö‰ûzû~fž2Ÿ¬·Q´‹»ñ ÷Á<.Lã¹@dë{'>qá~Ä…{á ÒXÂ…OÁ þÍYÁluÒæoa>!ë„\H‘¥Ü¦2•s,ww¶>…´)O¥œÏZÂäy¿Mè æóÑÚø"šù6ØžóÿY €‚=óöû!íúõC‘)ƒ\˜Ìü-Ìs%âÁgâ€Å ·õvƒB‚qWÅÃÊ5F¨B´ˆT9KpçGé.µãFB8;ãp%©Æ£/È1Åè½þɼRw‰¥ULø?q~ƒpäF(ÑY†éÜZ¿³Ã©%œ*#•EÌwB |Ca{^/(Ž{tÚá¡8t/0±þ–9)Ñ/!î»ÀoÓ!FƒÌ~ ‡P'è­ œõÇOįþÓ²Ûõ/0SšÑùsot…7«×Õ°­Õë'ÏžmñÏ}-µ É½€bçŽ|®Ãw»aÀWø!ç½ Ï‡o—ÖK"¸-ôHš¢Ž6åLŠaÀÓü$29Y9ÔŠÂû£úþöÁ^¹Pø(¾V|"ªb]œ.‹õ'ëk‰bíá£õµï¿_ÿaõÌp°È´„Bv$Ï—fù¤5O¶2Þ’ÝãPSbä®LlüÞgHÓ 6Üc¼À‡'³_s™MóùR°™¬÷!(÷`{ù°µïèIM¬ü{¹Âë{A2§‰1%åÐ#΋bëEa–ƃ6^€½ à[ÐË^š0p”°hÆ1–“Q—q| VY%²8Îæ«Æ´‚¶Ík³¤‚Çùr‡ù -Ic|–^wŽv^É$=2¿ P~qªzßCÚ‚'ÉÈÌ£G§!j8AxbÒ¨WmoÈü«í‰˜š,“×XóòË£•ò˜µf]iÊÖmãR~6¶oVâôâ`ÏŠƒTÛDCab"~O #”™â‘þKç(>`Å©¿™w‹ù§;#Ÿõj1™Ú6ýΆ0¾Fýv/1ñþα]`qBõþ„ÿjÒð_ÇÈvïPà…TØ‘~«"–~­ï”lë] ‡WÈÑ™‰YB´W)¤ðŒPË稑 {ì|% òb DUxêæIh}qX>yÅ´†Üý©zŸ¯ä£©ÔA”ø\\g$#ïR¼ŒC )"úÔ‘°rýEéúCÌ£ ã.,•VË?ÖËÿv˽ÿøæ´TÅJn)!ˆ£]<È€8-¨ï2¿OM§¯VoÄÅHSðËlæ¾\ `.BŒmÜÆþîzóð,¯ÅÞôól–ù˜6!·š>.ñoæ4ˆxl#:jÓªÎ>)Õ÷wwžZ2$À/4WÓOkkÆŽžŒ.$õÔS›™y’ï~O ’úu%>ñJÜê̳/;uˆX‘' ‹·sW˜«ÖâTgW=~6p–½Ÿ¯_÷°l‹6+—‘¢¹üœœÆ§s‡¾…ÿs«“¼ßo]~W¨ uÿœõÒë3¡ô—n"ûŠ™ñYé†ã¾²7¨ín;G'ûšqΖDD"ó™D6r_µuÿÚº¹“JÝ\%® S_òJ#êè¥?*ËÝ6F29]øÿP­½Vý{YÙ½*辿 eîE¼®)Þ"à?œ_\w#b¶ótO¼Úe}B_b¾[¼Aa?Ãù„×û;U2Hꟽ·áå&é´ iWÐ*)£ãö=”ZºdB›LZË!öÞ‹‹npîv7ò)1fT8žäÓÂÌÛÇnÿ„ˆŠ€}›Õ|Zü™‰À¹sxYÜÝË›âãæü0îið­œÝ2'ûL¹Ù6{[7Ãn!2(Hè%åÜ=þÓP/4ÇýS±©¼!íÄãÊêeVüèò_'¾8…«}žáü~ù F'ÿŸ±Gsq 3Ý·—l¢2?Óç™bOgCË\臟— ]°FCR+†rÚ­kŒÆè C¶>*ù,Æ9æt¨h€ –£Âw»ðŠà\©œèœæJÇ-Ï<Å­ù(Ý¿ëe¾ºÎ0žRÛ<Ëvê>¬§2í§&^9]»Ã ×Mi.V$-e'rÓ¿ÂÛåþ]HÚG€{?üðöžS ›ÐßÍãÚÃîÉ•jáĵH,Nß¡ñŽåùHç±ã4vŸ9òmˆ QÖ«úôsZHõ$&aÐŧ´Q)ìH:Gw3Ž™º{aNZå ¸0ÍÝb¡/Š—Áð­; àØâ¨íÒæFT^«<+´u Ä Þo ôÄWÓJe£Ü½hµD¹‹ÿƒ§|Ñ\ìåþ( ›‹?ûfè˜d£šsÉØ ç>H[2 ¿ŠÈªr}`^ž*H$aâ ;÷,Ïà‹¹ðY•w&›w«+33³ÊYö»zõå,Ÿôó*g0<Š±À³ùWLc– ´±‹“®‹ºL*‹Â¬ølòfÎ}„‡¸àï#ù÷ñWÓÆ¿ic^Æ)ø7Þéö}VMâÝ ™&Ø*E†• mÒmí˜,—æI@&Õµ¸Ñhó™›ïÈå´<4®õÊ£ÊÚ'óƒ7Xà 3fX´LÎûäÃq_& oãÛÓåâŒ&1éòö=«ßïjKw·—…;YÌÛÖM3-Mʺü ¥ÜC/­¿‹/ÒÂÔ<¤xù(¨ž¥(ÏHý1€.Œ:"ÿm(¾ OOûy!µ0m\PäO >k¡YÊÔA:¤ÒP©Ëò¢Ä¨’VøË­¢©ßÇÃ\¢)vQd/d¡±õâà¾0uJ0Æ‘ìÏì».q;¶0Õñ×Û²¯·e|[¦@iø½q×gÓÛ³xŒŠ…T/Åé‡HYͲïÈY¤r/IþeŽp Ÿƒù›¹?.Ø晸T?ÈO9…=åâýO˜Kãä¸Ë½ð¬çνœ<÷töÌpúL È·"ÃHyÿØ‚"þÅ+"ÑÙÈÛÁ~”Œûe ÂÛÞ=Ì„9ÃŽ|tË0òúçQåú“É ]Î}ÉÐwÇ-¿ý_Š[¹Ï3÷xý>î§/ÂúŠx\¹¦ ·åaä—.æ¬G“ºÌˆ@©‰gº©ÿÛÜÓÏe8¢D¤t£Så· Q5³,>2„¯I“‚´|Ï‹>Å4ýŸ-èÌfx”¡´Ëºò°|¢‚Ðà²$’¯W^¯–¿!ƒkóEe¹ ¸ÀYõÔúïT:GxyŽ8Íq„‚a[*káO0 3v…`tJœì!EsE±ü—0îߊ•ˆuÁ ¤2/‡>*ç›ÜA±^y"–zî H7ë•Ç•µ_°s­$ Xh8q†nkd)üá‹ ‚$¿NŒ.˜aaŠ€’jpo>¡·5øT&_ÿÛùfOÿðYŒ’/SMë Üšl½nÄXÁôÊ‹•yf«°»-y'ù}Þ¨3‹:›‚î]«¨Ä[ﶲ_Öq„“õ—(¼¿ê~´,È0["¹ª(ÎÝàüŠ¬ŸV¾ÏL”øE#º\Nò­ø»ŸsÙÞ9Æ<%λ¬aªcïÞ„Ÿ{f€¾Œ”¼Âyø½TÿÑ$½?Ç>Œ®X~^ûÇð ŠÑþ5&$ó`Ø«LÝsÏ¿n²ôMöüë®úô»êù'ÚP” kfeÏQš¢'Él/ÌÈgS®æ…¬}åÉšÁÏÚg¯Í×&u[sé=›ðÝ£åñÕ:ɺðãñÁÀëŸìï¼Ò/NúþõKXÓïalko*¯×Vßà·1¼¾Â×T°<¬¬¿{\Y…BëÞh);ƒ ­à0Š¹YQÍÞßtÅ*¾XE¥˜(ó+A?“@Ú±0õFŸæCP4fØ·ì§L×6 ƒïÐn”2| ¯õÉÆf4ð‰˜@pCíƒ(l¢¨|~ü£….Õ¹·!^£_ßÇÓ€Y€ 1ç•'zþÅå^„pê®è¾Wž 7ƒ@˜1^î¶Vˆ`Áeër®àöo”S1ÓPºSC#u â„ó˜“x¡¯VT”^LÖŠÿ øáž%ň’J=F C]iC4†ìÞ€x¸ƒ1vŠ@¸14 š:›§F‹;‘bì^ã‹KÕ(Þ=¢G<²ñª«øÐïóÍd(.=÷ÝMù†íQGà•œB ÿ3€…ì'.Fá½Ãb,„o]vþ ÷¢à†Ž4§…§ž·Qxñ>¤” »;ûýƒ°ßB`]7µLØ ƒ}÷8g€H|}¢µd†RŽ•úî; ·ïœ}ú@©Ó¡ÓTíùÖ›Š?õŠ^¥ß»Û\`ä©úoú±hìm¨·l‚ã‡Ø(pâîÀY–ð¬—jÒN€‡«=·5 @x’aèZp ^x JOú`Ö¥ðÿèçvåÃÆèað´¸Ò]dÜÑ+7ÁX¼íW»vñ@WàHrÃ. ¡u…“=-ŠmÃ̆¬„ºnË“9d9Ô ^G!òàv‹4‡íœ-¸Ò\åb¢ª|Iíò—&°F'·rtœà\¥øŸ 9Ïm‘E÷O?9»ÇNãàY®ÕuaôÏ‚ ÷>7Ÿwý® üK˜p hç"¬"nÈ”ÏXÀïC²™û¸™S€r9Ì Œg8ö-tT² Y“gŽSÞt(Ì£ |q)·|*Êî(€¿ ÑÉjy-¨v½ák÷9o0œP˜¾GÅù*³¶¶<èŽ/üþ„ª‰²†w¡ßÙxìŸÛ•†Š§ùSÞŠ§ùŒÍxšÇ9—«tšÏÃ<ÒFb‰à_K(~ãx…6Ùã°Vø~θíO ¿ÀBtå¼l‡vsôZ.¦Î™¸(ÝaȺu­ÜÊ Äa)Ów}åAõt´H#ƒF?rz Ó‹ÒÈ.Š&e´ðºZ¡)Ä~‹Á,•#*Æ)„ ¡*‡j#å”Õ»BbSg‚;6‡ƒï•Ã+áoI„Fc²a¥ Ï2$y²gÍEG(ý°&S¯ò.Š4å#ú·Q}2íjîBI(†Î¼‘/¿ß]9ú˜—"‹'pV"Gž"L*‹F,ñáuy—èñÝ‹SU~<’µÞ;_+ à ïÇüþXg|ä´æ²ÝÆõ@õ$¸a³«ãáøåÂ#Á¢„xäöÐ2SÂéDÑ“Š&-‘SΧňÀt–Ø:‰¬ ‘QqZýŽ(–w‹¢X”£¡a”wá¡VˆæcÎâ1`q2`%`Í ³›³›€Ù¦É±D9“³TËhºf¶\+t‘ɤśڶÙr,iBæ>Š*Ú|8‰;‚;i;D'MG-@lExÉb:nu4R¿ˆÌÒ;mZÛ€Nð•+ìyÞÜ>ôÜö]_ÕÆ Ä\u}ÖŠ†l;1ÊèVfÕ!&€Õ¦O:Pí;¼‰G¯¤TÔ¸l˜X'_x?éûGE’Xö‘ªG’€ø 5_îæyXÒ'EM—dJâ¬Uev„¼ÌØÂøœØ%z†.o´z¸8]&ÉÙÀ`OÌù²Ø–hvôÜXßa&ÌßÖÈ£ =ÑöËÅXóå 0 ‘!ðæ&¢èEçXU±{| Ž0Y\Íy¨1mSŽ{ÈáICl?…Øù°û*ãAT;@¥²ä^cGk‚xe‡mWÉ[=ãœc§ t~þ§é1–ÔZØ$[Ùd4˜"¾¼°+³/)Üs*šÅ{“|+²±M#˜T$yàÒår©Åye&h«ë¹}@\{ŽüîVPÅèV¼k/'“2ËË3ÿ]Ö+½Gƒᒭó.ˆ-ŒHdí¤™OC·—Ïá’ã]€F<2Ð(§xñ &=—>ðàè…W`D†C Ä2R#c{_º3„ÒVÆGµ¤t³Ï%nnbÙäôá@YÛ ™r])ºÞȃíƒ'A[Tº®¼ C¶ gv~u‰ ÁdŽõùF´g–2œ?&Ô¥æv4Äóä‘àoKF1!Y¥#D.FŽr¼æœ`‡3%€=(:(½pú4Tá¸ÃvXÆE †” .uQOð(ò!sÊjg Äc Þ@ºpD¼-设 uJ‡ŠP¿sƒt^Vánòq¢€,ÁÈhí+ ¡úˆÎ@ðdù²XÓ½aÏ’ñÁ—DŒÅ:épÏ(˜$Úñ&ɧ€ÉköY^è9p~;곑ß&¡1q}C‘¸RØ ¨µ”EÝš±è œïÈä>§–åÆÅ7íZ3Tl¶%ë×U¾ý*/Šz»­Yi‰ QEÓ/_ŒÛ(=&ò8ÂìÛNŸ¼Òr*TÌÐãÊ“:(e¤RCÓmÐé Û–@”ýkž{’_BH`¸j!r¹ÏàÀùÖí|Œð—D[žÒœZ=&/-\ —jÒÕ°•ÊÀ‚h(é¤>«Ñe23«;¢  ¦3c„߀`òøæ¢(þ!¾ù¦xF§ãäÿH!;rðqzÓu‡E¤Ý˜_ßy%ðžÏ}Ø0ŠƒU]ÅDÔW•ABóe‹Tõ±@íªŠ›(vêP\Šb°]&÷÷©êpŒË\“"e`.ÆnKÜžáî'É”jë]yÃA+ž¨ ôˆÇô¬òv¸ŽšD% ªý9:hÜgôžüð6Þ°¼UPž£haä¹0çO~X]_åEA‡UTÊ'¨á ^!Ç๊¸¢u[ I_‡`P6’þ®!ÃäÜ´72DÅo[‰Aìúo¬G«ÅʬsÀm‹2w`8û£‡ë¢Üãûy|72]v¥ÌRÊUع++3”©Já¡D 89ÞĈ1‹tHpiD~ª4½°bŸYxŒ_!œÖÍÅ•ßgˆdå3¸zH[ÞyûX2%q°~hú÷Âóx#I”-8€-îjÕ¨ä·=uÌ#$\îY–“Y0œø®hCÅ%ÔëI ßDj›¬á]»Èz—*Æg«Wi4˜3YøÄ6„œÓ©ƒ¬LÁ‘ 08+¤Üt= l©\nû!Æ+»ãQPö{؃R„–Ó7ðööî®Óx…RIÑžs`£äT/ÝA´o&/ 4×Ô6š9Óº$žÊi„—LìX½÷ÂÙþ“B@2ÅéåAŒõw¹ýŸ #ïÉ¢Øþß燇löѧ`Œ^ŸDBjêÏ´–íÆ.]ÿíx:B¿Àb)Q}$óc1)ð®ÑŠqEZ HQ¯’Õóȳú“£ôW2‰7aY¹éŽ)¯qáõ½!ÚýËhnHè*™ÇûÊÓé·S§X$Êim÷‹-òöuŸ4ïÒæj}¯¥N°Ì©/ÿ*™y|?œÔ‚ Æ×Ó×ãÉ£ò9ìñÃ:}âiGäÀ×ñcBªJ‡Ž'©¬”ü|ÌÔ:Hëš‹N³‘]òx· ¢JÛëÊ»ËñÃ~¿KÎ5•)gæå`à.c®(#k4þ˜z.du€ñ0@Ê‹æðÿÛ… ßPyhÈÙ’ ^6nÒ6ŒMp%ºÖ `Î¥”÷•Ù8 \*ÖßÒÜŒ‰1p©ÊàȈ'{ýˆ·ÑBO¶0#Z?!›ÆBj–,ŠÕ6±üyκòùÎ'¬Âîk¡HÆ)‘AÝ$†]Ã12iéVY ­ëÖå“Øœd²sÓ¢ÀÛéãúóßêGKÝ[A ¹TËcÔ:Ï*ÇJý"Êcá8=×—OÀéÀÕ.A >8Øu¶wŽhlð¿ƒáyÅ…½ßöúõÖþÙJ¼§xÿŸ[ו°âæ•9©Ž *9ÙY…ûà2î‹ÁX˜õ†Ú¾ š™¨%}ð@ÙM€þ+˜ÈPìârv¿¸ p:ü¼m–²hhC†ëlÝ 8-º7¼BÏàËÓæ¶EÈŒŠxlüˆÕðamU?­Mš—ȶkŠˆ¸0UFDs5WšË[¦- óM‰™<þžÝýÝOIsh_8áaáÁ¿ÍC2™ßhŽÑfhžˆ@’2v5^Æýð£2†_{Mñ›Žeô¼¥~`°A!Ÿý›ŽÄ+e:<"Øĸe1[š 8}œ+c2u°ªpR[šu´¡c NeÆyœ7;zæxí ¡2ãÒ¡'¢|$ÙÂ9iJR4ÀXY¼¢D²Dv¯xâqò [LÌìlÕºôZ‘…¯Bdå©e'Û°\°œ¾ÈÏS»R©í¦…á€ÞÈZïÒõ`ã£è¸ÝÐc•ŒØ0üH°á¥– m·K QNXËœ?´«¸…oZvSIOµÉeiB2~Rí\n12.‚ÄË:ËÝÖh ‡6:€ÃΩ@ËÌ%«åÈ`c~dÂåÕØ ;’ÂÔ³ èu+x³#¿´Ó`¥_¤Ûr‚ñ5×5Ë£Mš¸êðñäá£öYÁcsg¼)ɧ¸Ãå˜pX~·Ó ¹z×Ò­Æšs!sþЂã÷Tî_ôÑf$§®-Ñ5” Çx›{>éÞ—ÖJ†Ã`í;–ÙÊî0[x•üý,­—´Ÿ!.VÛŒ‚Ù籆XzXRùÜu%§’zL• 4L$ãu;ÑÍ´„*3¡K—ÒÇëÜ»À\ZÛU3.ÔéS(p°¨‚>W\Þ 8 µŽ«#o pmð 9} -'…Ìþ:Þ³´Å;ßxjp¯ºdûˆ#åP ÛVìuÔ©g¢ñi3±S,JÆažä§ïWWÖN?Šï q\€ÎE³’xý‡x³¬æù´" šYé»D¥BJ©âXJó)Ü„Áªvš§m^Šjå¯yõõê{ÃaInÓrÇš…¤Ÿ ° ”j;Ë­iÊ’w훾…%ôfÊòÄËýjY6ÆBaâ%9Pû×'ìò#{z… BG@–à¢ïÿåµsÚõN„î :6pŽ¥!»"(ÀŠb2—nE¨%·\0dj2Œ×Ksà ݨq¦Xý£Pm…1Á×ÒÙÃø¾)ªˆåXОcã×zÎ28øgËüŒ DÛ~§#Ì–ì‰T‘H?…”j«[¶SàÑi@Á_ÎÝ›žù\·jÐé“‹DN¯jÌ ó§™ä\ݯçq©ód «XcÌÉQfƒÌkÄMê{ý)&<3óàÈt+kÖ ŒLì”ÁÄ\uSx:–’ØÅ>Žz%îСxšr*FâÐi>wGVÇìq!Ùþ||ÎLÀfcrdµOÀçÄ!KV‡\sdÓš eš£˜ Êk]Å7MZ>•"Gç©Œ‘uå™NAŽbGŠIãuÞ_ªïˆ$¡—¡Œ?%™·é©MM‡6\õ:7Ð%¹VÑ…¨r0÷/*Ý@Û:%Ê5yøÅO‡yâ¹!’Çmì-ˆñ0òÎÐmšŽÍ #~Ö”‡Æqc`uÁÄû{<‡â=›é(J«4ûi”¨m¬ÂÆ„#Á4¤”4~®è/´P™y•)ÑÅNˆD§™)êD(³‘R(}¿T”„3†]@¼ô6ÀϽ·m?úJÜpÛúÉ‚ñ]ÄÉty& ÀVUéusþ¿Š†“EïR‰:%»xÁO$Ýe¡2Öý"¢Þm¥¹Ø„Mé’“{“&ÚÅ‹hñ.Þr²äGCüðpemD <ç*øõ=WT?‰â£‰zåq:ÚY7SFºõɆúiFf†s"÷^ÞY£Æ¢ÝíÒï¨^ä'¹ÁH2´¢èÆé;{ÿdw×ÙÙC¯]g»ÑÜ:ÚÁpî’¯äþNó¿o²…¢Ìlõ×O·¶Ÿ5ß¼oªHÇàï鉔­Ll×ëÕÍ°ú}rœ~ÏqtxCOQÁê;© ¯ë;Ç/5Ü9ècæL¾vÞÅÆ¡˜ÞŸcD£x(%ʤb‚=Æ.›¬’æ”PugÌj¨sBÉlÇÔ'èEQ>dìÒ(‚Áf.]ºô7##CÝ òøYš¸!:aÁ' juÛ+’I€Ù§65¨¬Æt{VÓ^áþPd¢Ëé@²T»Y¨t;í®-Ã-ÜVûºðß”z!fPMàÔ@Ú¶™¼oüóøo$Ç©öÏðYæ"?° ö]䚬lº² ûŒxå”Í¡V~ÇÐIÇÕ+Œ­96ç‚š– _mX«ÈŽ'7âÄiYÉj…¬\e)"+y—ßWâ´nýôçS`´O§}Ê¡2áÏ©!ôs©Tôº ÀÏŠ‘8kQäŽÉt@f`ŠbÚO)ÎÁÉe¤Ìu+LÂ…(ÄPº=…º?­`ö‘œªœT\§TšpDO“ÊÁ‘t…w½Ë·;¬dÂ=mÜüƒÛÂ@%áÈoMÒ|L®hë6d[ GHiýj9IGøW~˜ÏeÚ) …—C ˆ4•µJPÊ$sœ_ÒàG­w€p~xiÿÀŒðŒ<‡æO*=tdrÁÚ¸O!Šs2Ø°3º`"š¾—S9 yäµ¼ÖwtÛÐÇ|xŠmÛîšÑmi@y ÅQéà!Ÿcô€²ƒ!l“kݨN¥ˆ±‰: q]¤4”Å*ôØÜQiäG¨M^1 ‡ý‘q!H 5ËPI•Xœ¡˜ctt½Îˆx/Šc?¼£ŸK˜3[ÐKº ºþõCb÷¬É¢@-ÀjÉëBl xì*¿n‡*riYûè'ââ%FNˆŒ)$Ê`ALlS¶ÔP½€ ;0…B•ª¸(Ø ¾»óóDr$_Tü<$¤Ùqr@a}©/1‘´2…™ýO cO+SSj)§Nü:JPŠ2¹¥»·¹‹#鯭•¤7)8Æêú©‘ç¤úŒBÏYaçØrÎ¥ãyoq¯,vÆÖyÛ¥>ªýNyA͈|‹â¥Œ@#ÆœÖõÊ+×+0ÓÝ.ÌôºJAË÷jn_pÄS2¨Ðdz­RÆy†B—óÜ$0 NCÞ^ˆͩ=Q\üFTŠTÑ­ì·XDÅÍŒrq ÛGù¨X)®¨T¸ØÝ>P:ß./AžÃ ’Ä A¼óºÁ€¢ ‡}wb¬cБƒ}Œ–ˆ‡•ÕÊ”X†Põ(ßµù\1cr¾g®¸ÏŽó|ÿdËq@F +×%ý¢Vƒ7 ¸Ë{;ûGX®&~ü¾Ä¾Ñ †lvÍ‹0~§ˆÜÛÎCße­]ÅÒIÝêÂFÎLQ’¦-Hª0¼–0Œ Æš^.M¡(­1lè> p|¡†ÔYíDµÛ•Z9º<Ò>x­ñEüŠ8çð¤ ôšl-B…ÙÔ>FŒ–a7XàFçt§Øw1(`g<½d´{¤°²è^Fb•Iìíp÷¤ágÝ>f'Àr:Û=ÎÎ×£Ê:š¸Pú±åTtý ‡û3ó:â G†EœŒ¾»$»Ãñ7ð<9Ù£ŠŠ²áf™Ö’þ ˆA.‡ØL\Áè˜bw=nf lqšeè¼1Ÿ6ëоó pÊy}:kÞ$âáŽ.‡ä†³©áPâ>œVf®ô|pÎËÄ’Ì3ñÒ:]9„ȼ'ŸÞMé‡sÄçÌ0ïiáj­ðî‹¢I*£ÿÃÖX_]ý> êÀRµ|òšÒçzá¬Â¥×7óõ“Þy+¬'ÂÄ’À¡.ï†(ÃoD~'$c#a¯ä¾Z…Š‚ÏOêCÅ¿VK|aÅŸ€…÷òËGG—DFhcÀ";+gÑd¸‹ˆºÈòbÖFLÌ©Á«ËFËÆÅ;%nÔ†3ÊG‚†ÚÉcå¼¥œþöÊrUþUTùŸF@ ßž®}‹E"Ê“º‹Õôá@)ÌúâM;*KF0»ûNS&xN­ ´oî:xâ‘ýÖÚ&e•*¦æ©¡0ø¥i¼°½úÓD“”=grIÔlØö_?zü)xR‹ýü{c~ReJ’Eœ¤Zþ´€7ªá9êo»mv6S˜"s$xQ%¦H‡TUˇüðjm-ú–CM, Y2€Ž%Ê|ªø™Ö€U{ÑŠ$NhSÁ!‡‰Ü –†ÉÎÀ¹CµU—žÐë%õã¸|sx•*ñ•=žçãÕJ9ÎCA‰Ó°0²GeÎA<1D2UZ(±6å†4™¶ÁÂf(Þ®BZ/CÉÐ&[ä$º¦UúP¢ ˜Äõ+^Ñh£èÂtj mGäw{wçLj6øª°ÄXVªV*Õs4ð½q•HN¥²t"EìÙëÕÎt7O øâìÿT¬æ.)>Î Í hœŒÊ-¢´Q@²§ ú›Ì~ŸÚ]Rà Ñ ¢Ú¸Ð«ŸÁ?²anKT6ˆø@²±wy Þ©¢5.Äî–lZ•T¿ÿO‡!GûJ÷ÁuV# v¿@iWy(‘Y­ù VÄÜ1IYlŠ7Èר’øŸ~ѱ¥ý¢^¶˜2«ºÝ¬EÁU˜¼´¤4KÔ—n÷ÿ´Ã*œ‹j!âBtR&ï3Ä@¹ý¢¿-N;H{_„EÁ{ÇÌ(Pó—ÊJ²-¹Ú2è%™uWÿ hë7Õâ™,%i¸•<ªúºò¦Z®^Ï¢³Ã:²ò¿ÄÒ¼ìùýç/£‘Œ†®– ¨órT“Øá»ôÒê¤a@B™vá§1ǃ«©SœF¦ÍôàêŽ.9Çx•âK¿£8nÍ¡uÊ6cYûî3¸í5ÛRôÔœïÈT⓬ÃTêM3mlV&Dû„‘¬ÅÌKg¢Üt•âwÂZaçYS¾†§ZqS§ÐB{D•‘Ë.³¡6 IV)àŒ¨¢»pònDÞ*xÇì²ÜÉæN€â5 ?T Êĺ-¥ûŒbÒñì0—€_ù¸Y-Ð4Q­n‰ ݺžˆ¾—›8¹ÿŽ|@®ß›<ÎÊ´…:S> Y%òævúp ÿ}¨~Pùì>ˆS^Üò_õò¿ßœž–6>ˆêééZôý8,ŠgöþI’Ú¨ç{B™SR€øÐ|ƒAVI#Õˆ“+‘v«ñRSzÌd~S²òOh¢o£™$kI$Ïí!lÕj«zxtðü¨þkü²R™>­Pº\–¨±<"·Æ9jãh&­‘)‚Þºo“P@Ñ™< (8ÍÆaý¨~|pTÕ‹üY†i]f'Œ]Ž3 ¡´1Ý|Ý*ÿµè¶Q-f–XÄX·Ê1à¤Ä¬ntÅKæ™iÕ]Ìqtü¢2}§Î´I J¼‰s¢ÑÞŒUqOmLY­ëÕöP ¶ :HÇ$ç’„¨øÓÇ,[n(· *Þ4 N'VK^å¢"ò‡,½ˆgè@“åŸá•Ü%ùRv.Õ¯2Á]e‚Ÿ=;‚_ þHñFÒ°y#q5Ä{ËáT®åöQ¤1ÔìåLæÝ5Dó@OÙ¹ñÖÒe“6B;·Ù YÞ ‹¡ÌÊH0˜©&kßtÛù¸¦€Ì~±:“f‹TLiÓ9—Î*ÅV?ea—=]Û¿§¨¨ •HñŒvb¥Rô&½&*7ì!H¸ƒztiéæÏ??#x‚ªh«„e¡îÆeæ¨Ï/þPLNÓ1â fd¬¢ƒ„~?ƒC]›ˆ±¯ŒGA× Uöä½!]SåÂl±vθnìÁÊ»}?ìáõÈÆ!s‘fîãò5/.NÕàü?Ì<‡~W;K–;›šNOóõúC¼o6 á`"–Êø€¾ò)fX¢I¨å‚®¦Õ}f¹X'Ê:Jø))ûÞ' —#ÿºÚ †êú}ö;íkj/c©ãårLÃî<£XW&³œ±Ô¤¬ø p¯È°’òÝì3Mjm­£ÕO¼1õò4*ŠvåÇo¬’‰w*k•µXx3½ß¦u6Ï"F~Ty"‚þ Ìš†ÜÛô—_QòÛÏMþ3yióàt·í óÿГ"~ÎOAŽ‰§øyŒª—AÏ«ò%Ÿãô–åã;n¨>hí'$L¤¨t•y ¡BâgBç›xÛVOi-ÚxÕEœ œÇzöLÒr€?ÇþPú]’cc1þ1kjk<(»;r¡Xzh¶,Ânp‚ؘ9™÷~èQ2wñøñãÁÊó¤*︡õ¾HÁP:®ß¥ GCÿâ’ PÕÄ wôÐ0²{ƒF° œúì`›5(e™½öõÃ/e®þ`¶â°ž5ñ°r-miÖÄÒac…/I»ÏJ3 MãÒ&²S“³gÕF÷€áÆeÅ„0ÊìU­J/ÜÚHG2}ȬM7#zÍ¿ÖŸ!gW¤,£^y{Á©ëØ•c=&Ž†·»W´Ú«Ò{ÄaÇÐQi”^ù£Ö%qÕbw›1£üpýÃrþùËå ¹ëçaÏà[ã§Èª‡xÇð]Ͻð[µ‡ëås¤Ð®Ügè}<€“¬É&à]ÔÈ>éÖe;ðC7òä‚‚W5ñäѹ1þ•"àðCÃ~òÈCiò€ûàL¹çÂĦÆ}˜¢-)¼×@?Î-ðeó  SØ?,ŽU½žj8 f~eÃp˜Æ©=ж€sqÝ6zù£&bj¶‚N§’ã âô wÿÄ2Ñ/,˜vU@s„mËJýö0ðÛÉñJ†¿ëìÖª‡²lÜáÓ…óeq£×;žNÒjLå»Ç`¤nÆè”ä9TŽs(1îsþortÉqdIñ‡Å%ÊsÎ!9˜9${QZo U”±ȤAú¸0+IRA^¥áj ù7sVÛ5Âë£eÇ®€ÕŽCWŒ¢”ñåÇPV/ø —½¨qd>È]ꘞ汇ZvÏÆ ©¡PÐ÷í2ªüËpŒâ`àõUŽWùþýÊ¿ÝÝ޻ܟËä{2Ù0g©9ÿÆuôøÝ>vŽNö%P#ÖÇøw æ<ƒî83¿ á)ªÉ©Êi3Ù¼üPíÁ&F¸HKHÄ1.Ny<Í-èÔ"B§Ì™¸ƒNóùœ™ü¥íuÂÊ¥(‹Ÿ~rê[ƒgFF¡¤ºŒÑ–â8§«$ÿäzSy©”{ †ðЇ}±º™û˜cˆ€ uúNëúÚ¾“z1/=ïóÆ"@I±T8xú¿Û'{‡hÔÌÁS²Ìç`ï=`6$T–å¬æ†<ú"ÅëøøÿÞ(w(±¸•!%: ÇWNélj¢Œ„0’W"Ô0ð„“aMÞ.…©ãú§8:“‘ám®hO¤ÚÒ&‚†gܬÃäZÕ¨¢¡ÎÄdFDÞ†níŒ"ãUÿ€ƒ‰²\VÅ{Ji)$+Ïι>°MÚ.߆&êåWÄia½TÚá[`wkè¸ôQp”½oðUI‡Æ[Õe0IQüï¡mc²XY®bh¶× âÍòåUËàSµ½V_o¬,¼AÃ,x®½þ£öf¹P­Êg(,ä§|þÈ€ÑÄh(Š§ý¢€ÿ;›¦³ƒ1Õ¨š°¼Lˆ,=3Ç!/>M:®=©Ý”@—am?$5UB}p¬_驸HÁîÝ{o%‡Úœ1äd¼>ÅÂ5å›ý“XÜ  NMÉmH'ïóað?±^k„¡ý®6êãþ”ù„?®‘m‘܉ق<ø¡Ãmö/g/ézKÞÇìy^.Ë)(óÈÞ”' {5ôz°OÛ|sxÅ£qÙ^ ËÁÀª<±°"dáƒó_IaÍ¢Z´ŠKê{#äJw¼¼ä&£ÇËqÒœÊÕ§TCÊOz>£Ò3•ä$î{£§Ím±äV@*E3%¶ú§¨Z3F†ögݎã¢Û“»J4SÄÒ¾wá“¿Y<”ù¹ç;ÏNÆ2LÊ%ËöS̹àåÿc†Y·×åÆѻۆÙ3ÈÊzÒÜëÜG…6œp(ªã0kY4ëñ—ÈŸÍHÏÌ[ÖäºjJ“bDûõRÒÛÒÑûÙA¸®<¼Ó¼˜²Sãk2£ƒxÌÇ?ŽOͪi¬›œûÝyˆxÉ¿“Øoÿñú÷9Iâdå©á|-¯n5÷Ym¤2 á}–s¶¨B› bŠVuÒ5/®Þ°- dé6•Æè«šèù) Ä"lÁ6±ì]r´—×Âö}pd?á2øÁµ¾ ¦EEÚÿ(ûLø2DQäÃ[R˜:Íñ‹I#ÐsâLŠã&=)GMæMø£^ÑßÊß.öÝß` בï¼~š–7Ëaß×îmÓÕ‹Ì—eIÕþÑÉ~d¢›CM×ÃÒŒ¶Ð½–¨ßÔòé¦Ö3 (ó(V“±9ä9QL1’Öx¸¼wH¨Y³6×í{-Çï =gæ7*“iDåv2`ÀluL)œ2º[ÁÃʺ~~üŽl#Йó ZÀçà¨Oöw^-«¾<¾ZOîuÃöÿ ŸsÿˆnFšDEÊ)ŠDÛéCgH±0ky²m.XS §’ÏÅÉßó­­ˆìM]Èþˆ[Æ«Æ–sxÔx¶óJlìîì6ŽØÖÚ\€<]±©Nà2vB]#g§PîcÔËì°“Á`ÓSZNÒ¸Œ¶ÓäÞi d¹OK#Êxe®LE8Ä„vز Õç€bEY×´¨RÊ¢`„¶ÊO¾,Ï‹¢t XÜ@ÛD…½Q£ãQÐsGœpB-—º?Ã{"=ž~Ð/{×~ˆ÷›¦ÙLÅÎøžË©´>¹(Ð,e§Å;4í‡J·´ïÐdGÖ¦–¡M—VøŠ ¨47¼—VØèʇÃóà á4ûqÆä¾~A.¤"®FùZÔšL¶|ãÊ£ |î•#:6Íâ¢=vg“H=ÿ­~´¤§!6˜ŽR4é3׃ƒ%tvÍe‘dß䞪ʋ; bh§ÐO;áWlïÛxcѶeÚP5è“­‹ºL`!¥ð‡av‹~¯çµ}wäYY#U«Vle·3º¤&á°Ã‚ªYÂ]L5ÌZmìLëÁ¸¯/oo—ª"hj¾Ð”2œ\AíyԲʧì^¿˜î2a³1dQ<ÃTæO]Nÿlåù¤|U2í”i g$t%vÌM`¥Tׄ•ÿ4#¡Õ„~¼ë…!ïÇÔ~ˉÊ4ã@¬‹ÍSwåyü¶µÅŠÚÂxc[Ò–E¿TÖ,»Û”„ Ÿw·£ôâ¹ ç92džè“™…L§‘Æ“Э7ñ˜DÈ ¿u}]K秕LïU4Y¸¬L¥°ª;"‰øãÀÒ8ylTkáCk0ÖqëðPà?4eÅ\”²©FéÂÊ-ø*ºT©„Eî ªJ× ÒL‘’ ´ÉX&ÆRjjÈÚø †\£ÄRïûm¯ 8á;«0™-¬É¼UÖKeJŸç—¤6¦¬?.ÑB¬ˆ|?Àó%=š˜ö…äè2±ç ÌG>#½‡ëÃ2j47Úk«ïäÓC|šL?Ø šQ`΀6E%>¸õõ¤aRISFÑôJêâõüAX]?ü±¼üŸéQ&!*Ú¶Ì?«y]ŒZQÒ­ç[Ž:ØêD†·iu.F½|—˜W’íí.üw`¥Ú\ÐÉ{ÈB,¿Âv‡¿†u.Âù»ü¦8~qÔ¨o7Õ(£÷üü2i‡âÔ!dò"í2q=¿A®d‚:©š%uâTªŸÑüN¥µ¦¸—} #{l€ÚÕê@ZgšÖ$ ÆvÉW°åõ‰$6Ñl«JÈ3‚ﶫgÑH¤v0VCM…02†±–4J ÓCq+FmÕÕ+ {f¼ßTažµ÷–Åü‚mL@0ÞÓª‡›‰¾wˆ²g·Œ Ê'#±*ê`Ñ™QÙªµ©AwR¯]rN¤ Ã>¦iOžV}~ÀÖGLJ§Ï|¨(ü"ò‡²ecWžåab/×®‡‰Ô¦úâqÚgEeœ<Í­Awâÿ&O±.6óôê›Ó5Z·£~¿O¡\(™~V1Íüývþ'6 ÜýØ"¼}{…§1¿Žüî8úq“Ã߃ËÇ¢ßAv ëùΡß¡­{'œÑfóoú-JÅùöŠ_ ~çÀ±Tïµ›ÌU.­§±Ê%ýIÈ›Dž›©%±9ã–æõîHqâøjƒ—Û•äç°Þæ(ÈòíT qÈ1â–üÌŠ™ÙÚú*Ÿùù²G¥¯æ´:LJ8‹¸×4Ñ^Ö¯bÕâ.¹ˆr?ÿl B¹TLZ”B‹ìBÛP«/+Ú| ÓÏí]”Wkœš‘c8w:À“×hŸåQ·§Ì…"Ï•„yà’jdª>í#VÌ¢ÖY„::¥'…ŽaLÀ!AÚEéë-ìH$T'Ä(~@ Ê]ùf µÊ¬—EÀèÆRV2+ßž awøb„tC¸Œ¤|ÈÑc^÷H°N"Ÿ»Ç5x C~ô‰Ì€ˆ: (Ž¡Vš»}A‡'q6'¡G™]µÛ >ŒÉ-ä5I½ Hç®`)F0Ó2Œ+PíQ¨s‹M«‰W`0  j¦¿ñMƒ)Ñ ¥üV^mꜵ´K¥Í˜³žì_¢Ô >|“=ø&ã ‰…Öq–Y·Oå„Çh–Ž~w!×YƒÉ ß“Š«ÇÍõÔ5q sk,„E£}”—î„bÀõOÊJA€áQÜ'¬ßcߟ˜¿yà5@qìŠnwpéš/¤³Õ²ù¤ù¡ñ&â{£™SGȧ°'¯IBÅZÞ:hrê:GÆþñQ}ÿ8»Öm9ídkM}w·±ëìÕ~ÍnÐ`§“0xÎîÁV}×h[Ù€fÆÝ—õ£ýý瘾q=èú-„Óº³¿s üA  Ý *HÅžªœæ“¨LMÜÚúæÇ͸(!þX`öÆõ§ö¥¾óYzb~¼ý’“ŠýÅaõä•X[‡ÍWŠÝ!½¯¾ÐšmÍç‹>y.)$ám&“Úv¶œæÁÉÑVC¬ýøããÕ'»·ßç5¡éê×}~oû<ãtt8ÊúoDâ×Cí’ŽÌ3á ¹ÁJ.wO»jõ~vUù~wUù6»Ê›rƒ›B¿ûO›ÛÓ·µze¹vúk}OéŽóý,ÊšIë¡ŠË~·éPнUp¿ñF¢36rÜêé#듧wÙƒ‘϶w„>•ä=Œiúgà.q3Qã­Â ÖSúÌS8Ó?oùw]–dm¼_Ö†•Ç»ÍÙ–TÅ[š°’Ï÷O>/u¨iDU¸ã™ô…tÍ_¯¬ê4ðsœL%=û㙶Í}M¸s8ß“É!˜«aºhNkó`·~´Óœ>Ø® ¸¸À NÔO¹]Òl—ƒ°¬?Ÿe­ê®öõí^ ª…$`¥SHüW>šZuœÁp Ófçh¹Î„ËG˜÷åÎþÃõÿn4”)oU¬?Χ#0Ê3"¡\ Á¬l¯Z.”6³ ŒÊDà*˜­.Ý4+ÃÚh8öR—(~Ñ=a…¦ÓªEq²I3´­¸„ð¿`3•ˆsζÌ96eº·ëG0ãÓwÄ?[ô]‡–­´Ô½òºÝ2¢ Ù¿‹m•`ퟎB¼ôÓQ$;SåÓæ³µû —÷Ì^ßu†þéM Á¡Ø•ÛÙ |´H—Écð®!\AÅ®æ¹áxH™ÔB>”\}îy}JR\ICÉ[‰oS™HÓ.n2sš?T½eïö_­m w-e*K^š«4Ó™ä-yÊMŒ¾ I²µ†“ÁÚ7éø¬&¨| L¿óÆ×´«rkofØ÷¨ßDø¹K·ennCÓn¹Io¿AT5Éþ²#ÆGµ˜ó1^‚¬^2Èó¢Øé @vKé‹ q‚‡âînå^H±\Єµ ê*åíno‰cT2—Îï7w¶ØÃô6eS)óøöéQÝÙ>ª?;^[U·P¤FjaaqŒ©÷":Ï"Ór׿Î2²Q¬kB¿Ýåü*ì!…½L£¦ÔŽ7öšSd«Ûã,ѯLåšÌòznë’"³­£±Ôk|íšp½»ÆèÆr ñÓ_®ÍÀm½u/:iÔŒßÏê»ÍF­¸XTæ8VA|/ˆ#É&¡EZjÝäa¼ÍÃÌFSZ=œÜ¬-O`ëx¢èÆmRw!ö:Ñ‘´jÜÔšñNYG\¢O/¤»d¿Mô(¥w(­Û<§ð‘*¦qB—~m²~Ìí!çy…Q”uèÈ’'ÖÔöÎÇÄÜ —ÎDfö-žíÏvvSxÇc¼®}*.Šƒñh0ar?†˜|™¼’ogF‰^nå—ìz²á¤Q2æùtÛ‘hÑqMæ¹’É‘™Hü³ZN·œ+—ž°Ü‹>Íoª—bQ­'-šÁ|î6|\¬wY¦Óæw¹v®%ÊxG³ó²ñ ND½žÚ1zO†væÂ#Žø{´ü¸oo‡¬×ÝÖ$…r~ D‹Ì¸¯»[Ž/ØR¤Íþ}à¢v5†!™ˆh½¿,œÙÌ$0-þ‘ÑLa™õ9FØô•ê«Ý-}`X/çE² )µ¬p7)ÝezoŸ¸¬Cm‘Ôü;ZoË¡ÛóÊWn—PBGøj¿ë<teþ ¸™Êjóa»}°ì€hÓl8ÍãúVŠ`cŽ ãhØ–éÜ®ï’ve{þ_ìÖ-lØ'-º)»Ý©¡ü›ð<О¹åGC¿5*«Æ'lÕ™aÄN¦QPÎárŽ*'Cubj/9`}$½‘Ž@ZãDß ß³r'ÖdÉÐU ÍyÒéæ¹1€ÍàõG–Ïz¿0 ÆÀ‹Ì'ØI&]ËÔfï‰8INKì‡mÈ˱qÐ(­aÚr}Á93žÌi,“×Üñ$Î<‹g\ŽøY9Û„ÓiIÿÜöÈOíLêáŸQR»‰ÆéEñòWo‚ÅqéRÄŠvW["<\'—Ì™Xº®T EÏCuï?yp°Ð¸¯£²ÌfxC*Ê»;¼ðËœ–”Ü´(Ne=d;7 ûIoEìŒ8¦aÇ}ëɯƒœv=Œ®1€è‹´€µo0î)OÜþÍ•{C‘<bÞxô4ñ9_%ßÜVröýô3®¸-O²Ûq2í.Ú'²ÿQ»;…©± OòSjw.ü “`®¿ú%Íå—$×/Ó#Éø~¾HÒ¢ÏÿT¯#=‚ ®FV™lÿ"£Ø§"K+ΛW{i>©”ÐqX¤V Q"aë¸>&E±?öƒM xÄK[åb¬`ý·ƒmgëðgZsÓöÛ;R‰ùé´zÊéeûÝmñ ÃeÈ„jh¨­“·ÓAáKÂŒà,1M tºm Àƒ»hÕÊ/»+ev9Å”äã®óŠÍådˆ ñEu*]½eëGÏÇNcëV¯äÓõQU]FÍi†‡>žÂï®ùø<ƒuÁMaµ}ÈËhn» ›)¬áÅ‹Ím½zŽÚó6‚ øÕ~P²5V¥Ôk%¨‘¥mBM»Œ…Ä|§ðÞhåcUå…+ÅÔ ªê1l/~8žJ7ÈÇõWbBpƒÄ-ÏÖáîIÿÉ|úMRà³ Ki/Vž'x¢¤4O³‚‡æ5J±¯º½lE™­ô.šA˜JVJDhÁÿš'‡[µüYðMY/v€Ñ+c@ßš†QqÍÄgI{ “‡°ò,:ó#jE ùÄ ýÜŸb…Ùô]¾²F%„Ú?À¢póQŸ í[õÈF¬ üÆêA¦ñ§ÖÌÉ8o[2œ‹äÅ,–ê/·˜»=â`+ŒÅ–€:þdÖµÐ(3̉¬51Æ —™9À ߃Záýa}ë×úóFÈ™ ‹òÑã +ªÍIá,xƪeÁèöÇ~ t*v£'V §T»AðV¸”»9b¯>8ZQW¿à-k7ô IÁ±@5 €¹=û¯ P‡#Á“Ú‘ "9A¹ÃmŽV$ 'q\î¯$À(,M‚†*ï蘟Vú¼ŠÑ13?ïhÇs‰¯^·,+&èF›ÍSd¬Á¶Ò©©ˆ2ä‹™Î}‚ Í´CI[ÒÄ iÒ¯ù³LR&ž„Ê:3DýÛ;?ôÏý®?º©]úí6ª-Yï Ìh¯w;ÜbJ¿¨Ñù†QÝ”£.Sf]MÑÍtÚÐcUþÞŠ±¨ûw?)ô¥”¹—K¬‰Ê³õY¢ÙÚ³ò6àõo;ͧ;»;Ç¿;/v¶·û@'¯˜&c·V«¥t2]«–ZP#¡Rð!L9úÑ8zR6ã!¶½[2(w¥Œ…T¸Íf†bm8¬¥k³’ymEOÕ^±íà5Ùy+_3ø´¹]­cOtìqnh©TM“Û‰ÜZýP%sžÕqù¾ÚQžk‹ñìó¡˜#Ò~g½òú‡ߨˆ›‡G°I¶Ÿ¢nÊs‡¤É¤¤å@gÖ+?zk½ò#Q#²Ý¡×k«Ä²ýઔêK.]ÆÖ;ªçéÉsçÙΫÆv¶ýis—ËV4ň_ ûÞ¸¡Â<}uø›ƒox­åK]?=|Š‘õ”ÞQ(åEk½œÔxv«åpÜæÿáôÚiSz²Ð|üPÆgF]JöDÊ™­ÎÑeÃ&^_37ô.BÇï;t‰iV½eÖÙDb›ï‰P$•ºH$!¥igd¤ÜpŒ+&©i¤ˆ Τ¯±jlfs¤^Y’&tJ9Xj¦ö£âºq΢ñÖ£ëÚÑ¡çQ„ïWÆ«c`'žŽIê>½8"Ãvt¢ÞÇtïøÞÃç[’Öhì¢Ã¾‹:m 3½(û¼fùÊ+ 0VóA¡OÀP×6>hxå2îvÉW SÎ؇ú°éó½L‰qýÀiÞU°çõÊãUÌÚFB)Ø­(}<¢í0!Ñ9%&ÌC?ÙBý,ôCX«sot…~gØp‘€uü"9þˆ \a¨q¤„ê&ël£ÕºÁ f¹[¨(TQΣȪZ×ï˜ ŸÔEØ ìîÌ°bF/±Cx9 ä3UøTš¾w¥¸qõŠ‚‡¦]Õ[1{}+`/ÞØ$Ž—MÓ3G$>mç Ñ°'Òζ@,R@å㎟@ÉdðË¥û…oèÑ“ÇÖþå”:9n8‡£½fsç`&+òú³Ü8Ú98rè1Íþ<[©tÑúOYqJ5KPБgV/u6-ëšë|J‘¼44žhñù|ëæÉááÁÑqºO¶úÌ¿Žðß>ÐÍ)Z4,êÈ¢³+ÓÌZ‰ñ¦Âþh_‡eŒù¤ÙhîâÈ‘nù‘(õO5‰d‚HZÑlsdé˜UÈD?xŒäˆ”æéÉÎîñÎ>«ã£úVc’;¼q2ªwGgù-"ý¬ºCŸÁ¾ Cx¤¢‹Àh%Í™éð¹L:u”ŒÁbÇãîNŒ³› °{/‡Ä&¶7Y¡†¤¨Ü zþHZƒ¢isMé¬Ð&‡µšñ„ÓKà?|ô˜§ýˆ—ïaJS¯¾Ecq\צ kG[…Äß'lCR+²…HzÝD×l'Ÿði³ù$ݳØëDÇÒªq¿RkÚ (¶ÿtÛí¡X¢Ü;ôgîmÕ+¹ÛÚŸ"È©v§X(–\h7¿Çcã>xír‹áïT[8p¥)ÒOín§Õ¯\þ;Kßžmw¿ß þØ·„ŒC‰»¸”ϯˆïð[ ÏÕû¸oæ ܇íùm2…ê¤dµ¾YGÜuìó4ÑŽ±íÝúööÑdYq¥þ›ïì‹=¾: Q¿‡ž‰äHŽùýÐAƒH£¦š9‚KÏm{C§ô/†^×pü͇7aµ}Ayœq +—ðŽÏhY¿,€Ó*Q>²J1Ÿ<å³!$ì?Îã)ÌÊL½ÏŽ·^Ô7XKœÜ©4³tí’Iä‰AOèâð%§eƬoxŠ“)ÊÛäѯ¶JyÛøÃQî²t½ Übåƒõ˜Û‡ ʾÚÞzõ*³˜üw„˜Aj6.q/ sáow؎ߪGÇ‹YMÓœOTŸüÇ}ç–mÝ®R‘NÔ`qÇ,>³!Q3Ku”(8]ô¿õßêγýúîοëÇ©Z¶‰“À±mÊã~+èv½Öˆ|Á&΃Œ†cÕ˜y*Ò*gÍF¼¬/yB&{Q×öv¶œ“ý­ƒÝÝÆÖ1&8sV†ÇG,÷X-2qBTa‡ Ï<±z›q#Ô ø)Ö¦Ùª®éjŽÛ;G0KÎljQ„jÊÖ õAä”ygPßjhG8Œfxx²8†·´SÂ¥1¤)cåQf„ÉT^‡QÀ—ÀΉZm?lu]¿7§T©™‘IUÈÚLêûtŠ"3oï4·vë;{©Ã37 âð4Ÿ`‚S+2œ^wJR½.^Ú–9ëäÙ§’2ûòÌ+`VÊÜËf¡é{s íA.Û¶ó|N4»„Sþt‚ii¹ ƒgªQ's¤F™é}Qß߆õ|v)ÊŸ }Bï8ᛆLÔãWòóo)ùu¦Ë­æËÙÙë9™ašxìAOH¯ÿ|gÿyÖ}ʤ ¼Är^ëi·(QÑy®R¢Z›±±¦‚ž)¶Z½Ùl!ÛÓœsôÆ}Ì>q¤\fæ!rñM±w²¿W?¤Ð3Í»Ûf6ÞôqsM6aËOXb•¦<]“2ÕçÄtS ;Çã>«ØuƒTI¿ùC4ÿ¨çbpʲ¾txtpììì7J¢ãúÝ0«‡/‘%8<_g “&qjDÄø\L,KòDñr/*5V¬²HiV©¢ëF'„߉þͽÊqýå?Ž¬hðkwç)°=úÜ5^%ŽÜxq>m5¦´ìsWÎÿ#óÏ ]I?=¨ãu温N«¾)ÒßkGc•ÒK&Ñ© 䎌³ûôõ¤ÚoóšR‰§6­žšÝ:É?â`²þ?m“•Š$Kî#}Á·K3< Yú‹Oµ¥E¯yÞ¤’€J¦õšUP“ ج6g²a³jlª™J~ª‘v$©âÌ1-*ºÚôÃ+ ÿÐ,}`åŠ;T»¨Ñ¯9ÃX7}×eã;8†¤b†lÈ*9ÊTïm –©?r¯ùšQô=w(Æ}ïz"]m`ì)ƒ6ó$·%í¹=€Öó\4h 颛N¥÷Ht|)³½RèöxHéV[@‘Ý.ºðú…Wr2|BlÖ8¡«ü/¡ÌòúïœÃ_ŸK^ÄuâÃ矔¿ÅA=ì¦3•2R¥/Šú޶ؽ©ãÑÐ1¶ñ*•MµjaŒ’Ï“=àbËE <65¼º=^…ì8ÌrXÉA—`z½1Ü&*Ý°ÝZaý– î‚„0EÅ­Še]¹\ÀàhnowÛÎ>Ï_ŸžVßàÅÖ/üXÒ·´±Vky£r}Ð<^ C¨ u|CKÌÓ- ^œG¾åÐSº|UnfÒáÌv6ã Û”T‚lóðkŽ ó¨°C儦S‹kä14?ÖØÍMæëö®=Òw#ÈbQÈ+ãÖ˜”FøÁë‡ÄM² jä9rdTh [©ªe+M&!k'UyVMD5ÞÉÁÞéˆ?boä!ýILg.²À†¢FÇ ©ã±åCôDÌ·`âYìjÁþDEâ÷ýš:*]¯Å¥N@4Pø<™KmôvY»ûÛ­ø”Ü…tÅaÍFÀ‹’OúJÌæ#fiSú"iÉm:al¹8ÇbcΈ\ “vC‰Ÿ–à"æuJó5qm „¹þ¸ÆZLåÝÊ¢#Ë=@264·‡ÑbÑQ¤ŸÞx£”›ßøeL¡½¨Á|.òµÌ¿¡ï?îU2ì } €8Õþå6ÑÆ’òî×û1³ñŠ°VcŽQ§”C†ÖÇ<ÒOÛŽ§ç÷ a¸ûk«•+«¹…ù‚èL!ÿ‘èz.4,áŠB¼¥ Çż ¬#e“m-—ÝÕ/C-†Z΄¤¦eá¾ýIhénwâ&\X°wÕ«fŒ«‘¤0kߎ Y ÎÊŸºàvL€)mNd¢‚ÖªÙˆRž*!ÁîÆ'ÊÔÒêåD¤»Ïä8cñaLgé©4¨ŸybNmôó®ýýþeØ’ÙCqš–ä5®åAµ4Km£r¾$Ö¹&PŒ½0k…_rböÞþ”º +«S[zðk(³ Ôs–¹ gvÿ)r©Ýa+Fà0+HÕ9ò‹T¬Òä¸i˜ÇÞâu >NŒoã>`¯ ƒF§ÉJ|"rÉjñ:_ë³!­@ ­0\ÓG*C­UˆJÄm#î™æçæ8ßV+뫱`Vtâ…—ÁpÄù-BGÇH1'cza¶¿Ø*L¨bMÌ‚Î-4Žªqttp”Xn¨p4†²šÆ¤cÅwkgvH­ùZ¾mS07 ‹âpÌbbÖçFªk{èüzA¾3¼\•n@γCRŒ£O/æv]“ÚKÆJºæ•"úd#§D`/î›-™Ü-\ƒä¹QÈ:Q¬Â왑N#rŸ*\[.ÆVR‡§,¯…ix;+Fì‘Y'ž}¦žyÍ`éèíü3ÆÞL¹ÐàÍ›[Ä{ˆ+O&ôó|ºw1o5ø’C;;Iº²"‚NK¢ú£3îŠK´ræ˜Ép¬Œ*Ó8Pb@1ß7¢ŒÆá°…ò»]jÒ”Än[Â(x ¿cÒ…Éá wF6ƒ­ôSrßã!ÚºŽ0Ä€ïxè•ÅáŸ1³¥Ám¡·ƒ¢ª0Øû–,`-OD©ù™ä¡G9ÄÎ'Æ*‰µƒÙ|†V˜Ý›áõ|¦"t;ë³ùáÑ¥°õŠÕ*·ÄcÏ*_ëM»“VÉfíç”Gn³Õðã»Ø|oêBæoAíx æ{íôž¤nÅòNai Š¹øQ²±½ [@¨2¼RJãÐUNezϱ@0L‰|²×&Ÿ‹Î¥,F´3¯uÒ«|2W^Ç“_ü~}û`ôȼãÏ(’zç? \d0b2×Ó„áRòj&|gömó”©7#ãÁ´o‰‘eà!eÃì%*wˆGpðN6”êãØsßzt_{Þ¾*_´*ƒVÞª‡Á1‰UU½Ú×@Z¡àwR©‹Ÿ~:UF(â“¥R#¿>¼ô€ž†­¡?q{ªJWVÜ/!^R˜7͸$ä_¡“¯2ÉÅ» ¨v£n/dÇ“†e„ˆl>¦¶Y(ˆàD°…×éø-tdDÌh+‡Í—Äì“j ŸtG˜©0¼Dûê5'cGmô¡"ÅXDœó’Ù˜~€3]2KP™wÍ¥q)Î9s d¬Î+5» Y Ð•¥œ¾ßXýl‰V¥Œ ­–û¢Vÿ8]zí–ÿª—ÿí¼‘«å7˧¥Ze¹zºVÏt0 LK@»µÓBÁêzþ„í-.q Z:>ûÝÚÆÏ(84 BQÄ›y‚ÁhÅ;O‹Z \oUW-ÒTþ\Ö7?FÞ§F|Ì:0ó;Ïšð/Í æÞˆ>>­7_8õ£ç¿ÁgzfŸ¨ϹW³ªÐdYŸ7y«ßñ¦åèAæbb'Ï–P%3@×ú¢(n ]ô,m•uÙÓ(pШT„Ö<&±ŽƒÒå¡Äz$ön»Íïà (8Fc=ú©aïŽüј Üx‹q ÿ1×}zº"7N[“_T|b‰ñ§¹…|X-V‹X¹X¬^l¢àÛöƒCn ·Û÷Þ>Æ߶€¢|¨žž®ÕÐz±:ˆâÆë9‰Ÿ‡ Ê+p~#(õ,M†t¾‹æ$6ˆ|õYúZ3»¥×].q$/W¢•YHQý#:"ªçèãÊïáÜëzr§‹ ã™ È5¢8/¯ß|³S*T•Þéšiu‡9¶¿«*¨º„Ó‹Õk§ëe ¨P”¶§´WQˆhû´è¢ßÄþäEÄ°Dê?ÂZ%Nl*%žÖÄ^Ù Òœ˜®­6Hs¨¡Ûf½3Ó°ñ íÒÑƽµH§U“k<Ñ.õª×ß ?¯=;*Íyù2uÌ ÊZΠU&—…^^ÕêBÑCÇh6¬€{­÷ŽŒx z¡ ¾û.*ÿfÃ$…´ß¦AÇm°`j3£ºÐÌKGÜ¢ZŒqO{:4f^ɹð²ÆIùh«=Sè)M Q`AsxRjÓ+º9–\½4Q̱µ Å9丄‚Œ#økEÃ4^Z€÷µbá½´{,ærÛgÍZy›<®¥ç =@æ’iBày¤Ôr’U¡øy£çàéÿR=ÓŽÀ§ö7°q<ý>¥¼]kqÄ,62@Úb…„ ™¬È\wRëãµ+òþ‚„‡ðA§…“ÓJµRÝ„ÇJP¨Ê‡óÿÀcQzN×Îl» è³Rô‹aåϨOëq8¤Ã‚G³½s„!õ‘øPè6’&®­UÖV£’‚TtÌ@#Ý”ü]¤CbÕ°œ+.ù- äq| JNéÇ0–.ô#Z‘§…÷ºµ4˜Ã·?ŸV{4©~¾ºA‘mhd·ïd­\n÷Øz=Òn¡š"^c$ ’zqðÀ aþ"ñg‚¶j.8ñÀì¶UOÏ »ucà·­Ó`Q¼@+0•ßX¸çLyèîl«ãýÊõ‘s3À˜·W9M°æVRáŠÄ‰zgç4¥pSà ±çÈЦZËa¼J(7âÅY§‘¨a{·ýE>3õýcø_ãÈÙ;ØnPõt57¡Aûhô6¦†Åk“rØäÓ|¬öiž•å”žO¦A¨äNB2KB.ÃG1\±< ë~ÿ]ðÖ#¥ƒj {“TÙÚC¬ïm7ÓÆŸæÕùìƒÀµì¸(Ô¶¶Òc™oPVÝ/:¸W¯¦ÊÜ~x¯^}ÙÅ«7gX¾zó. Xo~ö!J uúÐÔÇù†$k}ö¡NËáísø¥F#ÓCOS¬Ì|#³+öñAÛ×'Ï.2ß謺Ÿ}p‰剱%S•Ï<4³êç?”¹"“‡s2kä쇴Y÷ó/›•f0¹fvÂÁÙLÕûìJ‹—Â%¦DÉ›ƒK´jö!¦DÙKŒ0-ÞÞÌ´+öñ¥PI 05”ÊÌ#ŒÕþìCŒ9¬'Fw]Ÿy`QÅÏ>¦¤³xbX)nã3̪ûEl‚µAêN²;˜kAÓ}ö9ȲKH >ÓBaæQ§@ø ÃÍm0ŸBZÉæqýø¤Y«T­›øyÔOÒÝ-GÖVÉl¢ -³m9„±·Wô2VFšUD/DÁj4?‡Æk豆8!C©<¡8ª¡”542ï°‹Rœ‘&Æ=ý@•FùµÜâ7¢Ð|ÑØÝÍ-ŠçZkv~#¸}¼?÷#ó¶E NÉ =ãáÃ.ùã*QbÊ¡Æ£Á˜Â˜·Ç­Xp‚eŸaEŽÕÆTÂc6´SB°a{%—£j2 .RèHó ë]}éT°rí4Bü]æ™ø˜ó®)§Ï όޒ˜ÙÓ SkÆÒˆþ‹‹øiïQx)vÐÌOÇ`¬ÈOYµ`ZžÂFÁP®Oƒñ°Ïé‘\ W˜Û>©ï‚lÞ¨­m ÙõJ,ÒôîýÚáe,Õ¿›/œßG˜5EÞêaXòzã..pxYʺpÃ+] mœNvw·ö¶k¤ë>zåG•ueKIvBÿ†·öm]DhîYï×ä ÿÊ\a[C‚à³Q¥£œCëÍ1ÚSW„Øæ”t)É T×òQ¾E ±X+âß"ÝŠŽ‚ÁƒW=ß=xê4Ož6-Ob²¨å dù軯åAb¦"6]\VÐK}s¥¿šŽ¥¹ݥ׊¹¢Â,z‘Ãiòû4 ®@kpŽ†ìrè†hh¥2,}/ªãpX=÷ûU²SïTr’NÔèÞû3üWÔ-*5íïÜtEB6<~‹¦7d‡¦r$  “e»Ì3¢½áŸä´i«!™íΖ‘tO{+ kašÑJê¯ð²bŸœd°!÷EÁØ#yé̓›D&0>£ˆ2F²ÑgÀ™Li,æ-œ2OT^DD1zïô£/}úD¶þvÃñmx§fÀi?­Yü¢o¢ŒÍgK„ãÖy•Ž* $ðÿªM{÷pŒÏ–ï¸lïÆËÍ[ßØ°÷†89ky\Ã+eõlT‘×Êîð¢VXÛ´­†¶±S^v¯­UKPÈnK–ÙÌ- ̳x¹Ê2Ð];³¬}ôsx¼¾µ…ê ÕàF¤Çg|Na?”[Fè*¤ sênÝ%i´Š±A°Ñû±Š©€–¦Ý+4“b²+Ü“-AOß±žÐGÚ*C§Ï¾ôr¹‰ÿ7Å3zE6wo#q²á¦æÀ턹 |ø —(Ö­â&ÎÝGZ ƒ,b:vJQAV+bäžÓwß»BWd|úxÛßòCØe-:ÛÞNÀÿo)óC6_…ß!+†V©èÆÔ=bºÒ´‘/*©½24‡\ÚÒNG ãP‡_Öwå „-ºTçKm´p#+´d»8Ì K‡9Úìêã˜;(IXzåõ£6䬔(pñù… ìM]R¤1wˆ'<å±—6’èòŽÔçÊSf{hü]›ëÔõt(ön`¶:2×oa•÷(Í2"HID¥à» ÙñEvp‰¡lcURÔð=E¶˜ÍÂà;½Ú~›ý†p‚ƒ˜ï0ðXƒ`¾MXÊï汉5š°voìíÕ÷·‹˜§³/@hFy…(,í¹'#sKU±B€©‘ØQ"Ì0…ViÚÕÒ5br}Ý`G;4òìëQò§Mi/ÍF0¬ó0èŽGÒÔÝsÈÞ“Hàôš¤J'dkYÓž‹‚çÓnu WyB0ÆÈ!0Ì•‹ Æ®XÄMX~XY'/wö‘})É|¨*T ó"²^Ye®ZäAŠàåqS, Ñ~¡#òMïcYË›dϯ ‰@KÅ¥¥"lØ¢H€¤^…iך´‘Ÿz\Y¯¬=ª(d–F­Äñ4öø¿½úÎ.ý#1œRÙß„¦W#ŠŒ ‹³†|rEbIY¬R™’ÐcJ%¸Va,»Áö&‡ÍµZ±G×as½Vü™ÕŠàÃãí6E 4¨ßBcÊÝ-LéVÛRì5ÿÎíÖ÷ŸŸÔŸ7Œò Å÷ÛÆÁUr²¿üsB¹gÀ54!R$Mñš¥|±{ðÜy¶ý&—.Ë¥ýEXNΟV° YaõL#95ŒÏ+è¿ ›Cœä&qwïü¶×^Ã5 ”NÖTÔi€ÂåWqÚ^¿…›ÁUðtî󢱿ô¡ÝÄã]‘ÁQÖ8¢Ë 0W‰ë©¡T( Iº•#ž³[¸z'ÊÞŸbUR=YlÍd7 b,#+Tj¦r%_x˜ÿ}ãÄѵøïBìÅ<ˆä"Ö‘n)F(©®± ®GZ³kßu°ÈÀª³=óÔðTg#z3àæù×S­‹’vPÊR+b€•Ë"SÍÖŒÎD¥ 4Ç®gw%‡ñˤã"Kjš G‚äÅyåN8ÀŒ”²Z<’B‡®Á¥çê>n>ðŠâϱÛFÕ_KÀ“ yQäÖ\ÿö|sô £°Dó›gòª+y²ÔÖ7õq#Ï8gÖÖÓ$ZÖE!œ¢5ÿKh°ÿ>rs)¬=¨pO~ŒlÛ&W@Ÿ˜5Yxa¯p„lÀ1À˜ëGÏ+•Jêj#ÊyCØ“=Ae{ζ2æó<` @ÈÀ°áõ|‘«ä±ÐE·®<3»¼ôöÂÓ¢‡Êg¯/óU’Þƒˆ»Î-‰â%wNNùL —#^––J%éë=š«E s ßü?€ÿA±š˜qih¢Œ‰æAÔX˜óRÚêdÔ‘âsá_‘ƒ½`ƒ]”©– rsñtÉ=-SNüœ)òŠY…ÿÖ° ˆÙK°ÆPT¯V%ë¦Ô*P¸†ÿ# w¬v–’Kú€/—E5•åP­[%ÙM‡U*Uë^F«©£}ýÍDÎàÝÀ™Ñ´–Z`”Õ -07 !Ôä_£iõ%j™NI6»6‡–GÉ„ç‚œ/h’^ÑŒWÑ‘¤úÿ·|Zª.Šâô:þˆWªÐ«Ó¥jõ´”ñÞWLüÔ­áé-[“Ž4è=SýVÚnøZ®¾ç°"aéøùOüƒÁ0DõWXþ‡}™µl F8±hX…•ê¦ø³xFѺi7·É< @<¶.]Œ! Üþ‘Û¿@¦˜]‡º Œ{ðVtÏ[p€\\úÿyÛíõƒÁŸÃp4~wu}óWQÝmc ôZ±þtk»ñìù‹ÿýuwoÿàðÿ;jŸüöòÕïÿÖE%Ô‚ÕHÁ‚#‹¶ý í¯®­c>ÇïøQ!¯&b×Á•r¹ÆÖ‹g«&èï¾ü{,¥û3¥#¼–Jzü/WæìF‰âõÍi«xÆqA—[ ìK0Å…âææ¢üÉþ£šT1-5¡(«_ß”„)0¥5â†-p; [ýð‰Z°õWâIeíLü,,‹oüÏl>'U{›9ê¶h±Ü/ê¬÷‘wH¡ ÿT¼kO=¢H)¯Ûê5ì=½IMø¡jV•Û5^^õÞ¢¢#zeY¯³Ø¾D#ÿÙ€—®r†¢Ý¾(‡f§ÕÒÊ3§\_­HõX…¹(Ð`ÿœE™!«"FW¸F°\á†,’æA_ì5þó<€³ãŒÛ¦FaE:Õðeôïì*²þzIlÿïóÃCñÊæÄ%…_áMC|„›^‘ïfQ<WCd †" ¢ª€íô¹ˆáŠŽÂ슔g­(ŽŠ\)k¦âk ©õ7ÆÒ!fh5¤žD Ÿ4ä¼s/D·Ó¯Ç!G+-§T,Ža¥…ÜÃÞ<Œ˜0BWgç¿PÔçëêHçâši"rµ˜”‘bRºx›M‘ýû^ µ+Ã%ÈX8È^µRH—eV&’–¯*?êm®Õ‚m£3¨ y':Õ¼Ó¼û W—85Ú{;£ tqZäŽüI§¼-¨r³ìé¤g•-^:ˆÅ¢á“¬ ˜£‰¹H«næ‹Yº¨ºæ­2܃ë0'Â`¢×|ŠW–ñ†ó¿º¬å/`W@†KM.1 Àt¾Áè»É;ÝEf êðl<„ä °Æ4ÞÀ(>#àùØ #¼ž…³†6Z꣣r‘Ê;Œ;χ‰‰#¿ÕØvHX±‚WZDªUˆ@¤Pdv0·YØKh©¡¹p­¨‹êŽh)Du±R…Ï0p&Gøˆq¹†îĈ©ýlg·1Q™sŒ A·± ]ŒõóÄÀ‹qä`$‰‘¾Ä€/uÜ]Ô£¯V^×ôÛÒ–DUs®kEYœïû2µ”j¤€bù(¥ŒT‚É®\eɠϾ‹·?À²nÁ‘Š»žz?:­Á –'ì }sóí²ÍO~{hs”ßn†ß¾þÃvŠÿÖùö¢˜Ÿ·': „Ùð2֛ߓÚÌádˆ' eYíd˜þàÝŠ‚¬³(bUë$K ˜ÒDI«V#3$ŒºIþµ—½ -\Ç›ÃÍֲ͖&X:m)K§X˜|Wzë¢}–¼”XQ‘sðŽTrÆhò ÒwYÑ1 XÑD7Ê-̪«9ö Αì ðF­JL 壮Jw;(qàœPPLVƒ¶è[-Ÿ‹¢¡Êš¼‹Ûl•vÑ’Voâûʣʺ´FÂb¹ Ó4îùþ %ÓAŽ8Ä'?b0¡þ» åJåE]"U†Miþ«é… WQ‰ú6 ºYB¾ŠÊìîìÿƒB¯¢òþ®i”P¯Pk RøW.`Œ`Ng1,ì˜å~É>òhG¬ýy–ËG‘}tP+L ör>—¦•¥×‰xwîwF”ŽÂŠxUXÖòN2§Ãž[I.¿˜ð³|~?óõ} æ q¨M v­’›Ä+Ÿ‹u*Ÿ‚.31 —µóîV¶‡$cºZþ4wzÆH_dgúþÈ'™F:N£ú™âAYö¸QqåÈÄ`䡉 B­V0äxRÁëP!N8ÚÑHF? s.¹¤ó¦E±}ûUÏ¡8®“VP?ݤí(å¨J.w‚cÚ@ì~}pˆ¹ß ¼øªãîÃòå ÕK¯;²8ÛW‘%!¾]aµ%]%@éß°´Š©K«pœ{C+PÏŽ´€mhøŸŠTf´mUµÿ'¶ÿçØGÛ‹r™MXSÂQªËeH–p8»’‡©ÈRVÕÀ°U2’.`@––¼ª¯* üGq-¬êî.¼‘OÅÜÞ¯èdt¯äS1Wù+ü„‹9mÛ}Š¿IœÂ¯îÕÛ;l°§V„”x%ˆ~(?’ÆÄû†. ¥¸Òr(§Ö6r¬Ì`žuÍúVÙ”Šÿ5V×–Ë˵_dä-ŒeBˆN®)Y]Eš’"+µl,eQ*(RE…‰m¨±þÔØîZÍ„› Ýe›Ué²Ñ¨LÿF˜…1bÒÉ‘>gH|!ù]u?+wê55ÿ`Pöè9zÔOêAþå?z†ŸÅ†š4u2~ÐÏÑ£~Rò/ÿÁ¥„M†I[ò›|ë/“'éõ¨ŸÔƒü˲`Ëìj6h>(?È'õ ÿòü·-²Šž:§>ðƒüËtäâÚT>e©À‹Ùî9¿¤ÅS1âŠÅRB¡"›ó‰ª.ƒó±h‚±ÛqK„É‹bÔ‹b^ᄽÇ9£ω™¶Üjòd“v6K²nˆ ×5/P±&²±BB’¸ÆÈÍ‘:-žËÃ,ÄyÕ8ù‡9Zg)UNæb”O}ÑKÂéÃnËKB7&ÝKÐ_IÇBØ=«E‘ä/eåôþõƒ²ÔöÒ3ÀÓ 'PˆÓ‡ã>Ù·›Î|5Ùúia™“F ûs‘¿#wó³šià¢þ5Ë,MàÎcqÉŒ¤¦%O'ycp¹V+Õrõþþ’juqQ`¼:x,TÅâbus°yÿ+²/çÓƒW¨<’Ö®šRˆã›EÝ/%¹írcÀéýã²Ö$-æ¢èW˜:IÿÈcew|M÷=Ôù#ŸSÎ/Ë'¯È½ © …J•¶jJ"ÇkxÜa†¾Ÿ_ƒ1šÚö±E.ÝÛ{£ù yaê ÇêP,Zdºí7ú#×ÆJ%_BA¯ëÞ8J­My]Ì‘«³˜Šg¼õ‡…²ÞãñUh6¶á=C‘iãfóg ÖÐ{ç§Sf„¦rÜStv˜õ~NXhî×JEïg„5ð[NžF½š¯7ÅÊ‘A#“}2¿ÎW ‰~ÏX«UñÏŒ5ãîE†ýaFh¨vÈyÖ€½œJ¬þ<í‰ÆƒY[¦\‰oç‡0W‚df”0ñ¨±=c½W¡µUñçŒ5Ÿ5šøsVÌUmÌQ÷Y¬î³9êîšS´;ë íïµö÷fmkßiš­ÁÏ™iòµÓêµ`±,‚¬ßÎGo5 D]g¤{מ €_ÌX»;’fîQ}õjvÍÃõý]½šÂþîzóІ@¯f‡ÐzçŒ‡È ʼ¸6¼”óB§œ¿“ [f„>ô0C‡ƒéè ÆÛùà@Ãa¾F>Ù3C¾™±~Û`J=‡äàZG—9WiŸg„LÛs/€/°çßþ0?4´·O‡_f„‡™dœ~€ ¼Ø—ámïî˜ÛJ¾™±>³r0×^á¡ÃÓ[üaÏ\v¡[©›¼IýhæZŽÌ¦eÔåW³RÎaëÒFÚAUµƒêh“„&>ÎzB혘O¿g¬{TßßÝyjTæ3Ö€‘¾‚xÓø6Nû<'äq l»ÀÐåt§Á5?ÍJm  f]RÐűIr³KÍØÎÖ–nkkÖZq¼Ýšk[2b’Q_½š•£³ºý|æ~óÞ„;Ácï«?ð'Yz±;¶Çc«íµº3´¦ŠÞ½E¯½G³5Éeïa”ÚØ8n»wô3תsß}Àxþ:ñÃüÝ1ªÏÕ³~Ï¡¤ŠJEk×ü8#T¨BGsÉO|›½§0à ˆ!‰|9+<ÿ]êF´^ÌX{¯þ|gËÁÐZýnöq Uˆ£È ðŽ ¨g-§½m‹K ”öù¶¯º“_uo 7¡¹Ê(1ÖÛ@˜K ~¢Ä¬ø7xð™D%z93¶íïȸ?¸å½ÄÄ;‰[ßG`µð2Îx;ôNÂÁ·óžö˜Û܉¦É³bÌ +eC¥‡vG}2ŠÌÙB»;CÉBsóBñûØ—ùôí.úS%Uüþ6°Še›Ðáø··„ši?—,3‡´ŒIÈ¡Å„cõzV,HB™‚Ö,¸HqDR”±"³óAÀŒJEŒ2>ÌA•2ÀÙ_æê]²[sö'¥#áV vÄf™ÙfËÙzõʲÛÂóÛ¿ÄÀľÌo“O}¹å w hÚçyWƆh¾žýV8D¾¹§Û£ðYŠßáiZk²Èío“¦5À%îv«4­¨ÔÝn—’íd•ºƒö>ÖHV‘{ÓâÇÚ›­Âµùñ6'»›V?ÖЄRwÑîg•x™»jù'ÃD¹ûÐöOk/^ö6X?Ûç‡hhÐ3ÇJÌ ƒûrëÛ€t°·ë­¡ÿã¿ýå·ñéÍ(rÛ[‚øÔïw½-ˆµ1±Ü]o ¦´e•»¥¶?£…èëo¦4`»åmBV Æç;Ý*dÁOºõíBV VÛÜ2Ä'¾Ýò¶!ÎФ|¾Ë­C‚Hd”¹ýíC:#/q»[ˆìÄ×ÛÝF$Öò¶pÍë‡Ðø§ÛÜNÄAÆ¿Ýê–"4ùñvڬ̧¿ÞQ‡’Å⥻•.%¹~±·Ó©¤¬á-á²&%µ›·è_FÇÂ;®T ©œTlÆ–r»Çh ^À?Eü!íÒ êÑ46Ün<«ŸìSŠ¥ºèŒû„‹öÎ1Èæ¾òú2ü¶Oa±Ù_[§ç •¢ë; Îçnë-;£Ë¥œ=ÐúÉÙ=¦ çè“~ZXË¿‹¹ØLvçQL–GÑ“wñÛþ>í;Mø£ÜÓø‘üÌàÑÐ6Á/éóOiKðÚö9²_ =5¼‰ùýÀéÁOÙŽ7ð±~Dÿ°C <&ýYpÌè›ÙͶ¶ðUG-92Ó¨Âge…?¹[ÍOc™“ÏSÖ¸|ÕÕLËqx™°üæ‚TiE~jÍ«nÚ[V?è.%ô-Ø/m˜ ?,ãZDi%K˜‰¯ˆ;‡ˆÜ²ˆ´)%\Ѷð+K1—®J0°Áÿ±F$|!ž¥HL8’ ù.S2Iù¦% ê½ÅYÀ›¯¡v’¹œÙ7ü¸Æ5.ÿŒÝÂâ f‘Ô{PjWßîÁ/óºADY-|²ÏH|aŸnºˆñ-ÌIi1O¥vÝ&Pò©)ž볊I}j:ög}‰ô—Ù»@~¤JËÆÚøãŠ+{å›,™? ‹åû‰2ö$lÖ£KðÊI¬–o“¬åt’Ÿ“lW­¬¢±2á„fÓ¡ó P8®Ó3Þø³,ø”Ïó‹S4¸¡çü陎×õZFß:Ã×Pꌃ'Y<`U¬q±<Õàó2<„?éPç/±°-Q}ê—X\r8#nØB\¼ôÏAí{áHÕVáJel°é]T]âvìÚ퉣<-ŠmŠS¦V‡)OàgŒ›(IiâFÆkÛB~0•’„„IkýXIK›ö-V7ÖBŠ²ÞªÆè—]$EþeTÕ‚›ÄÕøïبS§Â0ì@aó`|Jš*D”U ‘)Sœò:¡Ýž6§ŠD%Áf(‚íùµß$‹fèbsmÐëÝß–”=õ1• KFß“D¬œ§éïFFŒZE#¤V‘sx2E¶Ë‰œûœò@ü^Êt‚ÞÈ jæ€ Æ>_E"†/Ã`|q©‰RŒhèzЧП–;ðB ezæp³ïÿÝ|áüÖ8jîìs²ö(‹ü„–Åþó|÷à©Ó«£Þ€φ&ºQ[潇Î×^ˆ(ó"ÞÒ|ÀTuÈŒ9/T¾ ¼-‹b?I„ÓvEØs)Õt¿ 'ôŽSµ¶é ºò¡îŒsO´ºž ¢Ý¦f¢ 1Ø*†Ž)Ͻ…÷”³þc´^F[¯M‰ú 0´b%W¢?pÊ¥Þ †äÿâOLt]Ä(º:ñù/ðz±‚KmÔ&ïu ¿6‡÷‚µæ £w›â#Æ°ä¼×ð\Q¬êF4ÚkE±&ÖÅÚC±ö8÷1ʂ犥éz%ìw Ÿð -d%§Gv¶4î¹á[±úý÷ØÞ[DFên…N‡WôŸþ÷Œ³èFÙ½p¹Âœ±ŠLøWÆX8Û{ð:Þ&Ú⺥ÜÇé™ÁÒ÷ `GÅ¢§9¹T8'“¨œÀ‚Ò„4Ö¹SFq R D•¿ëöd,|™—ö•  ’“Á‹/)0·Àtè,e98«Tíœêè-Úœ–u`)‹ƒ kœŠô°È£!ü)ž®®=.žAã}Ѻ¹€ ³"ÎÝð’¶'Lš8¥nøÀÕžYÑü‡ÞŸcbk`kˆx ÛxÌ·}ä;8DÎ #ó¾óرâ*é}ë1º.§XƒN—L€°H\ê’ö81£º3ˆ†¿¦#’²_G±‘bð°‰.žžO)Õ$Ç$v¯ÞÒ„`Q|Úx¾³›o+òîéðÅOf”Ø}£– &4ʽìÒ.n ?ž9˜Í&±'Qkó ‚H;§¦•Ý*ŠŸÕ>¯¢ð±V ˜½M3—:f0âüHe\ŲXTîÍó¾‹"ÿ’(ƒ’™Ï£²\ýî›Âwø$¿W-šÕ$$Œl´(CiE;V7aO›ýMl;jÎÁ¼¿gY}¼z@]Z¢øà­ªR+~ûóÍ¢(*θ‹¡ZG¼»9ÊvÖ¿*]fE(‚cçN#âõ•ƒªáôâÅÖ“{Z¨¾ªI­X4ÐWgœ W¦oÓð0y—9eFNV•{‘’¹Œé°ó¶ÞvXfžWµyÝ—oô“p¢—߈<ç€%ÕÌö*§ûy·¸ç|‰m «P°Â½í9ÿÅÜe.¬þQm¾ÎSÚšoßóojÕÜ w^ÿñÍ›åoªÕܬ@7‡".ü «ÅhŒùb¾ýÈmô»òt©rú~íѧOKLL¾†e0vü|} Â<&Æù®z­þQåÖ ðªŸ°ù~îœÛ˜ZIÖÀ«F©GЕ îÕä­OŽ Ï¹ë·é÷Èg«‰Ääp’óù7U¤Zûæ¼zÚ‡Š¡JR>>˜¾fnôaü˜ŒE :’—ÞzDSš%ÑtüÐný5¼z›3µ<ÔzùÿHý‰"SŽ?اĂÁiíuÛ!òøƒ®?ZÂ+‚^®ˆü¿ò¨ "ZST£˜ ¡†ÿ^Œ.—¨àëµ7%Õ¾­o _ü¤@ÃJ250ö´Æà_ûoÔ+ $üfõ¦ê¶Æ£€ΛUšô^¾”ã¢Þå@ÖVlIäó²Ù±'h6 ×þÖQûaÂdò>³«UÀ–(•»™ÖÂË©ŒZ@ûy#1 ‹—¨^äÝžà§1?Ûoù%%Ùø0ÆÃ:K+Sä°hÖs[—0;ÛØ+cQüFáô{î”ÖFCÒ©2wŠ¢¡âÞdò¸0€"…%Ö´•P:Ôj7ÿÅ?þ%@îúJDä¶p–é+ uùJ~…îC°Èn[Š—¨ŸšàÏVÐ¥ü€˜5u*}°¬tMÈh @:Ⱥʞăœ%N/ R0ôš@ɺ/9Tª9Bk˜ßwgø K'Ê=&V´b2€ï°>µ"¾ñf™º@O5úH!l ‚H_7ð½/ðóÆ©žÂ xsÁ¯ÔDêWj2Õ‹?6– âÆ2žW×t"p{”èƒç9I|éä«©þ`ùÄ.ßbw².f $Ó%*¥b¼ƒL%AÜFªRºÁ ©JBV¬=ÍÞ€|AjDžÀHJFÞØMÇC·’ Û‡šaåUk"ž•2åÜ™´¸èxîµÛ”÷€àÐËí E =<—¬±¬°Z„è¥?<Ψ9o¨âb“¤ßga²â÷σö¸åE¯s¦†€ŽwÕ$2{2µ£ó»y×~¨{Ã#£d¿ž¢ªéÒÐi“6°K㛟™W¬;Îþ(b¯«‘à"ùjîƒÉGsr¬—ÿ4|³Â“{fœ1׬T›F8²"¶eÒ#w8t)m4¥÷PK !§PDÅRà®ÿÖ»òaqzF¨×“5Ð:¡ç(Ÿ.ê^o*B*š‡BwSr úÞ‘ÀÕ°›P#„d ¶¡W{­Rbïr®î7¯íÙË3n°ŽßY,6P0à½á¤Fÿ %é\¤y[à#ÓOÁ|g'×F¸ƒTí”™ôó°ßµ™X%N—¸5Ùå|ñ´tº´ôú¥Ò›åÒi‰©$%¬BÝ5ò§ëùÓܶú%N櫃,`&£Ê:V>~Ê^ñe!Iƒ¥ÍÛË4ÐkúÛŸ²f¨LBYúc¯Ck²Ø¡g¦5Y`2úvÎ}“²†¤£JΈ m(¯œæòÕ‹ÙÄŒùE [HØ.‰íIBÂG”ƒNG„Òôg‰‘ú™•èÝc½–ðÍÒ›§…RUâÅ)˦Tá/@¦$S s¿At5hx1¯˜{h„Zø}¹{ kòÍC|Ãìu²ŠäíòŠX/Åk¼ºcøe¿¯CÏ– ‹XƒÉNÞbÔÉ`3)]øÐðµü©úQe±¦©'›€jf1¢`Ì Â‚AŸð+@|†y89•\”{Yv%ÏË’_‘½=” ˆmù@UúÞõ(>]‹âÄyli‘§x¼Ã¡{\¡Öõ½fcÞ¬y×noÐõV$yaC·¸@Üʇå4NŽ¶* =! .2Q#5´>¼’@¾oáMH}¬Õ Ö¢ë¶×B}/Ø “Ñj)1B€¦Ñƒ§|$+Jíiu¦JÎ*/ç–~¹ªŒäŒ1’|D‘YBøxgùLÌ*û¨ìñÒO:'«÷\.GJfÎg—bã™°ï‹ÅÆ‹8K€ÞØñ»á|Ž3×Ižgä^Ä®îá _Øo¼~öbwë e¸¤ =òë&QB¿?ö¢a£>MÂy³¼±\¢ò»Ë@77¶ðEæµ4Væ ixJ¹†F˜oÊ%9‚Zy£½^Ö¯eý ùxN³Ç¨òáËÙyÖ¬àx…2q൚ ù¾`”7òÿÁ[²ý  ºü2>rv©_a0¶°xÔaj’,/ýþ`< 9w¯\¤ÓÄ@â³ÞQ–Bð\tj‘>j“—Æd°(vÕ]§Jxÿ Ô‹Z™ÿ]¥S§.ó î€Y’÷3dûë3/®¼KDl<ý› Éû±sOl4Ëáèi‚R÷À<uƼ¢8ÛáhAn‹3ÒÂ漌Ͼy 5Zt •u`±µ*}÷š3뽬ˆX¢Ú2ÑtM_÷ÑÂ+iX.šLeBÑIÁW+Ëk¬ïQÙN<…lgRöØÍMd<=¨K*ulGfeŸ©5ðÍÅÄ+ŸRGŽC"7›3M²‹ŠôGö! AÅ«¬ ¬âHÂâ…Ä$% Ë^0@¥ºƒ#ˆnÈÂ5È?í Y þ«.G ÏÍlì–  —«l¨óuÒkŨéuŠg¸nÆd.G÷NþxýÇpò>l†6äóŠøpQÌ-œ£Fz¥¨$¡k^²èù¦&®Ë†¼–ì“. Ý.Ä>ª£é½•!§n£ðÞE+о×Ê‹>nD¦Q0f¢vzÁ'›l@âOú¾7 Òþå±i.­K­sI$CËÂZœ6²&ƒTÚ^8ÂæرÆâ’Ì“ü’üåÓüçtY(+QD¯MfGrÚÌ-Ÿ5ñAÕ“WˆdÏù݇7Ä«_Ä]¡š-¥@ƒ4 í\ÏúüHå êúY[Ãd–¡øßDe¨4ˆÆ ‰TÐVšu-ü!O À@N/kõ£Ë§ÕS£Óð\¨¾'š ")éùOüóÿ¡ÊX‰û_Yž¹øŒ€KÓ@ÒÅvdÈ?‹gÌ êü³¨°Ý”Bf%΀W—Ž^,VAi0PG¬”$8ḃÁ?‰Á ºÞ]×*Ö['‰ŒmÕØI#( yZÁÃô͇4tÃÌW*y–€ƒµÍZ èŠÔ”Å»—lPV0Ú­¾þ›]þP­T>\y®ÊD»2–·h>_šsJˆ<¤~Mk¥mG|¢m‰¶Ïç¡U”ê®Úê[ü½=îÜ"Í'j»®ÜaÅ5`–üs¤Ø›\¬v¿dg%²ÔíÎ ‹ KHw(Y:2£ë ¢ÞÅkJãdýAËwi3 Š©!Ea`<=„2H'ÙÔ•ºb‘lÅÛ—]·gf3­Sü7«rÔÊ¢@Ü…É|—ÑjÊ\¦ödÚìØu'ORÕ褉AF)»b¬+YrÅ3ÜÝ‹´M ™Þé;û Íîîr É'Û 0e¡š.­fÓü–6z«|$]íýº½säÖ òA÷FþžÐn¹Êmk8im+XQÛ·7„×Íh¿×uÉKJÞ5±™{ŽžmwäbÚ%XšLÚN†©d~ülçÕ^cC]µÞ‚<¨Ø_¾#l£Y™w%n<Ø,¶]¯œ Œõ‡³JÎ#iáãöimˆýºÐ—¢ÊÚ#’¯<ƒ`ù6K¾#`ê¤o½'mõ±‹°UíŠß/ÒzÊêdç#/zsÄñ µô&/‹ô’;š°ß´ÐL' ‰êÅó¡7(*Ó(¶H` ziæÛÇ@ Vk¦<hÍ$¡Ð½„ÑSB·*·¾wÅ1Šd0ÀI§ÒÔŒN€x¤v‡ ú‹€Ý¹‚¶ð|œô QßyÅt—ä2Jn …,—±¥õÕG?ð&@Wq˜mÀlå½z‰ÆÿÈ<ñf½“„ÜóH^!8öðþ }ýžþýþ%8kgmM<ª7ƒÎè 0=Ä3ôf  E+b§ßªP‘—C|=Nöó`û èùè/ÿâ-pËÔ×'rXÇzЛ¶#büóýµ <|ã–ë`—BÙ¥MqŒ)p ,“Öˆç¨lL…U 0’ H¹q ^ƒ-ïõ‡½PÉ\Ÿñ¥+Çç]¿͵¼>F‚¡1ø.¼dF+X“bLÁ¦„Ly %èp@3q¯%XbèöPR‡ú½ 43Ð5yàuŠ,%Í2½ë–7àø÷Á”nãZ¡À™1æ$B:7šl=//†nû%w+r} q›Ë°B°Ñ3[1p=Éä ÷‡îõ&ž¨!‚@^GÙ¡‘®Ñ’¸#Õ«TˆÆÔV–é—Á@Æä‚eV{ €wÆ]œ º^î¿889õýßñú㨾üû¦¦¸Þ;s-UèÚØÝð î5Ž¶^@úÓÝãßq²žíï7šMñìàHÔÅaýèxgëd·~$OŽš Rçɉ˜€b¤.@s€¶7rýnÈCþ&Gl ç³ÝH hÁtÔÅÀbäìJjc7ñÂ&Á·ßÙ½ÝÁJ°?¹tÑ…]uŽ¦/W}Œ8«Lª/G£ÁFµzuuU¹è+Áð¢Úå6ÃêÅ [¹õºˆæ!8Ç;%Þ8xwMÂt0q1ÁE{ŒÔÇÅL}Ô xôí™ßÑ<:9\Ofb…½ºX]_[[-¯=DÊwÒ¬W((á±Ô­è>r/.¼¶¦ë.ÍòøPÛŒ½\+9÷,E`…ša­ˆÑh)¾éââ¢`ëݧŸµBøí%]Š =¾ýB—cIËzèTA=Ë/9rNÒi× ÖOùqè½óͯê77ÂÊÖâÐåùlp¢¹‘}< ùF^öS:Û '‚ãÄ pƒ4@QA… ž› ]Å‘W+9ŒÞÎ>Dê)½}¤Œ=´ù Å%ߊ¥ì²‹>¾rä+Ý óeN[„4$3WìÈñ ôI¨ädÈU̵¡Ø“zŸÙFEYш´k2N ò1Tæ‘­J”L@Q99±äW‰å!ö+¸U 8À ¹°ÑsŽãÉâ¿\"PŸƒP±[çÅ”€ŒüA¾RK®‹0´:q9Öäh¹pÄ-¼bq¹‚OxrÛŽ¡Í5`¸#„û.À¤-tìˆS»•¼ýq–ÖJš™Fwr`»*¹WЇZ^‡^^‘õUµšçþ‘êËê €>šA0í õ äº7Ž¬õ†NЫ«‹@åÑ\Ž@~¦ ?‹ ?mn—µ÷šeeÚÛ•Z_Ò{C½ý=ª´¿gî/(ò:Xcûc·ßB·19 UÁ½ïXgݹö{㞌hÃǼ”5ò\cm>"eÑ?ÈgÚ ƒMÅR?öhAòA¾TÉá–¾‘ &?b½ÝEF>£.Võ®=ªÊ±^¤³ö䎌t !º{‚“¯`Âz¤ÓV‡}v«å *DngL˜C¥Uö]Aâ*\æÓê¨ ô#Ç1*€$Ä)c>O¨{J›‹B˺€ã£À¡ÍFק0§5™Ý6þ> 0ÁD"ݺD»3,Qî°Ö{‰º2W ÇUGyw€è%óQ]ùŒå÷8=©’Ì+¥ðE”Ÿ]yºHª^IM6Dm¤}Èñ]p¢å$95cQMä£ E€vþ"jÃ~E±iA¸Èä7ðbùf©’»MS˜î'Þ¾£¨i­0£l$Qš½ÙXú%j6öŽR7ìîFab5“,35Q%ù›n7 ƒ:ì©EÄ÷”“Æ8ܳÓ<äìÏêxQ©Ÿ*¹:fu:Àžu}"4“]úªdE'Ž’Åù‡¹šKû]¦– µ–L9Eà’¯åÉÅ»ƒb;  žHJSÅG>“ê 2É`à(€b'Öh<œàŠ@ðcj úžö!#†UÞþdžr_¹39ËuTß„L»AüpÌÑÇZaÂGžÀ-¡ò³T8µvok ?âOýU`zš°e|£rz‰QËKZ2V«c ×a¦ äê5‡oC÷J.ÇÜÚ’ªô\2Q˜"å™™ÄìˆH‰>à­¡Š[´… ºîPržéiÇ&6¨ Mm7*ߨ¡ÒlŸ…aîä¬RºÁ©Í¦õƒKÍ2zž]¡Ò  \˜6x+ÚÔY°Jß²LT1¹• ù@á,N GBQã¯äàµJ^+?R ÄjZi×kë'eeÁÕ”ïä€ZNN,AjswØ.£Ç”Æ|R`•_ŒTöÉБ=4›K|”a{îH*@ 4 ¼,+&Ÿ“Æ žsfƒÔ¾TfÏÈ.Œ`IuºnÁ^ç`5|À6…¤)ᆭJA?JâAE‘[õqÒéQîî×÷)ù9U_c¯£Œ“i‚²ìŠ2}G׊QdoCg×d#ï'ŠÀšCoØóCB^2ÜT³•ÚQbŠàÔ<¢ÔNê—q]&*‰µ”¤D©ÂNBÐÉ‚¯¥›)-¤HéÂQB€ã4|Äi3]Sj5Lì§æ`*fò>©пs|W—7^åWä…öžrb«øª¡{A¡SØcFæ]D[ÊEŽv\õ+fzW³92vµu„úšˆ3ZÄBª¹ 4Ð BñƒTâ'ßÉyC!®L4‹UÆ&u°)h%3¡bS?b;Gãþ¼m$ó"Z­$?›SÖî‚X×G: o~*9~éÈ7úF_§Ô´”Jƒ0p)10ô.ߟÛ@´¨=tyé’Öˆq³e°2˜u4ŸfÖ`­bP/rÖýVQ:I3Õ¦bE¦{—Uþ»Û†2Gê8ƒ%©‹ƒHã uŒ¤ÁTÙøm¦½4¿eîrîPº’&ž0SÝ|)5ýÀHÝ ©ã· Õ‡T|¨òÈ1CÇ uI«^ü"Ó·`Ýž³ÆdËT–n õÔA§£“Øcæzºù¨äbI’•„91“2 DfËÂøN–r†C(SE;´Šw S §74`“«;pCiûüVF6™sRÉ]uÓÁ]uSçX†wH0eJfj€Ìú)'¨LíœÝÉh/lã•~è÷ÆÝ‘Û÷‚qؽÑVDåI7å@]7ý’3³D2}"ƒtúU&šž—»-{¢§]Ô2 Hb%`•oÓÛiû!˜E°¥H«OzCŠ|š’ŠL@m^;„žrNe½øqj™Ô•ãþÇ×õ®‘‡cV2“lK%ýcj:<»}9!OnXW—¤¬ZÉÊßÍúöôo–†ÕÜÜ­` ­} ÷Y÷ŸèA%=+¸E:¬/fèóò•%f¦ûMP7ë«h=ÒÌ$›%>Ä;åБʙMÌ)œÞ‘¸\šEÉm%(¸E½SÒ[…Œ÷[ÕGËœ)l¼ÚÔhr“褑™š7~§dG6‹Ä:hp|V@'mß½UN=FªyFìè·º1,RÃ5b Ú™ÛTEŸsÓ£Jjözžá”v³^ˆa‹¬’­Ð!—6ñ6‚DÜï)jh8iÓIt#Úã!Ÿoòèyz¤ †oÙ ÖV×·³ D|3ŽQŽÌ¯i÷ùZ"È—‡È¡æ™˜Ñœ»ÊdÄ‹R²Vk³’ÔÆõW•ú&"ƒ9oa||E¹½sT…Ò(ãž$U÷®G±iÒ³ŠVèÝAs*…ìq—îex~.2Ù3„ ~ñùú¢ò±[cxrPö¿¼ŠN›_ñ+dû?gg0©C¥¸—–GœÚ*™ „òH2Ô74íÄ”8ª±ÄÜè/Ù“D±‚vqÜ„+Ysƒ3ƒ–›3¬SÏïCg×èŒ|“݉æ‹Ý§dŸô[ý¨†¹‡~Ä”XéïÓú¤) kÓ¯›˜Éwf§tqéçƒqQ(»„e÷=mÞJñ I½LOë›ûS·l D¿3qãQ¾ É*‡ZÚA²XL¹¨A#–ÀÖ#¢J•;@`|ŠX5gý4IÒxÝ£Ó<2V©@'"c³l*ñܨ^‘V ¨·ß¤­UL‘Í\¨ŠGÉ•{*ÆO–Þ7íušÎœôâñ64—)›ñÄ{ê´:å(‰Í¥op®ý“¥µñ€eO»)²ƒVÌŒlÆz—h‚ÇHš k%äK£j XìŲè`þR_›Qk–ÔÊêe,IçcÝå<Ö½º4ãÅ„ÆX-eÒÕ,kéb@Í7s\ƒJ«ûê3yï)åPÍ $*—9¢]mn`i{¡NéérT+Ô¥Ù°– HèŠrRÇzaȆJ ‡¶HûH¬Ú’>›‹qª©Ð'2F*TÒoK)äÜS‹Cl­J–í¥t‹Ò9 ¤¢±ÀxE+š(b¿“PÌ꺞U!ŒI‰›fÂ鼯Üv,ÉKšÆ™l÷Ä)fÚ˜1ÅŠR¢iwc;aØ-š¢8 Ò²–øþõÃå’áÿtšáEŽâQrôWIÈ£€ÏÉ„¦Û…ù\׶I‚1aUºsÃé+Ò M9›mìî6¶Žd¥šÀd¿ó‡ç·WwF+*!µ€Þ¹¤ g{—q§CÊÈ^ðÖ‹²‘!ôojœBÞ€s8³¾aÒ&gö{Lï¦&2Û:Ç>Oýt|(_ÕnP¾BE)aȵŠ®üf)•tÐÛÿûüðP\x#öâbtê¨(|ÏÓó¯áíÖQu÷íÝgeŠzÀ6¤B4} …5Ñ ˆbÝÓZc~ŽëÝÁ¬ » › uo”UgÈpp•u…ú&§ž{‚Ü"Ó|ÔS`w8>ÀÕå ˆ%¯H}S®|ìÎØ{g5òØËT×"çÚAj#—úˆ{¢u s%\낹LOAõ=ÍÅâ¸þ\îÆ ±õêÕÜzhGVº».š MÐG«–î_'­ Ï¥—V•æÔM£ø´úi=¨O¥£Ž­ü=è©3çæ^tÕ ú§ÖW«v>‡Î:»­/«·Î\ÉûÕ]g6óô×ñ©ÿ:l=ÞϦǎ·øÅuÙÓNùôÙmöÔÖ?^›šžY·ÇÎ;ê·¸/ ãN6}?znîßWײ’ŸWß­:ðwÑyÞþüƒõÞ“'ê3ê¾'wäË鿳úõÓÇò9õàqòô9táYëvúpÇ…ïW'®;ÿiõâ©ÍÜE7ž`}>µ~|JƒwБ빹7=yLþºr!¿ ¾\ Ñ_VgNݘAoÎå’ºs³¾­?w,%ØßE‡®zףǵw‘>ã%ëPÙbQ)‰s9v5–«*Y |Ädï}ÂítÆÆoò(‘ ) VÖQ«¬ÖŒ3§2Ë`ÐÁ(œœ•%–ñ‚ùe6kÀg#ÂŒÿÞ .V[ËÆ™jò³âxäWÓ 7ÅÅá”®‰Ä Ê£qp´{³B ðƒ¦ŒÉ„1…V„g†UȦ˜2½¾E u2q^´ò®`ä^»cW˜ài±+ùDž2Š8¹‰=Æx?쿉à1ŽÒ êvZ@(D“ƒ%á@ÛXW‡MÈ?ˆŸ-ÌÕ†Êôn²#^4“Mx¤ÂiµûÒÐ+áØ©1™&JJ»É̱/i-‚qc˜œKO' ü [ö< 8y…ì­ŽÄÜAtA’/€ÈÆ‚¢dc"+u-‚˜ 9ná@)¥ñ ǪçatÊò,a…HâGyAp8áHV%Š‘Ÿ|/Êe`$<Ê-KÓý8ŠN¯8_ µE(Î;d R*G€ŽÖ‡î4NBŒŒ·BüÁwß­"b»àÆ׎/¾LN»¯&ÖdVy‚Á©‚iê£ýEÛ—o=RN=xrÇÒ­]ð8tw¼tåP_K þä)0ÄM ›À¢½ª°ùÆtñ[Xêç¥rƒÙn¹p®QÈòøŇxߗ˨Ýœ)³r¶L1 è”SÒs@›ƒÉ¶š¹RÈ šÀ“;Qz….˜Kpè½£«6™”Må*· çc±Éñ‚mxÅ'·BJJ¨v I£©¬ Ä:¶<æT!åy¬i²Z¿äÅ•ñÊxŽõ“zùO)ÖqªÂ1òeTO£3µåXïâ/b¿ág¢Vó‡ñ=ê'TmYõ[u²Ì+ y+^Bf’ü ñ.zÔOêAþOŽ™1SC”]Lþ0ž£Gý”‚tÚÄÏñGý¤ä_þ怜mÕ 'ÏÑ£~R)3ž±_cåt½4¼Q"wÌdËwË912“¹‹´4ññœîIŠ R»Ãs1Ë!­Ò¼/Š: T0I/ º÷)Ür¤q #oM¾­î£r1ÅŽŸ'‰ålÑ+Qà¿V'=Cwž(³h iÌëy V“%ò<‡x 8KÇ­‘Š)v„0£=#³9p7eþ³NtÖB  ©\¹Có€‡ Ñ àDŠz^’˜" }*—e’ >ˆè°•W„ÙK>»Of÷h0 Ûƒ«öYtаrZlˆ‚ì(Fù–ó|­ÓM×Äõ†³[ÆGÞæÓE.p\ĺO =*qìÑKâ#¼wž ²Œ‘NC¾àéB‡1tìxˆ¹Í0%ª]`5B„‚OÂ6b‘¾j”ûC¬˜@%¤¯Õjºy™aYVK4 F)ËÛ45}Àçô/ñzúÓ“œ1{Bjñ¯ÉÅ¿&ÿš\ükrñ™’‹ÃNhG6g¥Bdº{¤öÕDwS¨R¿òC Õ>[7ý1ênº† ‹`/³ÐI:•‚ª ñÃ:wjYÕd¶”i-ÜúŒ+~ß.¯^£˜*rfbs’Ñ eï†N3&Ò~`³o“:c z B;5uè| ÖeÅ”¡Z9 dô*%w# LUIU-8ñ™ßSº–žtðNèõϼ²äÍ+ï˜EQñLþÞ5ŸF‡T—tñZ!)z¦“Ž…”ºi4 [ÐΉ*k…Rŧ3ƒß³%åB¢×‘Ðm,TúÌ]x¢Q‘ŒÔ&¨f U¦8#mJ($`ýÊ©ì¦J»löK¦½Oéë)%<±zlк۪ý:¥œ{€1ur¶PE†AÚ±€Úx))D-Ïl{^I‰ð9¾ÇÆ}ØÁEso8 „dç+E%i_Ç¢‚£DR–õ½ç'Sf£Jha–8¥;SèÔœ°Pá,ýÏ×ÿ>ß­ò÷•G•õjûüÂéu[•Öý·± ÿ=yòÿ®}ÿxÕü Ok¯}ÿ?kë=\òpmuíV×VŸ¬®þøGMä*ÿ§ÿþCþ«.çIJ‘åfíÇ(«Í?Šn?,ÿoE< ¼ËÞŠ¨wAÚ‡ŸÛ^φv­¥åÆY+Ã?ñêç•7 ®¡À AIÁ/@WPq´Y”AhUæ{„Ð9 (¬x>t—~+œÀeL¿#^xW]o4*‚†ض÷ÎëòËAs`·³"v+‡q [%JÍ39SÔÁjÇ/všb¯~Ü8Ú©ï x><:ømg»±-êMø¹BÙODýió`÷丱û»Ø?ÐIPDãÕáQ£‰±ùÒÁ‘ØÙ;ÜÝilãP÷'ͬ‹ßNŽÄÁË}q´Óüµ"[6¢’IV fíS§x:°W0ä¤%tw#m°.)‰ú7b0†ÂÜ8øó=±›{Ž×+}8™[ž²‘ùD 54ͨdˆc÷ïí8çÏHFd2ʘ‘ ‡Jø$Ä´éöVöyÍØ ™JQ~‹ÂÉÈ+—°S·C±L¨=½vK/:CÂUs¹E•\'?úïÜ‘§©ã%ºÈø´{Í—;û[ 2êââ?“Ð*—?çñ¸ú‰óà']¿ùâàèØÙ~úÜy±}Ô„ÓººË(+ýb¨ÓçÈ2+œí”‚•^°øß *Øu2 ,´a8î1&P-Á!Ž½ ä÷(EaCÏRZ"b‘%DïÒs1ï É`ÒêHúÀÐ]21“Ð}°T2{ÒnËKJW»åƒz¾å¼¨7íÆÓ“çÎÎþ³A[*Éžì#•§¨#Ôœ;uà*QJÄ 7ã¾ôüó#—¤Ð‚Ñ+‘& MOHY˜PKÊÚ_ k b”ÐÆhUP 5¬"í«(³2ÚÓyäÙƒÙžÅÒZiEÛ ÓŒu}òkAó ípÉ …#®\^SL¬‰ºEsî\ ¤çÑΆ0 ͪيtž%†ùßÙßom,þ€6RH8Ô°ƒ / FCg$èZé=±Àüâ|œàp´Â{Õ¥´²ž;TÎʼbSP™÷š®c<´4"Ê!ï¥Ð¶—áˆÔ}ö‡UÉáÜ‘IÀ°m™(;:ŠM£ú¦nW>Æ6®¤€¼‰džŒm¶ÊøM_¢æ¢“1ZcëhÜ´{#KŽ„˜g 5ýQ—tWÔè$:@êK›)]’4=Ù/˜ rü{Z_4ê‡1¦ É·ŠàJþŸM¹Ë*éÊ Ó½Pº|ÿªT',\Y²¿rQòùÐñɈé²yD›'2®öaÌÝu¸³Þh:—£ãS¬þ¦ù ÿR6U—lJMK9†°²=”Áj€ÁXHä+GMË5]d3µÀ³‘ƒÍ"ßÒªF#0J&B}²F7¾G^õã¾O٬̤×+“I¼q®;6)$P^墢ûŠæð•ÇËf»R(¢²7¤ät1 |Z)y8²œòn»27¯ÊÆ{K>m²MñàoN0.ƒTº×çGãù°d yÎOA Z~b3èXAïÊ|É ÊôYÏ?7óÚS¹ ó X›V§ÌUû‰ê&hº·¹²IC=Ê5a/úǤÊ!­s ¹LX›÷¸Þ´ö>”Š1‹mžo?œŒ Ég"S‹_Õ„«j,Æ‹1qÓkb£ø @m3Ô£v=±Ä…Ø)K oç‡RR\b‚¼iÎuÔW5•‡CÔø±ÏÝúsÉI2¦h€UˆÛ£Rz0ø|~ÑɈ¶&äéƒ IâeJ&,"YD-ZqLòÿ².÷€‘ãü?Kj†d‹%µŒM(b»PÊeµtyHZß!\øÃÒ+# ©ÉC’¶Žyc?@!à ¹¿¥ü‘”™¥@¨\€;x!uÚÏ—¢}r`ïñh3g3²eÅ™ÏÔê~`j}¥/Ù[.Ò]Jöª¤yo¶n$Æå¶.ÉPúïŠoÛ¢‹td2,u!{-åW„¯Á‡ 7µ.—’ý'‹¡7²aP™Xû¤ ©îÛÁi°B[ÇFr ©4žOkÃÇ-tA ©¥Û°¥› ¨Ä•JÁc\`ÌÓžÍ#MhOÑݶ4ƒ¬á½:¶Ñ,L3¢ÄsR¦Q¤ßƒu®À™{‰¹æ†ó€´MŠ•zà€äï›0"Ja¶EãèèàhCœì7^6¶Ža‡6NŽ¶ßÀÓfR¡yDÂ"’Îß ð†IFŸa8v.Üá9†”S7P¨9ƒí¥~•º‰qfõŒXJËiÓ:»v3~Êè61>ÎE+v˜É£P™ÇêÉXÚ´ˆ3¬ÄiþÛÂÄxZÈ…!ᙢÙvuãt1 (ÅhÚ©”9ÚØ8%!žr”ò:á›>z< Útà`4¾ªYŠáÐN¤Þ'¢ÜùTµY>9ÿeg‘¶…•|^›7ª9Šnoì+¾¼QW [GÍf£éà…ÛÈ7x×tª;¾$%æ%¼–{`ˆrðo»@D[+é+.(TBŽa5Еr9­E¶/·9 ºî„á“Á{Û¸ˆÐZ *ç _,¢x«KŒëIF|Ó…%0«h\ÊCÝ-ÉiÝxt³ ÿôµî¦B]X"ªÁAÒllϬ En|„A€†b™ÍVˆù!c½q¯”{ lËc¨nc7¨jõë°Z DW¨8áÖºÀ²lÆJ³Ô܃ ‚)ëiÕ¾û.mÝK¥MCµ»×³.4So3"¥›¥~ŒÀïÕ•ÅŸÕ_dÁ¿H….U•« ÕfâZ—æêóÃfj!¿¯ç½$GMDºaGjKx±þµ™õ¹ŸSn—M±ALºZŽœ®˜k2ˆ×M´6jt²¿ÝØvN£;i(.÷Ѫe{™â¨ ÖÂ}°dîŸÄÎYIÛ³lŸ”m’”²¶·vÝÀÜ× ¹CðÅ’–v"Y+k¯¯P7ÕöTmrý“}š%;}œÅð'Õ|#"‚˜Õó²­Hâ$EÜ?Ac–ë!~…B ”²e7ZÝàüÜš—úxË6#§g┑¬z:ÛÐp€¸3Ägìí»,7ú¸h9–݇,KÐ"õeÝ!@é–uÇÏ ÃlL]úή_*•â–æ÷ÉÖ37ÓIiFïa^|ó0f5I4o†)Ê>¡SÔ@&­°§ðîÅúJò@LjSÚºÄfSÂ[-Íb"QP¬í¡;ë¹GÙƒN?í]øz¯þ NÃ_wö·›H߯~Ü$—ÆT*a/f ª/nqCšÖÓNŸÉ]j±ìj§ÏÔG2pÏÇÎÁ ‡LÿOöh:K°àÐ3ÞŒlH„?3)–fwž9xpÓgõuéº$® ~ñ`o¯îìþý°ál7š[GÎnc ö›¹ãlì;/v·> -Ѽ{§+å ãnZ:ãNš`ü™}†+‹›ÁZOÒä§,%`gËò;ŸCq ùèŒD™ëÏ[¢HP—¼X0>T9¬ãXúSö™tš5.õòÇïDKÄ÷ußÔ&muàÒ-Mnp»GTb‘ôŠ =6ÓF­ÚìU¦P&t_tŒ.q§”Qtê"Te¶h‘‰ToÌËEAâvÆHKK®H0†B&BÄ - pUQ(ªª“zw©uŽXÜ¾Û ÕHÏŽ ‹¦ ó²@~sÒ­ˆ¶p¢W6,þ>¨“}™¤þtwBï¬bé€#N›¶rýø`o5ÙFM«µ_ŸÐ» iðb=IéK$…6OžEÙϯ*1mS´† d¸7縼V7õègJ&Dœ@¥/AyévØ';GKשA¡²èÏ1†{Ã0œt:-…°Yß)H¨ëùa«Ò*URöšº8‹Œ[PJ2¢Æ1áàÛXú6Üø¶½’O?Šó Õ¾íŽWò%‘߆%TÍe06 oé…²ÊG\žµRÙ–êòJÚÄñÙÁÒÎå tgauµÁQfõGÏW…¸ÃÜe´˜§6k߶ùüª­^Û½.±–ý¿`2avÅKª ×bì€u îÚÙzQßÙ_’’àÇ\œ_bݾ'Àô­8ÿ4…kÉ6Y”b[Æ`Ñ& ‡$&é]Óƒ¢$8á{šÑè– 3î…C«{‚lVIþ©ŒÁê Ø®›Ýn®Ü½CŒ!YA*PZµ@ZýÛ³H©¬¯l–æ×Tõ eg=›¹)—µû³1Íd§?)ŸkŒpŠ &‹Ñö"Ó¶¥ïÌ­gú¾˜RºÔoZwqꕘÎü·ú f(úž«=Óèòté'9„Ÿ)T*`)o€¸¥´tö(VÒ1F–Ò´A¢lª}J³RçIÃQ„[è;Ž—&±%ñ“¾õ¿ˆü’Ú^òs^läÒ¨¸äõ*1´ÅÓÕ"Âhìÿ®ý’ bÚ‰&’#J;:´<®[‹Ø¤,RÙã)ù<“Æè뉢"5|q·™EP0F¼ÚrVùEÞ%~¢0aDœ Š÷QcEÉüÈÑ’½Tó=¢ÔÒh 'ÙWÖY€Œ 9v jŒ‹§|Sù7e4 ||³ä¢¦Y‰ûzY8ë„ÞTz,5}4Ô:FÊÏ‘jM^"¹”3Í›-b‡b÷Ëd,PÊ A¤ÑÏ\`úéþ¡Ii¤G˲¾#ÍêLûÖ, "×Kì’eí4[Ç'Íša¬1çüïiT¶f@úúá趷iT#Û§ïEý7ÌwáóÝ/ª÷d‡r|r´5œÃúQcÿ˜õ´Ÿ`»ÛiõÉM3NлbH—ñÒËnÛ¾^Zoz¾aE3böTÛ]öŠ`hÚ6a·Mýí"Ñ_’fl%„þ¦áðc¥Ýõb}ãyêR!âe#jIC–„´³KÜqh Ž=õìLÅ8~žPšKIU—–—¸E£…È_2RÐ[xBêùȉ®Òñ6ú`+Åð’7JÔPjgtÏoã€Ä$Ž‚ëê{M%+ÈVÕMžR F.ån«&Çʾ”t~H3ݺÈì6«–>Ò1ê:Céæùä붂\ Ù7ÿ9Ž"K·Žž_(L›1Dó@éQÖ£ñ3f˜cÿ#Ôõ-•*änÉ^èm™Æ £+ó2Tv¯{nß²Y\¯½Õ#Ô ï☟ŽCCöPÿó $N²ÁªgyØ|7•“Ó‹ E;‚9½‰j ›¯Ì¡iŒ»t2¯Ð¾I;ÌbŽE5’Qâa¯ˆ¡k_0/¥Ý¬«ÂÒHAu[ŸˆS÷VNË­Ñ:0Ø,—3p/ßJšÎgž»íF²ê\VÄŽ8tcÒ oÂN7áN‡ßs+äÛ.BcpŸ r ŠŸÄNàøƒÁ}¢íeŠsS6™-¤LßptrÛiÃs &«%ËZyöeŸ@‹oÇÇ,ëæG£DæîÇW<üòxÉgVÀ,#–ºJuˆ{°BHÌ.¶A/ÇççLß=àm‚÷˜€¹ñæïŸßР¿ršÃ˜ìÁ 8n4}¬·Ix š¯É H^Ú8[úNÍ4|Ò3ógbérÆ©=_31Ö‹ ôêÅ+X–ü†øv¶ÿ2_ ÁNÑv=ä ›4êAuÚ<ó÷º ³¤ÞdvˆÔºöTþ9ãxtßÍ•$/´ )=ùbK‘Ú—är¤íôÌJ›é?#§¼É"V‹Öþ;ÓÛÈMÛRà %88n}²°mf½‹ÙÀ$ПRýŠM––&¢Wi¥ô€}yx¡‡Ë¶Ä“ýø¥¹ÏÖ¡ôÛü7®ÐÃõ˜%I¼’X½n{nûÜó:é¦'‰ ðá;[K«×gO0 "nj2ÅÜŠL#”ðfû‘G\tàDTâb,î–hQGÛŠÖÕÔ.(“`Ý!f¬‘©ä £`¶†Åà‡*ö=¶öig–Ž$Žêyk*TœÚ ¯{öí@\Uƒ˜ó"퀄í»uÚ¦FDHØd›Æ¶/9›dÇÂ3%óÄ  #‚¼ó…5²3´¢“m¡ì û1gÓh=…œØÓ¼Á¼Ð¤œqؽ±bð/ýRŠÌ“SÅÝa‰\²’$‚RxBº‘í`Œ–þ´¾–³GjP¾Ô¥w_Y„ê[–ŒÞÎÚù¹ä CîŒCÖTKèëh:8ØÙ,Jæ 3–’¢püE2O8ŒÛ»Î”aµGÚdd—egØ®*&¶€ ÀlwÝší’nÌv~³v8Q c/Ä–6ÒÅJéÀŠP—¦"t·¹‰¹aH€ëYãî}±C1>Ê4·M+ô©)Ú§¥D0ºŸË²%Ö@̾øIBãPFÍà,þ&Sñã+Í{UWÈÇÒ~8B®°zYŠ|~$Ý¢‰Ÿˆ½Ìj#ÛãGpP6-Ã[󎯤ýÚ† Ç&Y5°E‘„ŒVÞ½©dG‹†aÏçl,,~ÖXid‹&qGNLëÊC—F!ðé7¥…Bž]ÑjTÜ ÖôUV›Hê-]šÈT˜jùŸ(ORg:ƒ²””Fx}“ª!_…z#GÑ ©y Ä¶ì=† ] †~ä+Öºiu­«ŽØvÖz±%†FÁÛÊnÿ¥›L¾IFKfCP¹q”=††h£œ´„‰}Fš¡˜¤$)×ôY}·É‹jK[¥(?³ÜíR§;-ᲺœÝ?°2)æròÄbFžrš{7sÄr|”V×éô- ¼¤raÆ$„e¾Õë9îR*ÄN_å 'v«.6‘R0æ”H›,^¯” èÄK–æ°‘QZRåónˆßéíOn95¼S¤G°Ô§ô8 ZÎ7åÎ$|å…IHæ*L…)¡KÎñµßõÝá µû¤¹hHßFJ~™\ç_PpUÆ;“¥ëVžbÁ0#äxò¬Bõ/’ÖhMýþ»0Lö0ºI€]5ZµºHï’«MÐm(¤æ¼TÒÓ§Cp`8‹Hâ5¦±z†›œNèîòáIY¬È+ÑÈJ¢ãú]èjÀùàÙ>°¯ÀV‰ÔíUZbÙÌ!­¼ÆÝðPãÂYe‚–ÔQwºžÌwKÝ¡ô§õªðj„À6ù-žV¶†DÎMxêïÝ`1˜º¬Ÿ|Y¡ÕθdÃ’™‡aTjÅu¬\ÝÏ©^#ï¢g3(7s9P<\•h6—¨ebæÆ}öh[*FSÀµ£²Dýø¦–ߌš¶icéžd³KtŽ!ÓZöuÖ°&Ì€Òfv¤`Lß%5WлkŒ0qëJ±óqzp’„^À:µ£lΛæg1¥l´'£ûÍD^Q³±Uó*Û„¼jÄXœ-èR*…ÉÍqb¤ž|3P‡ímöD&4s›LÞºÂØÖ鯗h3ûÖ6B¦(Ϭ•dV¹Û_ë$å`ÛVÄ%%ºÓs%¢èÃqßÚZk</Ò’$—qHØËbž{¸üÌ1S}gâFÅËÑ=]ÊE³øÑžK“ ¥ŸœLm•þÿ»ˆëçV;Ý6¤ÕV¦½‡[mËH¤Sß‘2&­~ÏëÛh™&u0“èMFlÜ“G%O~u`ÑQeTHžþÆ „û IËçfVZ9µàÜõ†3íL‹w¹ŸGrñ•V| Z¡1çK Ý¿=õˆ÷ô–däAOÆý¡J“ú•¤|%)ó‘y¾U1úð÷',ÉÎÞ•¶üÍÉ‹ ÔzÝÎWòò•¼ÌG^ äùbäÅèÃߟ¼$;û#/Æ…CòVáöN¬C/Þº{®vò bx‡7Z5ÿqV[h«EÐÆ0‹ÎjÚ2ˆMkþþiÿ]´ÊßWUÖ«Á¸úiÚX…ÿ¾ÿþ1þ]ûþñªùWý÷?këÁÿ=~üÞ¯­®>^ÿñøŸ4‘j êï?rýñŸëÑЭ´î{jž|ø˜×ýÉõÕ5Xÿµï¡¸øŸ¯ëÿÉÿ«.ç€Lnƒ›¡q9‚3®$Ö~üñaþy„x¯¼ap †ƒ`¨b±Ö»]AÅC¼ƒô†ï¼vÀ ¤ã;M±W?níÔw<ü¶³ÝØõ&ü\/wŽ_ˆúÓæÁîÉqc÷w± ^ÖŽêûÇ¿‹Æ«Ã£F³ÙØFHG3Àî4¶±ÅýßÅI³ëÇâ÷ƒ“#qðr_í4U-zÞRºw?$Ó]èýÅÐíË`#˜-rü² Ž>÷°.)àÅý` Ã$ cøøÎo{Òøæ‰*qʯ.j£8ZZ×>–Kå]çMªÃÂÔ¼­ «B"å"S¡q|2·3 Îw]Áp$ªãç]<.¢Y‰ª“c±ë>?>­»®óÌyˆ¦‘%õ£~ ¯xqÔt(”òÍ鯶õàbNºS4VŠ ƒÝ“ @·EÄ cZ8=ýÐ8®8Õj53%TZùÛQ5J:'4hžK9¤±þ®YáJW(FñlJÜ5—ã“Aßà烺‚ÊìÎÄ¿ÂÎT(,`âáUï1.”ôzÃʆ’À”´>Y\Ûä>j3Æ™?1¼ȃPw@P¸/pÜJ—ÎQò’ ³3+‰Ý%rB®nÜfÌEMà„§ß–5©%Òû‹v„d€Ãg›8z/¿¦×&eá݃Ú9 ~x&@b`$Î{1Kw:Y‹…¿{Z,1¸-#Y¡>L^—gb/—¹Nro›ã„…%MáÅœGÌXRLñ‚ «œj4îeA ˆ4fï ޣϨØñ6¸™¢×Ö¢,ÜÆD'ª‚.^1++‰¬z-ß'§ÈÇ`C¡&­”ÙNýD_ÒÀk£ RÂ䤧÷wt´}!_Èãï@­œêçM3y—<Øs,ß4›!´±'_o¨Àá¿7×îåߊ/‚ŸC”óª|Ⱥ· ñAðéojš&ÛÙψWOµ02ùUÙ×õ€F¦úF›Ï FlÑâ˜RÇYªˆaÌ%?¤ãÆ[u‰‡è“!ÁÿåÈ!í¦ôZÌ~}Hd‡Cتk–t¾~•Zu‚Æþ¸?½V š˜¦çÁv¾2ƇÕÊãËÜõWrH‚ÊÅb¾ø¡IƬ–¯ÊY›vWe /y‘ˆÄ¦¥ÍÞ`Áa®Ç¹Ï9{…ÊWáíÌÕ?Š–î¦N înÂóLç³k¢›ÚA‘·Ä¿Må‰Þ€°+ÎÂ4Ú‡)9V »I?n®à¹I†ÐP\Š32fD-Ÿ„¬ã•)ÄoUÌy¬Ø‡…íY´bÜü"½Ø¶®[¤–D|’çd]œÕð. [Bá–Þ§› ¡˜á…ÆlWV“Ç)¥k‘Oñ¬PƒJ[rG‡JQF™‰ïnŠAŽTÆ%Ï–•S*yÒ0q—Ëéùaå%b¸#9 óäPý>»ol,ì°Ä¥¤ß:áÿ¤Ý·©*Ã~ŸÏ ¨„G”6`*–âgå),Lrðä©~Ó[@¯Žà7œxwáþ[A¢¥E燓ÚOÎJ1 R·7¨bk{2œð ÊÃLôàÙý/•xrq*ö5«8÷6@-.!ð¸ÝsÛ§Çyã~Ûã}xôHqôÛŽÅlW"b® ]ëóu.µ+ÇÓ¨I¶:ÌT¼=V Ó=þg] M“ÔUT—Mê'Dz~&LŒXר…IôÓp¨)cz #ìÓ¢êÞtz½,E¹u c/~—Üi¤':È»¬uvWEx¶Üèº) ŸnêoÄâñý˜z™sìqãU]»(éòzày·U‘nf ˜r9ÓªBÎ8ãë@èû Q¿þÊè¼!ž¿#å…DQ¡1ŽNa3ÛÈ/ÏrzjV¶Yt©’R÷÷ÉæJßá®|÷Ýžóí®ùîW¨|5j“GÛ#U”_BÙ¤£¸Be±p¯ƒ·IÙ+€«‹ÕhV%Ö‡dè ™ Çt8» †›3@êCîÆ}:I40›Þ”qhO[«_-XU<¾ KÚÅ@5²Vn@–ŠV†v#ySÎðn©ƒZµµDûŠ#Ñ:P%¦ãŸòÊÀï·¶Àk$×Å~ߎæñ…º2†7ËÔJW¯·ÞV¡"T™Î"ªöÂÐ3éP,v*¢¤Ò±(ÈŒ-’„â1(Eõâ¬&ÐÌ©P¯dÈ´¢GÇnÒÛ ÅƒìlÅQ!§Rm&ÙÞRª?4Ýu}`ë¢RZ1ah¹û»ú<;>N›®k‚™Äê%ú{'ŽRÈýÒ0GÓB+ÐFƒÖžøOa`>ŸA€Í9>mÅ+0 Ôq8“$'×ÒºN Ð%aŠ^ d÷RÀ#oZ±ÒÍ–1¾÷ŒŒHÎgË '÷"!e´ºNÈ¢·>Ï*µ½.•´Y–48sBa$FÎöHÓl V9÷v«/u`f"'µ¡¹… ’:yf›gHò€Âñϼiû%4ÒÛF\¹¬,‚zÊ$MÍ…ßyl Íz.Yq“é:òï°lXîE[L+9ÖØvº,omŒq (gõ/HpÔ²pTŽŒVÍŠT$Ó¡ a|ù1™Š sgaÌìzd,*‰‘»,¨A+™,~zË´ #Œ6€ÍX,­°2ä0öýw)ï œ%vß¡}™…1.i †ØyÍîިW;eÅ,` 5D¯7BǽûÒŸ„¥ Bc (Ü(ožù¸í…ý>e(šù£ëê z…éBáá+GØÅ /à¿Õ¥ z¡s>÷ÈoGú68±|ƵT®2Ibå»$(·».TFŽÙ…%;)¿Uáñë’xöLL/,Yu>îy×HSëVû¹[¯Õ_4Üî¿œíGš ¶|YÚvÌ(W6«·šÇTðïÚkñ*©+Þ”+µa¿hïEÅ·F$;ú|-¿¡FkvÁ•`ƈn ÃCí`SöÆ‘Zm\b7§;⸠é 6¯Õ†®¸ß5tïÔ¨D)5ïª9ù>ÁN…¢?¼–³º™Œô~%©ûµÔ”€ƒ/áîƒÐ,WŠ¢7'åš?dË?{–·”^tA‡.'Ï<]ZÀVKB‡^­ÓÓ ÿ)Ðö•Avû4!ÚZƒ$/B0]‚Ô Â–D—5!'Þ¦j]Ž‰ÉË€“ùºõ6Àk\ùýùL:ÕÙ¼°D4MÂœ!ºˆ›¸3¿ï᎕ÁÕ(a,‰ÈhNÇ #Aå৲]€Mùw«Ko»ëX’Ù°©¨w-Á&-$ïÚâO¦Ã&ÞU9þÁíž4ên«qì<ÞÒ4uGÞU0ž…éÛ`Äoäç[Š§”}0'‚͇uðû@h4=ª–»z4þ´Õ3úaïÅäz‰¹{~/8I¥?ôÐÛô .ƒ^ÞN0ç,F;ä%.*¤ý>Ùs[,A•y#hæWeçSZdš>ŒÅ°ù°Û"´N4@i˜¤‡r`¿:$Ä! `ŠT {0☤Î×ÕE šDB0ˆ¡¢RCÆ«œê²^Õb¤­œ˜˜ÉÚÀŠ@îëÉûu º¨^ LmÅ°ë•dq8_¸ ú¹x®ü™³Nãƒæ·QëFÞà§y<#Ýpäó±K6Õ% Âɹ<ת& Fim´†=^k­•5€ä¥uPTuíbmIÃËAßZ(’÷gèÉýÞEUþÊp–"¾È¨\x±xc#8±±ÙãÖJüÄé?9V³Yåä¾e¹™:~WµÚ ÅÞ¥ ,@Xc„Ä¡;ôlEØÚX˜±jY`è‘.Nñá4@Aø×Âœ£È¥\ÊyÊËiÿ£?ÏöÌ3¦lá’vD4‘”´÷S O]Ç¥‡ê*"‰~ÕÇD'këkO 1¦y;½#½r“šÅRö°²¥­TKäŸ4gs €Ýó/°ÐÖcDûn×á$!¶ó*Ó,ªËñrùâË€îk‰¡ŠÂùùÅSwqÛè"¿Û±¼{hy÷Èòî±åÝË»o,ï¾µ¼ûûík l-,ñ@á¹kÒbÉ¢V-=RÛx;)¥´x¹Õ~4{¶›)h£Ù»N+Ên­4¬‘eò[©¡&ÇÃò²Z« ZØø4M8–=°¼»›êÊ-›ÛÈŒäO5_KÇË»Ðònnywey÷Êònhyç[Þ5,ïÎ-ïž[Þõ-ïê–w±å]×ònjy7±¼‹R+v¢B&œøúô ÑáiaYP²2ã,3,ƒDUlíibËb%ò Óš41!f±É’•f`eºôÁ~9›…øÁÊd,c¤âY¼r<;„S~-á"FºxÐãL§¼ÆŒÈF&ëd  gòK†ƒ¹2…å2’ }mJÑec¸NÁœÈÀÄð%×Y9š­ò®“â¶È"SC§thº\Êôh$M%/DfÙ _w,+ç†æ[±[«uÍâf$cBÙÌåÄÕÌ?"뮵m¤¨,aV%’ƒÊR‚¾Zr-.x0ÌCVÒ!üP«&‚»/yŸ¤›U+ÉC=%þ¤­CV‰Ë˜åKnˆËxùÅ”=ÃT ñ](“€ÀSœx\¿z 2bQë¼—? ¦h‰ÃšÎ,LœþOJ‡ª'åÅUדºBãd¼g٠ƀž-Iÿ7 ñ›hqÿã‹0úØ0~ƒä~±r ËØ–4³ƒ-¹ÍÑe^gyRš-Ãyqø'ÒnÙ‘ü@YŒ!1;   à0‘]”Ð!ƒ¶f| ¤a+tó³-èÿÁá1¤~]¼SŒï´‚Vš˜–>Þe'µ·¨*Ï~z-Ç®d…S#þN˜>/²Œ?ò&ï¬Ɔ G°ÒØ'TbHØ*Žª¼p¸ÊkUØä*ÐtqÈ-#Ú¡ç4­·¹°[+‘¦l9úŸºhYó¿Øâ-Hæiq{+¢þBdP‰k’(àó²%H1ç ‰£°WÇ èË"ÖrIµ%ó³xY,Ú»E‚î'žØ$Qš¸Šh¦»Ÿp]ôøëÐäƒåeýûˆUùð‡¬™UC°BÝ6ði¬gQ7ÙÐoNN»½²œåy¬z&«Œ}$ÊHB4ì&œl ïØ»rñÜ°KB²,Þ.åeËb2Þ•» Rºhn’3}ê{ÉèUÅ©™lEZ°œí#¬MUf2J*r'y{ðÏç''øZ„ÞSv+Á„ì´KãE¼ÔÍ»,: PóÍ “HäÆËûòÛ1Ÿ‚ñË0)eÏèË’Æï¤èâ3À•ÏE©BöÒv ùM«JÏö¤­Ça÷_‹ˆGûË°OIëN¹”ÏPAñ8Ïᆠ·mXl¤ß•’Ïï´iüe¥35 mó"Ï’¥û9Sc}»š>!OÛn+,-.-1_Zâji‰WKK,âÒ2ºŽïVÐu¨>7dµn©Š°7§…#¼7°à@_³Ý5¬Ö÷•ø¬•ú7\Ú?i‰ÆÒçKK<¿Å, ÂùÙÈÿ¸YP¬×ÝÅžîâd.g£fþav–UY…ò`"›¤qŠç2ËÎêU4°ùø”cy¹B¼‰ŠÙY¥‹7œÐO1‘7˜Àü‰cí‰Tu_šGKbª4m”»o½BŒðí³kzdg1ŠFZ¾ðÀy3©åoÛ;ÖÓvq{«Š„†8€Wo! ~¸Ód5gkNLEÒ]ÞVú ]ñæFCµujåë.=ŽŒ3hSB¯‡suõ’lOT0}¤9. y/»ôZVKœÍœI¯”ÊÌ@ÒùdÌ ajR¶¦eè])go’]W@KâTÜnêÖO›dN†Ì%“ Ü(ÆGþ{Ÿn¡ÍdQ|Ë鸿ú|h‰wˆóR™LÄ ³ö~É´ÙîäW›­Â­Æøñ#ÒÑù.þ¿œñ X¬Ù*kj›‚Ïk!—Œå‹ûæoàÿÉþÓ¿Ÿÿç7[füÿ¿y´õÅÿó‹ÿçÿÏÏÁÿó·÷ˆsR^klá#çèp£àŒ¼Ý‹§œcq‹>¬)ßÀp˜$>ÀѺ2±W' µ#óõPi÷A/‡ó‰Xœråç2¹Ü//•ï§‹AU{€A_"&|R®¨ì}…fý²=ÖžS¬ò3àѱ*]ÑÁ¬L¯Kuxì]ËC:˜ˆðrÚg*˜¼ß1zŸ{Ñ& Âtèˆ;LÂ9xRÉ™‘Î|…˜·Ù ø“ææÀŸ ‚DUÀÉ›Dçà¤wcF×Éã±_,H+´Ò?Dh<–\WK ÍP­2ë«€“ágFUñ{Ï)‰Rxë• ³|ÎùES‹ŠwôšehMûX.•wª¤D`&±æ<o&E¨õ!éÇç T;’Q‡ýàGQÅ)~C…ŠƒŸwq›WJÕÕ$˜Y|.9@òÑG„]æP»õp‚É¢&ŒY¿˜Aã&ó‘–ô–^amÝ”˜£5ûÓÙ…JIØ7@NüxÆqò¦è„¬éQŒ„l´™+¢ Ð-åNJ†ùý‹#âa¬$„ñ|8 úˆÂ2‡×Pd¶ël%þ6‹½ïš*K ›\{嶇ìüºóø±j§ÝT7—}ÞU`kF2gÁ¨{[²!£ ÑïÝTz©êˆ*ÌyßÕYR¸O³¾"xy¦Ãæ2.,jŸ Ü`Cí]6j¦Œ*&)”1Êçþ„Üj?j9£ÉéùçœÕìËùœ¢`‹Õtü©NcàÌ­×zŽ³­½><¦WZöîé~·×¡·Oô8]™? ì@”g×_5™î€òôˆú>0‘Τzî/‰¾<€Î‰ ’2ý¤â0&yi½dâtàXyÁ”MvÇY¥‹ŽSLi´>dÒ‘g*7[ľ™õ’{!K®r †ÙÅ=}¡3½T]¡x¶lX[¶ÝÄbÒî Ê ¼ÍÍDPîH(b0Õj5=àÚ›ÉZv„"z•J'+—ÇÆ2k©…`Ïu„1èÒ탼ëýe»h4õÔùzJ!PáÈãDËðg—/Ý< Z -'JÔ;Þååô;&‡éuÎ&•1†A’nQY¢za1Ó°¿ÔѶ¾™?½Š/äò·œYÙTÊ[-9˜på4—÷RvŠ–e]2V üw›šg꫘g Dzïlá5þÒ*XwŠÄÙÒº‚ â\¹TTU=Ù@î>Iµu›­"¢ÅÜÒæCA ¿J ®’8ÔC²ó*©.q¦Í ‚’¸Ùu¯õñ×yÔ–•nnþ^øpeq÷œ¹I_-)e¯ÍðÅ×FÖE•yp)¡Å^$úWFsÙLwÅèVù:•Ê )eRé4Ú¥mzÕuKÆž0™õÇÐ.]æMÞ˜SRÞF_Q\ñ«ò‚B?{#¾õ:§Ìîõºœ——#•ú›ˆ¥8“®ËåêòÙbsG_k;:ŸUS3w­UÌç©V# Û®ÝXävŒ½r­õ­Ge°Q¹&¿|!QB‘É$ÓÖà%•-¥›-IšÊ¤£K¢[é4;¹Œš]BÌ—N‚ÝlÖ/ ôƒí·yÂnñV¤ä©MÈa{/¾ƒŠ¡ ±ÄJ”ä 'µK§t!å'Æù·úú’X7”É«JÁø¦{)%“#…É„ ×Ê:.@&D$9ƧK‰¦…[•†ÚUn·"|¯dæX¦ˆ×# ®~íl™“N¬[ŸL,†–úeã^öfwé¬6TWBL—]ÿžÚxyi©äÅÌUÙhç\¿þú4)7:±GøFŠ\xG˜»…»z>ÓÔ­æÍòšZú²>ðã~DN1–fªSÝô6ñ!ÏÄ ÊåׂÉKêp&-kê÷wÆ2]ö„°î§Æ˜™ìc2ÖK¢"/ª~³SPqT‘”6˜u¶5Gzõ‡C=4 ›EÅh®v-Úƒe^ÐW ÐÆáuKLË.ôlÙÖ‹6ÃE<£·èÒ§iÂGZ¦\•—^â¨ä`kŒù瑯¸ñ—įI%1Y ™`÷eˆ¦V ¬Ù¾4—ã4æSÐØS¸„¨ªiŽŒï„/˜€Þæ% ¹ LuÇ{¥ó0ÉÑ[E´wÊ„Ó ­k³íÔïh”!€f ä;†wAÚE\*oCkÇbµN‰³V(œb„»A1nžÓv ê&Z¯‚F“€³ ù’p[ÛÉ-s ”y{RA'¶>pxALóÉh,…—>EDç RÕMJïoÏØ°œhŸUÉÙ$ÖM€6£þ`Á&Ðϸ…¢iæ }}Ù±Ò©mC«rϥΫXìUo5>ò2º<1n3É.Jño‹ï%òä€Ozo{·ºw£ûꬎa˜‘¿V¹²Pâ]b\-ê iŠlífó×gšäËÏg{ê“ÍU¢èMüµËìòîR$Û$uhýB,Èb)õñI[K{™HuÒr=±BE^{¿2W3Ç>§ù˜/g¨³™SzøЮ8ø™‹šìe—‹·:» ñ‚,(¥ãSZAʈÆĆ¼› Wiµy®þY¯¾Òœ_x Ãý~à˜ˆJjg;¾hû$5 Ë-B¾ï²a\ߪ¬l*¦Ý†È ²ÒT¤´ˆ%U³¢õ¶œG1Mû“LYÛk¢…±NÒº<6mb-ßW±É!Å—³ú‰ oHÑøIYUÓbKĤ].JXn¬ôà»ÊœEcð& &G£-h3 ;[äš8–‰úÐÌCç¼ÈGþ8弇32³ nÿ3_¥ûsØ;„ÌI»ë<ª¾ª.Ó5˜çº0ËzKf]–ðpW ãÆjž®ÏN†Õ Ú7$!‰o H¦°g¦y“sæÓ”«>:ò=¶¬úHjŽí´VÜÌ ƒ¤ÆÎ"Õ›®µ\C,'ò£™ü!¡‰+eåîn;èÌÊIÉ’áÃSèœçÅ”{¸ƒ¦;Tî¸íçH­¥õáN¹4­äšeÚ¨¾\³>µ‘².Zn—á{ ¬lÔf$e6jëó- i9.˸çIùÑÂR/ Ó»7ÇBá¶"û ¬Hv¤8„BÆfÆì„’$DÃ)ì°"¨=©ÌÒnå4²»wýix—ôRÿ´@÷@ÅPšV§nW`(’]·”¥X<í9SŸ·Òéû RvÎ/w\“`–":•^xÝ‘^î+µÄ ‰Ë,µÖ%ÂzV8,~wÒçi°âeriw×vu¼>]xOœs|ðŒØΡú+Rq 9‹­^Ùýc66vW@ ÏZSh*ƒrÕ.ùšÅ›¨ WR긽”Öô¾OïEÑ°¦ÓДYÛ–FW3*É,øÇRv+ÅR½±ñÇ’jÙâOvº•|LryR/þè†:Ö¾XVŸý*r‘‰äŠ¯c8)'a7ðÎ ·…MdX¶vÂb({ppšî,‚}~ý”úÞ$ €Bzb™ZXì¬w¾?EªP U°8t†^„@<ºNAÈä°$lb5pf‘ïÓ}ž5 '0Îí<ðû@11»¸¸Û¢n½¼ðQÖ›ø—¨Ñª”žn›Ñ {0à>ä"NmUð&O7uèIÞB“ê®ÁÌ€‡ëM§Q8¬ƒò#å>"±ÍGr¡HŒ¶©ËuØUè¢LÞ{j2‹iN·ùÒÝô qfÄ,• Ú4PÊ*¡.Ä\K' êP8¥Aþçжè½<ó˜œ~êâN•"5ñJˆ±‹> ºeVÅ'´¦º€Eeƒ4Àh/ˆ$¢’8‰I‰–îÌP½ögØáÄ#¡Ï²öçZm°d¿«Ò« 8ã`BDöubàç¼Ý5’°‹"”yS$›C—óq$;n4'žÒЄQsT¥”AÀÉg¥àÁvÙ¢CÈè!ÏA,S“kȲŸ0?â¾>hÔ;Z¸²% ‚É£H-U†hî8Á®˜í’5GvcÓìá~ŘA8+©Õâë­·Ÿ %Þòó6~FHðgg×ôÀÞa£CµˆÓÃ$Ax Ú±gKüŽŠQ&ˆð½ ÚâájBÑLEk‚jmHf51£Â‡ÄëRà®ìóFjB$¾oÓá^&F’‰íëŠvÊÝÅMä­¥ÕÍ=’“½Ñ7SƒPž„dŽž©vÅA¨]°ðȚÎ1‰Š‰½Ô£œ|o(iŸNË9(€Aèð õ=²ŠJY&¡ ,›nPµ² zÉÄ^t½j\aä4‚ã ®bê[X!Q<}—Ç»Î4È•ŽqÀ&,’NgJi‰3"Óðq…—¿¿íj7ÕC8TV„äÂØZg>G Æ0pŒ›töða… à1 zÅâ’•g_„B²cY•Ï(xöèôŠ‘8ÈØ››5œ)‘Ž˜lšÄ‘ϸ§ÎqÁ hɉð«7ÛÅÉñ&¶€Ëgj){”U;ÊX±#b¡Î4}¼JT¼Ò}Kk ÓÌþýûN©”ö}+®R6ùà×_EjPIÇÄÛ?J!yƒ»#Ûš÷1šŽ×mw¥ÊBb2¦`X´qÉ‘;05s«-vÊóTÏ߸®ù•!ä:”¦ýIWVê[IïèâGÙ&rY¹X‰/fF8‘ãNm[ž•Ôt¶fQ×2¥B"qÆtß®EùU6Ú'Qð¥‡$‚@h>ù“22¯aŸªšˆ¶€™ó†Á•$GÎÔã´ã ÝaÚóªÓ¸ša~æ@DFÎG#ï§âxòÆþÌ™OYÄ &Ãð†Ô @uØ* —kŠ’#ö›&$‚~Û «—ÕÕ £ëSß]ìdÉà×qhÎTbc–0PI ¹ø€`ŠéVÜkõ‹B-Èi ³pšÈÉ6åÔ×ܧ2HÝÚs¶X€œ‚ÚåÂð”ÀaIUÆréoA ÑÁHI£R=Š¿q´º.q™`)Ìè?lÀGF@3É15»€ ¯rå³Ê6߆=Ý­Á‚À9%×f1­'œ=‰1ù–µ –ÛÙÓ°"Û‡‰{¶v«ÅÕzm‰ ²J§súgï^òÓ؇ڊ|È 3‘&2ò ¦[Nº!é“ ¶å\É ¯Ú¥˜Æ±kùJCµSA"§/™{2–Ìj¤ªn¥‡ƒpÙœ5ɈŸ´»nóø‡Z«yr€ÄêîÐÇœ” È(­FòŸqùSbxš¼ ²Zš–aÕ~ë¤U\ìÒL[(én Lúâ0aôxµTRÝÏË!óT<6i@]*–M¿2ãÖP'æÀ‡e·€åV‘í ›ÀI¶hêÓÄM¶gž%I@ˆ•¼V&}÷NK”sè¥ñÕž¼U€íxé¯a„ç™<÷ š@c${Žq>Ú£vÑÚý¢›X*´ ÀY!ÿ£Ñ(ï´Ñ ÞÒÛRŸØª@z`3G×Tà;YÍ<$Mì{ý NìÁˆ›ïb“ ¹c"Ì’•þÉ}„y}Ýî¿øæp¨ ia5œäÍÞjË*Yßo#uí™}>ÄÙ/z/Š,º­WW 9t°PØ+Å¥è@ €· Øu k#ßÝìiæ2¹Êœ“,Óלâ|øð¸-V"öÄ€} ms§ô›'áTj÷ûïœùdŒðÂ|à=÷eh‹\žÈ;&¨Øû€bŸÈ€1cdlÌõx%Ÿð I> +—þªË[»[ãúëDt ¤?aþÏ™ÏâÍß"5æ7ß<ÎÉÿÉé2)ÿ磇?z„ù?wv¶þæ<þ’ÿóYÿï^“êÅï“ÿuëÉãí'©ü¯;ï|Éÿúæý’úõKêWyÍɞ˘ÒÆí1þÄ&D ÂKxÔR~*àg>^ÄÒdW9…¬Ê—Ù{Ñ踇­Ús:¼·®¶·¶’¯ƒfÏ­ˆ[W;ú×Nã¤Që©Ê[Wà«–&ïE­ƒ•Kæü‚ÿ܇"Ãa™FqÔ8>}ê4ŒülG.&´ïÖ~hº"³œ—f¯QÎÔk¼jöŒzÚà0¾QáE£uRÛoŸör+ìd+ÔÛǽÆq¯k¯ðPOê5°Û'¸;´&ôI{à¤G†¥ËY §'¦òl1Ó“,ˆÓãƒöÂ9ÅÙj­6^u.¨Æ²SÃÎV´45PK7-cÃKÍ…•°@¶Z§ùüEoQ5*­·ß]ÒÇý®e>­Å• €¥‹´Î‹ºH²{í“ÅÍA2†Hƽø’I‡sÚtâÙ|8TŠ™œ§­žS¯µZûµú÷ÎËÉà$ ûNéÅËãçârôî´yÜsÆh¨}î/ré¦r—'ú  ÍñsgD¨É4T; ç³ýðªäpK£óÕ[ÊmÊ!Wy´åíG>Hƒ`Œ 9‘óÐoq”œ¡c1]}6ºFi"š!Y«yÜèîêoêí¼(ðýƒôüñÁŒŒhµê"@Œ»C(éN¼±Ïë•£éÈ»Vú*ÔLaQK÷ª}M…¦õ@¸#(¶›~ÙGfc 9ÅpÚZÚZl‰¢ÁÍ4$!·©:œÇÂUN'[óTû|š‰èpþúïAð£E¡Î—È ³¼Ð÷ç¹/OÖÉŒ²l‡C'XƒC”áPߪ«ùu|R†ZËêR³±…tM“GÆ@#ðçzq¿»>MÓ|<©8Qˆ†?§Ó©Ï™jq |cŒž­ÊV¹š´7@-Ãx ‡=%Q[ØHãÊï#Kƒ> €‰ÄmQÕj¾ñt¨š¨V@ÑâÙ…äÜ·(aqƒDJBÊwyRãùHÉXM¦_ÐH»K©)§>委¹+ƒŸ…ý 'Â$.[GO‰šŒ¦…¤õ1pc.o•’ÀpZ:‰þ‹;srq}²›E@Œ°¼ïB6E[¾²tòâ¹É`†^6¾Åx£¼Ø>TI‚°*¾£'Ê(x3?Ù£Ëg ©jQa'çmZ5ۀ𣦚ie¼ö —TEž Z丿ýéþ-ÿû¿ü¿óøáÇùÿÑÃ/òÿùÿ‹üÿÇËÿ2êÀQWñí”8~ô•kú€Š³ë©ÓÙ§c&lAQY—ª÷ùlœùc §3òyÇhnZdmÃd &kèF½Þ+vö¡µúaãèÊt3`ÐÈ 3Aÿè¦ÐWȵû‘â]1%NQ©4ŠÚËó¾ùÌêýRŒ¤^’µÈW.ÄÅóM‚dá…S<ÂÛáçÚtz Lúë·ÂW¢xÐ(îêE磑^‹øcŒ´Ã[Ôi÷• $Ȉ(9íæyâBæˆ3‚XÒ*µNº½NÙ‰³Âü¤õ'[èhßmÖÛÇÍãÃv爬—_ñeû{Gœ³ÉaÝñû³7{|ÚjUœ^ç´‘\YÕNšã^çGÄ#”L@"lw{µãzùhÂðÑg âh/O"ÿ½ús¨Ó $gHLóY“úxн/ÅÔuŸ'aãsê:Ln½Uë’h½î¼˜Í^ÔŽZBƒqQë÷}Pîâ}^÷^tµµ-—¢Erמ×Ýæq³W*ï AxrCø„ûölŒf¼i³0rY0òN¾ô®a[zCŸc&΄C åx ÇLhaÆÎZ +=†6’Ù3JþFò¶NŽ¿Ï®G¾îëSïºÐÙƒNí%¬<<üÀ»éŠ£ép"e}ª(2ûgõQÜ ¯h.¸e)•õ"­ç/›Çí—W½N-S^¡ì´za)Ú—¸h+ôô®¤!¡ÚÆå,€:óâñ®Äxß<¨»p*¶_ZjŸEû^ÿÝyÎæ£ç?ëÎÂþ»öÙO¸}^¾höî~ç´û¢l™âøç#2ÇŽi´ÅRªŽ¿¸Ø^2eJ‚ÈÐv TÔ)Ý—õËË(ÕöñÖ[æ0¼)´iÑùT°ØxŠ=u¶®¾~U´íáÒ|‚g†?(ÃL´¼xÖ ÂfFîSôÚ1>d"Ñí1gB‘v< "–¥*âHeY”ÄŠAè³Ý­¤øz T´8ÕjUî¤ý8…]ð S¯ï—Öõ²å²Aœ4»|™2ÍîÜØ j}vT™ÑQf‘_uÖ3ou¬PkR$Í—ÊP#ÝØ‹åLŠ'€]H_$qæô†³öOP$;Mè’`Äå4TfÒú­.TjÄ…±$õˆºæé²Uq¦h°jÌðn‚wxb{äË<“SR{0_ ¹ð–ÿ^vÝöN«vrÒ8`’dÞÖk'x:W¥œu˜”/ëë/]`ˇµÓVFiÀ†FL"—·ÛV¾ ³‹ ðñ¶ŒÅú?&˜".rŒä•»Ry1J"Z ÈOæ‹êi´Aðz!æójíñÛ42fIžIðô5^‰Þ­@írhIéÓ¿‘Æ|—âz¸Ë̼ˆ3Š~ûÀc†Q\rl‡#ª‰}] %À4I¶–z«lpÁ°äÜéä£, 5$ÙPîHÅA0NÙ‘®ÎÚ£jMêÄ57ýØ^@þÄ÷>VYŸ/½Ý…[% L’P7Æ2àd…£DK‰Ò1ˆ6}VžŸ¼É;NEmKä$|8°`W3[䔥IqÌ|Ûok KŠF Ä÷a,£öƒX¤L:EÄq u´æ¬-ð­2Ë p)+=¡j6ab:~ù âÞ†XŒœÅÐ\ei]„m_žQµw®;ÕŒºR¬¨ÿ'_UQÚÆûõ•Ø@†Û-.i»ñ€¥`7yæ“`W©çgtnº^)…Yp‘ÛÇG§QïÑ÷gš]#< ñ8»Zk²n¶a; g³pLIkáÍÆ3¬ö`Ay‘¿v+õZ&¯U½K† gÖÌ}p¨zZE<êøe4a#=ºvD&"TW\_]z±;Å»:Ÿ]“ÛFŒâr†?äg-C¤ôàó)éÙŽƒ¸ô(4{î HÈ™kR¼Ê8Qäv×¥/OjÚQraÊòʔ׊û04OØäý‹’lÀ1Ί—õòˆdèƒf­Õ~þTï@ן†ý9œ\p,A_›3\½n :Â1ÿ"¬o z½}tÒ½ZvëRö^û–v_"8ØÞSÛì4&ƒƒÀ…ç²g¨qìÙ°ÃVè~«ÝmM¯Ò¤8ñ CÔÏÉÃZ«Û lþ¤W÷‹Dà‡ˆ)µ-¦Ìþâ î XypRƒ6»Ð{ SÖÐe®_°Ñ¼ä%ªF„Ü _ æã1'î5^õŽ½N³îÌ%-Áé—ðÐdÔpJbÀV„Åp=sQ}ÄžSBE—á1”å,l<˨)˜ì³^à N\¹–]`­ú3¡-ô+iB÷Çn¯¶M¯îaû¸—ŠÅ{p<á z?&÷g©(CiŒ/Ú¯@‡Ìï …ÇÃf\kïý:¼|É”1]Tˆ¢ì ~zÀO 2ðF-ß“ót_ë´Æšfñ¾¶êf¯„B¶¤¨2ÙÞÐQ¥JÙÜ6õSJW' %¯Eœ!&ô‚ßÌœ#âŸqÿlÛŒÄȧéE­c û‚(„ò§Ù´Y„“`‰%·- ³ê­5ÈËä٠±À¥4µÉ#Qù#é6z‡íúi× Kt.Zâd%*:º¤Ð„š¤j S'ð¶ñÕ<W]‹ï›­Vv/‚Ÿ×‹?Öñš?/îàÖŠhíŸözíãÓ“§‹Ž$GÊ”Î;5´Ú/Ûƒ’4•b7gÚªfV ®Ä‹fY= û$ýïô#T·k¡~lêËz­^R=-±¾-ü¢ó;$ƒ¶!-qÏç¾iôhÙJª f+YÖ÷…0Û]°u ÖA9w”J¶xO Æ$Xú*‘ÄŠÕÆܘ6غ™Û²2‡µ5*fLø6*Q7©Î~Û®Nëm¨ÓižUS!¤þ¥n£œôuÔ ã]4\iÌk±RÜäª(n Þù×ñSçßû”/ ìüû°ÄYPŸ”æSøs\„—“ò›I1ÔédŒSbµ0=<¼„ßÿ7fOÿ}€gøÈ-‡Š…oד·‹àõÂ)”B³ÑVˆ³N)ö½¨{}iËð­Eb%ü07œÄÍå âÊÊ.^U;»•v€lWûGÜIÏp¦”*)Ev@’AïáŽ;) h–7-­ØñªO3Üù2Ÿ  'Ù˜i\þáu>–#Më?ØZ6'zDJsPq23€ü¬”²xJ¡'¨‚ú4Õ÷I<ÐkÑêT£>­W9'm!Û¡z—âr$Ç$Õ.úÙóNH`ö:š.Êz™±¸vúFùÈ»–‘ï|æSv¤’q®! ®õÄÈšö“dÙì²fMV¡Z;ÏQ Öš³v›D·éÅí±!#æwIª ÷RŠ?}@wm”^ø²8çû¥Ç+hw[°µÔõgûïŽÂO[£}Rû?²‰°—DɬŽà ‘ûè:ægQ»ãò…J±e[^X”pB{ÎûP!t•ƒg&Ï°ŸN2-nÅ!1 wYó›ÙNV•º9fµ¹zï‘D÷JK×Ú\^§vÜ=©uà_q`™o:7™kyb8pÌ!-/-#Ê?K“ÁÂƪlÜÎ9ÖRJ¢Èg/냸©RJåœ!T£˜õ€}Ô“¸Ñµ›I i©ê•Õ“ô­ j~µx&†€UΊ|òU¤¢-Xu’Ü€3(©v ÜÕ_·È©õÃhåAOú)í–›¬t² UÎĚѭ¤ÑwÄ#Uµ79'oòÜ£º”&Û÷Çq’Çñœt¾Õ±÷zuøT“Þj…0•ãUb— P™“7æº>÷µóÉj5vŸO_ÒHþyüï?GûoüIö`ýßÅþ{ë›'Sößáÿ¾Øÿöß7¾1—FàwÓZF?„YSv«› G³¦ÒêÕw£²zñÌ|9Âì»Qp†/õhô}…BL³7Ó+S˜—©×ÇN9Í™ónB&稒wþž3ô/‘U ‹ƒ8 ÊLÕœ’_=¯:—˜£¤.jª©žcn½rb>@Óa¨p–#cá 둳NªVï&å±ÎQ¹™²ó†C€sÅ"íPX ÁløQTqŠ‡µf«qðÔù:~3)VDË»T~ÛÙÄ @0Ü•ÈŽ¼cF-ŽÈŠ†Óå'lœÐ_–Vyg¯dõòöCÊC·r)KµHñÔ,HäO­ooíx¦Æ› ‘å˜òbèÓüe÷Lø«»ÉíÀáqí¨±ÍÔ,žmWgãi‘‚2Т’WJéÛÐ!ET‰fÞY0 fB3áì(8;'—Ac¦ ]ü³>@8¿~z7OÂé£x6yuýójj?ùæÛ¿wMŽ°øËýÕeÅù™ÑÈÀYÛ^ÿ{†ÿÝ‘©ñt~Fý¸®\—+2ÄÉÏZ‘Iéaåÿ/MV‰/+?§°WUCçX© †e¹ŒÂddø±­­e ™Š½òÁì^.Éc^ñçÌÎ’9ò8…C^S`TG~dn2•+9Ï[^·c¥ÈkXÆ°ÄVXWèVqJåwç‘¢„Aó‡áNƨ~‰µ÷ôÚø=µ]UûÓ96:¤öa*ãÈ|f©7ìÂØ/eëð‡T ÀÛl£3ƒ"CätBé2g¡CÝ.Š-iœI2‘àaeË)yYVáwññç„Êc-Iqòq%»¨ÞJx¦ŸY°©o­?|ò`§â<|RFüg°éc”À‹sÂÜdÛg+Ìà™êç&9H–üizÎÌ¡;ò~¾.!Œ•&â'b" Ä"–{v*.høp’­ý}`<ü&E\."ÑKg;¯:÷¤ÀêßæVÏîÒHÔ×1bù[ûÀжM`QMÂBÒuCéÝLò´íÖënM-_Q܉³3¼ëüóùɉë’Œ*ÍWG§½§œÚ9;WçåÅ5;Ý’òöÂMÿ‘\DÑNŽæñîdÑéuª}vmÏÐŽ«ß”vìd',ø;K(ÇÎʱ³Ḻ9á¸úT„ŽS$·%‡šcbojA[Âcå&- ì”I,æ´ÀìÚÂ2ÉÛ•âß=õðqJ˜- -\{ k'|ÛR8;+Á¹*&tÜíÓヲUjÒ`?\û™b$Å!“/š*ïH¬#ì¨ o2‰ÛÚt 4z?(ä\‹LZÁYäE×U3aG¯}Ð~êœD!Þ÷Ðí Þñ–"8Ê}ys®¾GÞ ×q½|ÿÒ’£ÞRìgK±çu÷¼ŽÐèMZ«`ò>|ç»×&ø¢”Å …™Ãôóo§ˆªçsnŒ|Çœ5\‰ÈG³ qî–3¥±•‰‡˜ð焃q\qè>¤ÝÝ­Ž½kZ7Üv(Þ&ÁB"UMìѼ„~xì&RpaôbŒ*7¦›¦‘ïñ•X8G‚'&ß02ÈÜ‚¼¬uŽAÚ}ê¤Ä8“ؘ~°Ž|';òÕZرµ`HtLFc΢²¦ç;¯w¶¶„Sì肃æ*¬†iÚ¼•ègY~`‰+[Z:—ßgÐ0†¯¿©î ¿á=ÑÃêö£íÇ?D3 ý79[˜,`c€ªà–ÄÏè< ‡i@# ¼…6e‡·ã‹¿¾˜|Ýÿ:.VXh…¿÷k×®ÖàÅõÏÜµí­•F»³x´Þ3FêÂ0^>àG:—¦‰ßÅÝE7"7{½`.7ž}½±½³UýæÛè],JµÜ£•fN–1?žˆ–³ÿs¨žËF‹1µ˜g&kžóWeu¿Äû'ybÓÏغ–ªø²e|\L ÒÆ^01t52¢Sóø{·ž$.á¡¥ÍS&&×™„{¢Gý¶M%Dú+^WTiÄ+œãjvOëõFã qÐ)í*Ó°ŒÊ‰ÿÈñÌ~ŸüÛßdã?>ùæ›/ö?_â?~1ýùÃM‚!%;;h _Z×}¡Y¯ØÞ‰xúÛOøïÖIËJ§ûQRàØ( ‚ëï$|ä¿÷"Œþ­À¡Ù‡¾ßÞùFø‡Q@ÔÿVƒðÂ( ’ìl'N” apQ<+'sÑÓNÆ.èè´þÐ &u 0‹F¾LöáΡ§³‹±jäsvÕJ2X>Œ MuM sè&î–1àå䜊Šü€?‘Ò@‘bh~Ngô$hY3ø]f9]Ì’‰gŽjõæq¯Ý}¡íÏ®§>¡kï¢ôÇ%×9¯U;>¨»nCT&ê?b„Xx]¦¸ò¼{¸S–*ÃæP…Î=hw‘–ÀÈ·ŸTœK U[¨"ré]WÓé¸hOaljJzq<Ó¼e‚‰™x·ý0•ê!†–“ ‚X?Ó_kñ¨ïú# ‚šÇ²rVLæ3œÄáÈFØAüñ|$ÑKÍ«C–ê”ÊéÐwh>û~NF¶·~ÿ",•> ö½ïêîq»QÑF“g”r3Uúä nV©ïwµïs«DþŽ¯‹lóÞ`пÀ“p:Ÿ¡î~¦‹`<Š twè—¶s[¢Ò0zé­ÜÒ¤p$o¦~8‚çá,¼ºÆŽ“h𯼹E³ÐGØ\„?r ª¨˜¹9£Ë»è˜E3@æä©Úì¾ó8ýžœ*¿ÝBD‹}7…j®Ü‡xäûÓÒw75ø:"i+`š£É||†D)Lr½é‰2z BÓqáa–ðÚ« Ãþr¤ê>óªüxW6}ó"!Bª%’w· 7GÞ´ãO…Î9Ée¤¹tC'Ås¦rþû œC‰ðD¾r0–]cÐDyå=v…Òä`¢<œQA©Œ4©î½€úatt4Ìt—.“ÓÊë#-¶èNônÆÝm¢ðCC´L+NÂË"v GuÁpaPâ‚K¶£‰hx»æÅÈÞÛxföX%z³+ÓS„DQUf¦ÒîB èj4²2þæ(}iŒpaU`['ÀÖ<¼v‰å‘`ð^‹ñVPoþFA‚z âÓj“q l‹Çß½>@óf"ê;2ê³öyÍy%MRéQí•{T;q»Í5œ‡[˜›qQª1¨ªçK’#ˆäa"?Bâ,Ój9ÛÉóqû¸ál8;Tgâû7aqhrigL;Œb\œ3R Óå)«ÊúÈ,«œe¢÷fÏU¯Å¢BÊÌÒaT&+5°`y¦!“"è#÷@Äz´ä4BôÀ­„˜¸<À‚i‡a(dú ³I¥Žb²á=C#IÍ°ÒÀöTs¿§Šj«é*bë`ÞçÛɉÂt ÃqıâEã¦]ÌÏÅUfB“Ñÿk‡Ž7úý^ENQ’T#XL¤åü(Œ.)Gqb™£ÝU¤šS„‹µÖ&NÚ%Ûö¶4´)íR;„ÜFj&s¦ž@éNCÈÌê«öÞ¯ qÿšŸ¹ì¤4©2™NÙ—úƒZXÌ,1Èó”–òZÍ20P ýØ-;9â2ó>ñ/¦=.¯ñ²”9þʺ·~z®Ÿí„§¬/1w\6 çmO;zµo¼OÕ!¬If)ƒæ^•v ykùA¤ÀQŒ @ÚO9Òœõ>%¹œÓ—M”¿a_;­€( ~šÃ9ºÞDMP'Üe:‚ëÔœ-h„ÜQp™¨;AAdK4WMïÕ·8e¡³ /Ï‚óªQ§F2 ìG %’¢WíFƱ­¿‰Rq ‡õ¾roƒ§Ÿ  æÀxF#íÝ¥û¸ %ÈÐ=ëžL.Íà‰SF:ù˜’ecÉ]Ýžø'“bT°cZs€mÎOw7EÔîE$qžêVœµ7“µ²I¨üžÎâllK/¸RÊÐÆ ÛiòòàÁO0)–#¢¬öôOÔ¬SD†ÌL´hC+‚+d-ƒ mtxÍk©ûMÜD ¹[ïÓæ¼¢W…RÞŸXuJîÑ«i yÀÒÒg¶øQMñ¬@ˆ¡L´„m–MM3¯Ép1‹INR‘ŸbÊIXÁÖ8Áeä“y™Çœsæ1Û-!&#ø#¹nà" 3@sÿ$c°qèVªúµpÐâµ /Y7ýDµàxÎàzâEJLø¨ƒ5Œ"`Ð"ÈXQ%ZÑu™ÑUñulr¶£§:_Œ±n†¨&Š‡%Ý–¹7}4’Œ*iÎ-aæQ—«SÅ"¥žS²V §ÕðRš]¤µÂIõyš:HÑêᜎB®‘‡D„ºÆIµ+0W"V¾ª† –“=bxô³î¿ùÎb ë#rÍ0çóL_&˜«'ò)›ÑȊ׾¬ñ—ôzëÒ„K•õc3Dc¨iÓô\ÎyƱfÏ,nŸ!'góó§ºxƾF{¢×ÛÈÞxä¨eI“¹8åb“½º6‡H8 ß÷ch4–áá¿Þ¢&CÝII`2]Mß´+ßoé!Æäa»ã Wœî´Õ˹ïl]}3ÜÍøôËL}kl½D-·+µx"‘ꑔΛÓXéSÅ-‡‡š«„\#“,5`Já¨ï ÌD&¾SY©y&q>E´j+ˆØÀo‘x‘Â9Ÿ]1ø3>ÈHÓ…q:tÚ3œ ÅýyðÞŸXùBÇ$*\!õ™w¸ÎâW’À Í°…ìÃ*°,›AVª+øàŒá óñzHv`ähbŠc£è lHI’±®íÝóIDO˜ÙöìH˜’€ù4¢C5³Ü‰N& PÀa2FáÙ°äÿä1j&‘Pê;Ü`#yìhÜGv’0 …̨̡ë>𑔜Hw-zn1˜eYÐ f ètê’ eò¾J›ó€IVYS• `æphXȱà¥$ ÓƒRáì*èSÅ‘!2Á6L¬UÜ(áœP9é„=Ù†2ë3î‡#€ ¹Mó‰"1}(ŠãÜ`šÒî—…Uç2gW‹ƒÊœ²©)Û#Åœ¢ÙAšÄZPañÊeÈwÎòeóY¤‰¥sƒå[<\Þ¨8ƒpâg5j2³ó˜î‘lí©XZµÝ˜/Oi&Qo©ŒJ±çxá?yQ0»f}þ)ETr´_óãN#Zà͵PW& blr¹=† !!û ¥¸„Ïçï&à\‰Òº Žd²?ÕÄ®ñ‘µ£b,7RãO‚JâÚI¾nû1ò=tâCÙRkgW—ñ"JáU½ØØËNyª"vó™CWoòqI-n*¶Ú°Ú›Å¨M57òìKžsjã$©i¿£u¶³œñ; ¬)œ§°ˆ€¦µÅ³${ɼìâØÉÞcÊp™W•ëä&óŠo/¯Ó—˜ò¾p%`Äh^W®Ê­Z19®8dí¿Ø# ‰mÂŒªz?ÑïÅÖ»P0ò‰ßÇ ¥Ñuõæ¢Ñ0¸²Eµì(MZ7×è“Ž²v¢ˆÂúܺ&Cè†fLkD±£‰²Â!†)ÅÚèæë,p'63eÑ©Òô$º¤»ÔøÁ/4—J͈^„h%¯IÐÐKÐ+ &Hî±ÐâbŠÙ«@ 3æ¯eà×Pó*j•aÐ4 e©Öïù$H.pÔ)'¢|s+º7¨*›=ß4O#<[RÍúA­ÉôÍK§¸aUö»l×Õ?NÛjÎêääGÁk™ç$y«³dZ’9ɦh¥EáyÓiÕžElû3¼ú/;ûø.‘ÿyñ3,o)ü,°b1¼(/4l1Áu¯c†X"[¸‰¯h(Û“/œÍEˆÀ˜ÐÍÃBàü"6Z{é³a™£õÙ¤/Ù%Hٻሠ)QÝí„Ø(Š1–fº 9o4=)­½ÙÚúfH¤EYWGYDàLÜ¡Ù# &5xoÐI.MÝ“Nã°ùŠ¯RÕûýZ§¡¾ð•jDI \tGÕÜ5/¾¥ ÚˆJpUUééXÓæ¢rJ¿2O‹pu•áîÌŸ]"¥ÝqþÝJiä,ÃðªÌ‚’œ±5©Å]þ¾Frß]ea¦4yõ orî|½:`…ÑÒÐÏ÷)I~>Mg7ÓCDJ±º[ï4Ç0[a4&au훤uFžkÌkq»»×äÀ9ïÕöSÄóLjŽxŒwâ®ú„Aù°½8û)^ÉâT©œ>ÌB]šÚx“yÅk«s(ôÌÙyü0R)\µ°q“ðÙÔEl5iÉÊJVuw¦‡To´yZ·ÞljÝá«´y̪W? BžÙ«ti8ÛühFF¸bÏp *nÈÄÆŠ jÅ…ýÑÄÀ7ÌnçWo†Z!BýH Nœ¸ ±òzHzí´DµúÑEpôÉ£n¢yÔi›ÛдÊK¹K7¥% "Ôc’WCVu—¦öÏ6P°%’±]ðXaô‘¡›ñµâpDL]õ'¥”V3Ëé [D)‚ €t .ŒäoO_nqÓw1‹¹úô(ìåõÔ,Ï¢ð®MךÇ0W¿eÑÜ\Ò3Ù«ôŸ0.yÊׄ®É1m¤™‘t´+5¿_YR½YÕÃVd:º*m­ž’$yL­=¥± VņæúЯgaó‰ d†nÏ8ã5.`×ÄsÀ¾s¶®€CF#ˆÁy0Cm¼©e2M\Jõ c]ÛZÛÍîã¤F•;g²òöeÖÞ=XÐZ&|€9­Ét3»…æçŽ×äô…uú‰®qå«Ãê »*àCa¥©OüVÓQ‰3Á0^2tŠzÝŒjQ¤›Kݼӵ%Óü§…|z¿Bî4= 0½öI †¢ˆ¦v+@KåEäSM¨Q¶lä.-47™»íEôÊÞ\÷ìÈÒ”oq;vÈèK™¦Ð YG ß`j6Ó^e8䟙m•]Õéz/sn–™×@ÁÓr@Ÿ`2TáôÄä¬ïñAÛì„2^(ï.?4o5Ýû]ûdïåLvšˆçgwΞ{‹V óm¢WÚì" ççOMƒ_ƹF+ÛW]ƒ‘²%Ê9¢)W9ZÀäR8þÈ ÐkÏWÎv³y[DøžÓn¸P¹w»`)gÑô@d£°ðD|í–6àÊͪªM°]14X™«ó*É’ÜÍŽÂäØlbFvîH&§¤é€©€ð†¤]^‘*VyŠ¶e¤ÅC‹GM 'ñLk—›sŠ—g" †Íµ¶g¯Šþ¦&Už*¤›5_âµR¤š™¸@+án¦d.¶ÒqÌÑæXë,Ê쵌Lü¡7ÍVZfÌHæ’:lo92ïÚaÓçB ‰úQGj d·^JŒ“ÝMD¸UÐ.é¡-ÜòÍd°Ùyô+‘X€¡G|î©ö gÉùy;Š˜E³¥'Wš©Ö)w9­ŒÊÊb¹úHq%Ñî:è‘ŒT¡ +b€w+Êë‰Õ$Fvuý.F¨A†Z-C¿DH¢^ÄMÄrTÄƸug(Ø D^.U(×1¥ Pu-HÁFÓøŒå530ñ¦¼Á!àlèšê î3§hR9}U¥ðVEŠÞj¿ÊFÓÅæ§Y+VÛ 4Îó©3œG¨¡{ œÔyÀ&@B xFd›]X¼‡L,ûÄ;aepb>ÁB÷+¨5~_&Í6>ï e2i“ßïjª¶þ®y¥a1 ~µ.ºGÃÏê,˜‘¹pñÍô`>>säM_Ô,µã‹ð2¹ŒSÄ:‚ó'Õ~÷©»Ò„,hJá0Uƒ…߆sLÄ(–KÇi_o‹u±?{6OâL)KI·Ök5ë¥o·ÿŽ±½Üfûpÿ°âУT< ¿`¹Àìß»+üw•ûî®H¨íѲqSŽ$6ñJ%ÆX+6z«2ãÒ¤iLûÊò'1ä fax™(“4cG«¹‡ú †È¿…û³xº‚a!<šyn,ð”¾9_ÇD¸)(­ÆÖ[I!Ó5nž!<R&A8ªº¿Ã~íí·_90‹íç°"gΠí'+Σo ÝÞÀ«tÝ£öA­uØ©5œ_—]÷¤}‚ eüY¯ôšíc~èþØ=jŸäËbr"øc”œE`LI-yÂ~ãyó¸ð:×±ÂA JMDÿ¿ýÿ‡ ½h¶¸™šÝæ>rÑ›…¯Z˜iêå6Áà=bxÛ ×žwÚ§' îæÀyTÝÖ a8–'[+B:9í¾Ø?íõpxíïJó ý½èÊÎ7ð?øh!¤`r¯}RhÀ²4še1w¼Åû˜a XøJ¼ý ‹4{#øÒõÞûofp˜bÛG.J ÝÚ £Pã>rPè@+ÔxÕì¾¢FU+8«I+x:&0NÝïÀ©€:ÿ> ÍÞ jŸíåO§TúD/ó¦uîô> 7”:ÕÊ æÕ&ŸèP¬åT«U8ÁµÒ|9`”?¸ÏÕ»iëåé}ì Þ=ìY¦åßâìíëM6{ér÷;HÏ à¡V4Ù钬鼿2È¥ ÞÌö»ZýnN…ÃûaÄåúÀS¦3À AWzZ)D²Ô‚¿ðGS;ZÕ…û›¨ÿ¢Ñ:=Ük÷ºfA¢°$ZA"=²)#\ ,î¤KNS£vG­^o´:]±KHã÷ïŽ>ëtK)>dp€_§_ZЊ?dŸ_g—šßgæý‡ï]X¥F¯a¬ZÅù¡Ùé}ßø‘ ì×êßëX|åÑ£Aƒi)²Zo¹‡(Ÿªø¿ÁõÄ…ÞàÓ†~\Îÿm?zòxkGãÿv0þ#¼ÿÂÿýÙø¿,˜oB7}8©ŸGÞô"èÇ_Hþ£K.Äþ÷À lž÷1’ù{¶KKŒhTÕ¡Ïr»ëÄS¿­ö¹'ä¸ÁÁ‹š>TbP2c錅u’ðø™?80 ‡ôò¦Sß‹d IC#'ðAÈÁ ¡ùÿ΃þ»Ñ5ÂÁ±!—|sè¸]¨RPÊþ|ìjpÈÅQc/Qÿˆ ½è|î#(1¡2‹ùÙü\:ˆ|ô””jËÁˆ²ýP¼Ž¡×'·nÜõöAáÕ~t(¨Óizb(|"@™£À mQC&‰Ï~çªØD³Ó¨÷²0€ú¹­÷e§v‚šh ©:ñ|ŠÉ#±}o@aº!šÅ#r2&"I‹‘R‰ñ]Ô#‰‘!+N¬i‘‹Å+BÃâM5¸€ˆJ?Vìž3^V5P/ÂK´®®8g! Ô?Äxq0|âZÁä݆ö!ÔSÐáÉ3¢‘ ãÕŠL6Ž*ÇØDI/ıöÒW¡éÈ7È NÆZ,'@à ì î ãÃ3g› úÎNÕZ÷ª"T#¿M×#Jb䯣ƒ´¹®áè£ \ÍRh R3„[êÏ¡gcÔ CÊL†8íΙOyøh3L’gxþ@åË _˜?tÛ2ö¯FÜ®q ùxz^Oùn9cß›`(]Ñ4•žQ£Pòˆm¾ç“¹ˆL¾S˜@4ÍðB"-Fœ $ær0ÚÈRÓf(ÝíÕzÍ:Î÷…£­Rn†³ØÅT­¶2à‡JöàÇãÚQ³î¶Úµƒæñs#šìQ—X2ï:ñîÕ¾päY(nîדz§œ¢{‚Ü´Ì’ÍNóÕczÅ°ïdú¡—VÑ_ª>hPÔPk­“5ú"ß´»‡Ûe[‹/NN_1dU»Õ<ïšÜhÊH»)µæ+³gÝz‹›/ž é®výîÁÒæTÜB²B)]ÃX¿'ß~_¶Ã8nô¶™ÌÎiçÀ6èƒZf?gE ÎÆÆ3¤LµŽç øß,¤[Éýœ)fPiÖ‡Y¦ Ÿ“†Üð`@Ô Èc÷‡Î#ç=”õÄXòn¸5gaÈÕ.¼ˆÈ„76= Cl‰æLŽ4 SÙ¹P?xýÑPDMÞFÃþ$óø­wéPΩ9Ï‚ŸzÀ¯ØÀØëâc—\ü=𧲌 Ê°Šʲ֩¿pѵ?Òl†Ö(”B?ß­­ÇÛ×ÛzQû¡DÝmöP=ÒpO^t”ckBýEKŠ+Êl iyŸh/ Êb¼¾ ÄÎÕª«íõf±AVEní•œ«²9[³PSuǶCâتõÛ#·v|Ði7T„n9Ã*5ÞF•$œ£KT²º¬b¦ƒc”A¸`û¤ò6®¸gµÉ B–ðÌï{Èa ?J@ð0Æ;ì?GDô]a¾XR¬#=-Ø8F›g®]:b‹j‡º ¡ï¡ÔQ¡ÒäFEAéô¡°'¯:ˆ}ß8pšÏ‘ÓHdÕÁȹÃûÍö1”Œ9¨õjÌ©¸û§Ï“®/“(GÊŸgÀe!×µó]/yD©äÄ>ªÂ¹Ãœ!œ¼zpZôí bò§DÎq›Ô˜/ƒ…dåÊﻼÎÈ9é8·*&3õIdW´±I”Bw”â` çÔ®‹B‡_5™mAÀgé/r~…ß6üqò™9?9 ó¥hIó²¶ÓÂT´)àVÚÇ=—™E·…ò˜½£Æšä>Llª;ðQòŒ)‰Rx)²øWÀ7öƒÙ躒^ymù:£eÜäyÛTÓÇ 0;/¬öË} nzàÕÒ `³Àì°(\ð€¼÷Tô"Z•;Vmø(£=Q\=5ÈÄdrËta1N--àÚÀ¼ßO[ùÑ@‹f¶@UÄÉœh¶$ |Ø5»*—@·ûšèŠ_éX;JL¤ðɪ¥õÈ=‹Þ•Ù”m×—| mC`¨˜±C묎€*ƒõs‰$cÿÒTìqÜàÏO7[¸ä'Ôý($ ijDÖ€™#öà—T¥ÁN‘YHYn!Z(å(³ 1¾ä½¤†ò¤’±$L5;ï%³Ñ™¾·çˆ Iz „VBå@Âüݽ‹O²œŸÂZçÉ£tµÍð ŽF­Û’ùcº›TשNd½Uëv©óê‰ ­Z‡ôû÷ï«üiáÎr'Ô‡œtÚu L¤s¿…ݲrjÊBÜ݃ë‰#OKea'åÉ4!Z/äé-tƒS $~4áQø²_´+Þ¯dhD’K³Í(ß¿ðJk™x@‰â: ëIWj*Aˆl¾¶œ»—´aƒëX-&4CÎãêCg4¨Æ¡ê0)4k@ˆ§Çíîã‡n÷E ¸œâBºgÎ…“B‡ÀhÇ+ðÕòÌÇóÃØ›y†çSd3¦>RÌê ü¤ãià@_×â*«˜Y'qé3s˜%ÔüÈͽ÷Fs¥›ÄF¦…QpŽ9šðì'`§D²edÆ ‘(ŒÂÇ|¶Í§7 “X1–œì²aäKÓæ§r]6Õ½£âBhŸ¶*N§×‚%¨ýëGÃpÝ‚%…-ëåÁ(¾—4§(פ˜ #‰[xäûÚöQ[V¥Z‡˜JN­ðºuŽˆÅü8½×ò\gBd$&ç¥Ô>IO"šïμó]=X L>Ú(—JÚ.*—ÔXÊå]§up²§Ï.ü.‹`ïƒ)ð6Ëjè•ßssÖÙ±G²LíñÑ8WìÂî¥ è#÷g>©\8ïËåg)þAïÒhL†®¤HÉh¼ñL0=Ì‘ å!¹ÛI¬ìÀkd4§ÛqB[Šp“ÕˆPuš„i\%Úú¬rv¹¢^Ъå X-i7£”»Iü)#jVrìd°|S;sº¼šqæ-T:"½©¦%0ý Fý`ZÁŸ¦¡’’ïÔJlP0æ+g<ŸÍžù(îÒ•£¸ÞÉŒØ-û¡Y +óãF‡YRx’]1dW)¤´Ђâd¥Î!’Æ?Û®ýß•K?t,Õ÷mÙÆÅ ‚=ëh,0½?ïµ ¡¢–RÑp8„e0%GPXƒÏVñéPW4T4\3ŦˆŽ”K¥7Q.ùe áo<óÝéôCwJânQu£¿åRÒŽ^žh˜æÅÍ¡Hôd>&G%U¡Û*2u)–Q&p/: žôHwð4E~±R™;%‚6yç±sß9Ž¼ìä:—ÒLÓ@å¼Pí÷y\1(I·—ZEÍ *|‰ç×øãy„êЪÌ؉5T@j•ærˆ# Dô&š:Jõƒ7Ò×Î8Œ1¼öžÌTˆu÷¯¦È~Ë0Q3¾ü¨pö˜’„Å%Žµí¹>fnÁõS)Ä‚:ë¨8Q1¯9­‘]Ÿ¯”UÀ{&Ðî%æ:£@ÐÚ‹r¶Ún¶<ñl×?fjYö;g’Ðêì7Ø­æ>,QopD¯E±í·Õ º0­F¶@ò¹¬Ázð@|–t‹Ü<åö°[YB]ëv^iIž-î‚j]EsZŠ1^½PØ X×Jð@ë€é$… ³1æXB°Å õéÁvæ#¼‚ÏPWãË¥Ž»é$}·Ú$¥‰Ž¡Ç ¤ÒÙ7L]$²t‰C³nIäæ7 åŠ3˜ŸÏæC88ÉÀhV8ò‰‹Dˆß*þ…¢vz?ìò^/O4Ͻð*Î9` :'ÁCºª^jÁŸiŠÔ·Ã;=¸ãÃÓãºÒÉÒ~OUuY"Á½J_Ê<©ÛŠÉÃë!Ô —š‚ÍÊñpÒNüÏB΀ÖÑkAGTcå4Ž¨J(‡¦ì¦¥s½° tJ:Oð¯é¾h£¡]ÿ¾$YÌ4¡„Ò@ü‘m £kòˆŸ•Ùû¤ìë­W…h²è™Â\}Xø‹Kkž]C+bu-ñÎ|†ªS/Š}µ-®KâcŹ/û¾ñïã¦X1ÞÅ}ùÙX÷ªeéS.dæTî#lë5’’=gí2ãʽ™˜VzIFk‘·mÄ jU?i—ˆR2…Í7ki5T¼ b?„×'WPŸ’ŸTo¦Sî÷´a¹Ûô–Þôß…³Y˜Õ’(zÌÏ3{%›:,!çjnûh ‘›E£N·• sק³&¼i’u”Þ5EAcB9…Ø@>È ×X*KgP/:‘t9'¼“C½¦€‹¡!_ÇvFÖs‘_µ‚êQm`m)˵¼ 'ͨ‚³Ãöµâ¼ÍéÕ¥¿FÉu£wŒ½‹9ÝÒ+Šª*¸OOÚ™åpù˜>‡4A˜Oƒ²Òõ¡0‰aŸ3’®t†E ¬§8"WsƒØåYb)%çˆÉg;$ÌÔŽOz-'þï<ˆ" »7FtÞ-—”+•ì/éž{`øqi(ÌÓ.:ÌÚòK? µž´MŽÞ9↞.åVïšú!U¦0¬ÒŽ7ɪu†÷³©@1/^ŒÒXè‘dì!]飔ÃZQÇW—ôª¦ÌÄIé`ü6UWæâqéõÝÓZ{8÷rÐò^(ñDÉ|PïI4Š¥Ý«ˆqù$A æ>+üHŸl‘Ϋy zþ5–Y´URf@Ðœ…¶ò(xï/…å¤U=d"…Il„€Ê«¹p®šÇõÖéÙœ¾’Èn½StkëÓå 솙Ÿ *öa‘0 ,Ùã¬,ÉÙ@½ôµ¨Ìè,€ÉçgAä›k[³w-’¯Y÷`¤Ã쎌V“œkË{E™‰âù†ü©›øŒ)GJ¦ùgq8£Pf'úgvÀ“T€˜ë[Ø-1A &†‰`uÅóJuºJ~­`ÑÖèDZ:Y5¶-{¬22;óšöö®CùŒu’T-3½žT -‰ C ]F!—wD§IÊ` iæ•ù™}qŽæyl9*Û…ªŒ\B³c2Ⱥø¹”[Ls²A½–•ð—‘ÉÙ<ØÍΧàìQ1œeÕm¸‘Ûýc2sV¥{›IX0üÝÕÆûÁ¾0©ÁÛ» ¸Èð™K`dÊÛg+Ãñ.ëBÙÚîÒm³j|âÜvsöÚç·ây3ŠKP¸ÅÌ-$8–ÛÎmºâ¼Ýu÷þNžzÞŸûD+.¡Ž\ö¢¶ß† ^<¤…Ì)Ã!¸ œQ_äçËHÊ>žE•X•—KÊ ô:RQö3g ª|côÞ)ܨ"ü8 ÃQJ«L¤ÂHeF£™:¬µº ‘×N·‘î4ž7»½FÇ=ª5]Ö[±E%§ò0nBÌ{y…ŒÐxÏðRx¡ ﳡ¡0Œ7¦yðFï,öô¬rƉ;‡—}g§ºS}ôNVCc_AáX²>ÄocpDÖ Bjñ‰‹ð&ü§÷n~æü½ ýw·%ž©,sœèUZÚYÛs^Ýu1GÈÉ›½=‡’È7GÍc˜ *©ßå,¯ ß«ë¡ž[o6Ÿ—--ãl:M#ÁÏÇNû{r­­ wÁ?ÄT¼Æ8šÉ([Ö- ˜h:„•½õ`ä?‰iÜéÅ RI…š3M¦ܲ÷pŸ´*?:£¼Hº;vŽ06¬ª LA&ñF˜E ™\TÔ(¾÷N¡T—r¨w—Øø/6—–°éÐÑšhn<ÓJ”u.NÜšá©QM¡¬¦Ii€%»iÒ]M½nÈ´½’úò´VŒÑ¥NºZN„þ™ÉÃÀ¯ x'ˆÿ ΉÄJo|CèC&{¯Ñ4Bz´“«×œˆrŒ‘ÎZºPkíë `€B±é¡I˜"{*<.|ð'|µ‚ Š¸?Š ±ŠC˜<Ð`dRU̪†.( xæü”Òu'†Yâö0e—¥-¡iõ&tX˜$=cceÉ;ô^çk;ÚÙØø‰îðw-&³iÑNé£êñÓÛjžÈ™#šusät·•nc'7ņƒñjŽKÅ£t’etô3‘é,dDùð†µeTZ÷;m6`*õÒã²ÉÓ”£“ŽEæý+ “xÊŽÙuœáÅlbÍ4SïvW¨'‘eiY1í{ŽðJ±Êí ƒŸ„-:/["H“ vŠ¡ ).;Š2!ªäÐð 1FFz‘u£¿Bªçw5pa‘I¦Ž¹¡ä™Çºšt½W7±ä\jù€VäSŠB*ȳìúaßsGàxÓ.ÎÔZ¹lK–p7u_k=P”…SB£ìLJY*`z!&)%áÊÏãby7u9ìÔONÈO­û/D»'roÑa_¸žy ‘ó3k ¢ˆ¬ä\KÐ%`À m¬ƒÔÎx>šÓézj­æóã£Æq’ k#ò.cÃ34ç#ÙB\' Rõ&ž†ÜœcÎD—?ªáÃb‹þ ¤qÔ¿‹°S˜ãB¡ºÄ~qÍØ#îï„O*"¯gQ¸Î)pM¦rÚBF?î;ÿ_‰ ~K ÚRK™½«I¨•†0‚nÙ©\N Þ2·þNöb"¸¥ðƒ)ÖZ S÷úÉÑ™&|¬Ò‘Þ5çÉÆ£§I A[2FÓÚ×A-×Iñ^fëí]eÖkîÔ­ù%†Áp¨]Á¼nI%èA¨óM1°°'å†D%*d]3úÛëC¥¼Ÿ£9Hb¤tÈÁ¢ÊÂÐTq$.¾ÆÂû9Ç;÷P~ÖcüìG¡SJLyž9––ûW QÎV©8iø9WZ‹;µ³ W;·èÖN¶_;¹û Y¯fÄ#fA5#áôk:Ru=Bžéðí‡od>|+âšë‹jX †ÝnNœv÷Õ*ª&L %=­ãƒÌ¤þbJæ˜d<{’žQ­Ï§ÁÚÉ Õ¡YõLƒúü²Ý3KULM`*í5m™H®.²ŠyhÔ—:ÍÈd4¤ûa˜æC¡6”·\F÷“Ç8:s2^ì ”»{TäHRŸvÇ¡ðd§\X@’bÉm»\Ì6d€W?áâøt¸Ý=²íFÞ"˜¡˜’µìoÍ9U£uXuºpJ\RXà»(Ú!F?¡‚›Wß>©8¨¼£/h]vNýá—EˆQt ¬W¨¦^U…Ì•!zatQð^†5Òb*lR$—XMîš)Â-ô U“Î;TeÄИs…3 °áœx³(al? ç|ý]ÊRy¿=AÃÔš‚SWÓm7í¯žWY`›F>ÇJÈ‹Ò{o-ÓÛzY83 õ¬ î1(°óx â,³kîðvõQõ*‰E.ÐÒk_`œ¼Û“¾üŽ³³ŽãÄ…ÜoÖ“Êø—WíÐ}™ªoÄ<ì¤"ö>â™0iwóã‘%.Þ™‹è…!€ôȤ¹»ExkºÈÕ]7u1,C)È‹ÐÜ°(¯ñÂç£"®Ü ¤J6¢Š2ÁÙÒ`â÷‰T‘!¢–ð“êã IáÀ´h`V{‡=KL’;ƒªÍP¨‡’À–x4N)Î2q#¬ŒÂ‚*<È—€7¨q×T¢Üa„@:x'µhøâðŸ2”ƒ”^­fšßÅ ÄlCå1ì¦D¾ Q09ÑÏ0ˆÄ]S5m³Jv³¯ÜÇ v;è»V…å—¿o€ Á5[bOØmkóÀÙ¸kʤ9d¢KˆèÔz̈œ¸kF4!QNÇl@›Õal†hX9–ƒdx’Q4 SÀH1 ï„¥™G83 F‘Sg³/Á1¹PÍ‹ÎãDÂÀa?ÑÃ#¾¤À Âê–ìŽðºŠ2X §Œ‰§•k—´ˆ§žLÅ¡\TðÀ [t}ʆUl¢…é).1{¹¸O$“ ­®d_Oì—Â(ºF;¶ùLú²°ƒa2#áI#á‰eŠ6½énkϬî QäÝØÖüÈÏæÃ×·Þ\Ú4B‹çPœ$—Ó›Áî(¯H(ÿÌTó˜b-°…&`Š5Ï”W$ž’Ì1dý¬ ,ˆ;_¹`€S$.·xÃï=Æ ö¯ÔæE£vâ Kªk’Ò†¼–[38ƒóøÇ®³•ˆÙˆ1ò0b MYÂËOD6WX³ŠTÝÂo΋„ò›_Å šIÀ1pîϦÁ ”¸ÒZ%¼Løko¶Öv )Ç!N3CùÑÉÈñ瘑ì6ò²w!Yh&å}"XšÁùš³µ=Gè®*"ªcL–ÃqJ—Y쉓 g›"ìÑÀÛnç }ÜJBìÙfLä3- PbC2)(–ÓJl #û³@ª8'Ívý˜p…–ekn­ó|G¶"«9I¶gUÏŸò°¾†ÖˆBÒoX¼¡|‘U8;õ/¿“½§wÉØ‘IùugκíÝ\Fœ"qO½ Þ0šÇè…ÎV‹[b'ëK«‘…’"äëÝ0´K¾ª¥¥÷¬WÕz½.ÑZ@-§\õ“†³Ì–Xðæ$‰6î°G [_ zµ‹™¹5—žV^6•¿îõu_yÙaqQ—ÄK¯Öˆe›ð4µ ÔÐêiýcÚÕYþ‰3ÂyfŽC#eh‰¢Ê½NÕ[øAó!Z #åS”\n¨¾h¾W—F艚]2çLš4ûo+­¯ræ&(9n€ñÕç…¹Ò=5±x2…_Ú¢:/9ØwNõ+Rz86êâ'ýœY£ï‡^ýEû„ŽÛ½z­þ¢qÀ×·Dæxrp÷ßG° yt f(/; 2ë£;¹ ¨³`D)®ø.m'ÇÓ úl`¶8DÅ„=oÃÑÀiFÁUÆÆtÄi§C6y"•Ð ü‰7“^QÈŽ>ú¨Å®—y#™±yhGꑃ¼ ÝQÑ´ôÌöÅ¡tçN¹j%»w”ú3‰É÷|ìWá¨}±¿âÓö0),d¡ÇDäIÄáÔ^3rÊËÇb‡©¶TÊNSy&l±Œý óÕ[DpS­¤#O1"Ã;ÔW£š¸ˆøÀOÓYU#'”<ïW¡X4Áp;lá6 Þ¡ÎEσ2$O:?£óOFÄÌÉwîúylü½šw’Ý1¡Ãp 8qÁç×¥ž…Sd&é!Ó•¾ÃŒáªB¸þú+ÑáÇٛ΅ùål™å´»=ΓÙjÔŽQYìÁÝ÷Ìò™n%åý¢(vÜî6:?4ë =ƒœˆƒð2)œ´¼N£àŒ¨ÊX%³ÈÃC‘­‚EÄSåÅ))Bõ˜:àÍw“c}º~v×LîéEniæ£å`u w#.¥ê ýàìŠ]ö)t÷„ÃÈeè_P“gÏ ì%ª  é" Ò´<"«k5åŽÂüoÉE‡#x{¢?Æe+ÕÍ0v´-1B@±¤ú¥væ}£/æóEPÞ-ØnŒ:šã w,£oέ¨‰ÝÔ«ò2Ãb­ÿ©~gtæú¤æÔ¤rIï’*ß#*¬Ö#“Ö¥b0&÷@ЉY8-èwò6AIœÀÐDá•cÞÓû¹GÃÿG1Ì®c¼¼­.k– ¸Ïç‘7Áùh× ,ÕWÅ#ÍÌxåg ûî¸XÕ˜óí¡Õ7rÞzP3{Ï'œM5eºeöìC¾Rîü+ë i’JÆ”e‘®´¬f)]FBÌdQ£~ßÆæ;¡*+÷„­þx#u}šÛmoÅGÔ¢„.Ð| xƒÑ(NÏ襁VÉýQj Õ¹G«„—úîÍNï´Öú¿ÓFçÇ‚£ö`>¦›22Y8jµ;?ºûµn'¯E¡±ö1E¥åÙ8#4ÖÅ}À•š8~€Q»úz2Y²uö™bðû´_WÑéÐ=K/D¡Ò×£yÝõ½v6ž9ZiÅ™(a¶¦*&°-¯mÓòf–À9A#®þ,Ps€%™ï™‘õð>U|ÖG“iC}¡&rF˜.‹Ðitæ'»Ì9ÜÏÂÍ8H‰ÐãäÉ®’ÓæÀH–€*Àj5¨õ* Á?L>A1Yáà„ÈÕ±±Ö•.T´«8:2¨ ¨—Á¤ÞP±3‹nãù¤’BwÌ‚1v(Ã2а‡ j²P°ìÐES?8JÚY¢˜p~À0Ñ7l¸Î÷n·}Ô¨ˆæ [t®ØsŠØãÚYÍŠÎ•ç¾ Ú¾œ³yã$G~ÆáCÕã[CY҃Ǟl@Ì]N´»$)ö%È¡”gA3ç¿ùe£Üõ¹ÄA ÂÂW?æ0øê}ñðš˜_µN~h7¤Í‡8ɶNg+ÄÁ]ºâFOc_0´eMMŽâ»†u†`b¤îj*ÔÌâÜM‚I0žk˜ œ·ª ?»…L4º©qL' ¼+;ÓúFX4ýDè{øs?º.MYx6®Ëi“±‹S ¹KÍ#¨dèMOáZ—wÕòkv$ªCØ~ºy®líAÆ3}gÑ¢Qþ{Œ“+-L.)Ñù Ž.½ëØqì^ý”`Ñ­ç k¡_²>Š,…Òþ4nõç!©hU.4]!köÖÎS+(V ÀŽ_Yõ¿(wÄñsã%ȸýŠVìÂV‚˜ï#‘T¶™ü`9±ûM£š•/¶Øš,²PmÞ]©ß$þ©=~G ‰¿äšL©O4I¬l×PŠÓlºJÄIu´5Ï,6«k˜*Ù5!`xóÞ†˜Ê{}3£ª 3>íË©6?V°aI'Î|Ä/qâOɾfŒç8û´nÚÝînVqäN‘~M˜ÍóbÁ™ãúQ„Ñ»Ðj^|Cµ>~92^Òåýîm ,Pí9q£Aä «4¼ý¸ž´hæ#ucA~ƒåèG€ZÑÖAÇE ÷¨}pÚžZaÄâ¤<¼[ò:f©Lœ…Éû²¥^(!–lNŠi©“‚/n=JQ+‚INÂÉßÀ§‡mÌϪÙkÑtö^H7àIÃZd¼Cæ; UnIS§ôu\.VÄga•…í½¾S4Âù‡£úüÖyêÍä¯Y\}F¬ŽÆ^:·*Áä¿)L‘kàÌJáÖ̯*';(eœ ­Bêlì±Ù;ÍHOKdË¡J3aүɼ¿%ºÓøû0åd]R“ÞWGã@ #Ê£Ò¬œÅ\š¼ ¦IûÉî4½n[îÎ~»ÛÐ5Ø£ð\é666Ž¨.üx3ÑW9UK9̓7x½ýd4 -Qjðh$¥OA©cÐ2´YGe…4á"ù°xÆ8b.õ»ueFeóA Sov1ƒhˆoŠ_ÇoŠÖžA‘rž—®"¶â8!š‘`†t½.JÑ»øý]ÎLÈéëwmª6­»Ðº¹Jv'ò{ØTÉqµZpóØS¬»rùδìN1ÈÌî”Ômøå ©²‘ŸrY¡%ÂG;™«£(Àƒt&väËryAêŸLì(˾³ï=¡ßu2»ÏR\å‚æ.,¬²4&Á¹(›Þœ¶„¼Nó,l¿ÞÚ~Â{Ë2M‹¡ …ƒ¼ô•}ŸÚ ¥­Êl¤ˆ ålÐVŸˆ±7]Þ’˜rÄÚÙKA³àuÎêYÈK –A^2$F†ñ’WEù“º¸žóÀ6KùÐĵÅ5É/ùäô•!Yœ{£ÛÉIŸD*"'ÉÀ¿â@TÈÈGƒ£PM2ÎÄÙ ùHŸ<ö½Î쯚´Þº¹šáʺ|&¸]Gp}Œs]½œ°~2¥“’³‡þJbÅš%÷!–RÝ·±|ØÕsV¢¹À¬y¢ë[Åz ä ­?Å=1MôJ°*+Š0º~ŸìõKØí»u"kIȆ~"kï1?¼1#O­-ò˜B† ø=¡šFõ»”¤•K¨ç¢ËœË ŸlŒœˆï@AË1¬+ÆÞÞØzÿª]O•P˜Òù‘Ë'ûmì9æñµVZ]#D%TH„0bŠa‚Åô¦–fšsÅO‚øœܜð£º#–{‰ôò©ä—[J0F†>Söá´¹—qÒofhÆqȱñLX„öÓ›ÂøšÏ$z³¨Ê…7Œ|QgëÛ«'fÊ‘WëYÔŒ4óå`Nzc˜™™¢vX < f Û iï°°'ƒ¥=Q`ò{2XÒ“ÈV)b3ÕÍSÕá³KŸså uà›ûu-6#þ¬Ê,à2S³ï·ÕÒƒiï€ì¦Nu’c=lH­ù*‰ÂW{†‰áu¼ Â@ÚðüHàc.¥8lÁ´ÿh&ÔTŒÞ…el„Etª€^=4²’¯¾ÝþûŽ>iâ0vJüOêÿÒ¥kË}Þèáv…«W”rÆK,{PÀÉØ8n5ŽÙK±K¶™qZ\¨¸Ïäúž³cS&QÊ—žš½rzÖŤÀk[÷ÅL ‚gðÔÐRäU<ò—Ê·:TÜvat¾\(–î3&Eµ€Z!\ºÖbŽ:ÅY[Fƒ3óõˬ+z€Å`±2£[f9}îÕ7ñA­ó²yL¾ð.Â÷уÙm×u.ÐQ*’>Õ”1ò7V9çý¾î e¸Ýgà$fg–6ø‡N#ÆÀþn„›ƒëÑ€©Ç<®¸’Ï­*,¤Óß1\’;6×ïÊXQ4ªFÄÓz)5ê•]œ)ê¿J_”ûÀ‹.ƒ‰òóÆËœFB,šÈÍN¯„”ã ·ó%ÞÀ ûA†+[~. ã´M"C½ üª÷è§ó¡" ~NE–ÐÃî!€©³/%]ºvÚ]ç•ÌÄ3 ÃQŒ¤hDšB\‡_tukÈ¢l%Ó…ýn7÷Z ´µŠŽ9Øv÷ÇFð¶]Í4©n9]RÖ¨IÄMcw/><½Iÿ"Œ–†+³ñgh=„²ÀYñTÜ%ä¨ $!z£Dƒ%{ÿt…Kn2«'ØÃh€¸sük_ËuY„b¤ôù¾$‹A¡)°4qt‰EN—gþåEq"' ùÕjº‡ó…Ÿ1¥V¢¸»Ùb@9Dûgþìå-Õ!„ÈÈ‹ë!v©ó–b:?a/Š¶…KÓœ Ãd¨IZ"ÙHŒXAJÞëëΠb.D¢)FŽøf¨‘Þ¶ÒG€änÄáºÃñ,Ù’€€_ωQ‡‡éÜ|þ9Ì<«"›ê2ìEÅa*Å)Mðd¾tæSiQ5ö®PÜù÷öcmÙ“Q¹P:¹aè>IÁ[;.ÆÊo6[ WEšO¨¸ý»³ýXé€,)g1Ð…Uu1l”A ¡ÄQ­þÂ}?°„ëÞHD$1ƒ7§/'Æ'#°ÁxiæÎKâM{p÷Ùs[· _Ø~™!£oCggÅR@.”Ô;ÓÞIWÀ±–¤w†(ÃqÝ>$á…²aBÏTÄó³ë$½üE8âl¨d ûïª&¾*“ëd"O—Nî2–øfe |^ s!ÌDHê¬ÏO»*‹Rªx"å7l£¤ãÎ×nᣒa  ^o?y›n¶-¾:¨·ÜV»þ=½7ˆ•OL=¦§Î(‰“dn}åndÑú‚TÖZxuQØLˆñüÊÀÃ1ž¤‚§iØ,ìÒlBy3çÃë­·e#t|àþƒŒ‚‹²–þ l¾’e>0賿˜¶×éK™T~Ø$â@ xÜx&R]éiä¾2sB«| ˆŠk'¹I̬$ ´0 †µ–dAø‹ÏcJc/¶ò¾ËÛkʹP¡ ®!ŒBå4áD&$§&yhÙl¤¬úSN§ÄÊ VV3‘v@ÆCc|\æR¾¦äb_O7¾ž:èíàˆ Ôw–¨‚óulS&å-\f,ü„zƒÂbE”mű\Ãæë6X“Íñ©)ÈéÅÂrzœ¬é¡;ïJBqÓWðMÉB¦]¦S;Æ8ãËΦü.$-÷ŠhDÀä~z«Ó–‡sŒ=™½>¼<²ÎrîSŽð©M¿—sô¦B’¤¢?15T–ßüX®`ß+ÉÊ•/BA>Íò¶ðO‹HHÂ= ºëZ.! #óBöòÖŒu‘Cî8¹ÅÂÉ#u³åå“*Þf:úÜß`ë}šÈz3}6µW6r·äž†ÒáÉ8KZÒÙßšáá”FÍóü~lÏ |Êÿú©¯oöOsÖß]´ÉªEJ¨÷ÉÕ=Qó7s.ÇXN»#‘2÷Ä*\ž "¯ UÒkQŒ~çôË1øƒj[ü†¡<òò¶¼“¿K ‹IUÞÞÉœŽ«ïŸOs@Þ6^«®=â<ƒ“â™UIÒ‘JLZ½Û)¶èâ2 f4'%F6,ÊÎ`FÑÉ‚™J^!RrÉÓÜ*u•,æ`Yëø*GñG%ó$äÒIÙÅxšhLßá±’ Eva’%f~@“2¡ âwlñ=v8„µ/x…‰Ê¥ïv{bÌÉ<ì7Û~&[HÚ$H:£’ôNÔ£œǫ̈ Ö~  ›ãe³÷¢}ÚC`Esx¤I¸ðGœf »ÔÉRèÑÛ$bX$¡ágJ|#S‘‰x”É·Dw±Ófo29=­šªjµÊfš§/Ê3ÓéÈ_‹ƒ°?G$Q´~‰šÙëpN@~(DÆ¥§½‡„ž¨§_N¬&ïüˆEó :]¶5ša?é SBˆeÊ(DÇÙN {$‚/r6“Z GUœožC6£ux•à¡7“ S˜¶›”é³PSÅ+8T«""¤ÉŒ˜>)u…QZ¥¤ß¦#f‚ƒEûÎ{aŠ)¢‘2÷ÆÒ,›Ý>D­ª¸š%Œ}Ù„“z6õ#=„7BdUé„¡ÕSA8sQqo0œ£¬Š[‚-Ô–.g)£‡$™WOX[Uþ¤ÎK´úbïÆ$ù¡HwD(ÓS´˜Š)ŒctNhélãte}EÖ cSïÒš8®&2 nŽÉUES se»ì‘Ô[ÌDšq— ðÑ#²ùOΛô¯9¿c,˜˜„€)©½~Üv~l¸ûÍã÷8‹…k¬„á%î‡XEb„Ê5ÿ!½þ•Ó®U>I„Miã“)ûvnA^Üø@óï/(~9N.R]f£ ÎY0ÄF`¤/t7ÐU_2ñ…Xâ!OÑ%ˆ‹y°Ì°u¦ÅH ‹F¾&Ž“¤– Lí}‚&û”_ž‚)Œ¼Ÿ1»’7Óã™AûD·x§°ÝÑ9  ¿‡Au¥JšñF¯qüC©˜¬h­ç¶j§ÇõÅt Gq çM+0K>¥×òã”’N ‡TMbN®Î †QwæÅbp!ÚnRö+íìH3W Š­ˆU]J®¥nrä…¢+LÈ×pÁ!?3ÒõcÀÊpJçÆÿLV“CWét×\„)ÎÊI™ê|ÐYÁ»«Åé¹]úZ>ÂÅ™0À,÷˜¡`~~‘:ü¬»‚ß0gCDƉ‘f÷}Rïp|;axQ F›ðÎm¶ªEýýì‚Þ÷.ê˜Âø4Ó§£#|ÿQ¶bB‹G¦b ö³G6â>gÜc®@x(*$ãλ-úzˆ<ê:¹!‹÷ÏýYË‹gÉgyÙ`Ôë Ò¸îüwWÑÃ.’Ï90c 7SM;oòñ>n¶È7ž6ž9#´EÄ:'x•S‰®(³È€'¹a ¬ˆñlÑäÚŸqD¾¤áL[ö÷f± Lj4±/™b<a[ÀLfU»ÿ~Ú¸€êb¸Õ>py*´5…K“J¤…µYX0ò‡pðcUtÕ—ü6%Ú—mª7?¦uÇs9ù@‡Þgâ…ï:r¥v3…“¢¢ÿÕ>â]翪"~ù/}‰9óQ:ç¬ü¨Òá0’zâ·y}Ô¢û½éµ·—W6œ,Í«ÂßÉæÉ3g‰BÕ^Éy HZicm6l0ÚéØdøNúòK§}•»f1%5ÜùSpË…OÈí¶±ç4™VÙ°Í]88™²£äÈý ÏÌàŒð]ÚßDçߪ2Lí¤©Èo½²†ÞýÌ•½º]ùÄ]zñ/U–‚Úý:SûSÿ;ïo|S}TÝÙ¬yïüLp\]Í>i[ðïÉ“Gøwû›Ç[ú_ø·³õÍ7;ÛÞyøèáΓ‡Û[ÛÛÚÞ~²õðoΟj"y0[êïŸäß]à„êáô:¢4„¥~ÙÙþûß¡Úî•…Wð-š†jsÖ€ù¦’1FŠò#ÌfiðtàyÓ‹ ß þ·dUêƒt㉑ÛWo¦cgk{ ¼ð/Gþl¶q»ƒÎ×Q¾ž\çÂÂùè½hv£P¸f­åÀï“Nû‡æAãÀ©uá±BÚ7à»íÖi¯ÑúDaçe­Ó©÷~t¯N:n·ySÛ§ytÒj6°½ã1¼3«õœÛ§§ýòØé4»ß‹vO€{ù›|YÓ8¹\d #æ©^«È¨‚ª”GfríLç°\¿a€'ÖópÖ$`Ç‚¾ÏÚY ñI³¡ÈÕN1S’Ù LåçTc”h˜4G”˜`gó™Ï%HU†ß¡W¢ÇrÚX©¬òÄ7‚U‹—&VS­$âó Ñy1è¾BDÓZÀ™%»>¦ÀààÒóÉSùÝÆs§øC£&¬;›‚Ðù±èq‘3æ²J-« d£Ÿärñ;+€Ñ„Rf¥rÎûÕx4– ÝF¯T?ª}ßp[çµú.ûáXÑ(Tß•WadgJD(ïT¿­>±J£øBðŸz¯tÞ‰‡a5›G§Gp ÿßi³Ó8(ýÐètñòw§ú Õ@¨>„Bx#Ü-7Üz§‡Wħ†‹ œ kÝlãŽ]à!p´;îI›~v‹·yXªœÈ,ðT¼÷ w¨Ý}åÖ:õÍôÚè~(:Ýv6R±˜0‰É¼dª8Åé´¿<üöÉîÕ·OÜ'Š¥žA@È|÷çÈè Wú<òÙ†ûÈë“ÕyÑ9lwê¢wãè`¹ÀE· w[ÍýZ¯ zïöÚíÂ]œ+NFøcÉ›…(å…ÓX/îBÝ^­óþÀJœ4:½f£«MÞ:õöÑ ^¶jÏ»0“4Óû§ÏŸ“ÇÍ?¯ÃD×[§ ÷¯ÞkcÄ’@î²õ#ðLI‹›q„¨€SÙíÔY&©ö1)ÖÈ Æð Þô/ÎFïà'ìhüFºá?…ŸaÌ? IbèÁñßWÉ2úô Ÿý„~Üðël„tϪÒ~BºA É-ÎÎÝñˆ=Ãp8ga4Á¯×ÅF­îìz:5Ð,¢ÑG0ç}·?…†%˜+xGÑzâù8ÖkÓ5‰‹bÙÈ –in`®»åBû÷@ÉŸ šÊåÒ±SÄÅ/ý.#R›d=D}ØI­þ}íy£ÔUåžKŠÙÇE.âõ=uäÞ`cD²®‹[¶FR׶Ø÷~m¹Ú×æBhÐþùà$TZÍóÓcKMÊ£‘?¢°²NñD<â1¾!]÷d@±7Ù'XY¾Á9ÁX¸ ÍȶO’yJ¤àn£ÕMâ(ªÉ“MS»’üÅNjáÚÇ8{wyl©Fµ¥4†•šŠÔ·Ô„ô1×å›+bú<"ëH‹1b\÷E»ÛS‹Œn÷GŽŽ(ŒªÝù°±!¿ó§@÷I-éÐI+ìÞ£¢/ïNcÔ«\újÉÑÎi_©×nµ_‚Pwïj郃ÿ-ÔäQ_öà3}EZ}W ã/"xTáÀ]óU»8þxeá»TÖLÃщ[CÄ]äb '˜‡Cé*„çwh»n§0³q…%ÁŒÍ^©,®[1á왯øœª$Ýœ„4ü¡«³z½àÝ«5ßÎ]LçWÛÛ¶þ©å£TÈ/N6O_9ÛÛÎI»Û|åHZLƼÍõ[Šn è‚NYMɯû¡1†µ]}ç ~ìHÞ©¡lœOæßò_í`³ÔCfHP˜ŽÛkÝn]`1VGéçǧŸp)n:«jâÏ–í¢À‘û3Ü<;Õ-Tu< ß«oŒãFïÓb§õú˜m‡ô?^}‰Eö›ÉºlBÑ‘ÜïÑqY¼÷¼^/â•àµï¢2ÑCƒ×I…±W¼WºŒvQÿŒ—Tn¢‘p½x¼Ra’½¤™Â-¦)ˆnÂ/a¢¼"†ýës ª°rƒù‹ñg!g)là¤#âXâ¼ù,84Åʳ(Ì~>³Î)%¿òàr„ÓYýO¸ø&3§ÞŠ®äê†ñpuV«{¸ýl’Å£OŠOj9œ#(|‰‰|g¡Pk¡¹J0á”PdW0fJuß‹ç‘ÏÆ*h oغ ­Uu)Þüiäkþ›«r2õQFΔRjUr~7KÑòYß^7Bâ[ ïÇrc–ú£“Þ.›zÂ|wO[½®!<ç)ïŒÙ@—^Ûœ§ªçýŸ¤²Ï)vÅÔ<‡´^+»líž×ÿévOONÚDCÁk@áÛ0yÓLóyUŸ* ,ýãaÓõåÎGUIÞålT›¾ÙÔvÏ=hµKæˆ`Ó|Ÿ(îKÕjÕqè?B½_ÎÂxF=ºÉD•¢> F#˜×µNãÀè®´J؇õ9uSm¿Õ(õÃo’£Á&þç,îã-”z¾šEžvé£߆ˆÁñæÀ—ä3¦TãÓÚ>Ô¤v{ÇÈœô‰mÆWÿØàä`5ÀH·¬Ð ÀIå] “?ãwO÷åÍÒ%š—r!eÿ“RÐÿ~ö?[Ÿì<Ôìvþ¶µ½³õxç‹ýÏïños½à¬¬ ÂL€lnd”°ÐèÀïÂ)ÙHKƒ ‘?}"› €´ºQ·|k« ¨ûÉÌ‚Ì~|¤]š´"à gý––AÒTõ¥¯xqºäD¦šÛÒ,H¢Ì(ðûäà‚9¿DD¾Ñµ ‡~7ï|-+õt –ÉààìO&ú·1ô¯ú>»Ç;ÑÑbí=¯C-d\K«Pñé|ÆÎœ?b’í K[ìã„ ÜTx9aƒüRŠÂ—yr¥_“ã‘Woœð¹$Œž0l {Sµ‰@OVá!(À ?›`¶†®´¹Lq0t󜰓AqȹþŒ‚v¦%_­+²ÜǘÒŽ“¬ÿiZF)'+)3" ¶HšS$¦ÄÅ5Ðç˜/öÙ¶"(2ÌvQµZw]ÃZÛuI ‚·l§ ¨cŸ<åW7§»}œD×Å©˜Ì§® 3(¶ˆpú^ÂaÔ9>鵜`<ùÊágZ®ž„3Ç8šX÷ èª––xÞÌŽåÀœ’>Ie³W”’Æ <Ô@Zˆ‰­íÅ„±Z¯€=‰ü>zÃROÐúš<ÇiÉ–ì ^X ÷g·!a›ˆ8û¹B!iTÎÛ.–ôÑÀ‚¤WÔKv6w^òh´)R.±•yØb£1¥’ ¤qº…ëÊSfë}LX;PsåñM³úÒ“^q2mÒ -ß…ôX‘/7ÓF迤£1P)*&ßÑ>"›‘:C@5“gÄý  âØ:M±%Ég3Üš¨*ŒøÉz’I§ÇýëÒ¤¿Vÿ>†­lÇŸ¿!Du9Ýo|VyÑ9[ò‹¶KëÞ½ÄÏä ">q ‚ö.Iý>ÁVùɱà`¤=[i1”Ù½q¦€$¢B龈ép_5Uq°«ØIáXK«\«·°mÏ—,çRÅ‘—¤ë£Jͬƫš,ïš Õ9‡h–ôqiñ¿ÇµVûXW¦}4)G›3Ñ }Í9}äd+tõGÃRÙè0ÌåƳ$Kˆœ÷¦$œ–¶“€{u±G½¾°ÃpA Îuî˜Êu»6ãÓ†=ß2ëÐæ Î#˜¼Ã`k…Âe£‚YDÖT誃‡â\­¦¯ùÔÈÞÚ6ÅJŒÿ‡ ¿•hôÍãÇ9òßö“GYþ{´óøñx¿½õèáÖùïwñÿ¸ãlž“Íøõe„¹´8l„ }ãÁ4A!¼”Üö)°k}g#\« ì³)´ïÔµ³±½µ±ý¨º½½ëÜuN{õ‚é¥Q' ïï( =tÐ`Âé†ÃÙ%¨‡Èå×Ss¦_¥n¡ßè%¹8=8uükç»ýýýëó l:èï³*û÷4!H&ŒwbWD Á­¨ +@`H›œ=¤Ô_0™œÌ1"ËS/Å<æaýûD€€¯ôLcä± ¼t‘p:É»^‰ÉbÜð!¢9'Ìúîb6›>Ýܼ¼¼¬¢]FoŽF¼ È€j˜`…¢Å@3ŠÇ”1´óûPÁ#Öc]'X˜xO#aP- =$˜Ó›³{?´ uáaœÏEð Þ†Ê …"Öæ³KQøº§’,Äo£Â¿Eô…A8ObÝyœd9Ðt€&>ÊÉ+H„¤`’Kè§P'2bOPÄ®8 Ú ›Ì0­„ƒçÄ©?6FòÎH‚A}æp0[+,_Œ¶4œ0ŒڎóópÆ ÏPDN¬è`퓾ÃuŒ”r$bÒs2´KôL¡&aÖ(tNó°»WtŠÅ¯îMFÀ¤ã a †÷{ØIŽ #_Át£=cØk¢œØö@¢œ{ô‘gzsï"ŒIúÓ°€‰äeâ=។ì¢T˜*dýKèÂËØAÀ²4y× w4¦%ëS£Hkpü×SZR´ýçå,±f<ö”‹ò ì´jÿú±‚¸’ÚDtªW`¢Pû’q‰yt|±wo#T"~Üc<š0Cæüêl¾¾³ùv}¦¼³8áŽÁ"¬ÇÀÃÉsNëì˜eZ¹lüìï©öŠÂÎå«»2®Š6LÇ%Nl_Îø£s\øŠúôŸ9EØÞˆÿƒûÊqŽšÇÏ_®—ñ'€—`_òËÝ]üË~_Ù‚lz¢—Ì–~RÂ=y2 dPK5_Tc³ro§B\¯$o+ aP÷6ù™fý?ýñÀÙܬ;~ÿ"så 8p6|g-Þ,¾)U×ß”áíú½Í7Û›kÿ‘Ðx &¸ësLŸëlŒ°"ÆÔ€UmQ_påËe•EÂdFè=P;«?r^|Ñ¢ø>ƒ ¹Ùõ1b\øNº?ˆHU€ÚxµrÐìÌÚIMÔ-ÞÛ.RˆÀ\€Ä3ŽvÅïöî ôTÔ—¤â.² V˜ã¹À ÄTH=9­æþI­÷⩨ôHjDàýAÄL-¹AóŒ³2q}£‚Y]ŒªñÎ"ó²7Áød1œ¾.¶{ðŸÞˆw÷Öv×DÔNt•D2$Çä܃¾Â·A(¼¡ž„ ÃÝÙÌ@åÙÂl M„RŒFUø«Ïªìϵ *ÆMW)hy ÚÆQ«f´sÃ6nÊRoÅTy{ hæQHÏeA7î#È)ó>ÕBÒ{€f Î¥`‹xÑyµŠ\xmðÓzˆÝòûË‘8ÝaŸìQmxóŠ#]†xru€Bdº²F­¢»áÈ;'BšOÜ`_Iò\¼'ë ,É?‡î!*E$é++êè+®fÎÏÀÚTñÙßÎÎý:ú 㮫×éOÿêŠ_½âÍد¿Åä<_Ùò¾õ¦yþtÊðONè/ZÕà_8íø¯xnïÿ“þ†g?)¢× +îçvd•iI1Jâ|âê1Ȫ¶ &£-Ú¾3JJ–Å¿òûÜý3}€³bO"Ó0;ÎÚš0÷¼ÞÖSç8”' ^…ã²voËÙØ€ócº–(0Ia4f…¢³ýìþŽ€C­‰áÓ4l\ÀìC}aËØï»ïÞ4Ú‡…S”Ôž*²ÿšy‹?„$ó/ýŸwjGÎëZçy÷m¡pK…™ù°gÉ&¼ŠðŸµB‡lHÝcGþ˜EÌ‚Œ9³ÜQj`*¢'Þ Ãå_M}LJ²p“ô tW•hªYŠô §! uŠfç¾Ê¶-nØ ¬¬Z>ŸJác~Ÿaø&OeP ©a­yÜíÕZ-T vHÄ_"àW 8ýj¹îý£¬Ö{Z­÷bµ-ä Ý3ÔŽE;à``·½Þ|óæ-ý쪀›Ú;zdðiþ…ðWØÛ„>…“©¹«UÙí©BH¢K¡Ï ’c!~e·"xÅ©ÛÂp ³ò‰X•»N—ƒrÎ`Þû k¬€NÂE –™Ý † Ð&c#Ù(%Øý½›«SÓPãG4†CIµ_)JµŽ{_õ¥Fà« yÕ“ 奅õ#úÄ_ˆî Ù-TòfòŽº‘¬Ú]Vâ® -Ú¢pšx,ƒsÌËD J²Èô+S ã‹Þ©°‚#_dZ¤¹ˆf¤´B#n´ÿà€Ò ©nl¨=Ê 8J¬XO¿©Âèd} B£Î›-+¤š“@¬nðÆÍŒiÆ4 Ï<Œ€ˆdœ"½«a~ERPtEò èós×9ö84-ÃöMJúƒZŠh^-ôþ#È~_¬)Öâ_ÿ]]ýæÍæÛ_Ýuàéµ·ñsmã_oŸÒóæ›jÿÞf5D}ª»¤Êç‚b(´F×(‡3 ð¨È\ÃÝÿ´ºñvÍ‘š=º#ôÕ !¯ƒ´K!í(ZÒr œ¶ðjÑj(aj07‡n£)ˆ6Í…G,h3@Ò2(:œÔ ÀI;'Œ*„Ç„&ÂYÔs¤©9ÓðjG ƒL&/ÔgT7¿ÊÁþêþz¾öŸê  ¢ßGsב4jŒ`ðàg€EçÙæÀ¿9Á€»;ÏîokTKŠ¡¼•F¾?…#6Ó]i„Ñe'Å“ P2´wúLÈDŸÜ.‰’@w«ü¯SŒÆøvMöfmWœåpº;;˜šêÌ'ÂŒPªZ ì ½'@Á¾Å¬¨1ñXNÖž±óÇïµOòCâÎ&áÎ~Ê@Õ>Ù ëŸtÜ3<æd |šÁ€p´- mãü "-ÇO9(à3 Ó|ÂËøb“«ËXùÎÞB¿÷FO’7l\ Êk óÈúØ4½€s#I£˜1žâ}Sò´A'ýS§h^òÍBÌ~A©¯Ÿ^o|½µ3Æÿ ªðŸ©’ôógÀ(|Ú«§¾ú“¼—†ø­/þä!ÿñµ J¿ÅÕx¾ý÷öãož¤ã?nóÍ—ûÿ?Ðþ{gãFà_ì¤ÿGí¤³–‡ç}´úz/-ÑD«þ¢Qÿ¾{zÔMð‘)È|ç̈âð`dÎp‚– rjØ,Šc¤ÑìÚ9 fZÊï1ˆµžH ö2Œà¸b™³§ F™|PÀZZ‚j& úK”‘HMS$ÒɈÝ4§}`’Ïie¥µ*ôðš>é ØÉl@¨ƒ§)óÆ¥ºá’ƒI$`<âÕWÏf¯boè [á*ù¦¸Z¾IZmaŒ|Œ«àl#Jü·»ž³u%Þã..›° üEO¼@£1–° Á ‰–IsóÍÍÇ©·XÚx+àb4@@¾3äiv…eÝ>q怬(¡ÍHÖcçì§ =ï‡ÎEÀÆ â.žLöÂ(µö€o>÷]Lsr½[($d° §Þkš´·»*¥8 >=ÀL ¾cvgËù°[°t¦ã“kc> ¤ ´Ðå@ÃdYsÜjØbò‚ÝßvÒy2õQì:é úÚˆƒ·¡–Ó1ÖeúLŒ6J.-g¨ØúTÚYÇa'FÁXûTºx GEo”Ñð–˜*‘‚ço ƒå_E¤¨Sº>}ð ;˜’(ð+Оow„»e 4jt? Ð8D$9Zß,³…,,ÝÞé>à×1»<³¹}âJÇ/MÉU9ç<@ó5"?˜¬Ç÷"Ú—š€Hã…p ¡ê@Ÿ\=Ê"m˜À\–Y0lÿbáîÅ?{΋ƒNéB¬‰@èøgx¿ÿc¯Ñu{m÷e»sÐ-QégÌÅ9•ìT,%}üÙy¬Ø«öþ?©šDº’žäšðyÊY%c˜<ì0ö÷uüó[‘db‹SL` XT•¦å4Ž¿Øo}ÒëÀDð Õ–lÁÀˆ¤”w,=o&b\?ŠÂ(fdTŸÄFZTDœÞ9Ñ:<õŽù FúTÖßùtÁ{ŽˆAjÑÄm­þ•Ü€ÚÁ²>õÅ´Âñ•Û]²æ:ü3m-§dÏhŒK‚&©wêðTôø< ‡ íåòâøFrKÏÆÁm¼âÞ+ŠsQ–io‘Ãt —2þ²9 ‡¬,É-ztËáuFÍt!t‚ÀÚ*Ÿƒœz_OÉUï8ÁsÃáÂHþaf²äZÁ³u!ÁEëH{Ÿ.B¨f’Ã3˜PIŽ™²6»îa»âfÿpk·Ýq›-Úá4«„$wŒü[iCkI6VGG©3cã™K@lª¤·¢˜ºP:þ”­G…ù©¤Õ±Î§)œ”8v'…diºqÇ6Û¨'»:¹ÕÆ[cÐ]fCÂP)¨Æ¤°~r}3C€ä ê½Ö —óé’^óƒvËz¢“‚ÔÔEÔè4ŒFÌBªŒ²^ 6]ܘMA Ke[1ãÈÊÎ6z¹l9¾2‘Ç OèæcÎÑmÌ‘Â\ ”´0GÉ;É`£¥(JLl+º$SÒòå4OsA“…I¨À‡%¤Í¢Ò&ߘðêt—˜É©Q¾!7˜¸èqêRáØ~Ì`þ#úž9^Ö`>“˜Rëõ:îéñiƒŽÓºä#‚u .`uvþ<"[·ù¯Æ3Àüžàä Í¡÷:»*‡ÆG'42 ÓÈ8B%5EèUæE€®üšaKé!Ze6©éttíÎB /[Ö'¹"çV"‘ÔÛÇUç¹{Òi÷éPÉiçëѼ’—„Ú)ækQâ0ιϙTîùYÙsz³ju[Ÿnдì¶)Ú1Á>þ;´¤ ŽyRêgy £—wÛG gÈâ÷Ý;w8­#ïJNÝM§JÆcp‚,oˆâÉÉž Æ¤“o) ÿTEùxÑ1T±vܾš—À©]è,8Ý—$klròÞÆèªOùŒnÂ`X]“ûH½Ó] .)clqÑ\LħRÞ'¹áÅÒr)q«±+¦@Å€DÐ(y³VNcd®F ›%™\ÞÖgzßu.Ì®IÜÊòïIJ#»žj•^¦Ïz‘ïg)Ñtœ‡³ mÒ)ä>àåÓ\ŠBò*`æ§çÅA¼Ä'^RÝŒ&ˆU®X?Ô´ÞÆÀ¦g&K™ÚŠä£æ|=ÐÔ±¢^ékÌã 5°@ ziµ’ÞvÕ†å+u§Xèp“~/è¥ujv5t1›Ì@,ö.üØ—ñÏü Î; ÙúãìÚ™„©çàFⲞ¼V²ˆÂ¸'ø-ÑÜ@Xl;SrZ$ì$ ¹d°Pm¨KÌÖÓ|Ðô])]Ö¡|†ìk7+‚kRÒl¦çuÉÏ}È@&O†³´ºføÝ]¥ÿ·ïÏûÕ±÷î7»ͽÿÝ~üèáãÇ©ø_[Û}¹ÿý]ü¿£ …è-ÃbõYО+OÒc õè’·Ý!Ùz8?÷¾GÕí-éù‰IÉÜ Í6€/›‘¿0¦šÇøJ ç¡­¥™«9âø’iÁ5¿U4e³1Éìajš1’QŠ÷®¦µÎóÞ' §øÃS:¥«oŸ”Z’½èl]!*å–=àL¤­`òÎi±c”¨´S(Üi:Å{¥úáór¥ëb±¿÷Îûlä0¤ŽOö°…;"H,,^¹èŒ¯ ÊøDØ„.ÝI@xQZ-Ü¡à}©Öƒ.ž÷ÓmQhÏ+Cà°Ä›BºŒ­ÿ6XF¹\xÆ r¡e‡ZL¦¬9aÛœ7U?™À¤Ê‰Ÿ¿]“ï·^™îm£ù„œryÉüŽ¼’¹`g× Eš1=Ø4.Mö¤¯º c¤+8ý+C4=UP4  æ6‡8‡HS‹joá$•O8ã4^C‡tÍϦåúؼÈÚ¬CJh‚HV Ë1¿l‡%Vþöìø–Oß¿ À,îT;®~ Ûôöx§ƒ¡È*Ø‚ù€¤:Λ¡ÝäH8p»Ç½báø´ÕÚƒ’˜Q~Oæ#Yñî'þätß?&ÎIâ]¦ í´Oœêlf.¦§w»°7‘¡¶/Å$®ä-HÈûµnÃ9}÷è°îleÞP·¥Lu½Õ¨;O _mü?8„Q× ©<’ -—ˆÏ¢Üa!øœ[[eÌ JäÂH s$Er¡È´–¹0d|2õe>Y"†J½™ C•È‡1ý¼x(ªD. ‰>öo”¹3ºø¾6bkÞ7's¿±S¦å›LlšÛ)Y ·W*ƒj.UbŒÅ›a¼d7ÈL¨K\-‚½[T=z·¸.å‰]XŸJäÃÀt´ùõñkn]•c6·¾*‘ Cæ³Í! äCˆcøž[_¥¸Í… Jä™~sAȹTFÞ\ªD. •·7†*‘ ÃL0 È,–]ñû¾ tx†É£€l§ÀŒ<• Hô‚ô¯òèŸ7‚bÒ[FU„#ôädý Q¼=8`¾ý‚7'á(<Í£ž³ùò¡³ùü•³ÙÞq6€CŠ"ý<¦XŒüãs´_váéG(Ü Mh&´¦Ší”†¦5¢†'{Žoú¤%Æp6;²ÐŒ~ÿϽw%ÇíÀ€¾À´3»SÞľMµg þÓþlV73 ³yUAÁÃjïÿ³›0P›ô®»ß1Þªý_€o¥ËÇeèe™ÿÐÁïï°øtzà WW7¬ ŠcW¡8 ôŠZµ‚êÐjŽz­½ñ;Øô_$µà[‚¿:vÐÖ%—‚Ï) Ì–étë{Q?Ý:¼u6Gdzôwgs j‰2¹Ÿ÷»õ‡;{Àé î ”>ÊþÊÆ;zâdðIŸCªH6Š Ê•Ç`g¿ n!õÁà‰SßLV7õQçaÓŸtÞ4õÍà9Óßt^2õMãS_tv,õÉ`³2ßò¦DçŒ2Ÿ¢wyï7“þ&9•Ô{ƒI}ÓY‹ô§8oD3ú¦Ÿò©OÆéúfœÊéqéçcê›å.dE”<µSõ^)Ám6<oÊÎÿûzä]RN•‡ Ê›-PÓ;?9ïühâîPt4?)+ ý‚®ÇÓ0¤˜P¨ÔŒÎÅoðÞ›ÊbäP)~‡#?ùåÍgü<ðÛÁY_€Ÿý©xPû<žŸÅ×ñÌ?½÷61/Î&âo0ñŸ6~ûD æÏ? u18½?ÁHÊÍÆ| ”÷FO'!²ÓÁÙS“PÛ¢9j åóYªJ®XŸb¦¦Ax*¦ŠxŽ*’\boù¨k4òˆ½å›¡‚È#ö–ošZ ‡Ø[>R·Øç~¹²ŠÞå½W­Ø[Þi±·}ŠóFdȆ9ÄÞòÉæòˆ½m\º¸´Ø“|‹9Å!eÞ¦õÇ)ÎÆxkÓgÙóClMkœåŒ6±åL7ÇaÑçÅ…´ðES¼D+I!”þwƦ’Ç5µñ/¤Lž>5ù X­“‚`ìÚæêš-š éϼ¶i™mª+éÏ~°è—-Š ;éÏ|Éj–³Â¼ô[¾Ø‡oÑ(§g;éÏ~Ié’-⬕ôg?ÄöØtÈYÉÑNú3_lÚc‹µ€ô+ͱ©eü£ôÆV“ôOooÌ ½YÑìxQi]¥Ëå> rNƒ+÷ÌÖ)¥m6ë$jçÔ{©¶9/ X óM´ ö •^`zªAû4¢=ìÃHðGÌí÷ _q´Ií•#¾¬¢ øSZŠ}¬•XnÐ|ìVb9b¹)ØÓb({±¥–a&’|õ‹ìþÅ2ì·Ý E-òûÿ’˜ó? ÚX B$™ÐO›?¯L³‚8ÃÔ4Ï>fÁtè‚IÞAž1#aѦ`?Ö?Îò·²Js´’qB~Ùå)·ð”Ë ¬ÅVá'SF Æ[ /)ü35Á#A‘¢YýNkX;èøká@³°–ÊÜNÛ e.ÄŒBvv7[$sf±ßÊe‹P_~¿+±ßñ6ìó½Ëí¸äZ½G+Þ_å1ÊV.yám—Ž@Ïl~øÂ?¹ûúùç¯ò da5ÿr[±@íý?sQ±ê…`m™‚ý5ùüÔÕ…âh__äÎXöŽBpú¹[6£Zþ£…k”‘O¯\ÆfVU-ç—Õyn,õ ÔÊÖÆVìS¶;JÐË'€ñvEeòÀ_ HÖÒP}‹©Y¦ØÕ,ò–øK ¸°W+ùqNôÿ“*¶ÿ`=u±Züxõê:ijî6ªi;Û#ƒ½Æå]À\Ì´Ž _Ð_ÐðA´¨¾uüѨÅ視&œþ¢¶þ«­å9ò¿ÂÊfY 2±H¼WŸ?Ígò (&ÁV`à/ø¤ƒŸi“/W“‹}Üño¥ §ÙYI=žWòãøâí\¾x™bÜRhOœR‰kïVPˆ/ç……y×bN8)´€V-.ùœÑuŸ°ÈF‘ ƒ¬±kºÓrœPä”Y¿£wÿ£ºñ„w^|q»+hÅÑBdµNä³ß 4â7Ñy'¨ô…Iÿ¢å¾)“î~aÒ¿(¥W‰¡MýßbدýØ¢|ÜÁ'#ö[¸ûg+Ënp2¶Vv=ÞØôÜš*û÷cÔ9Âôo)š9Xdó½±oölùvÃhÑ+ ùÍÇÛ çQߧt …B·}Ú©7躛üà+é qââáØiÔ[µ=ÆÁ½©Ø,G¯^Í€PéWI÷bÅ‹¾‹ôîi4zý ž_õÖéA£ü¡ø¶ò̰Э¾€…㶭볋7'õŽÛ»P€Õ›zÔõû–׳½LÙy%ŽO¡y†Ë´3´FËNrÄmÈ]mu«#Ø—eÓ—-ës£EËúuÞhÉÄVw“±/çÍ/½nú®½ÿÇmrÃMéV»ÜðqýŸÝæÔ~¾ýúXf챉ӵ}õ©ùÄ" ×±zõ›“Š¿üj¥äo´VéÀ*7Z©Ïe›Ë¨·ØêµÎ÷Ÿ=òh}üTÛˆ³³æØì‚ÍmDéYÄ-6ø_kl‘0n´B¶(J7ZŸÏf[‹h#·ÙÖõŸ?Ê$}üdÛZÏ’·æÐì¢m­G÷ZÄm¶õ_jltn´B¶èk7ZŸÏd[ËèB7ßÕ/µÏI(´bŒÞÇO´«pLö§Vó7µËou7ßÓ±²„˺ÑúX"-Þhu>“ͱ¿n¾Ÿk­V»þ™c‹ÞÇO´ŸµPiöÕ¦6ów³esõú7ß˱ÕÉDñ»ÑÚd¿Þhe>Ÿ}ÌÁ oµ•ë/>dQ}üt[Y ™»æõ w³Lxu·ÚÐ¥5²ì¼Ñ Ù‚=ßh}>“m­ÂTÞ|[w{§ûûŸ9Êè}üDÛÚ ìi_sj6[›a¡Wqómý[#[èÕ­-l÷Öç3ÙÖ2Âí-®Ó÷ÿé}æ£÷ñíj#$pÎu&¶ºàö['¿:„[\ÿµVȲùFëc‰ö£ÕùLv´Šf}ó-}Üxé~î¼ÞÇO´¥Íøßö5§fó÷´™=bu7ßÔ±5²Eh¿Ñ Ù²{Üh}>£ëéÛ^MÿÞ ê«Å:ïý ˆÙ*ñ“_¦Ö?ý÷Ò»Ôúâëî¥W©õOs×ýeÑ?Ùúm–<›èf þÙ[*åPGùÙ_Ë&}üdôa™æ—]D –)mnC!þRë“M/s£ÕÉ&&»ÑÚ|V›ùê–»ùÕŸ[^ý»ùj¼Z¶¯–áÌ«O²ŸÿB+dI u£õ±d¼Ñê|&;Z¥ëºù–>l×ZEQø'¢fÖ4;"Q³ù„Â̹¹:ˆ›SŠ/ ÿ©ÈÏG,»-Ñêý3!@2ÅàÍéÏÁþóÏ^7­÷ñ‘ #'£}Å©Õ|Ja$ô]ÂÍ Å_l…,93o´>–tË7ZÏ…¥y>¿léUO#3ê­ö´™Wû˦þÄ›ú#VÈ–÷üϸ­Uá›oëýV­þýgŽ2z?Ѷ6S.ÛלšÍßÖ Ä´±¸ù¶þ‹­‘-)öV(àæëó™lk•!úæÛÖèÀýŸ’ͺ05þàFªÏÈ'""fo;†Q³ùDDX€¤67'"_0â7Ä[F÷áC Àͱá3!YÓYäö/ú·±e8éuþš·ÚúÀ?eRË°©Ù|ʤ@,ÀEˆ›S¦/ ÿ©ÐG,{ ÀÍýsÑY^OÜQè n£áøñØmý‰ãIýÿMãI™*K9ã‹äoìÚ­§±H·€¸…†äËßBmzûN¸ùú~&d…Ø»³‹È÷· K@é>s^ïã'¢ æ´-@j;Ÿ@˜p`‘ ÎÍ©Ä_lµx“~ìZÙ Ü|¥>“ýîc„ú7ãø=°~gç¶ où®†òSÕÛâ›|†‹( «n¿„)Zòпðûïâùø6¬@ýEã³×æë}üD?™²hCíæïüÆ̱Á¸ùÖÿ‹­’HÍòk”†póÊÝÛôF¤;ùÓ©`ÊóE)UŒï‹ÒªØåâ¤îo^å$ òû3hpêOþ¤M$ù­ o]9î›Òš7\d*;ª}ˆ±É?D*ÍC‡2ÒWÇÞ»¢ ìÝ,1uö,ÉoÝ…ÌŠzZ¦ï÷¾-„Çô_8”ÔmA£Ûs?d)·¸ Ñ:ÿ1ôíØZ …ÇÉ¿øšz¹êycÅN­Qqt‹&­0Ý#Ù»ýya#¯m†[³ÞÞYœw±Ãü̉oÎ_Òk¹¿á¥4tL}Eº„þ4@’IÑ_J)É•Y¹?Ä9Ÿnšªb wr]KliUõ OaQÂì%.6l•œ”¤²ráFèTÈO øI;ô¹ˆ™:˜XUßñÿ´Ê6ûIðjÉB«¿'Rý½ùœ0JeàL0ªÞî¼Z„Pò¥ß_]l0?¶˜ùCs$Llú÷C™ß°KŸÞPbWoöWÁ›EH²ÿÛ I’ƒ6Eö_$ùºô9Wœ·ÿ ø Jê«ÏWfz:ÝzÙY% xÀsBðc‘ü“ò"¿Ug]kgW“Öt>ùÓãÄß¾üKÿ;ïo|S}TÝÙ?Úü­ÚØ‚ß|óÿnóxKÿ+ÿým{çá#ø¿Ç>‚÷ßê>ç˹æñóÒóº#ˆ–3™ÏàgJ¥G¹÷¿:÷Ò=ûÕÁ1­Å›ÿ~SzM]x+þ¬¿)¿†n½­®ßÛ|³½y¾öŸXœªå`_¿þ7Y'P–&ò¡Ãœß ú’–T;ÐP0tHÃÿô^zžž:{ÎÓ§ÎäñßF˜*„£^^:/ íB!À— •k4ã´Õ+“÷Þ(”õON§Ý)½ž„.Áä=kôä‘ÿÛÞz |߶àÿw?BjÀo¾ð¿ ÿç$«îl8uºfŸ³"^«…‡ýE‡E|ÏüqÕÙXߨÍg!ÒgøIÜœu%?Rª—í¿ÿýÉÆ,pÅÿ>„ŸÛÃÈ÷AúÎ.‘: ç“7jRqš“~• ¼Œ‚pð‚ÏÃh”æÈ›ýœ¿óƒY… Rs=$:Ã`D,ØÁÆì.u7¯%çuZ©œö²¶×áÜé{8lŒÅ+&—ä_AW}ÆݬpÌG•OðŸû?òFÎÉülô¡¹¾?iƒXï)¾‹/1ή¢Ò®±E‰;ÐÀ:bÑ¥ì=tÎÊ)V+“ä2òfIMx øt'žúýzæ_õ}*Ž8¹¸Û¸ÖÀÍáÌhs2S“í%“íI û;<ò¢k’?DìœÍƒÌ[Œ —¶ ‚=ö®¥(¢W“Œ¢^ü«.PßiâIÀA(ÑIz!óIKE¯¬Œ ¤¡‰ ES!6Á2_ Ïù|8ád@YYÛ§=’B¥¬º+w®ã¿÷R0žŽPÌ‚¥E1îšWð¨Ñ©¿€µýf« 2.tù°Ù;1×9î¤Üh§×¬Ÿ¶jçä´sÒî6@àíú¾˜ˆ(†Ã‡€GG1ùG˜œz68Þ{œœ¾t …D¢GKQ`xDzˆFi3¸ ru‹—Kèmsˆä©"Z€ú¸«`áå  ñaŽ‹Ùlútsóòò²z>™WÃèøj3Þ<ŸŽª³ñÑ „gBȆs DÑH`ïb‹ö©7y7Bý ŠC߃!Œæp†QÅÙ‡+Õœ­íí­í‡HùN»µ*1(êF¸uëYm7{| ¿O:NãÿJ‚s,ÃËÌ?xY`$üúW€[ànåa(w:¾òcÙlUöù¤ôZµù¶Rx ¯ƒa þ+j»}h¦¡ÄåEqSšy[†ãàÞ6þÙØVLùk®áÍG³Òë{øW_‰×CoæRª£÷¶y/à,] ½ŽüÿΠ²jòïÉÃòÛòÛ¤©{;ðX¦¤S emwÿ´Ù:8hv–Î`0ŠŠ8!5BÊ2€­ ˆ= æLT þ Ç@DæñV®áE^ˆF¬Íe¶uœÔ>HΦ—ƒÿQ€N¯¿qÖA(^óÕº!LÂÞ?N¦eút*#ÎûÎ¥”ƒ6ÌåpñÔÃÃzÂ`ß–ÝÝ‚{ý‚˜T¥×í“,Q÷m"%Ê Qû /¾Þ©>þömÎzç%Q-쪰1ìbÍHL Ÿ6;Ö­·›ÏÝÚé+&@–"(Xt¿t JÞÛB6šmÕ€£Èý „ñä4¿öA‹»Mßa!ÒX—‚Êp0’!¤Iž¬Á{³þ¬­5… djÃ)r\ŒB òSlaêM\ ŽgÁ ôúßî? ðëÚÆ¿Ü·î©ŽÈb.÷J•°Cöá¯ðç õ¼ÕÞ¯µøw«ö¯ÝvÇ=n¿ÄG0YM÷¨}pÚj”<ì³×…}o¤º<FŒf|PÇÀWà)žŸ{ýÆCs–¨Ç ð‘H .}¹·€z8`Ð4à§Æz¶zƒ’Ý.VB+Ò=}^ë,* åàEÚ¨²môf™ôŠžtÚÏáïQ­) ðm÷E£ÕO¿÷îý"°76Ï‚Éf|ñwNĉ.‹‘1ˆ ?KäB’Vì»8qæ1ë{#Ÿ©„$¶—pHO|P§Ðjî÷ÚíÌêIwïÞh6ºpj£Kï:fU1rX—%ÏÈ:{k÷JÔc¼Š†¥u© Ee)ð®á´uO÷»½’¨£MC£wz‚-µ'£k‡QÙ '}ÿ©ÎÇˎꈻÉéµ`œpNÞÅöN =:pj¯ÜVã8=CáÙOþ-›×w“šûö™®MˆçC ÍNiF˜¹àÚ)†Å²mºý+_‡Ñ¸òûó™w6òóàH066ÅF@òTf_µÞi§‘S’Ö xÉIÁéWœ½0Ì\§Ñj×5|T{ÞÑ£Ñ{Ñ>XÜAØÿpƺ‡ö¶ÇßÃC~ËíÖ[ëÔ_4häbØíþx´ßnå 5#P¢Ûi·{¼d´˜ñ ‰Z æÓè {>™ X¢åÏñ_dý'j"¸fŠ‰EGž 5 ò ™]DáüüB©a"¾ö;:oà0ì{SÏ°åjA^OnLœâ›{¿ü«ûB2± ½Å]u£вsܦÑ3Wxê@n£¬W{ÿŸ(øf¦³WZÑ>:ì”Ò3‚Ê!óáWI,†µù vëØŸÀÂ~%«Øã8¹Þ^¯ÃœF°áv”j •¯U%8ÀCĨ ᥑKPo·ZzÏE©ëø“÷ANÆþdæ¼÷¢w^…ÊÉ6 Ô{oÄÈ@yÀË ‡¸ñ8|çWµkbláÎN£ÑFz"ÍìÑ+`šÃhf~á«ZG‰Ø¨4…g€ ²£À1‡H%ö“³:aÖÝÌùƒ½k?f`$øI$|ÈE*AÌY«zk€·ý‹à=«Þâ°Æ}*‰h\b5«sÔý¡ŽJ¨Ë‹DV$©1Ô…–×ÊÕü*¶ç ¸BîùdîŽ(„¸ý÷..xU(„йz}ï^½Î?ÉWéo6̤7ñ¥ðS§pÈá‡Ë¶ú®³k<òâ •`ñ¼Dù'NØÁÐðåÜî_Ü}°¼w¡Ý9ì’ lû7‹ é¸Z€ÎºôÎ¥.ï­Å›hSüϽ7oÞ¾}SÞ|ó†Ì_h#¢þˆ/YRUèÆFƒšA‚ ¶"`çÐ|÷¡n×Þ†¥‰ÌÜ…€)#OhH=‹W2qòAé THª¦‘ «Ñê­®©QCŸ¢+ëh½JþÝÛ”oÝ1h :D]Mò»ôd¬½Y[Ãÿˆ¦é1¿UïÿgïKÓ8²µ?‹_QƒÈ2 ÅK9J"#ÙÖD‹_IŽ jAKê1t,)¶óÛß³TUWõ$;ɽñLt×¾œ:u–ç¼<¸Uv»^Î( þpœ!a†¾»À¸(‡GÝ)6*,øAS½\¾-aLbò¬äbGÜ`¬îP %íøºÀ² î"€S˜4eµŸÝ23:òA‘IX†¢àØá’®´$7¶7±›¤²kZg9´æëÏœX©Äø,ƒþ„Ï, ÁÎäºÓóF†°w+êPî:pÞ‘0 ðÝîéJsÄZ!´l„$0#Ò–bŽº²»².Ç¿¹rn’{8’*e¼®7cK#{ŽL~ÊãJ‹vðòĸ'¤rœQg7Ê¥èZwq!ÆÓe]®&æä£ôbgüè0¬D·;H¡® ’/§Eš,=yœ6w¹¸ö½JXwM…‘%³uDH%+VéôzîÍÆÎEX£©Zɇéî{¸c©Í0Õ0¯$PM®FTóúJO¶­(c¥¥á¨]Žû@H‹T,ˆWþ*kyé¢è;gn¿IÓæÿÖUÕÚ’ÌsèнðB”$Y¥`·Îx…»}dÕz#if‘h¡^ÏïQuVZ=1­ßð J%ýçgI<ºµ\iµ€ IÒŽsÈáµâmJ+³š1¦À(äIsüî{èî2jº ÷¥ÈH‘É“’X¼IL¡Ýäª-Ìq6tÆtÜWZö/Nò«XÂEaê®Õbj•õ;Á÷À$üR` ÔJªì­ýÐ8)‘†þCËUÖyO#ð’þ?ßy»·½.¶ÑŠÌGZ ¬-^Šft"È eAÏ=«4T!øe÷5|´¶¶š‡;¤D£5{T‡KËí­n¿`“ªÝœ;œWRÏ£¥œ6?b!õNƒV`ªó2•U.†Ô{žöæ…fVè)YuZ© ²XXc·T6dùÃl¹bH¹5Ê!ªÝNü°Y%2̃”B?¹q*p Â¥Þ;—¬3ñ½ßw”Ý>òؤÉ#5æþ­ ¹æ(×wàÀFæô{åÃQ9t, 0‹^þeë ,<ÙÔaúùPæ5 Dµå/¬çòûAÍÝ ¨x– ·÷>1šòßðHú¤÷¡ƒ>ïÖ¸Ëfˆ¯Y=¶.Ú¥zZxxyDd7”Œèµ^-•–¥‘‘Xm4·j³ÙÖ´êè¤Q/ν>çsxÔK?jÓžXÚ£×Ï~Úþ%ãŒÆßøXn7@(à1_¤ýÅʃÈÆ©´²T) …3º˜àÙ® HÍg«Hr¤‡ÿVUÞœre«K¬jcœÔDœ2È¢Î[­§ŒÂf”C3Ù:Á+UlòÅü3-Ãô…hW™º5‰Zµ–¡îÕgnuj³{ó´{-µÝ*o‡·Ú—iw¬R¹u½!´(¾Ûkòº]ZAkCêhÅ2"d6N²“jµ?3huâ‡ÜPd­e/mºñ-,,¤ŸvÔšˆµÂ Oæéxóøõ°›¨–³{ Ùÿ#¶Ð‰„¦´Qùê$ZD¡¼ ˜Ø¸˜- ”9ýcO)¸GæQòdäB×#äd¥˜ Uz¦p˜NÙrt?@q8es,±)JX¥¿I$Ù#ù#´í*½ËºuÛƒ„³TZÝ(k¡ø•²d³ÅÓòŒñßd»½’…7º3ú"Àƒ)°X—iö?¬‘p5,‹(ÄBûpÚ;ÝsCB.y’Xоò8š…ÜÁ™ÛëÅDÓ¤Kº#àï…Øñ£ÛFGšä^Ò†'®ºzåðPnÖŠó\J[X…ÙëÒ¥E|ù¿7æƒ~ç› ÁArR$ñƒƒ-æý Õð6³I‚¹£%-Á¬SªØ®Èâª'UËâ[ #Z§, T÷MÆp9Óר¾'½:œ‹&nˆšßÈ“FêÀì~›õ(AI\Ôq,ï¤Ú‰‡‰‘­qKTSÎ5ò!è¼w¼>iI°ueu•cÔ)²5åñѤÎKœÊq¶º,HEv ¹£Þþ¬øU·æ ›N ­>¨Ý„z¸HÙäµ%j¤“ª¢Ð£ŒZ¯J9"ÁŒs†ÖW䬰yH^UÁˆ·Ä{tt!%¥6,o_QãD)66óe-Kâ^]º¤1Áx”°ƒyãÔ'Z}OÂKÒ8tb—g?gT»}›uÐ…c¾²˜%T'6_R¬n´J'Z<Ê—û=ŽvËH²6;‰ývžvžDµØ»ŠZ(Ôa¶oæÔdºR™±a{“®k¬^ã´¥í~]î謕[OÁÖñ|ds =»l•fÁŽ  §è…©º¢'!Ž§W)*ä&¦´üvdñÚ•þ|#²¨ÁNå‰Q5¡FÕ31“ÌÛ }ÚõÞ²®¦Éà NæfÔÊ Ò¦i40‹d¨æ8ͬ FÞH/ƒX7 v¨Ü¦å9™Íù“iñE~µ£¾ØÎS -\úN9B}[¤Þ뉀OX þ%ëìÆÅ{éø‘øÏÝ£õKOÌᆦ$µh=æ¼WÞ~¨üýÅ*¨¦Ô–Ø’¸VUeîhR2&9îZ¤p$^€N0¥²4Ëe®,=°ý š,·*-â<:3käQ)K%tO4ŽX’îê[ŠÎOFå­ÔHgÏL•›ô"RRgç9¢ñU ç*8ØЭbçÜ’˜KS¤LÔHTÄ“ý°ïtYN®fz÷X¤nì:=$e½ \­»¬öÈÈRïÝ‘p.ÈéÎO°Ò\ ú•y§±R¡U§Q-k‰_÷Æ\[ÄAéhhÇŒÉö‘Ã#F<¹ëZÓJ*+êô)jZ%²Õ5ðñ£Ø<êl¿Ý9®¬Vq?éWå(YYë|r 4:»á˜ÜSI­o“*Eq[—Öú±½ <ßs¡0ÜåœÝ®úZ*‡ÙÃ(¦ÜNaªõàì”劗¯ê¯ßŠwá%uõÕÁÚ«ÒVŽ`}IæÁ oN´9÷Á;Í-ò7ÀÅᎅÊÄGëQ~Zß/÷Ü÷Ë>>¬}ÿïU4ï3’v\¥Ø“rª%V)ÅP*Ã<ª”ö¸\˜q5&SË2™^– Ú®²¬í-Ëe ÕWe¾G6P›ÈI72¤óBVK]I¢8’ÊS9ÖäŽû–+=8o0çö=ú{uªR-|@_"4¤.mß}!‘íƒç…v©u²Z0ž” Ÿ Zr"¬´ 4GE:”.6k‰váÄ`0lÙiUº_I¬ö)µŠ­Ï肌ߊE~Ð.A6ú^lŸ*-ò¡¢§ø’œH^ÙÇ"TMY78]‘Óê Šºløqü‰wqù&¶–¢üÔ2±ˆ7.9 ##Ä(!Á¥wæ;>•;”MÒn]³š¨šÄõع#?04À4¬•©ã§©÷÷™§º«^&74¦ŒÞ'§ÒÌœ²Åÿj“adØ2¾ØÞßú³½E†tl‚ßèLÌiþñ—/”!¢#º—äGÅgX" £ðÔ)ÂǧïvÝ0$ Dí¹ÒCÐr/è»°²"AÂÀS.ž?22cx rþqµ3ƒQÈîЩ1*G y@Ä»¢ak!R^üWΗß&hœK¼g.Þ)âÍ»×øê AëY‚G ‹(¬™Œ#%–nÉlÀ¦R4@ð© ÛÏ‚ÞM„öb&±æ®’5"Ï@‹WÜßÝQ $ËÅ–ðj0ºýV3P1ZÙ0€¢êTÂI÷’„ÎçR’¾# ¤ª6 †=&æÑ’‘-ƒ‡MYM'µdÆ )¸rf§DÚ#Ê’FßPÊ Z¦Þîm!ÎÅîÁ‹Îó-•¶ „áhóú+<ƾ/­âQ¶ygr„všÕÂâ¿sŽÆ¦XrÂÎ8 ÒZ×Û1ÏuÎö© S¸®ˆkæªÛÙuCGØÁìhaç¶1»êy—¶0úú| øUù"¬t¥±J%?‡îå è‰×¢´‰¿¤X&mðªÊì5ej$dÓËÕUºßó%G-¸ö8#Xtל§˜úˆ o2äeš²èÈvºZCÛU¹~1ÿ%å¿LÏ©R2óbÃÜ=ÊÝÓ¹éÍÆz””2&ý’Ö™ÐðWzò›ÎlQ"*ƒ YªÆ x'>ÃàÂ÷~G™$ihÖiˆ Ç°ÒË´k¹‹åàÌ#ì^EuéÓ WöY·)^²ÖBåd±k*™ýÔ^~)‡´L ë¯¤Öé´\¾œ%X™^ˆ:2O2ò•§XF5%'[©ªÊ4aVW 7lEŸa«ølÑ)ÃŽpÑÎ$¸,ËWŒ¸8b•º1{œRûÐ"K¢›øÖÁcFIXjˆ¢ÈwîEFÁÑ#u‡~I6|M`B°…é)ª ÷üÜ%Ç@à[ºý du³%$ÀTì¼2 •‘[Åqµ¡¸Ý`óu ó uPOºxÿÙXgÎíFy7^MÈ´x#Q>TAÀ7xC[ÏÔæ,f÷Ñò“Qk½¤ÈŒ©ÑÆÜÜDÉÊgË[„‘dmF†öe稵Và$ºª£jΉPŒ”¯.gq¶’ïžd‡“æJ«™‘‰o)þQ‚·ºä?®npµN(8îÒ^+ß{]ŽG]erì{]² Ñ[QQÐ÷UQŠâ<(ˆÃ+Mk‰ƒ©%¨žÓ ~Òvû„¾Ô}à× q<÷cõ·Óuô’=8Þ^ÍKǶöë颒ò«Ê §u?Þ¡Ó vÈD\Sݸ°(‚*ųí;ûqÝz–•Aš:Y–³½¿/¥ §² ™:’C Ê¡f¾1õ÷‚ÙqoˆSñ:æCëH`u¤"u0/D©¥˜Œƒ ’·H$ª%_þµêÇøÌí:øêÌö#oðŸ¯^Áó’eyÁ9=Âfà]ÃÓæáòîs¢O»ÏëÂL ‹Òþ#åä4¤#§w‘…yÀ ¹$GÔç?Ôlú8äpQSá ‰OMm“£Í-A@6+ëãµî“gdOuCWEÔž¢À¤ßSM,5ø9Q¤ ¥ßÊÄàãÎ(Ú‹K:€-Y!ô2ã¢[U¢N„uf挨ÏG*Cç—Qš4LÍoâuá60øFNX`œÕQ”o 5ð5ráã :À¡Ì2²ÛÄi.­RTŸ!ÀÉIù*E{uÜ‘y›¨x®õ:b±ÚH¥XïsôâH¥ ꬦˆ”ì¸À–u™NÐB„Ýk¶4Ö’þFAHÊô8ŠM¢b’ÐãÃ=xr¸Ç?Ӧ̃X–ØŠ²Ú,^@;·+ÂÆ’=GdšYJüFN×5Í`9ªQ—ÌH¡O&›º7ÛTëµ3ÙÔ£Â$GNÙ7?¸J˜1jŠë#­ìÉR’ŒÓ‘Q¾ÌUÁ?‰1£„df¦yTÙeÆ~‘}8'αS¸œ¥›« ‰‰4 —MF¦¢ñF¾Olò‡ÌÛ‚îi¥)ý‚šàãÅÛ·òÕ‹ –çÅ|óç½cçzÑü|'Lœ/¾þÚNñüë¯í±×ªAo€Z£ ùÐ )º#$‹RªT‘ºBÏÝIiµ1ÎÚL‚ò•V•‰GÌŸkâG«TÍÄ:ЦÕ"KÅÙdQOudͦæ϶ ü昡žœ¹¬–› º˜DøAÞ\³æ¦w¼Z—@(‰Õ¨G¦Õ J«êz†¦;߉zO­÷nÙ/ˆžÝ1È*³‰†>A[4…“³ª°zÒ^³ÛŸ0v:Z)ÁÁŠtê5n4dŒÚÇñ”Ò²&A›nãA¡2;*â>w‘ÏÐÅ!“ÅúJ6‹T™¥òƒð-X_Á¬JCLÿ·x·‹Ö–9 Dh&_½>zYy(tÉÍC:Ê*­x‹£ð"ˆ€så=ì$%=™¤à ›éÏû@äåÅ3JÞÙÝ¢ÔU #ÞFT\ÝîE`Àé!@¼ˆ8Iërçt;d>̾æÍN=ç¢[¥vúOTÙIöæ þŸÝž”Š(³þ II•aÕ¤Èï¼Q,’áÊ6wNXÞ ÃA ;úö­ºn+µà 泪lQ§Tú‰¾YiDôS*¥Ô±JñYÕÎ>³Òf¬Îæ”*›É›f…MYòQ¨~' 3­Í“–„³†£îi‰„ ë{ï *僡‚Ó¦2ž¥DhpƒTM | Á¦ô k±º°i¹¬ÖÉ“.‘3=¯ºzE9ÓóZ§®ÝÌ…´±¦W±ÁÆgU»p… œ¹øXì ì—ª ëižJìŽ[UX¯D\#»ø“Ù •(´9¶Ù •ÕØؘÕdקzÛ‡)ÃLë硹1› ]!›˜¡'ÆépÇÒl…Áê#Äx-Š!j‘–ª XŸLÊ4"ÚŸš¹ÌÎÑLÉ™š'X'GÆ63í¡UrœO­Þ L?64I,ýÄLMÒœ•Bö{Z’Ãf ±ßD¨Msä³, Ï6 €nacpÏhKÂ覩ÞMáƒÚèÐÊf–²èo«àGP]?¥æ¦îë:r…Ð(5"Ãc*Œ¾bŒøúIâWP©tŸb~‘ЗU- £Ù,#ˆ¬"Ö’‰4@ü óì?^ínoO±=Ä‹¼†Õ< ðcHèuÒ»#ê9#ŸZl4ª 16—9nÈf÷I¥K²]i*œr„"•Þ ÝÔOÒ¼.`éû¶©å¹ÙŽ&ì`3Šâ{+#å"ƒPü%“ÙÆݲ“•kyù×Òrï©XþU,=Xî•ÂÜѨÐap6!7ÆlãrfÒÓê2Ô“%CV”2[‘S×þO9'ÒšFFXž1_ö&[sÿÓ‡-È;w˜ö.Ç£”gÚ꣔™K™9m’ou¶6ßììóç(‡3ÞÄï`ÌÈôRNj­t=‰£Kg½4é9£+ÏblWÅÖÖÑ/{¨ã$ø¨ðf0{}ü¾~’š|o{ -HE˸=o<%éîΫößS’¨x5;ÞLOøä‘NÊ_Ub;ˆÙ«ì°uŒ¢AÂUõ½!£qJ ñžØz³yøœmsŒÃ†QEs0A±1»âàH¼M­+’”šº¤‹#Œ\‡°ÙW0»l5†Óûpë4 X2ä ÷ivñzìòû½Þ2JEÝþ¹¼o©ˆ²PÔeý@œy¾3òò–γ”«ü'ÀÄyãiÕˆÕ•Æ£V®ÐòØ„‹¤B…ê´aô&’„ɶ ƒ¿;C:º(©Ñ¸¬$~ ÓXŒX˜2%ÌXXÏt°4íćvH_cÄÖ5(š$Z½ läõ\,ãìFE+•X ~ &kæFëuw0ßg³ó¤¨hgì~ ¥ÖÐLOµ‡½S±:ˆ»iPý4Â);Ó$±w¿– L¸Ñöò<*ˆ]ý0rÇ“‘/VŸ~ºQÑ®JM.YBûaÁ7–gaPúD¢]¨÷n€òºø«þ¦_‹ bTA1ÕžvaÞúÐh4g•pìX牒;â¹2rCÜÒ8 ìïÈÆ\Ž1A‰œf/Øœ£hUTÄœ(vF$ÔÀ½QP'šA*ÚY=ÓŠ—Ǻn‰^´¡u ¡Z±ôâpû•Èè¤QKš5îVîÔ^Œ,{tìÉo™™IÀG¬°Â”‘›GÁó›\<©jµ3 n_w$e%bo Kýhô‹Q²78F¦€ B7WϽ©Û‚¶úñ’œso*c}¾ÛëÈ3¢Cð,%³©U¿×IÍ“7]DÚЧ\É•7Ô±L^;Rõ J’)TÆb´µpÓ¤ÖY3ó+_+ºïÿdÊrX¾××ÃÍ=\õ?¡ê½rÊ:6§,s)Wi@[Ç„mÄŸóW°T‹ò«xܸFäi©ÆÕgÓÂÕâ1 f Ž4ì7Äh+øJ—!¡\àr"ÕÙ5FT×ßìm6ŽÞbhÝ݃_зs¼yøbû¸ÙW>Õh2q&ðwmé›'Ku„o–>ò#ù»Õúv•¼Àæ›OÉwЈt2¤AǺä ÉQÞœ3Š…ßK+å^d¯aù DIy d²‹¶í³j’ÁN–KK].:½–,6%½*NŠ Ã2^:£UbÞel|¥T½.5 |åæšRÍ%–u ½ÎW®Àç©}_g[W%¨)jRìö˜D¤4e ¤À ›¦J¢*Ñ8s=½S*‹Ù¨h*)i“’=•²’PPIaCS KÑ’µæîB“Ë8x;Ƥ¬ém ìÒ®ZÂÖ aUZI4-)Âhjaä~·&J«UæC”˜/fö!š‘H[¾s:>öÒ†—0ACg|ÉÀ_˜Ø° +LÙéKÁ¨ƒB[tT‘ï F†+)ŸJ ¡÷„ØD&ž‡Híb›bPsµhƒ¾ð¾MËÒw¯:Fê x{DûÏ`ˆdf,ÓwŸ€ á¾ ÍÉìm•úòÈ’P´¤öÑè V/¸S‡…~zÀS#´´HA9O)¸`ô®É=ºerÏÈA|9‘aÿ2–FŒ’SÑœ´”AìÍhá*·b\`ýÀJZúè;ðÎU£ŒÂPê³ =E ÌÃ!¾*“yÌE)©#0gA(5°ã6¬¥`skrÿ‹í4ÃDµKi£…œz»Äïá/Ìh(Ú*Ø"|Ó3κÊ:Îá¼Ð¸µK#ÜŽËíRÈÈÌn(%϶’IG‹ñNðy—èìv×ÏàMßÍÕþé P£È'ÙöøùøëÇÎDzøŠN7’Æìc­q®ýñ×ûÐÎ5Wé#Uwïu°îÌì©åÀFz­ûõ¯y¸¼;u$êï\wØŽ¼÷p‘@%¥;òaf}`È{ÔOÙáúÀÁP_ êñ-W•YÒ=,­”ü³ö×ÿšÑœ¹TѨ¥›ÑÑk£=fšBƒã`Ù’U=úåH*~8îæÎÛÊ`©’YÝÅôÂÏ÷N_› ËÊŒ,éŸ4”û$›´Vy)fOûO  ¼ðfŠ‡wX#{ÄŠ Åò$¡iÿ(W-‰:º÷jG³Ì¡ ¢Iø äçt-ì´®žøž|ˆMÇì4‹!tzŽ 6æ¹r%ú®!*)Ù²)Øì M£»¯K€ã]‹>bfù§e#•G+ŸèžwN!jÇFÇp( Ý^N\C›AJ-È8«äƲ¸•;¯¤bÞuGò×q“”U2ÛfÃôN$çÄD51E㊷m<*ÈÕ­Eê?oîš½•V"KGƒó*‹ÜiZ6‰@o{£„Å-IÊ–wäô=bo¹†"âÊ–]‘ßH'?GlWZ¿Š“¥vU,•–Û«Ëêõ¿|’%:)ÛwJg6N{“ÁPÔ_j±Û´¸è¹–4aK ÈtVÅzV<%—ÇÈàÇOÕQ“ÎŒ½t^íy½Ä"7ƒÅ“>;_Û3n_yzûöÉ£ûéð¹§èå—é€E ÔU‡ê·|¾Ò¤CíÖ"Æ+#ô«ÍÃ,WÁ¸ã\”I¡Áyè;ÛA×ÚJkïÑÑË:¿Ô‘;ã• VXf!}¶ÙüéhwóèåTØø縺.n˜á§Ï)J­Ï* éøÂüS‚>xº`8òr¦¢‹aöpìu'}”ºX» ­5ž¬hY-#ôzä²­±©uxL„*á“!EŠG4”~ÑFƒ·‡DÏ•:j é %1¢«¨˜ñ˜ÀÈÌv'«©!™í‘ÄéÁ'åö—ùW.Pu„„ögÆkN£ oHº´³ÿ¢Òºä#ŠÑ·$Ü)qǸ-ùñ¹üPM;“{cE Ç7²Œ?9ÅßžVdÈ Ö‘,X§E8–ÞÂÓÿ›³U63c?ÄsßÒóˆðdË…Hm¤Š<_…·(³µý²:ÿÅëPz·ixaŠï­p‚†Ç•s’Ar¤C ñ¡ ¡MSà„“hÂ|fqó’e–‘>QèXSnåŒ. ÞšïØÖ<Ñmj‚„ùõÐ:%Î.Câ ¡Ð8–Šˆl̲zDB±uêpûèõîq¥ÅÏrýÊHó§’%SÀñK†D0¼D7êåqŽ^¿x±}$9ÓžØËt”Ò‡g›qÀ  þá}¯«ÌÞ׳“Déð ÚXfÛ¥çƧ ‚°Äé ƒ¼¤o kÓ(X£Ì=lçn9¶Õ!cÚ·àˆ¹Ä6 …‡«—€\蟡D슊Á"IÜÕˆö&ü“É¥>·HvjµêX}³=ü‡ÇiÞ‘H<µôî° 0ÅŒ¸ GA0FöÅ\•–zŒÙŽ:04¯$`¥U¯ãÞ­Ë?~·þãÆÖÎáëßÿÈŒö‘‹7}â(áŒx[¾ºy2ZmÈ"*ò¨î2åP5§Àâ<çµkDµÁ8µ8°äË!Ó²9ùÈ  8?”–“L£HèŸ=ÑãXEÇ€3më4ÑŸ Gùoê¦ê—dÈl´;öÆ «…ÍÝ‹fÓ’¥’ô¡NKX ²ub´þééSªd™UáfÒÄl’‚."æ8†¦Mœ±*Î>–ËU㣅VÙ'f õwÌ·{j>Ê;#ŽÎAï3Di¤›æ‰¬GRÔD%¢N­×ýàSb»Eïµ?VÌK€L&Ñã3Z‘ Aœ².YéÎY‚ÉÈX°Ò±üÌRxËGE­'œýÍg»hÑü),Íæ挴rGâ–ã§:ˆD½tßÉKkbïõ¼E(õDZHí  -J6ˆNUÔy6rwÈcËûÄ4õB¦€¦Þ”!t8(,„Ž”礈)È°c,×B…tABìç‚øeÉOkµe¤ÍÄ©¸ÆÄ7…ȪuÏKéRýr8¹¦u(ï :ÆÙæ³Bq±Ëf`¦È/'Â:C€ *Cžiq zúJ ª2žÞÓ²i¥üFh'ìþÒÙFDTKÕØÏÔ…Sºúyþ²„ýNx®h€}`6¶wŸ×®¡¥ÂËW¯ßvv6Ÿ<ÂëÝöÆõ‚6? dO¥${òH'“Š'¢1´%…TK0¢ÞÈ»~r÷!å =¨­ÅÄ`åÒîÎþöþAYõuªx—±N×úâ‰Û¹ð'~L?ÏÔ,,=\CÛìnm»¶»Uï÷>‰úÀíŸ?\; Þ°ˆoÑÔdiŸg0#-$õ®E©YÚ’•áÉ£3.;i{b˜&ÜWwÌveô"gÛŸ|AEeMii?ÓϪurRÃ?UíÍd•Í¦†©oüàĨ„ =xeiébF7Vv“ÃL×î®7&Öß4Vj½è†bµAJ ß…UúšrÎ:SÜšycÔ:àûSôa®Â/Ç¥~±ƒ+¢M¦ç@âZs05:±é¥€þG l9jš³ª›ã¨þM#RQ*ML£íž·´hÛ§§YI^Pý]k¬­¢ÖQÍg*[#Ÿù(`ÁX7ƒmÏ#ÆéM5ägñQ\ŒÜ¡,'Ý3Èê…ÊKô+ÃÙ':^€âY•=yDÒðÈ-k­a9âeø%¥ÞíÐ{5y»³CÞM%™,ëcò û.ÜH>iy¸)^³ÔË›1€£4Å馂5Š!Ž*›‡5Ñ¢ Ô#Omn8£Oòk‡ww4ù“7r,èU%g”6m£„\R•¡S?'9";èø2³DKxŠª²Å‘NÊǤÐ FgÜ¡°!$+Œ?•þ¡­–àa²M_x[R¸‡™4§Ž£ˆ2PÙxt³QFÿÊ’êrÌÁìG3kšÓZ9rãÕ¬¥ ×Ncê Xu÷7ÆnáXx¶N¤é”=N2Â]â,¸˜HD{r j$|­>[½(,d¶nÁh˜ï¦5,Úĉ)ú1¹õ—¸x¬EB;âáR°¼`¢Š 3+9.äåCvøJ·œò*QBˆVz2WÜÑzÉ*þs—t(4ò˜LF’Û;ÈÒ€mXT{[ƒÝ-xÔ|¹óóöTkeç!e¬Y´ƒâõW5²AÖĺ”Œ“a½"wú¶±WâS’LBÀPQCyþ£îOíò¨Rv®‰‘ã“í¢U-¿¤zùk¢b~l‚¤´š*R:ÀK…› ß«‡ã›¾k’E±åŽ1––ïa>4Šòà‚öº ¦Q€WÓ˜9NJz…hS[¦ çž `9ãÐ?yôHeˆN|+i´ÄIm.ÇG/ëWTàaFÞº¡b ¼H1)ImI±”öø¶rã®E»D‡·³ùݥج2å!še.Ï|”Yšb¤ŒŠ…é„mÇ,ßÈ!«’ÈÕ%GZ :ê\·iZïñùZâÀLŸv3­òSÉÍaà„Yû€”^Y» ¦PÌî¦Ô0roÔ‹M(®"›Qbl™Y™#ú§g Ì=‰X‘ÇdMü¼y¸ƒLPÍ{k‚vX­°¸°Ðb8ù:2*3Ö^7›×xò|sg÷õávîøÁyÜ…yÇdœüHÓG7¶?ŠY%Äz9Oü¤éÇqŠÝ7J¼*àSòCʹñ¥ðøšŠ-wb§(=bv$``Ú=M˜P¨:…ý°(Ò‚SêBb”ºãù' ½ _ù£=†J68)Ô§Êj5 Ÿ,úÍ%&ËQœ»B!•µªŠÛéà|‘•ãØñȽ½¨»P$è§Êêòe×ï5¸„Hîl`!b$9”shsMYªiôBW`ŽÖÌ%I»É^Ї[œÀΊ ÉsÅåÍè|•Â¼Qí8R1‹ Š¡}_˜Å"áBËA¡˜.d5·¶÷žåiü+ؾ¬5ç˜4dßãrÏ¢©Òö&Ö£47&ë#ryZoð jX©­¶?‰õ—âÓ-ÖáÄ*›™D ÄO–ÔH·ë"‘í߉l¥”Tëe2ã¨9·¸]ls ©u©Û²²aXô†¼•R4Rcø”L3»œ#/J…P»míÒÀ¾tVvà*¥­jOðzÈS%w­Å†óʈ0õñL@å_Ñz„E§¼/Ôúa;¤(p¥*é– ƒa$\Õˆ­ihÌ@RGÇ—öD –F~LR& ¬³@‹6¥…?y=”e¤UÚs`üZ+X·©Å0TÖÐæ½L„Y“"Ø ±´„o1ü7ŽY±rRgß*”ÖÌiR4ú1Ñèu$ã!ŸÖ{«÷O¢÷OlëøØ)C¸×u®}x½¹»³yd£:ÇÏ%‘z\Ý €t²*?@:íçdR·?0åä·ôr©ç¾Õ­/~êgB”%ÑÇà@N=㨲©Š¨â£4ª£ªÕ´öhšÛÓ"e£ß½LTÅö»ÔÞæÛÎîö~a1ÛÚN™ußÜÜ?Øßinîv^Éø\‹ìÕƒk{à\{ƒÉ@ô]ÿxT q(’ÈrHC¬'\æÉÍF؆#KßÂà’œk¼çv B\¦˜PÞÆŠô%`ï™ÍgÍ­(&ÝzõÅö‚°÷ß‹áP^èIOIQk¬3c0Œ ŒÎ£“!zÕŒÇ70a ±7qÙ[GFÃô|HÊ¢*HØ^÷¯4®KH±k+++âì6’#OHî;èËʪ¥¼ëM¥q9h bcUBlã);=€~ÉØŒ‘—,»ky¡ŠZË•2Ýí#`–dÆ mÓˤ*uœ7V×Ö¾ùæ)·ºö¯žQà[4¬UÂø¼ð'zL_û=¨UF/'£ž9²2¢<ËzÚ§I!»ÊÈÈeàYµh2ŸŽ ‹†ï‘s\}Íut¡¨Ÿ ÷½;šÒñúêS£wÝ› ”ýÀÔ\á—®{ÑíšËèç{½Œ|IÔ_\E(xG' rŒ?í¢Ï?:iw®ê1êc,~‚+Äañh]‹‹…>">tÙùªÛoàÒQ'© l £…K8¹6œ°ŠÇNˆ¶Ñ5™qÒð0ƒFÊ»g®ß¿»~‘hÓ„ÝÜ÷äO®C£å:Áïh}3·•Ž'ÀWuVTd¹0¼­f1!C‡CØœp¼)Êò½”ɚǑ¡¿ÍU9•Çxòð›G\JöÖ¥ž§y1Ø)Dý7dϺƒpjÚã,­.U3Oÿ,ã}©œ²¬Ý2;¶²öheÅÈtBôAëß?¡oðèQcmr¥Vß;&§dƒžQÀ°‹ewÜ]Æ.wϽeT¹ ‡8;*¥,¨˜‡Ñ=_å>råp¹±Ôj-ˆ““åårN’ôpíë'ß$kê V. sˆL ;‹.êbZÏRË)j'ví4á™Fsñl¹†'¼#!4ÆvQì!a0œ`<†ítæ] /µ¿£I˜zJ°Š¬XýI¢ .|Öþ$ •ƒ×â­fU¬‰‡â0¤OÄ×⛧lY­¼k•¢ïÆW™²§!ȯx£ô>ë¥*è7ý$C¼ðòÓ'Ýìs붠 %Tdl´#-÷û‘q£d_™]¥áÒEÅ®¤¢ñ¤3À¥Ó?Wœ¢ÓE®5–œØt]cV”áT€Æ¨»ºDEÏnïÛSׯ„f©CS´6-‡ÊÿÈ7;=ÓSñ)n«]奪W¿æEîñ¢¶¼&öž3îúȹëy‰ŒñÔâôızz—)FÎ,èÊÉ"´ì'9‡‚‰ÎŽFŽ-cGQ¬‹bc‰ÃT©–íÔÍØdÇ»ð1žƒ°Ìœ;軬¯œÍ )fÞ¡éÆõ•ïam €ý„Ó–Šá ¢/Ÿj3¢›´Œ33P`TQ,ËVug¬Ã‘ÐnT8_ÕDrrÄñ4îD“ÖN31zsÐR3®°á‹œžºjàR‰}X$X3›^BÌü &ç1Ì x󦋓%øAšÄ$c³%y„&©1IÈD\fv‚¼”Z ÅÇËíÍ­íÃÎÖîóæþìØ•fjËÈ“_@÷zýó®ß¸ähíü$ÚÙoî¾ÞÚÖZ;„ºÕTóðxrðj{¿s´½û\T¤>eçyýøðõvMØ¿ëoꯚ‡Û©ê6uTéŸoîY4ŽŽê¬!ÚÙq/± ŸvoÒT1ÖØZpnÊË#džRgÉdwX'¥Ë£µ-¯°?ññ>ão¬<åß~Й8r7VÕ´–ÏÖ8›Ò*›%Q2¤â…qk³¦µH—x©R6=9 ‹Äˆ„Ë"Ì1ôí%šùSw;/£tßÉô}aŽYï¼`¼ Ç=/ÀW˜Ê‡Ç»[»Ï6wqÚ™ý¸µËO¬$4B‹ÈÞaî­]#ozn+‰Êžt…’P“UË——ðb9pðèO—3ãîæÿüÒ98ìì¼Qns–´‘ àXo!<Š‹,0 !i)iSC,-ãØ #š¨$ê8 ¾IöÆH/ÇN¥‹z¯G/*bJ!Vº¨«-²uÓKŠ§4Ë2e••]Z<¥]Zv¾# Ovâ‡þš\ ¸_ëçï½ÉöÆ¥×ë¹d.ƒfsV¬0’8D")&ÝaÌu6¼ ‡Ïþ*°'c·²w&œþ¼„º–t:/ö_7;¼ºT*ýscC<$©z´·³ÝíˆïñE•tâïñ‡8òÑt©R…r1pEÀ¼ºN¥Ý“ÇR¥(¯ãÅjµúT„•Y×y´|§»£à§H°DvM¢×GÁ¨¬Ô̽÷1>IÕ§,âLÐмÅ$i,:,•¯Š"ƒ÷J¯Áèe­HÍ„Ö+§»@MUŸšacÔú \J]bEp‰¨ÈxiE~j°c™.!ÄÑç*8š ê «×’q—žâÄÈ¥‰ŸRº‹ðàsSž>Ž’NÈWÚF?Iuºuç0®»•Æ²Jü”"É=Õ4[#3»ºÇ[öN,‰¹.éç‘å:6/UQ2$+׉q†÷k‰÷r™|¼^‚×c>64ëJáeú^;ÀÙ³ö¿ôqàÿäP„6Æ(Ý*rkæã4NÄÖ±ÆrÌÏZüË€¢á ñãÖãˆ%°žwpÑM}Ùa[v&âT€9—…“͈ù]“Ð=ÝÐÜÕ: « éÐ[SGÞ«R L<¥Ÿ¤­ua­ÛðêáZ\ûfU¸ î2Úð´ -µ^J1ü1»Ë”œÂ"AŠ^O”¤Ý^Çì»/œ _ÿ`Çê…+rì¤Ü¦ê0ŸŠÄg5,¥Qõ>æl¥tå¦ß»ÝØK¿#î); K96a>G7Ø%To¡æ[Ǽf8æãWÏaŒùjô¼Á8fѯ¹u‡´|&–º°$<*Y„„F¥îo„ÛÌZ²³2‚ w2ç6u³Ò /û*á‚v2“Uï´é™==œO»ˆ¬B2¦•rµbŠVˆÑ Ùàû\`²ùv‘á{î¥QhzƒR‹åܺ©ãtØɲ“¥óë̬ªâÕ7þÄ¿Ú».Zîòt1\¯-Ÿ²8UŽÓeZRúœ·ßñÞBÇÛ«XŽû§Ðwn Y@5_½R^ðò[ ©n£h—ý¾s‰Ñ¡Gº´u.I(®3unQß2o{ÅBazÓ«>]BÉóYÛè^õ4Uå@;km?(ûU 1ð¦mÕµó +‚¿ Zƒ?í1¦)”¤˜OT™a:`Eyj4ÉŸ×VbçK¢‘vþWx•¤ÒÆZÆã¬,~–ƒH]ÕŠ•šãed²µóÏJ"5óm#ŠlÆàrB²ë Yfoîá–uÝjÔ¿’>øæÛàTd¿5¦DSÞ©"ÚE%kGD¦¹¢^Ò%½Ø“ô%I¨EL Cý šÆÝ¥dQ€½Ù¼`®ªå`Ìj³ì²Ûc?fYžµ*Gäôm¥dà ‘#šZ‡adùc9·mH§Ÿ¦—œ«æ*_ö1½ãefm™;.Q¿vǯ*³ÞÖ5E¤]^îCà«Åvk€fç wÌm€O ¦$–S˜!õ.1Œõ€ÌßBÍÝß &!™£ µ¥˜Vü $7Ù Øü‘4l3ßt•!Ëè¹P7›Øî8V½Ù§ÙBnkÿc¥kJ÷@è ÝnÙ÷PFŸF ËÁ¯`Ǹ3pNôI‰)‚Î\‰%s3ñŽ ïz^ô–j=ë''X{K¿ÃtÇC (v9B‰F¥øƒátÃ|“¾æbšêOø'ùf-~ ñg8 ÞÖ'06 Ó“ƒ{’æ O¢ã5'Sf¹Í䥢©~3 1yp%h‘:ý¶×!ÿ‹Ëômå%ØEðŽ}ð<‚; —QžÃ¹Çî€&€…[h†Ž³­C‡Ô{VF M° [§£¤èú¹j.>³“È¡ÑH9JR]+- s4#Ü Ä@+ ‘…ÖÓèäLe" NCò?˜Ø äuðˆ'$§£[„™‹s>2ŽN/`Ž¥OQèP̈@ ¤Šä‰ÀíHJ¨,n%jUÓbB¶ÏÅ·$¹< áTÀÖ’À&aŒ3M‹ÉZrî+ú5ÉÎ#T­è¾Œ ­D‘ÐÕæjä]ö8àÑá<Èf¿÷zÌ'ª‘uKäÕ ?6«Ñ,ÐõÑè&ïáø†ìû€‰Ò_Ϭ ^Ð?k¼P ­…„4¥¨?Fb/ã¶uÇãDï-°B9‹Ñ[Sx!Ëx³yw…r©Ù,GLŒÚcebVËÄŽ”hYÿo™´÷g0)>ZuÉ;º£†çËפüÍx­O 7E¯5~Ñ:G\¹Ì„¶™U3ʯ¡bJÝóÑFŠ¶>I3žýgkçp¶M™ZÙôÄaÑ8hDÎÔïB‹³$63Ùlf¡“ϵ1X_ê92 Þ WQø¥½£úÖÁQ4c”†Š ŘO%ž3â6ÉÆÔ*”d{¬“KmŒ®LY2óÅ1sôP¬˜!¼ ™Žâ‰JÏèh£ÖIN9¤- Ø”*M¹&spÅŸ©D›|rjÔ­ pe×ûÿïõ…6Š’Ô´ O†l-Òåi‹MT¤µÉY=jœ„‰Vñ 0 f(4Ž Š©æê3WẊþåæáVó`kïãThÞSÇ:y¤ëÙØ*ƒ0~Ψ85üŽŒ¦]:Ì@¡¨BëÀAat²ã‘ rtZˆ%Û¶1-5jç¼Q,;ùˆx˜XÖÑħøƒï1”^<±hžÖ°É8°È³ÉUî-xnè^û_6NA¬WªÁ5è鿲ªâ,ú8,vÔÈ’#¯>€›„ã{á ‚{1&%J—*Ò"õôÊU¥([©‘‹d¼ÆW^Hæç_…T/¼Õ}_«7ª ¢¢'²KÆ|ÚpÝÑ×ÇAýÌ­Geh ãÅÅÙãëƒ533£ëeØÙµfK¹•r3e(%•C¹h„>õnnăd¦.ZWSc¤ˆW´6‹¦KëE㋈Ö¶šæ«Ý Ü°ñ®ujª(YU…÷Åh»}^ú2¨“©F0×e/æY­c]‰éðdˆ³3²›<ªÙ›3Ê5kC{>¬woÜ¡8Õ±Õ±(ž;òKËÕQXKC7_)>‡´™¹‘ÈPU-`´8ìH¤š)DJÈ¢:æörµËw»nò¶LmpD蔦x% r.6~–yöË)G· l•ü™Hºã‘°s,ãä°P0 l^äऌԙ¢Øí‡Ûˆ²M`•ÐÒ _Œ~%N,¥‹Ð-£0Yˆ¸--â†ö†&Eðcräø(JØQDy*´˜&0ˆ`1ÍöQVƒ‹ªø:=ª÷ܳÉEÑ*ÀÊœ™qâó±˜dùo(XŸ´Ð|¾óvo[Ôq­¡ ”.#×é³)HMh3¡mFð ‘A/òJ™ј2– %Ù‡k¥ÑL›#Cá™ìXÌp0–Fô§x¸e%ÍPp)GÕ@}i8¤ô2Zc °F;³°¨÷Šì~ëàþvšr³;8›„÷¯a¦Ÿ3¶âŒD¿×€ÛpˆðT7L n×™{dÚ~½‹ò„ÊAfùõÞ«<ðJñ·ÌmsÈççۛǯa¾õuÀ&ÒþAÙîðhXö„sX˜'1e«D›…ਯޡ»ëFyùW½fÖ—kË»‡Ëee:9-eÙ_M­.A¡®\Æ÷·røq£]iµ6ëÿãÔ?9YoW?¶W?^ÄȳüqY'’  dˆ$ÚáæÈÌÑ!epHz‰¨]"ù½ìš‡îŠbhõr¹ˆK±FœšZñxµÜû¥öSÓØ@:Öô}²ø´Èn Y›­ÇÇäŒ%N2¼/ T1Þ榕ÿ~Ûï¡8‰Ê×ÙDÅk¸ Q\/VaŠhЮM†öC€³c”ŒNŸ ¢+±ÕXB"Á,Ì–«f½sn”Qó«`ÔW±!1¼ƒA—×´Pi¢$2Þz´y^ÊüIñ~ÊËH².?]ËåÓ4?âÛ• ‹ Dqâ¶_mnb ÅÓæð¢8€‹ŽÏ‡|ÿ‘]:>3Ê)dsXSŒ0\à†tD^}dݹH¬:‚.ö ,A6–ÇJ>¬Ñ¢‘ñ`ØIë¿¥ü° ñ²·±L{ ²çR±P´©Ü”©„†„!æ5¾( ~\Ð$ö]áå<`œ¸óÀô÷ÈÇ–ãÖ²ûÙ½Ò C±·É–ä¶~„Bµ”=ëÐê©k?è˜$„ÉB{‘¦ÔìüÓôíYä Z\~*ŠHœŠËè›z¸”(-ëù2¼ÐËÍûÄjA‰Ç`íH7µ…Ú‰Ú¹ñz•ãMHø¦g-*%㥘ZCÎÄO·ÝŠÔ†Kßû…ûhb1â­¤wñ¬ížQjQžå³í;ûâÃá§@¼Äsú¶ü±íŸ~"_ÈЪøTÊ)Ñç¬<•3ŒJì?'‡=O|/ؙϫ׫ÒaÕ­%z‰RæöõÏF±jùµð› |c¾Šjð@9B|âëö3ŠJ%j$´ÒÌov:®‡E~,‰"£zëu#YÁüÄ¿Ÿ ºz¬ƒ:Š^CøؤV‹_œœ@ó­ÄÖKlô*fã0å²uþS™©Ò曟´‰¡s Žøh(=ÜpDÑ‹CQ†Ìæúr/—é8¢ìÒ zˆÌKؘ—™ïpQ¨òÜú¸œÊûœZ4—;ÐÏ[dð|wíèÕ©’ÕdU\F MXCÑ4äZ–àøÀÊ»y‡÷ò¸gø“•1‚þ,2B=.„—#÷z̈üp($`ÿ i à@ðÂKûR`y†èÎü™„h¯Œ”è~g|3Ä@/@,”¹1³Û@tÔlÓ=¥XPCÕëϬ¢ Íia©{׺R-AA[˜û^¯Hº‰`jC¹eûp}¢Ý)©°(6‹é7Êp&ŽUzÄ\TrPFêžµ 0Y4kÐK;p¼ë‡tŽYƒE!áÈ_Š z(›?YæÇ~yýŠÏ¼ 'ô¤ÉS.É%S¹ˆÉå–Xòƒ†W%¬xrC(Tª†ƒánì ×’Úû;oÅCòµ6V6œ LX¤FAd:$ +Œìa»Ã=–ÊÜöæªÚP*¥,#ÚÁ¸µZêßžœÜïèÅ—iT­¹¤')«ŒÈê¤Æà¬_Źî'¶ÄGðqdö‡!²™—™sòxdç›^ã-‡5ŠÍôŠõ7éÐŒÛrod0‘œ qX×ß>n\×`¤û}é5‰e…B"¸åPT. ¿ mßu u™ #&#ƒ,ŒphƒX† yñ_¢Q¦ŒÀ£Êª\¥¸p}—ïJ¾9,ÕX[åF¹¦Ô¤Zçéºh'd,Ou*aïÝ~0$ÑÐw†p9c83Šºñ°±Ò(Ø猳MXÅ ‚F«µ² ç®õ«±dD–ú ƒì¡‡²á]¼f»ù½†|MÒ3ùÛ¯«e2¿çbH~a>`oã2‚ÙÀ1†Wx*ñ'¦6`ŸT<«uÓ‘wîXFtå5¦œ·ŒˆQñHȼîñFä„~:]éN`Sûc´nKj@䎗3ea‰v$ÎnˆW —HÞ ñö—¬-Z.juSý±ÄŒLsFV(ç¼O0Rf#ÕcæƒfàQ‰puR¿f³ð¤ä0èºG°vJ‡ã„ãw1¼Š¡©×¨J‘°d¿Ãî~‡½*ÈcÄN\—Ñ{‡ àºÁ°¯üؤ5t4©.h*Ú¹S½–Æ@êŒnC·R¨Òlê§["×™ÎC™ 袃P¬c— y‰æÄ[®ÅÐ-Í’ á$pXµ:TAµ²}I|Jæh—}ÆõûüÓ»)ýˆŽB€LpRƒÁqÄ4HÁU³#ðü϶ÆÚÊÊ× Èô¬Ÿs¯ëIÔXyf¡`9¶°A#®°•²Þy5ÚiuX­u`X×wC ¼µ¡³“í÷FáO[VD¡O¾yWÙ††w­—øÄ.Š&Ÿ‚¥òͧŽN h«¤|èˆÈÔÊQ4Ùî2É.€ñ…d§ýjAáÇ’Q³)0B†õmœžOün‰;ZÇà•uJJ~×.—ï~m,Ñmè×e`¤ÚÕvTlé«öêW˜ÊD«8ÝÈåôAªEŠÝ^”–.Ø»û#jxÆPõ›;žyd7½ú”Äå„З¿vzŸºŽìùŸuEIÙu&¯DÕ†=˜ÓÇŸ…7µØÐ?aÌO®Ì;e‡i£Ø&1ï:aƒad%6¨\Ý)·O:åRMYc×ê·««Ñ¯¼3~vóŽŠO½ˆ¦U`åfUé há4AÓé‡A$ÝO4ÎÊ­š|ø„WÔoöÁg?þÀHUe¼r<Ó'![ûÕŽÍÔ¤Ö¿®¦B׶ܒë6D= ç`­fHÞ ®Bš/CÜÐ#¿¡ärM¹\éƒ øæZ©ÛíœÁ/ɶ±cMës  ³)2Ô‘à­Ý]é:]ªð*«.7m‰j‚¸p„ñ_‘ ±mõT7³]§(ÄÅ>‰@NK¤~d ‚z—¨mC”tã×vI…?½§Ì‚·K½>‰rìF%’‰eÏE4¯Ñò)ü‘s]:¡ýâ œ‰d«ÒúP=SIKª_¸¸Y²j•RýV9Ø›Áyp•ÀQcóÙˆ»9´˜ï0&üˆ*!¯+Q¼B*Q‘ÿv釧ú†QÖÓk•¡€~?kRp¦OM)µ¥ßÿCM“QMDü2Œ¡ˆ û:hApÜ•(CŠ²à½#àj«#w•)(i ;)ƒåÞÀÁä€EÚÖe(p¹|*SIn(e!Y«Õ89Y®£ž/:=¬#ÁÐ#~aKµ#“@—²^i’º TÇzEü /©±ÈàÙó_¼‰jîéòñ·`è§ðHð+Á%)i“m‘CW#T•Žfr.wá‹"¥f4sqv†ÍÞ_#vÀ”~B¼yEƒ Éb®|¦ü—wCB¸cH΢T£Kg½¯L™B'ãB .$¿.7—¤YiÃ9—x,^Š-éÊZ_öpmý’" 3¤/åSÚ‹\Ø'0è¢qîþ´zPl·gúãç¦ÞánÓ’0º¾M‘¤•íô²ðPŠþÞÅäúOQñÿ-d«³Ä¤8‚F@·(Ð[µÀñ®ð÷sŒœ!+aD`‚qÛP›³ÌVÔ7‚À|Hßí  (å7´¦Úµ<¿9TÓARÅbÃp2ÁÙ™-1xýLÆ_³Òšv©âÙÍVkí!)Îò°;†i{ôBòE¶¢^|©Érë%MË,Ít±fÔ¡hÍ~–¥”­ÀJ[Í‘~láÌ‹jú}¶;ímj+£èÄ–ÞŒõ²d/Ö”íDžó›ª”JÛ #"Ì¥~š¿ÐL¡d}kdÈ”¨P?nGÉÉ4¤þ˜,E¢Ô)O5V«±Dðdvû岘Õ|ØH‹Px0Oújâù¯)ʽ “¡Ï»t¼w“?å0Èä@¤!¡»d¯ýw<7âÜÄŒÅ1õL? ‚ñòe0p—Y«Ç§:=å{•ñ »uÜg®šûáäú[Ü øeuE[•GÙ Š¥l~¬ˆʼÀ6CTò‘êçú¸&(æ3Yý,Ú8àä¤2Ò™f­¿pâaþµ”fˆæ‚š´¼pkåY»$›;Ö*ëÙ„tæ^¥°Ñèw,ø뿇b•&Ý;÷ÜÞŸh°q Å”À…í²^¾zý¶ƒV˜½ƒ­í˜÷j¶ªYé+p%BI6?›þ´7]ÊYü“GiÅ?yT´ ‚²7f&×QÚËáÐYÊZ‡ý;®Ã~Žuk Ô¤!ºvù=¸Â½„TÿWWjŽõ1tÖV:jt»¡ù°x cꊸŴÏ1Ÿ~Óù€œÐtPz4çäà˜±‚þ6sjËU^¾ª¿~‹œD(–Øÿ~I„ýà ®e^È ãE´I 5ÇãÇk‚ÅôI‘!+í! µ¾L•AW0ò á%Ž†¬ZÕÀ g ÕxbqqêuëÜ€å¡,ÃB·Zÿ4Kü¿»—´í𸉇ki´**¯¶k¬ÙÞ}^Íe5‹O›ÊPyÐ vŒ_(Ö±ÌÍ8JyKê%ÛH"âî=üÂPŒ,¤ãåL ,ƒN_¢,,ÜÓ²Y`;t»8ì`aáܳ¶]Îå5ÿ\‘™_2zæí §¦cS6xeÑ×Ä!Àåín¡BX[˜5§ |1Æ;ƒºAÊðÊw/‰¯»[¼2ê×>.á¯(~\ªð²»v¼!>5~Š¢!ˆˆ7 Ÿ œ ¯»ñp­~æÕ²«û\ºoÅÉÖƒdð,ªdŸ¤ø²ø¡+yò‹‚#WUñäÑ™Ñþ•,2D…Ã]ö“GfªÓ;ì»°fê6n¬‘GvRú  ý4÷•/› )É2…ýÃâYÕã™&–ÓÊ,΢lˆÆm™Ú¡-v‰†s¦FbNËêççÑ—%z‡»ƒbšè&LSIÐaÝ2“ß^/y ¢$*ø=I]uGµP¦{X|ž£pž£,nÇ{ÇÓIÂIl”,{$~&ÒU ƒww/)Ø£ït»îýw SM0F{N”çÌ•º„ŸÇ€—ÄëD8¤Õ9Ca{Úu‡™Iºd¬«”#\M!ÿfÞŠÃn¹ƒ3´#!ì _M„ä^!Ý×n&>ý™: …-q£\ß5Œ¦yñs¼”ÀCß.àmw8 µ¼a)¿[Bu@ŽTüñ, ‹-TÏàï?¼ÜÝÍÙëþ\íÓIp´ê¡’É9x¸#;×OØ£NÅÖqçðõ¾,TƒÓbN®6xú·—bÏI§‹ ¯l©ü »p[…ð<Ëk[,C\Ä Ùä4u)ÎÞ¨'1²$„JÖò€å3ù Ä"lÁ±ì}òÀ—êU[¯¬OQª>¸Ö:UšT¤ý²Ï„?‡Èâ‡ûá-fs\½‡·¢˜b/Ó씎ž”#‰ó&|°XôÙøËÁãý¶€¡Ô{ïú=¨ZêgCßÓi³¥wSL‚¨:XÿáëýÈÌB ‡„ëˆÜ³ì‹LP¿™éÓÍ—su(ó(§€mÊs¢œbx¬×áÒÞ«%3lZ½Çy} ÖküÞ–gn~£1F4nwL!PNá‘j9ìkúûã÷da€î—WP~?ŽúõþÎÛ%µÓ—&WkɽnØÓÿÉçÜßâ„ËI“§l“_„?yõf0WBm!}Ó˜Qx¼€ò4„D½Žªwr4gËË…_ÙþIÑ)?žKkããWÏŒ‡„€õ±3ºpÇ$nlñ Ö&L›Û“o±S0Z Öø?Âù}Vó¥É8ßú?ÏThÊõƒ–~ò†c¥òvÓ¥Pš=áÈ`…èT“¥£uVt³-‚œÆ´Á‹„u(qvP©ÄÞ°:¥PIDd‰ViŽö‘XŒ|ULd"]Юi4<%é}<³±T^Ñ:²ã³I_#F1PS”Œ7eî2YV¼¤¼%¤C¾c¥”zTŒº¢”µn:Õl¨[“#hJêt¬­ç _Á¶TyøÈ%RDŒˆ[+æ#ä ;Ð ô¢tpf?'§vž £¨:ïÖä¯pLÒýeÄ«î;±lhà¥qW¤ž )¤²±Þ§Ð®É1â=— >&\TB3Z®ìf ù= rï"&2{ãé¶cúdE©&ÝV•¯ÜÑÀ iÅ“‰¹¶ ?§{¦±W©&ê‹ PðÙšªJÆQ#”D>GÜÝx:N¡œ³Ô*l€ˆÙ•èôù«1-iå‡Z‘Í ©‘©žZ¸v¸Gã.+¨„¬ÚÐ\Æ^›¡(M)Ö„{vØ /¨&'â «Á¹ mŽS€%áöœŒ¥%7E”ºò“K$ÉwYÛþ °!@L‹<%0^Æy\T¯×‰ð±a…IClšœYEòг*9œø¹+Páû’Qót?B«9>8Ø•|G¿Oà‡1%<Š•@€]*° ‡Âv|ØÐÝàÂ÷~Ù@ÜÈׯ÷9ò]¼æYQ5ScâaK©Ð2“¶û8~{›/ Óͽ-(¯mú ^ÜZ­v{y =‘Åëøýd‰lÒJØ0²2ÂÁU…°¼4Ù‰L8 1–Ð`nvI–K¶Ni…’ØlOZ̆*ÀH´áêMƒœtÄ ‡}oLñzDµÆÝë©uu4çè{.Gƒóó¿:8ÚyÛÀ £ž‘†ÙÄ£1JÀ!Û‚Éx8¡ƒˆk$·°F%áæD#ïz­Âtûz¨] ü ?Gpõxöváj3¾—ÛZ©Žl²¬uQÔkXùð³Z”q“0-F<ó£þëHX© lQ RÎJWþºa£Þ×Ïu¢åÒj"\VÊj‰‹:‰+Z$dŸÁwð!ai^Š=ACÃNã¡w@ª Û°PŒ2Sè°!ŒâFî…{½q 1Â;OJ!E±.Ì2Ú•ÆR»Z<Å‚Œ¤õ “ Á š>š}@Œ½vj§ÄškA|¤( ¢´ÍhKñvÓ"3`Žuü`—–±ŒÅwß!Ø>x.V¿ÿ÷\—–Äg„œéºa§ãR^Ò+ZôÜ1Þ¨ã~Jˆõª†¬7Á=$W:Q2U¤ Û ‰ZƒÊ8f6 !“‰—22 œòZã0穤šB¥ ¢×¤{©CwW 0H]&-šDžøöñÌ1œ1•EIô—Ð÷r2sx=&MX¯*”J1 Íú¢ñ4ÿNKR;/‡!‰9(#4y7=4_×0Xƒ½¿rø ¹ÊR\eçëU^0yÎÐO˜ÃeŠBBeœM.ê²i?^ø“F0ºàK¬Þ HO´#‰¬vCö.õ-…4Ø»À¦É‘ô΂YÛÅÚóúqD?lùE”¢ªBnÙ ü šŒë«3)ÞfA´^Kνv`Ƙ?dŒíÜ3÷uˆ4õDŠ| *!~#{pÐg>~½°ùº³¹»³yDvÇÉs[¤ŸçU:œ. hë«G„y+Š-amŸypðܬSˆ;Ȩ#²›\ J‚SÉÏÄcŠÇB Gu g’Ê+•>À€ËT^ò?a•5;·é§Éû÷ÈËÐZRÑÚ±Ö–]•y@¥¶-OS 9x´Ì×YÚ ÿ·6N€z²»e ¾x…]HW@i¸Œæª3ðëø•¯š?™ÎmÜ;ͦæg…zÎLòìõÎîÖm‚4Ï M-D˜ÈγÍæOG»›G/9!¶eóðEçÍÎñËJ hY½ßSŒüæQçåöî+Š«¬l½Ž»³®-´ ³Ø¦¶Ýå3ŽF±'~ünýG Ý¿á?®ÿ£vh™rQ,ô"¢©Z²Ò—ÉÍÇkœšk7ÐF¿7]è¹(šÈ}à‚½èvUlVÌZ§èÐÔ ¸¦†GœÊÊC:º˜žÝ  Ù‰íÚ+ƒ&×—ê&à1A틾ëpñã‘Ãá\ºpäp¸À†OF¾2öŸ Cw2d2åW]<­‘ Í–£Ä¿³Ey½'Êí•ÕÇ*£lCÎ2NSÂaˬQ°®Í._Ï ?»Šgçû4^Pd .+ò‡Ò5\äF]XåeŽ‘"#¥,·íÆr9Âõu`¢Û<Ò@k³"›ÑSѾT—ü©|PÔ!•¿BÜᯖ¿ŠUa„âÆ3hÀbI·Ñb “Øø…X­ª rù«¨¨YãªPÌiÝÝ"f—9u,ÆT‹jùìœc EÂ`Æ@aÇ.Y§£ Þ8Â,ù†5ßr´Ì¥ Ê# ˆ>!‹ËRåE]•È”}’8Gp·æ.Tmu`wªÚ4u{1Õ8‰³v"M¤1!œY7ë]¼R[‡Ù®qtå»É&nuøþ³Üè¢Õø1ûmä•yÿÛ.~±e¥h ¹¶¹: »ä?Åë¬K{ÍÍv†CGF£XÚ$÷eà>&ÿtKgÏ%QßÐÙŸ!Ìo=Zèx¡¼+¢ùe¦èŠåÓîHå'Âtjñ&¸—êï»ö»Ó:R}/A‰dÜ]&óÙó­2^[Õô¯ø:ÅIc^]é¹…A/ì\9ô `*³/{lwçâPˆÛ]û°ãÿw³ÿÝ‚pÉTÛ‡‡‡• b䢆swL|"l@'ʼn’‹ÂxŠ¸q^?;:öj ygét]+v·´ââ8R(É0)MâDƒù3®¡uGØc†ˆ‹7X»jì"‘‘趷«ZYŽ}©°^[w 9d‹õøm"åNÀi%£Ê¤‘(h¥å›ššóhãCµ L(c1“xâÖRi—&o]\Û»5}ŸŠdË"ë…Œ÷¦’FÓ<¸’Ø)öUB¶š¸tÀ^Ø=ØÜʼÌÁQ8= e,…ÜtX„­_¯‹W‡Ç{Ûì²ÉoB’CH•h¤s2ŠiÄf6jDÚÄ’˜F5ŽeT`YTpö_”Öàe‹9iîz¿×áä΋Ï[i/6ÊõQÏ|TJK(c1Op2‹È[Q@Èó$ÌrŠVò¢¶§ÙúdZD‰…`ê1Æ<,R žrà²m¼þ•¸70ã5èÜQ÷Q)Ñ!R/‘¶«©QJ§–<Žÿ²çu݇>ôÈÉóª_ev8†{w«A³»AƒŸ ÁF9š#¬¬0˜˜SÕ·]вʋô~–”ÇØizóá—²‡½íã—[™ºxq)›FŒN¤mº‰¢$£hsÑÜ•ç(Mô|í¾jøurÖî¥3rºˆ1Ž½nß—‰öÍÒ¥ßÞ¥¼©)’{[ö)’ ©¾ŒÃ¯Vàm™&l‡öðK[æ E UÊ…D ->ߘRôFY^ÊãFÀ ÌZº]—Ô*:ÊN€^¸}1„‹Â?KÉ´tç-`Œ]ç´9kÀË2¾”qêÌ7¬|UnÉ”Nµ “†xq¤ Ⱦ<«zA—ÃÊkö’qâ?ƒ«f¥R†Nb¬O*[mÕŠo•¬Ú—+Ž[I'¥!”—WãÙ Ð|öRvC-ô¦†"¤Õ"%Äɉ#Í`VòèÇí%퀴‚¸°È½‘@­Ú#?®!‘# ;|ê‹ÖT'6î†7Á„qË©Ye‹ábE…·V™–|uð»,£ú†“‘ ¥\I¥¶1„$³_bì%Þ“H> ±Â2y”à°6IÑcAꧬIUk"piþ,vÐÑiëߘ»íÝç‘£¿EÑ},!<ÛÛ=99z&*RžËtò£Ah¢.}“jøv×wSSF›•ý®ÐжËÁ«`”lnKl¯0<ªó½ÛÞ†—.̾#(œçKs³ñÀñüFx™$~½þ扶 â(ôéÙÖînvOã S–ÂöùÍx†ËCV-s¸º^@ –Ó{uC’ëW©à$8ÆÙMú Øý'G2púà ³L›c½p¨{˜ÂÞd0,3Pt}ºr™äšk´[Qý MAÆÀfcfÜYBûWX'°,ª†£¾?™ˆ÷1óÌ‚æ4ÅO®;”š6g Äšlo¿ ¨Ÿ§ÐívAyZOã ƒ-U†®·T÷~ó¤ÒX¢¡òHͺÀ‡Õ>ݺ3Ô¯_@7ëOU§u3Â9/›No¸Èá/ÝK !Ž\W2™Â­z(ÛßXB3‡¾›è&¼¬þ½qb}™ü%? Ì t1Ø„HC›Hƒì†b—`iFÁÝöåi¢ÏÉP„.Bˆçäñ‚˜ x%ñ‘SŽa¢"1Ó®;.‡êúyÀòd‹¿@ãÏ>/c²q‰.O† K 6s+Ïa” ek>jÄþê²'\¡[’ g\ý¡ç1:q•›²UwlŽ­S +at °¿»vÙ•§Acé45.e ‘kyè½…È¿®q¾±ÏÕëhïyg-´OiùñmÝ~TÖ‰Í{¶.Û<ƒ¶±gnœÈ©á­üǦE°Ù-Q7žT+ÈvT¨ˆÖîðÕìnð)Sý¡UƒlKâÕfýpç¨)(o»Aå“ÜÝ“Ðزý„Â᎓"['¶ñ™±6Ožö&Úi8)¦@0/ŠW;M2FJ!!‹€ü¨Ã5b½ËhØp#>¶±";C¯‹?BÍ8~´£Tl"ëÆTÚ°d°Èj©<Ô0aÊl|Øj*Ì« òZMB´š­ÕT”Õ¥j6žªÝüâ>1ó×j 1Ýù€»ýLëåý ú¦Ö¯€<¤zÖr² ÔÄÜw¯‚ðÉýÞw"ïÿ|—8½Ï¹Ÿý~Ýu0>ùA:.Íqdîy=$çðÅ앧J&¤JþÖ¸ù³˜Hsäºêùª‹ƒ-dÀ Øþû_@ öb9ÅÏR#Ìà“.:ô|]c†ý] ½Xø,¼+o_£pÌé7–¬©/ÇJ™"õµÕÞ‘¢Uš¡ }På-Ŭ–4βZæÍc°½iVË)‰îhµÌ%fZ-ë×–ÙÞÑËÍÃí- +úüð` àÇTð†¸)zJÈTox ÛsŽ¤( A×sÆ®6s’aj9FƒJÙø ö齫%`êë­Ý]<œ² õ0hŒ#ö@×#`Ú ò "¬âÝ.þ@·óBkVÃú/i¯•ËþvQŒ¯Ãڶ SÍžR¾ÌlÏ•ì/±B|E×ö]gèÐ’¦Ø&°ÅåÀ¢ãšÀZ€Z‡t2Ÿ*­YÝC9‚w~SÇ#¯;¶”™SF„Œ^ ëØçN¯ß'´/Šïs–¡½]a¸ôq §‰ß”¡—L²®â—ȲÅΑеr´ƒœÝl9Ý´Ô³Ê3x†ìDÄKÌlSl++}–T'Ú, °(¹W⎠ªóýÞßy¾}tLŒä4‹e$Èc&nÐ&0R½B•€fW+Ö뚌‰?ÛzOãk=ÙŒ )#v66´ZqZÄÝã.Åw~ñ[É·2¨ï Å®¶\ÿ¡\Ì8¿S’NgAòs k°§º| Ÿƒ!Héµ/"É $ü²Š‰s{×Óà¬u#Yï=k“h öV«ˆ&žýW•ÖóÝí“L(¦ Pþq.0%¯œ7pÑ ®B4Bå,ð2IðL&ËB˘èÒ=Hסw®F™+Ú¤›‡Û»$ÅAð Ea§,E÷¿Û«].‡Ë¿¶0œ×ÉÒò2þÆ÷â(ÿ=·I0s…öxáø:3ãò¯íÊSÄ®Y°^*'_ÄÜ>ð. Ç7HR\Bh${T”éĪoW¶ß"GrÔþ(±4ÛÕv…%ˇ>,U*ûoQ…iÿÐ Ñ–à<3ýz‹hó^¤fQI¥ÕÓ¢0—€H%ÂEzg pákäf1@t¯$Œ–Ê–"šMF€´{Û¡ÝéÉ‚%GðyõCóø‹ÍÑäÅkàwÃ?­K(”2Û¯³É?™»£ ůågä›ååZ÷»£º©ÕÕ”Ú\\ÕDgpEB-“~MP_êýÁU2u &$”)Š%üü½ÕáRVmôYåC o£ÛÏV6HŠ.]]xžî‰bi80j¤ØýƒÎáññN¥u¼ù‚«³¯qv;VV‹ ¥ëtRx0-¦þîØóÙŽbÁ¦ãIðív;Èn2b%>ößk¿²¹k,‹ú[¡Q?÷ƒºLS¶˜ÆÛ”›,ŒÖŽ Ž«‡ôàÕñÎÁ>úº%Z¸H¥ŒÆc¿1N"2é’«2|*uƒ0y'J)Ù¯)%Áº‘‰æîçô §iY²»T<Ñ GÚ{-V‚äz¦Ö¢˜Î…¼8bQôÍ™Œ6ë\ÈôÑÇd7c‹ÝòH}±{ð ¨çÑ/{Ïv²Y̤©3'mžó†Þm¾ù)ùÒHd½û<8)4AéiÎ)f¹¾\Œœ3Æ}u® ]Yìp`PUiª7„ëIäG£È¡3Br±¿§Ü(W´ÇXÿ‰lEXÓ¨uú®³3ô¹Ð*¨ÃŒtÜŽžµ£<Û" =îÆÈÄ ä®8w¯0^»<þÈ_ ]ë‘EÀb³^÷í¹nñ†©ú4ä"ÂñeŠþõ/ñ´zÂã(%$¢Û‡ 4y³3äš ÏÜx5`hI õÂ/ü¶Qnµž5·`â`”±°CôEâ°‘ZD(¹·È‚Æ &ÜïòXjz“Ê…Cj£Œ¬Sg³þ?Nýw´¯‘_Ù̦]¥Š¶H¶ ‡¢®EE®»‘êƒFdØný1ÛNaÍ%ó02oBî;GÇot —ÊŒW?hÞ®•¸hõnGž°ŠÒÃYë¡‘pÒF8cô)Gž§¦ùf"ÓÏL¸uh¤1£M‰ŒñbŽjMÚe'Êc·—ÛxEñ*žï¿ÖIøH$È+%¦ÎþkØß"Ll/ u˜ÔZÔR®k¾þs$NÊ‚4H¬ƒC^Qc";§¤p™4û†|Ù0@xR}‰ÍÝsÆN´‡é Y!$ÉË8èp¢"n1¸,qä_wDcI"u––Û«p)r\èÞÑXi晋q§í?9~(½}Quy=ÊV@éÆnãõÜn¿sï6Š©õº$¢&ÄM[ "W%Q­h¯>•MÃò¼|ZB|hÛ«íbMTÞ^­ÙW>ÕE  ‰‹iD¬$x7«°d&#äÏh¡(å°ÍØ„ IëóÍdbp“£“ÞY²Û¼œC´  ¸Ó]ŠÍ3Œ·H¨vÐc4Q@ 4‚ðAñ˜!ð yìˆ \¤x4!u«²¼*_{®^±Z4Ü¿©•W&9n]¸¾;‚eæ ¡N§{Ù(LêºZÐ0ƒ%k8Ú½6ŽSE _­Ti]iKr «Ï¥”¼Ö’œc$MÎGEþvz½}S»ÊS(SÆû͸ёuÙjhÿÔ ‘·ïiE´ÿÝ^•‹ú–Ã@äå×2Æ»XŒ L#ÿȘ~RIm‚Ï2PSIF4Vsx’ŒØƒþF HHóp÷9 ÓˆG "|éÀI ¡ï#%á 4ÌøD€†2À+_·?¬ÔVÛŸdDûk ?¸¨ŒºdæECû¤=FHn˜S¡:jR'>7tƒ‘‚¥£Y÷€ÎI»1äðFç×Xh±(Š"„±hG/*9D5Áü`Mm!™“(•Áß;„Ǫ˜úÎ×ç£ûö*éïeæv{MÀE®ðÍÈ“²{, Ki ©8ò ¦Ê\g8–ýÜyçð_dð½pnÄ1Ñù7†ÜÈŠ•ïº,`K'’籶dÀbvôÛÄYÜPHýPš5< LÎ9Ü#º†¡41Þ{G?CU±4I;#‰Pö#ŠÕ~0ý¿Ó/5p‡‡k£hñ²Ç0$H't©còó©PÚ%ñðÓSzùW4¢|±Ç›Ïv·—?@7+®–K˜™*K$•Å-ïÄÌ|Ä…Â]É¿€F7–¬¦6–*Cî‰0VÕå”ÑlÕÉƪÕ±tdЬ¥u±üàë+ÐØ•Zè×ÚÅõv± ð6ÂÉY8UBÃ'¬Ucåß ©\ÉË´S´‹Ç°ÁC¯¦²z5noWg5«<\£"vòMþ×ËÊ,B,µ?.Àp_f5båx½võžñ¸…ýúñ¤]]ªTù>xçL5ŽUOq¾Ñ.nµ‹P 6äåv¥]mPðÍ1¾‰ƒìÔ–Û?¶GË8ÊôØÁÍ®…­Õ“?–mýøɘó>¤?Oãm¡äD=dE”t “ù#M¦*aL%ðÀÒw{huyhÛy~½ñ«AZNŠIW®¬}b3æ%Ö´+‰3¢]åWR»aTWbÒXb‚^Z.I’'_g>}³N{­lÜ–hÆÚ8Xî•%Ý´ du€ʆB‹P…œëß ÑÀçzN±ÑZ3©ÎKZfEøü…EïfhKwØŸ„ø_A2hÅfQ|(,º>°šâÖмµl@Ÿè$UOÄÒÙZÍ|ñáSZ]ŸT¸JPW©~0ªÙ(;å§VYÕ§ \Y©>ý¤±åù<ÙlvŽél£(2«Z§Ç>Ú‚°±¨hI’ÍtØÇ â†1iø+n²)&^¢ýQLŸü¢h/JTEU›¤×CÈEÏl<4fB8ƒð¾Ç \ï›xç7Êš¥fÈ4ëÂXðÌ¿zr¬L±ïÙV[>Öß<'sàÕ¤Eö±º}{x…²Å }çð$4†VÅ93š*ÕÇæ¢*•£¶Ÿ5‘’WÄôLñp)VŠËKv û³K]ë™;¾r]W®1xT“Ö6ä÷À—¶Æ%3QX&ÆøZZÆu® t:ovö®¡…¼~Òiþòž¢ŸìÇXºÎ›æ66hkóxSò’“ØÚÝ%ëv.®ë *îÌåx15 ¢# › ù®ë°µÊAáò‰ ÒÇ:‘—~¯jÌ/®ÂÃÐô‚º<á¹;²‘b÷øÇìlí#ÑiìÃîí›®ø¼ÓÁ¯ºV&J4²n€„ -™ˆý1›èÉØ7t"çª7t§¥àÒuÉKæÌ`L+ø2-™Y%Û&Å<š³Éç¬ëu±,¾3w%/ãú{"xâûäš,RVnÊÒåF™ái‚Z°Æå04.Ér>S NåIw ã ä,½_ÂP+F$]býÊKâS ÝÐoÒinîu ™oñÒˆ(†nOŽ@Øjœˆ–ûA”‰´.†âSÍv ~û‹tqÎÁŽ†º=m¬¡Æë>[øô´ W:ŸÎΈ°}5j”H8 [–É®Åç‡ÛÛð¢óæàð§ÍÃ` òÂÂSÀ5‘*M*}ÃJ•æ‰A1{žF‡ìÔ8±ôñ˜ÄV«Ó-É'ŽÖ>!iG = Çã™ô[Á½MbGŠÝgG¨â?J{˘Ÿ%þÄ”>£l™º(“Ï­î,ÊÈI1ö»nÒª»‘k“É`ÆÐŽ‰¢Ýè–—Òúo´½”>…V‰mÁdH#ºzšg ù‹©30Å^kA‡Ùáò²Kع3 ³Üd §^«P8ˆÄ N(«l*Y—+àpÉZƒðþ1"š„g¿rÂõì²,k6Åü~ÿïǦ™ÙÈà˜Õò]bv|‹ÁóÜY 3/îðÌrgŸx`êC‹ÊÀgý3äØç†Ü.”"7b,/£ôéšÖ*3MÔ2-PL4"Ž¦);¦·ƒ™Ý ‰åk ‰3•ÂÏÐõ Bȶ’ugŒ‘%W5ç–§Ï5rM©Ùà¬bèx£yg®ž³± ×wi2;É* `‘gÔêŒí–î—f6$æÙ¥J„ÛŽoN«œ#2i¸!êBå¡_)p‡GÓ';rý'ðø}6™F k¾W;ÍÜ–|YV|¯8xÙlkiÌÎU_ÚìMK4ôº9R1gªLU¼O2—n¾¥ o,¿zð ò-Bm "Õ¡ŠÀV¹ãnÚQùâíÛxx´Y}+×ßôkå™ÉÍö—¥b \ˆÃn*D!”A‹ø÷ÅæÎ[v³ÓˆùÃgš£ ;d} œÄUd4ˆH‰H%Ñ\'ò·ý™j|,€b®9.×Ï¡íåÈ–;;ð. <• D ,np厎ú·HÂi¼-œ3TZmbGD# 4ˆ¹™éÕ»põxòÍ»x#žï¼ÝÛ^Wr¦È´ëÉ7+k+Ëü¹¢ ¶x¸“};ÐŽÌš¦Âñÿ™kο£ØIðB/3AÄ#ƾ5rŽï¼Pü™ãðS4‹â§Í9ÉT4@utTÆ Ø9‡*É yÝawIèf¡ÃÞ%x¥àyqý͓ΓG|‘î¾:lãþg7îÏ/4zêÙ=Õ½¬EQvq¦ `6²h¡@ã*¬©Õºƒ¢±Ž öJ‹ Í‹ÀÝ~ÞÁ8¿§Á^ÀbDå¢K—lÙÁW0«}ä^Œ‚ÉÖ@÷ tþnEïm˜Þ¨_Ýkƒ%À½åüÆÇoҺͥ+Ço ºãS€_×I/L´zÛì/UÄ.’VÆqñ1*^ûpû–¨Ëdœ•o_D2ˆ»<îÿuŸ#®û4»g×ýV«ÛDüÊÑ?£mðlO¼Ýß4VjâÛÆ Š€^½jRÿžõ'î ×w?ëÌÿv›™ÿ¢9G*»&1`ÅÏ& åãßNõÙ¾t4ñÛ¢ižêð„–üãÆ·óà&ºý Î;ÆÿO^µTÏàâ'ÙM:ãîòÍ7ïìïÃig˜±¿rÍÑ­ñ5ƒcæCöž‡g¸=oÀÃ}h²‡t‰– áZãQcõN÷$‹ìnyLörœüÎKAþë)[`ƶjä‡>ÓFJ7ñÍ©VTíQc­¤M†Ëчak䚟»òc6¥»-“÷þ{¿öÇ™â)Óƒ„ò]w̱¿¾åþº;Ôg±“Ü “®×û\â\`â¤G"2P ¾ðñ~WqÊ( V‚;˜Ö±}syìþ\Ÿë¯ßâscµr7‘Ø” zM‹s)ºŽßa×X¦]\¯è""¤miI1ÿ0‘¤þTó @þ1ùÇä¾ @²,@”æC*Bþ±ù,@þÖ& iSŒÿ£ÆI½Çý›#ü…Í\˜Ö…½ Œ›&ý‡ø²ÃæE_¡óD Š.2t¥ô€Ä÷o IÃ%]í2"ºÈ ­ÊÞ cºçY¹™¼›u “|=VÝLD–ý›X„ü9¶H÷jˆb°° ÐU»ŠôxÒsômWl¼÷ð±ÖX+Ì#J|+]ËñÂCyúa»·çì{Ñ@ÍWK†ýWÜpgQºˆÐ.{‡!8•Ã&Å‚vôQ/½šUÅ|VäsÞfþü‹ÝiPÆ.ø[ò™» ö›sͲÎû›/Äs˜˜‘ãGÚ±<ÀZø_­<¯xÙº<ÝzL¿Eüoaç?+_=ÍŠç–Ô!“‡Œ8Aâà$Kñ“:¿â+5#™“·Óö-÷Âá‘9KÚî‹:7B/G¾P‹Œ…¡ú†Q´¢³ bºõD³ùÃœ¬{ªåOŒçœjÜr§)­PHZWM¡Ì»•MM‚݃y UfÒ>Ó$·)ˆòïÎZ0qáí|2ÏùEƒ Ò<(\!fèÅ›ËúCžô¸Áƒa¦8¿ÇØu[jß4VU?úçß>þLí×Ìû]ˆLY"U±: 2Næ…yä…¹´F·ÑDúeüÜ9ypR>ƒÁ–]ävÊ¡8ö|D`oÎß™/° e¥ T2¼8ÿúkùåÛõå±üÂ3cñR1ƒ#Ua(*Kp˜-±ÞA&'ºð«54¦C}B æ |\î‘WFÍîgÚw¬»æ«kpQ·8]´ÞiŠŒ»+FC¯ûÊœˆ?ϵ=/_iEÔD;¢eµWW«5±ºÚXM·*ú sóÛ¼sc[YÌÎ,#"i@ÜLØVT‡D&ð|Iýn‹Vkµþ5Æ5J¾ú¦Ñj­Ô*s,VGDø!]ZQs<ñGn7¸ð½ß¡ òÈQx©åó‘¦5¼â3×´•uÀj¥ç‰ÞWÿb NXDošÓÓTÖa¥¶+í·^¿°‚‰m£õ×|+L ³>Y켶©·²L¥ñVÇA›ÏƒÏÙØaŽΞ—{ÊMÚw¯Â |2§`ð'ã’ëSæ… wª¢ò—1<,Žž/¯¦–÷qõ •û}hùÒKhÊÍPry’Ç“^8ñåsüƯèÛ7“ ç=س=mCjë­[ÛÛÞVZwçLJ Ñ(ŽŒþõðö›âÏ I÷®Ÿ)[ šò}˜Þ˜mß®ío4ЯnN¢5w›gè uÆ9÷dÜ4ñ¾ÎÈê½ô%fW-¤(‘¿×Ê­àµ-ÈĤ¾%…Á¨;öü Ä$\/Ä`1ò£[ä «éèr)æuÖ³·àÿÜrøb>'@©èÕIõDêôtˆŒx4fꊢÆ)DÃä1šVÂS9–Qµt®Ä¹:/!Êfe)g­…ÂbÁÀ‹¤¿;Ý1ÝItÊÅ”¶³cbêzs•ÌJk™ÖoÑŒ&2}îugÞä š«cŠõ)"qQ—ªú¶_óm©œÊn]0îŒ<1Bc@6·¡b)A@qz2£ÂË(âçf¯çIw’®ü“ÕrÚ–RÆLVn5תðªŸZÕU?ªé%bKe¾cªó-m¾ÊŠH}Ù;J…’IßTWýéD@ž…Œoǃ¡]#jȳ‰“c™:·ü~JìXi‘+z7p!àÕica‹kàF9˜G/”9 fŒÝæºÄŽjÁZd†¡rÜr«ƒ|´jÇœÇ~36Ž™ŒUŸžn_ïìaÈêÍ×»ÇG·‹$;=mJ|Ýœñhd•I{´ìåTJ»[Õh⣳š^i,]6Pøéî *Íðþìï ¨Rˆuû°Þ<×ïbT—Rj¬‚³çPö%±¼Laê?r Ÿ£d×XŽ7§ÛŸôÜ$‚²)­²΃ç϶1ñ³ÝíÎGõ´ó¼µ³uÒi,•O ©ÖI@‘ÔYN‰ðyåJÓBD} ¡/Ö›EÉk©ÀXõ&q èvà Š»m”°”É·TNÃÊSªÌ°U“Åxä:cŒ â¼Ó&”%™Ô“”IÅò’)dA2j¡](&”ÕqG[´Žð°ø¦ØPQ^Œ ¥:x@r•aš’ бtú©?^d®çê-“؈Jã5­‰ Q<.V1NHô`+þàYüÁ›b•€ë+-¸t‚¯ÖVkp!$Kß¡™ð•ø$>™ ³>I_”Þûýn~¶Ž®~Ê«=1WdÏ”¸ eöNÈ^¿O¢2R ›vQ™Ò³n?í¾™JÊý×»»=´Aj|Ô<Üyu|pø1ùÉÂl`´{'ƒ• FùWŠœüâðÃo‰““e¤ô £Sÿ*(õr{•Âà,?•¼àq±¡;F"z*E–Ýár{O±®Í Õ4Î3î­r«sò •/:­çLéá¥ëô:-{žt`Í|L<éx¸ˆ„'å™õ¿Âù%GM•'ìhâñ%Åõ²O8²Õì`„K"ÞQhŽD:ôtêص²3)nOÏS™™, ⺽°Ã·‘ô-#ùjŠ£•Þ-•½‘L+õ ËÓšóãL «=TŽäÞ bïã]Ôé8,}®Dç, ú“±;#5ô2L¶xâÐbP‚`451PêIØÙQx …ªuÍi'¾6t³3y>°!Þ¸3ÂôéåÒMö\†¸¥J|çW¾tô&ýì._ÏXàÜîÕ^À@c°Ð¯ò'–„03\´‘҅ι;}†®.h«.;‘t‘M|#Ú«L{Ï\3ÄÃÐéºu9»›Èö>KL>–ÌâÈ>Üí…%Åç,…æS±Ó€l–±9·Ùõ±pŽî‹>!óL}(ä»!8EC˜—E¥Lö/åj©\C#iÄ[ ãÊ~a§u/!Ë…çSÌ‚`Äí Pâ44„ØfçuQv>žu?6–zpèse²V€¾²#k<ë–kTœr¨6'$ƒE´þ’Cê`¼ÈÕ#?Öû½¬ž•©ÙPÐíˆ÷NßÓq±9EM à†#œF@f΋†è¼âœUÑÑ ÍÈ}’Srdéç©ûcHÞV¨"SOïœÊ1‰\ÃÎìzcŠBAØ»nFüÈCrKà5hJZc‡D…Œ\È <Œm5hT9¤a£RøtoòÝ÷îH­Sn8wJøÒS‚Õ‘Ÿí"Ì:'·î½7Õ{0`¿’Ë2T¡DÑ/á²-öƒ1¬`Œoìôþ‹ë-¾ÈQHGQÏ‚÷dÀ*c”[¤`£~çLá‚Ó`ßµ37Ž;‡P¦a—NÈq]Ÿ¤Ø¼}´ê tÖ–±15^Z9xn(œ¼øº“ÌN†“A¸ÒQ×^™Ï뎂08`ˆú’¨Q þ•[ èB˱]µ³œyŸˆ0eXhWÐP_CwY7‹¡ÑŒ·%EOüæ[QÙ™͚n\ã¾vÜpô̼‹¥dÙ´ˆO‹D=>ÛäÆâi‰À’ °‰Îö ¼Å;5PbŠž©-¢]Ÿ6°6Ç÷áù{mÆ›ŠFå Ò¼?8?—ÓeäÐA^X> —ýdz‚ *{…‹á>Åq%ŒN›5ùa]ƒQAK«ìç%D:I` ½[Á¨®{}o|Cö¦©=2ñ2¸Â]CŠﯜ‘Œ‰¤ã—ÕŒ<9ã¿,à[‰•3n¼w(*£Îiê2MY‘ßõPg ǶçõLÿézÓºœZáÂ;ýHXˆD3†~`gÌ%=œÊ—h•”c ².ze&QýÙÝ,Î[Ÿ]J¦ÞqÐM$X'ê±h†!ñ —+­_«'íÕvØ~÷̈ ÈMJ$à.KÕìZp7FûÉÄʪ²”fⲂd#z°ºÒ “Ü%†YÓÐïðíjTþj|û°±ÒXk‹Ùm@D¼—_7ŠF£/d YÍ[Êœì#T3~ÓXK)LµžåÛøHwA“·\ãyŠk••\î™z’éNÍI¬` à¨\~õªY‹N1ÖÈ_ͺ‘ iÎÍé0áÙ¬bJÙÁ‘W¿ÿ÷Z¡°´´$ÞðiºkE-š ‘zíbïðèªaG®¼±c)LÞ&$Ñ‘©=bÎåùš £õ¿A™‘Zâ)]S‘ñ|FwIÓFÄO‘›`B¥¨ 4ÿä9)á*x#52 x—”‡)³ÖX[ "óë5ü6zür£ïçñKíƒë cÝž¹s hÌÝúª£ë#郔õ/¢9Œ4A×&ïbÂá•z# ªa5÷§¢O%å„eòâÉԤ<&Ò8vØjÏ–0 ™=Pòk= ¬åYÕ&¤3å\pW3:p¸'J§%–p`.;kÞµäaýÒvóå(.JëmÔxS‹±õEüÍ—wçÙáæá/-±ZÄøÙsæÿyûðhç`_”΃ÑmJ8Üþy‡‹¹ï=¤‚ùJÙ<ð_‡â-Óè9ÿ£t¸¹°øàJ·+ UOFy¢þp­š9á³Øœú®ÅÛL+Á’KÞh@ƒh_† m&ë²nxéÊ+Þ:ªnÿ<‰YÈ%Å7¢p%ùOºÃKñÌEðÙ3Žæïþ;:{øãFi†íõ=]z˜–tš®*p¦fÎt]@: V Üîè½+ózÀ…c ¤£,U°›œ±ûý€©Ú=mÿ$”Fâ@Ë 9%&± 9ÓÉÏ” “a1ZÓE9Êóö uqœ1áxmíî†)Žs/ñÛ1ðÐìz¶Š.ß"LÉ6]³onN]ÏMÜÈ?zÕ¿Ž^5A4àø²¯q÷ËS ù°Ï­RDc`#ø&N sáÖÑl@h€¦z2c“ñ4ÓO™ -¨¹5¹4( ®8}Ô×Ü°„½{ˆSÐ ”@;!æ÷§‘gW åÑCT=0øÉÞcrq:0èd7¶»‹–gW•Vl¥œTcc ôp_N#…«/N\ª½I^'µdKljº¿Ï—ùÜûC·VBfÞ?w‘ÜõÔ²¡¿8·=S‘å ‚¹tØY S4ÃSÓÏ€Õît|nGž/î»uBŒY;BÚ*eMj2Tì—£@ïHÁHL-JMÞ.}AËPÐ2¬¬\¯®ð?qv£ “âÎ*é<âbOÚØÞгïáàëhUŽáÀg ÃÀ£¨0HN ÌÛç#çïˆø[]Mk „ó>ðš•Æ`èußA©#È "–híññ“÷ ¸ï-¾œ¹ã+ÔH­\?V] W®Ÿ<ÞäŸcºRëÂ+Rˆ½à=¶f2¨LÆ°Žå­ˆ#³ѻÊZ•5Üù7–²ÏϹÅ`­™´$¢µSXj@&>ÀÕhë`¯^*}_‰G+ß>ËbM´—ÄÚ“µÕGıúðÑÚê×_¯}³r:eƒf¨-†ýØùXLÞ ÒÉÅüq}¹¨êVÇdÎé•ž!S„ ј€7ÑðMãáùl'EÎÐp¿ç¹ãˆ)9•WÇwÁ2‚ B-Ë©ÇL$ðÔ¥y}úta1^(ë-Ø;Ašæ‹Ê¿ð5 å«Ry;RÒ9³í¹îª¢ í„Ë:õî3Ø;ÕX…É}ħN¯GNåhå”ù /(~%Æ¥–"»’¨7Õø—ŒœeÅÍÊ+›çK‘%ç?ÅÛ^P™hÞÚÅ6Ìc/à!@ç¯v‘Þ·‹80dó¥F”Ø£šL…øîSq>ñ»d£ðpÉôíâ)*b×aú0³/'2ÐBêhBV&øß®DAÿ·VÔ÷ü#Þ–YI +±F(~ˆ:¦Tt »È5 !áe²ðº§Ø Yè¹Y(A™Å‹£må)e1PX'j½wn¢¥Ñ H/>¥ØxYŒXÆË(k6ÏšQuY$BÑjE!‰Œ„KöüàP=/ÿç#|*ǽvGÞpLo³—Ô¢YRû ÔÚÙC¡í+(2IñM¨=EøÕ?®Ö…7ž‹²L3N™½ƒog´0󌷇lù˽”HMÍY|-Ì¿³¾È¦úŒÛêîKˆ; ~|×äÙ2 *R¼&Ð)àÛˆ4uQMgit:íÝçÞIñÐÞu­8P¯¾Ÿª3ÍX°ÏhÐÈüdæ¸é¾³!a–ôöžEDSN£|âÿû­œ¨CRTCIb»#F_“(N15%‚xS ={¾%ÖÚoféÅoc½„¶ÇZõ½Öø¦±¤lu ûI¼•q•0Å@éˆû¥âÅÎa[™A,kk(Ž A«æ ÈvIÚ,%,“`?aÄ?;/uçÝ^Á¤ÖÒÁÕLøµÐZºm»†BÍcYŠOã“ê7ú¡aßÛÞч‘ô¬ñIãÛÕÆJã¡r(b ÁÙF‰G̓?y¿GMÿËíúºþI&¡ÖB·;ycôër`u‡5väÒ»¸$o/¶3ìQ(?¨‚-G¸ T”)·U2—a»}d¥Œ,·ÍpÆãB¶ŽÑVž:?†mIª!÷ZÆ~^”)²ÓâÙAᨂ€K€*aÔH¥ÑCÇ£r|åÁuÜT¤ a 7$«{_Tð^Œý¾°9?ë~ÕÞ†~.(â9“• ñípN³¸SDÅp2rëc÷zlñ«²‘³øVuXLë,}{ª=U.…{¾ñŸ£þ/ÔÛ¾ ê.x™eÙ¢­èÄ|ôh^C‹[{×$ƒÒ£¥=³rùŒg^pÎG#ée¤®‚÷öé¨NõÜHÿ½›ÉÔ}:e•âFÌ6gšu>Û^O,¿ãÇ«k¢þ’þží­n§šz§ÖYÊ ;ô:;ãÊ‘V+Ff"ÚŸ“µ»óŒÎm¶WE°çìeg%Çeà{ìð_ßfO›að>]«¹ë¿³çb„ž@pßõˆã–©Þ!ࣸ²Þ ºHÊ"‡üTUèÔ~ÊX³ÍÿRÉxrY%Bâðdù"ÊP¸5“c0! ³ÝuimD ß ¹tÞ“×O/ˆBzÓt¡ëß´ŒüA¥¥¯,ÎZX„¸;ROðŒ%Ðj?è¸þxtÃo,šx'ص…ûÀ\[¸ àæŽ%ʃ¶¶0'ÔÚÂÿ!œµÅÚý¯EX[@–4{‘ó=íôsÍ{‡.-ݱ›/YÁhÀË—1WW¯¸Åêg£qŸCNÜ+önŠ½E§ZþaVÓ"P!uJ©H£¡SûÓ“Æ÷ÆÒG¢^%õBØ烕4ª²ZÔ‚Ê W…HÛ5·Föº$Ó“bU¾D¥2AÕ¼leŒªv’?ƒù.“£Ö—'ˆØYÀ¯ý6©úÀ#ø>²ÎÖÝ5òc”¸¾4¹Ç“ÉO¿‡] QbDFéc€k’s(xY†Áh !»Oªá(×ø(ÀÍ§Ò ï¹ÁÖDQë¸^ëôT%95U‘õsÖQfdÿh›©†M&^«c6@ÐOÖ!;RR‘Ń$'4´G.¶ö­*_¯›rˆ(-Æ5“Íà ²¾z,Î)H΢‡ò\öm¶“WHcpô×\IxÇ¢Wó%ˆÖä2ÊEœËæ𠉚…ÚE&RÑÓ¬n%8õ…ÛzÈ-Ì`—T{.Hß´¸µj|£¤Ÿ†Û,§X2~‰"mÂ|œÛ,­¼U:sg˜¥M80(ÂÔϬüi;Q¤ó]Ḏþ3wìÃ!èXD÷¶mS¢Ÿ/ ²àõ–1å}—aŠF¸úÖãÝ+SgÔ‚ž{¤b…©Á1Eu‰|5Õzk=ÑY:Ÿ—žÖ°¢,ì¥ÐuUðõžïD8K±ÐبÞt)D¯B Ú%**]˜T@nBn‚íráú.¢î™p|&æén)D˜s*•zEÔ©ˆ áJñíE³wC×]%Tˆ½ªRÀP+ á y€5袈cw+çFÑî1Ê¿<§st™+2ãtn¹0¨Â3¢{KÚÅ|ñÞéOi )#¡ùF!0dp_vœÏ£_Ž:{[¯w·(öa¢§FÍ#¶?“Í[—$l½Ìó$ sšÑ!8Dèª_.Y j9!Ó<µbŸ¤Mˆ\A1«Ä"Š73’ãÖëOa¿žrLîy½¿ùˆ²IA-¢9›FÎ=%‡BÍÊ‚ïëËJ}kië¿‘€ça1ÃÐ*1sÅ6NÙËby®™,C 0ÞÖ\ËiêÔ9Qù§ÎCQSù;íµ…Ô]¶0c-ÜûÎbî+ÉIšWãì÷@í¬ó—JìŸR#8{æå]‰:ŸÌ”âoAÞD%3rââ —3‚S“'câW#¡b›×¸ÚÆd›2G<‚xJ¶S Yv8!nAüMëT–ÎÛf£…†]Æ“ ¬;ý®Åã.2üJW¼÷~<ó/á&„lÛxä¨?0…ÌKS@§¾‘¡Å$Å©º¯¤J!•ÚÄu é&Š%i Ñp2ç÷<Ò?ðHÿÀ#}Yx¤°çµZ§ûþO¿xÕGòÅí±{î†V<¯˜å¨Û‰dbébf`M‰LqLPßȆZˆaœ®&̘Q¾ ÔTþ{æÂ,yãeÖJ {4FB#®›ó„ ö Tž~ÁioÜëñ|dfîÁ33sèÜáår3 6¦Ã2$0¶^!§† ×|™ƒÅÝw\†)9Í8EW¤ž„,0ÿµúÎÞ+ ëÅšv¬ò´™>tGªø‡nóFù3ÅTL1Î÷ÓLÈ•âÓ¯¢´Yà$(fƒX%Æ h„Ý.ÿº\'¶»Î°4ë ¥ô]ø@d×gVgBÎHИêÌÞä˜îâS{{Ûa´ÓZŒÀ-•øt1Á¢CDÜ$‚€(K…3©4T/ 9¤&Ïò¢<M\{iÎ÷µpßqšþJÐa5B“Þx q@0þ– æh‹lHÁëøD4c³6¦WŠú;w/AO\¦¡÷óLóüîB©4–Uo3í‡9¦ý~ýÅk‘k&¾3vqÆ`ïYÐó c¬WN2NÛ£âlŸ».ƒØPÞ‘¾Ÿ±ÉÊÜ}Ÿ=¤µ{A.p#¤±4II(Ù|'=¼@¤j½‘sà‚7·A­Œ`–²GÔ>çþkõr8¹þ6a~fb5·ÀU’ô, ¾«þƒ3’+nŸ»>ŸŒßò?¨ñÅëôüEiR ÷Qä ï§ÕSžÇÅ~Jßq?ž ìé]ºiîÕÏÐI­˜Ok)çoö’M·hZŸc‘'¥œ’ج£ÿ† ¤¡â<²üu²¸'š¡­FèQér#yµ‘mt[7L«¹ WWÒvaMzBÁF¬¥*@oå—SwóùÊÞ‹s»\ÛEéËØs\&–¤éA6cÈæ_ä ó¬ï…㜠u¼s¸Z×D‹«“ùÅAâ›puµ± ªësŽ‘m††Þ¸c.¢òòÕ·k?¬¯¬ŠMŒ?¶²Š±£¤ÝzM¯Ÿáë·‡W¿~\Ç¿O/^QJ=@Rpðêxç`¿ÒBw/˜¨jtÛ<©%Øa–ßÇœ;g4´Ð×(Këö“pÇ…š·÷yT¹Ö?±×Õ” ú×Üçô»Y¸/É[{þ3~^®xˆ¬E¤C1Œ¼kÂóÁ/çã£\,’Ã;ÜEïá4²'FÚK^7¤IZ×Cw¬`©ˆ(CœN†=gìvFî…’YZ%2 :jL,Eq É¥k$ΊŒ”äö:*ª}Oz ×pä¼±–R â`ô®f˜Èüa‡„âZfHžKÒ_(8…‚èPèÒ‘»«#Š/H»À(ê-­49´Á´}Ç¿˜8(ˆñxCwTGÜ›®Ó%³Û‘'Íj7›æfóåvþkþTi]]ºÔ,R{wIi¿ÓíºÃq˜ IFù”ÁõÕIO:°j¤Ó݆òÖ$º¯ÕS“ML |éÃUÿÓydM°öº"#^]Äs³³ó|{÷h»ÂháãÍý£ƒ×‡MýØ|ÓÜ„ä­&ò-tÅÅ*+×½sGîx2òÅÊSñéû· ó·šÌ™CAˆ~ý5e”»1œœ`¥¢™£¸7¿—š7_ƪ:ò(kö|!QÉ—ÐN,«ž]s®ñ˜K ÿœQæ-Atÿ× hÅKR1²(æ$v¯ñ²bСyÇÄs4’C‘‹Ш?»oöç„ÒÌe;^öo£³ÉŽ~Gù¢çÃiâ;k)[ˆ—7¤ÔŸ‡›÷ZAÈ4 ˜üytrñæ¯Gú5ì>¿ƒPùOP€øîU„OþD}uþþ|éí2êš?>ó7?bâÕKŒV$Õpg©‹›_?×ê^ô´Zî÷a0íf™KŽšq›ïN¦›ø»(žæÜà§é.}ŸC͸p'ž$wEYÈpµ¤™ß]cßÝ朆¨óùGû6Ëf’rcãáÚÔø…w1™­âº-–\Êl°‹tÑÞ7bgçxgÿèxs¿¹= +Z œ`”E-ú¿´‹*E»8ÎóÓ†F“×\ ‹âhgÿÅî¶Ø?Ø?z¹y¸½•¯‰tFÚÁ5,÷hÎHN«ùÐà¯þ?Ýј¾äßÏÙ§¬Y†qÐro0LSk«r<5F+üüáÜ¢ ®¥0²Há'¾„F¡û|{©<ÇE%Ýùï,ZÊb §ŒeÊ@~™Qü«Üÿ®7!csQ7ø|L‘¼œ7c¢´Íé±?/Jë yi üå÷㜗 éù•þÞÓ‚ù›lrš¿—¸%ÝjYNSBõœR05Bû:ůBñUØnûŤ¿Ø.yÌM@Õäì%#¨Ey)c±~éõz®_4’&<Á¦N,χ¾«EÒ ¦#¾3S•{R$Ov¿“ñÙÙÉÖ– AòY ½KÖ¡ÝëëH ®‘x+ðÕ®3×NRÛÈÞCŸƒèÏ ÖñX5y8ઊ.å›ÁÙ‘p”omNÕ‘„€â)Àòm 1nMKíƒôXYÊ--X–Ê™ kú›1{ö»õÐÄÂzÆ ()ãHUhÎP9!\ûQcÉðCeWÇcröQc¶—|çàá*jñ<¹Áíͤ¶m BmjZy•ê‹¼ÜŒ7Ô…¾!Fš¢Õ­ A¤& ¡ç“¾ËE -D•“uÁ‘Fè =ôuV!ÎÖODeàÜœa¢ÇÕRôºæ97'“$äˆ8ŠPÝqäI¦v32Uº rFLÍßEF5|ŒÛÅg…z¹…ú*F^èþ6A(!Píé#{ñ5®F˜b˜*rÌd¬[™¯&ÎÜ®ƒ†*:–Ð1Îó “[:“5,„œRÙ…W=ßÓÚkÀ~ö0Róh”’Ïõô…:aç'sªÇÒÂã0>Ám-×ï[Žû§ùmaà¶G)HV¼Šˆ7 }¯š—¹f#kLÄ"…%Có%i(‡î½?üð‡ =wàúlﺸ( 5#¤‡Ë,zF¿ÚÝÜÛÝy&SÀüï$ŒÞ¾a¸ô&Œ˜³»·ëãÈEÈ¿ÄŽ0J2 –ZÎii@, ¸£õýÓ§ÎÄâžl ¶XH¡s’ÓÃÞ) ñ1R­ Sn:Ý4£•w·00Á9–ïc4þ™žÐÓš™_ÁÅ8IéàÒÞ«¤*·Çª\ßíÎaÜpËÕ2‡Öלic¢ :£™"®SŽ)ç¦x´ðÀL®ŒÂXê•êÁkß»~¬Ï× ‰²ÕZ]991[~mƾl¬`µGéØeYbâRjx<•ç‘Z¤­‘\k*{+ݯM/žñµÏ&]ˆW%—"þÔ­›1§‰Ü‹/Ò៳¯sw­ÆBs½qEssÿà˜ŒŸ¥d UW®x—ò(ô0à©â;)¢’‹CÃÝ"ªˆ Š8{d´Ì¹ÿF£±b\Q\…nY¡Adíœ#ɸ ±Éa˜ˆ`N?Pæó\Sä½¼Z) úþ Ç6á(QL Øbdçq7ëbðRuq©ª'+n¸‚ÃWb¶¶Eƒ¾Óu ±—DvqÞßÔ/Œru,TcÛ¸/ “­^à|Œ;ýehÓ¼¸Úµ[kÛî %‡½KìDþ‡îþCwóÑÝÉx¾(°7lž´¾eYUeF…Ûi–ì#~©5DqÈôIöîQcÍàþð ø¾X4ñ<["lA Xå´ Í1ü9©6›½£Ãí£×»Ç•VvüTH›/Î**óºŽß!¼,‰1EáÛLáVä Èí69åÖvs·B®¬Œ_†ßVðÏ¢pñÚáäeU8Ê\Æ‹NZÚóû±2 3ü¹ŠŽLô—›”²a^š”¬)G]ìÚ ƒG´¤¸t@²NŠsBÈLµaÜ9, µ+@Ù=òÂbñ0WAèˆSÿ†¹ä6~€t´ÂŠ×¥ìsC¾l_|ã訕,Ì1soðΘFXÔŽY*ÿQ6X= §†,ÜØutNnöĶ &ý±W—Ó %]W³*r[I5‹¥ƒ¦™–{nm8ò¡æ¥˜9`‰¥.‰ÃñBê}ĺth-t‰ÏrÏ1jä¥(„øÚé\§w#†(' ñUijO…ƒuR 8¨SædÒ,g8{^c+ˆb ·”ô“:É3ߘÕÝÀ?Ç _*,Hh\($Ä‘r•«vßw£âGeh”œnSÁCÃélÿ¼¹[ç2gU¬}¯Ó»£‘~*ñÏø%>‚}ÿ'ΆU!F¸¦×òÚ`5ÚFÉö6·]ͯúÔgLª4·Ó3@*Ã>f7êï¹qÑá'i[j’eÛ°ÑJvÕÒøf«‰™ŒuîX2¾†9SS7íZûûö¿WE[Y¹·‹´ á£y²ÈTU3¼õ Öaë$/{oʘ+³t>N†¶È†Ò´!49¨Ö4—®XýþßYÛ6'Õy.3¥yº—µÈÃ1#‹á³lXgŸ*Kƒ-­y ó÷FŠ¸Jú8E¦(è!–Ká’c€kÐw«<¦ª¸?SÑ)U­³q,g4²ç…T¥Ñ0@0ŠózÆÑH¹àxƒ™HçÈ$£Áu+à ²‰¤ñ¡zGîyß½FV¦×G‡—0­‚ UàôòuàµXHeØddžI«V.œð°ÃX•¾I;%»Ðy4âQÆAÃÕ§U˜i/nñVMÂôC8KH_爾ŠÌb£fW•ÉʩꀭÀ<#§˜¬W)5Hq†ÄœÝ s[ÉJi&™o$”¬ÁÌs—gܹؔ´Ò1¥ô7«zÔ‘!çij çŸ»Š‚^msŽOkocJ#ò´×¸ ¤®AþB“ÊQhçŽX ·ŠNÛ å~¯5N¸"]‚ÝðLÆ0N«8!˨ÕõeQ?HV’Vpæ½9¥‚@C€(›EŽ"åˆ3ÏÇ•Þ›ŒÀ3»Æ¼Ý0@%#?Àmׂ*À! ›<-Ô²°¬y¥›ƒL6ƨ/²•e‘)>¼ã2h¹]L0ªÑÔš™ Y‡Ã‘K'B8‚"ö‡e©[;‡è^ˆ~T\)ÔÜÛã¢G‘%s‡‡É"Ç”ÆD<¤9š¥ý ÿŒöI9·ùB]cvaúÝü¥¨ZZ¬ ¯áâ)ŠD/:—Ž[®Ö(¼dÉcè®xÉ×%U©ÕÉŒ×íM*i€cˆúd;M &khpXX¤s«©³z–£UG/wwžQ@àà6°uŸ©a zj£4ÙtlwGŸÒ*Á½LΔUPD,ñ¥ùïŸ|`\8x| /uëZnøi]Aaƒw®‘^zp‚)³ø™ZÁF‹¨ 43Ò’H&­q‰|*w)¹W&‘Ä8:¼ê#Ž†º3¶T&OÌÇTJ˜¢©êƃâá8‚ùÓ›ÂÅš1D¦Š´Hl¯%½`+Ú‰EäÔaI±Y@A8än,@÷íP¦×$AÔg×DSiåT/ÒÊrpï)|’ïÂñâÊÇ«ŽÚ¾rÆCQQs®'¸*]¦€ŸìK튜$O½hþ^šDµ ­x;–•=P2&!>\UÑ‹d2ƒR{~_Éà7ìV É}ðô…=¯/QÈèó”‹ æ˜~—á쳫4䤺h‚ i=* ò)!!ušûÏw^TZÐȲ(êÿàÕ¶"¨>-¾ÚøçÞÅdÄg {*d°*ÑŒ®>tOœxHÛn É­5grC×ÈÉ }ä0¤=<)±ÁÜRì÷P<·°¿_™­TeIqÊÂà¦ó‰_i%zãÛ‚×’pœ—Î6JgXÊ­DÍæF©Ù,(©W¯^Vš(ŒGc…Ãb£VlDS*B(AØ(°to£‹¹hªÒrÉ^õÙYP·˜Z~&å R’¥7‘ev›† Gi!ªÒÙ®«0E0¹QD°+ÞvÔ$‰ ±ò´8½|¢îñÂiÛF%—±dŒ¶R©~`­ÊJõ駲½Àüì½ÚÙÝ>ÄáeHÿYOÍzMŠ˜½1†…€Ãì½;ÂÕcÉò Ï— ºbÑeÈ%ÈEJÊ ÆhFE·Nª´eÿàU£ ¯ý[ÛÏ7_ïÓR€Rqeˆ+'.Ÿ˜†Åtç¡9Änx!sÇ:ÏðãÕîæñvÁبæãÚBnþ¼½y,¶÷0ÈÕ:>9Veàö§¤3Ƈ×=’Py6œx3ÞŒvXSˆ¦Ì€b9Ä5M8‚=Û¨ÃÚ£áºòB¼Ñò°£<$€[Ü´0Ú¡¸ &â\Á¢uÈ ŠºBª€/p€{^‹‚C\`¤å°Fcÿ sx|¼#àX¯^í4Ó7;iŸÃßÎîAó§#ã­Eçyzë¸(ì4ešd¦—›‡[̓-(”yS™BåÞ=xµ½ß9b¼jÉÞVçèøp£ºHtè’ ’bÇ7,ÂH;*¦¤ºHgHÒXìì¿ PXÅCI§¼0Mp¨sjÝe\ëˆú³”òµnGÉ6R 7•ñ‚IÇi IÁIˆ»>7®%ŤƒÒáèäCÍH؇¡c¦ÐV¥Òp!¯HcÅBX"xOñîp¼ke:jYnØš7³éԥݶ–0ÇpµUئ´j£X2þÑVQ_ÛG@Ƕ³a܃(8l¹`Ø°6ºÐj=ª«mU£Ÿ•ƒ)üÖ(Θœ$Œ}ã©D¿’ ²»p›q‰¨Eèñ…g•”{ÕÅà kb÷Яø‰©iŽtËj%ÇVjNë†?³:ÇfDYQ²nMqˆwBj£¡Ù‚ƒWä"®!âÄLÎ#Ɖ½}››» 7F“þÊü˜îG†$ýõñÎî‘:}˜3›Å¹Åß“dÁ ¨Çé¬MM¡e_Ñûˆv˜|L«¾"*ôî†Õx'NñAý½05yäFZ…¥Æ9u>]hµd…Eôêð€†£ùêUA†Aí vË™\\ŽiœÜÑ(`«jXv1vôÁƒj!¯~0Ÿ~3_XàXqY–Z…NËR¤¤•6ݶ§Ã÷"7JYFÚtc«B~KÆÂLo¡ŒšSLµLh¨´,Z4•Vp n£ÀP€$›žTL$Ó¤ÛgN|äýÂ̸}¥øãBÒ5ÇP;O Ó|xJÆ“ÂlsÜB^—ÃÂ-â"S4õÎÔ!ýÖ8æ½7&Š˜ãæ¸Ë}ô:ôõõÙ­1ì ÄÁ•qNÏ»£é`ð@’gÐ*ÃJˆL¦Q7‚wݘG ,8à­Ä#O x\wR¿9ÃaÿF*Œu%!Ú‘ÞÀ`@5,XLb³Ï\²Ÿ Ç|Š)ù;]q0 {ó;ˆ ^— ÕEGwd%ˆv§Q刯Êgs•ù¯àÓë0.áf™×pÝMáj8K­ÖÉIl÷rñ©ÌõÉ©ÏÌ@H¾«¸òàr}õ[§~ˆ å͸aR„7wÇÈz.ºæSùóݦc?óâl]à¬5Ùõ‘•»Ý¢EŸ–D“h•gRaFŸ7€Q ª‹FˆŒà9U§÷ÎaçÂUA›¸ne@!CJãEÃ(‡TñòÆ ·È<$mÌAÀ? Lâ­Fç a¼@¼º¾±Á~éMºEý,€yaÛ{>ÏPIê2H¯Q”PŠ‘è¶&•ÑŸ†&½¯”p44W扮4ôq[5zÒö_6§£ìbîŽMgè½áRÁW[Úë]mJn›{`½¨_ÛõÝ¢¤HÆ^F$Ú!©ÛFns˜"V£AÀ9^C=¼cöÜ°;ò† ö®éÒ1¦Ò–`—fè”Ó…»5 ·×åÏ¡ch'={rÁV€ý­ÎPMóñS~µ°Y†rÅò>‚I >£`èŽd”?5%mGd¹Šv+¡ IhC,eH‚\“&jgóÉ£š4΢A"ãL85…´mçuxv£¨ñÛW’Q·JÓîU:½ÉÒÉ®gžFÔì%ŒÙCæ6Èv°J*„l8G7œ$ëLÈ®Ëj9ùsI)êFÄæʸh‰± Sat´ÊØÜy+Øâ[™Â"õ­ŸÆ}ºéWs_EfĵÊPþ{½Àp.0ìjÓQÛ°—­ÖÚÓ“Æ÷ÆÒGZ"å!×2@’ vUÅ"CLX ‹Ë©çKÔUДá•3üï N½wÑODü1\Mé;ÂÑò7½¶mÚÔEq6kQ@? ßeóÌ76è¼R’'¬eqCóˆPfã°úqž ÜÁ<ôhéÇìƒPôÒ®”ÊD²†FR$C¡c9"ð’˜GñHË`ØŽ“f¹HB5q|Ф³ú®UEv¡_êÁz¬ƒ®ÍƒªËü²< pö/.nO6ZI‰†“²•«~¹d1Ùå„xåÔÒó¤Í\g)±N²’#qëOa‹ŸrÌ«Àz;*N”MZEóÐàù¾”“㺠;¸¾Ì?r/ÚbýwÁfÅd®¬©,¶Iƒ`t»XžkjËPL€5¹Årš! ]æŸ:1ÅÔsä.;R•@ÓÚŒ ³÷áÂçØ‚ sÐM‘$œ5UÀÝiåBÞ¨|ŽàXCR™¡êœ:[íÝBüZÂöÍÄ€ô\-ï÷”ÇWº–£¡ š }}ŠÂ^'u ÞdQlÇÝæ¤~h8!æœcâ Gaþ–íŒx …Üx š=_dÇl”Fy¯ïûq ;ä$Ç#‡cs±ñ=Ú‡ä€È}Q%è»Iã 'ZgR–“ª×<ÛŽcÜ¥R©?J›@ 7;, ɈæqÈ?§„ä–3PCÊ%¿Ÿ¹ÆØA#‚¾‹4múÎZ^ÑlŒÒ¨q¸ÞX‚ewž¦o[¸EÔLº ü'€›Ô%\º@'Îœî¥øî¿£³‡?ž¡^õ{F»&O9ä‹W* Ú‹º¾†tö﹡;‚Å͹#µ'¬'HB‚ðœÑGPÕã@%·~ÅØJ‰˜”ª«À ƒï2MBC‚Âr—n·ƒ6qTgrÈ, CÔ?³=–ÔºÚ­¼¹€»ÂÿÁ©yq…_†W °ëÂta«¸á/Þ¾­Å[¿Pëö1©àÙ}VííýÜ䙧!ù)'Ħ%Ì…ºÀ–"äÅeøh™ƒÍ $î[»»acÎp·¢|ÛEŸÿª´0[p÷c™{uìâ™ÌÆJQØ@å$©öØÒhýR¨\hn S À(«fa`”``n`JkÑ)!² ä $”KœC`½—N÷]#çîËA”ã»P‡qCñLo­¾³‡Þ^ëÅA4YåEÁYû}³âºÕùƒ1%‡Ý]ôè¼B·Ûｚ¸ËÒ¾¢Û‹Í““ÔcøØâÓX¿.¥_F& ÙYeBݱ2c—2ð“Êír9\þu¹Nü_cý®/ãcñ]" Ò÷"»N»Ês/%îL|f¯rL~ñÇ)ƒ‚½¾íò°Z[+sHê-‰SÆc£Qhd$íJ%}ê4©Á…Í–z$Šç´x—Ô1;QpN*FÇ—Ä!Ö†¸wœ¬¾{9zâÉ£G=ÔýÒÈkaÈLý±k$+Å^¿z}üc|ˆÇcZdRtꤧ—ÊB³lû„¤S–€ûq©±ýv»jëø,t]«Fìⱬ´ ñf—’ÏR³ÆÚƒG®ÝE’SŒ.Œ:X´[u ZgÓxËÅ*rI$-‡Ý±œ¥çð®˜J¼ì‚D]¥æbâ=ÕeÁÖ¦§¨A÷‡õ´äìýwíÅj|vŠ0»¡1‹=·ˆÊÆÄæš~Üg²\ŽÁcÜ{a«"ngŠ­Uö“Ÿ™Yañ–tGªA2o"H;ëÑ4g\=þT³­ Ö„æF¡.;à\¸udyEý­<ê¸ êÏ{=-E²92À—Õl²g‘òí!ž yz\2™£/Ø^ø4 ¨!& ¢÷>» ÷­ù.\Nð=“Å™ÉË#ÛŸÍd$JbxÓ“’¿€T.%¹°2Kû믹H¬4ëFÈâ12‚kï9#y]:Ã0è݇)-žÍÃ7;ûÊ÷çùöæñëÃmÆ|0n½½‹Éuþ;¯Û}ð@YÍwóÝÓØq|qÙ½Žªz1r]_¼FÍÐiÊéqÆ}ÿ:~öÖ–y!V™À¹JDÞ\çŽ7B.˜eÃŒŽ:ÅΉ.Yô0TÇ|ö‡v³ênÿ<¶ìò\I)—soä\þyÿÆ6¨„ÏŽ¶ÄC¶XqPƒŠ$X™NãSÚýÖ(’(œþV'Ñêå©ä•—£ë¦"5jë¥ã½›ÌîuZ’» ¶ne•d´|8¹þ6½å94 Îf9päŒC>/§µ}Vbq㎠¥¬g$K‰Ê"à9áŸuªqˆYé%UUi©Tœye:¯Õ2y©l³»Ýž8÷žNP;'QýŒŽáSÊ?híÓª‘kG]h%ì”CöÎ'øtÕ*^§WPD%Õ5¡Ñàýgð~šð«›Œ»û ܧÇ@^¿™.–‹1´”)Ÿ3º¬"wà+‡|Ëa.h*]‚߃Xa±ÐdNÆüvB+b Úõ Éù}*–ôKü‘’¹ˆ§dUý4ad©ŠåìÛõ¹lSïNR.ŒÊòÝH¹`Ý’®ÏAÙ-‹¹<ü&²«+Kés5Å»Dâi¥ë÷ïÄP,ÌÇK¤[Hw‡“¸òr8t–ž ‰cLù8ÜšGI)×lcN¦5|Z³çˆ³|›àg³‰Ã<|Ø­-ö[˜ÍÁ-äaߦm¤¹X»/qgu¢š’‹lÁ^a†[OŽ» ós—)÷“{ ¾å4w!¹îØH|@Æu8ëìþ™Û}?mÎ<?[Ë#÷¬»ñº ÷Áä.Ìân9Adæt'~vá~Ù…{á`ÒX×…ÏÁ³þÅYÖl‘Ü&ua¾%ë4^HÇÕÂÂÌo*‡[?µÓüBTÔ¦HiÔôöŠ“OÿSHm²s_ c_ŽÇ»ÑåÈ Ô6P¥ÈÃT¨zfß<ô¯[­‡Êé8—ºŸ5]¸ äLt{an~~aQ¼tºïÖÉWž;'6®Ñu  C\"Øá~V±â)º—”ºSðM(g‡:Ò€ŸGlŽ±‰ÆèhBÚ$‚ᕸŠñ?qvƒåÈ-U¥ÓR‡Â‘¡rnˆù5VñÛIg¢ÿ&a” ÜA0¢r a8ÐyŠÇîȹ@Œ7G qg œ÷×£c’: ûÕŒ O0¨a9kŸˆŸ¼gu§ï] ê¡Ñø3w|…:›•ëǪX×Êõ“çÏ›ü“ `9¨«†*÷š ùä4ºïôÃ@ÅØBôžÞUÖª‚ ±s¶w.q|-›4‘¶¯v ëh$J7÷·öê¥Ò'ñ•x´òí±,ÖD{I¬=Y[}ôH<«­­~ýõÚ7+§†•j.U02BÅðã¯;‹I¥j¶á$ùã»U›Zù½–¦@lÄǨ)Â/Oò+/Í»×Ñ‹¤‹s›5 [R§ÐÁ°ýïCϬY~žFT:ä+YÅX£zèÿGn¡FR±É°T¡3r/€{B«y{šÂ £®¸&°—˜Méª`vÁÄâ{)BˆRôÃ;¸¨Š8^ΨX“¸𻈔9Û÷·2"÷ôm! \36Q3é¼Eõéà8D>û¬ 1˜‹¶ÝEfîò<Ãe¡þæ°VŸ°Œ±/- ú=œÖ/ƈކ˜}À¸¼k“r›ËŠ0W(¾O,RH“g.Ä}ÈþŒW¼óŠ'KqÊÖOåâ>šßm”Á)°ÜéšlèçäÏ€wKh6P‡„?(HnÐÖ*TÏàoþ#â'óŒøi‚ìð,›at‘òÀpîø݆¨ü´¹SµíPt&XldLn]6†Ç › QÕ’”µC±EQK8|ëé:þòUýõ[ö%qóSä〜·$÷O©*T¢\_À=žÝQ„/”ãDŠ‹Ž §df“ü3ZoWZ­_+Õ•ú·›õÿqê¿øtrÒ®.·ñßêò&:}ÊÜ;Såá6Œ *B)%Yc»ÑXZ†‘XFÉCeÞý̺°ÁÚRÈqö•:ú—¹ñr±kÿw* ?´cR³ôéâßVºH lŠd±Ž! ÏÔcsXVÇE`~`¹ŽhŸžá¯(¼•ÿx\qà·÷Ë´?cãñTÎN<›qŸ‹­–%OgªÑ@½;ìâ©îÒ§>‰QúÒîk&à¤áá¬Ø§o,jpÎ0p[pN¥2báÐí £&ÄÂeëëƒöz Š…Æif ½¨aÃÄ×UŠÌ¥6¹3ê{ªÈ®I=œ¬Êºý÷zÓÑ2f¨¬Ÿe´¯¨€¾nçT+iÎ÷s£^/,äGùܺ ¶õ‚©º#&cE!ô£{¥,Ž)\Ø`Øñ`/nLÕ ,(‰{”¾,êžÚèe¬sÁ”ìÎ1©åbIŠ€wv›ž{ï§w›¬hìòšÿE¨÷—±°à ¸ã ×øEw8LØ™¾‚öÉ–zL†ÅO’©ˆB-a©mÑj­Ö# !”¿DÏÒ kÌøÉŠöa„7Ž¥ˆ§?þˆ;î!¿0:>€Ò&^SëêªlE8êõH†›5ªQâe÷uU·èD ê½ñÞÐQ-ÔqJÐ~ª|‚<í¥F#"p@û»kG¯N‹å”qÉ8KóŒÍ¬Á¹ÕèðQM1©²†DÄ6è˜OËšlR*Q" ç×·×?iÜfŸnÖŽuMHÊógV“{ÀïÎÌAöϬ|æY¹Õ¹j«m‰Ø '[šÎ+×ygsÏ·Å~Öt^d¼/×Æ{˜$¶@¼ W“"Éý+p6§ÄÏO·}c7¶‹í"]úI²Ž¢õv‘Þ·I®NP Qê x{T“©Ó/øÉôm©®˜‹$š‰îµá±ˆ’aç·Û(¿Ðvøë\Ö"ë™Ü{AÉ>F_Šlìnu_ïÔßü˜Är#ܘx½ðDóDsîè)R~•ª7E%µG‘}å×ÆR¿×XjWÛ_áO Eÿ«Ë-ûË·%Ýö·¡„ÒVÄÄ`-𗳋ë~Düvží‰·»,7ñÅ«W| 5Pì¡{û øg?©²Hóoƒwáåò¤,iæ*2MÇñ]•’Ì$†v.šÍHUÄE?8súëÅè…µ%ùÙ4ô`IÑü…UN\º°ZŸ.Ó`¦ÎCÅ~],=ŸžÎ_Æ=Í>•#]ç(D)VfKbsh˜F.D† 9®»Ç¿â’£‰ßÍH$²(à I[7¾M™ìL×úïˆ\žƒû~‘â[¿üŒfÈùY/غ¹¸…¹í$ê‡6¡ºCçlŸŠ|,rýwƒCþøñËrÈÉ~O‰u¯0Šx; ?Ù}©¨^.Êq¥T„ê(ñÝ”‘Q9W*0$#ôk áLîÁ›²Ñü»*ä´Jî:ÃN‘‹,;ºû°¤Ë´¥Ë­ö»vFST~iGвõ¹ñ¯ƒðváÕ¦[¸G• ¾ùæÝgŒàfÖô~YëJù>3ºMb2}wŒ[–_1ñÎöîóNyM\:Û¢®¹lõêûxÈ)«ÑΞц§X\w:>ÄÉ8ÚdŒÃ…;œ yühæqà%PãEñ&½sF£ Ë,ý ×õÕÆc€ÝK LPúýÆ“L¼5­•Öëý‹nWÔûø|[_/–ÍűäÒýæ_§ÃÔ¤ôùÑüO¢yp»¼ðÛ uQfÀhËp ƒé®ëw›‰9½žþ4á©ÉÖÞY-ª‡ûwQ<ÍÞÙ#w¨Þœg€ ~a!m£¶lYZNߢ/4Y£Èeít‹¹xzž?ÄmŸäçãÌnÿâf·E‰cò6¼ý¶¹e¹w7«›b9™ v^´ª÷aUgÁä-pZ9mÝCsë:E„ú»ÖxÔXý"X“@?É¿ŠàÂ\ñãðXôP%E|=ůBñUØnûE!Åï0„œPÛ%å¿Ð W@R§¤ÈW ŽëR-fdIKüçÍ.eÏGöB.el¢ÈžÔÒvóåÁ}Ofê ›lÏíviBGº0ŸÂ?:Ót¦Rgª@jø½~JÔ¿¨5Ža³ê3\“^Á´)Û5ø9—TN)É+ÝBåKð:1Çä¬å¶ƒ˜ê¡ü9‡s Àþãjœ4÷eAp›3ë^N­{:·rœ\Sˆù­H8Rí_›Ä»˜`F$XëEHLÝÝÿ:EÃð¶Z¤[‚ä‡ØÁn P"|×_äÝçÐ\Óî¤ëõþׇVP@óÌsLüô‰Z«‰ÇkÚ¬Mñ¢ú× @s ’i'% ¯an¿¤È­­–Ô /Ý"É”ZÆM’TÎ,s£Œ»ã´Â#dϺÕ}Ž!ûþ§ÍoÈz8[¯²ƒÐ` å^Yk´Z+èÎE> ö£ÆR5†}ºÀQúô¹ØyïU¸>xx†ÛƒÌ‚QOJÆá# P£°'bD=BQ®ÿ. El¹qY¸U,ÝÐC­È7Q¬5žˆÊÀ¹ ÚZãqcõ‡ªíë8Ýj„‡àÈéŽ-­ ¼‘ˆlòíT0Õ\0-3î^©'÷æ~[k“?µiº‰V(T¡/n±™j/jH¬IÐóIü »ÔzÝvK»[’ý“ æ…ÀZÔÁxtIÿ¥v!oÛ{¸úN gÿ»(}¸ê²Ì"1îù‰© ŠÁÈ–]k7¾Î y÷——ºœæØôw:c³]æŒ1KœµYCð¹ŽÜ{»ãÝÛ-/×=ïϹ饂²QP8o¿–RÄ‘ûÛăޕë/Êbÿà¾H$t@a©YçÁhИk/¾øgóÍÞ|/þÙmŸ·½øLíÜ»­ ì0Mþ•dúæà÷)àïÂœæíò”Îà«ísÜ毓âÀ¹Ä@áMøþÑÒäj®òðãñÁÐõ_ïï¼Õ^ûÞõ˜ï¯±§«ÐÑVkuåäßOàÕ¾¢ÄÝàacíýãÆ &\{D ×¹™êc ;V.Ü&zâ¼1]LOɲá*YVâ©Â%ñÈE~mø`M:f¹é”3*Èr¡zž1Õ\O„½½C¢(Ösp~_¤ÏFeŸ©ã‰­cÈËps˜ _~üA˜ÈiÃ]oàš²¹g;bð9Ä ;W®x—cxPÓˆéW®DÉÂB„ò½¡ŽkÉ4‘yvÎà Ž£p˜r“}<àèÀB8ˆ6]Ž´þK¢c`ñPü/OÎÐoäU2Fª D/jJ7¡Ánÿ.½; V†ã½èú¬cŽºª·¸£ Òü2˜\\ªJQYŒŽuð•í±;F"UÉ¡¸t÷7õKè¶K Grmóñƒ%·î ¿žeßÔ¯ìþÑ8Ö_¿Åçž•ÿõš©÷×WÁèÝ—UV~™Êì€y›ÍÎÞÑ‹ÎáöÑëÝãJ«”YÊ 7ÎÄÏÏLK ]ÇïœM\eCqLÄ;?¸¬Š*ŽnÂøÒ!{5ô:h4tO~9ê¼ÜÙÚÚÞïìî<ÛÚ~uTë×̓½W;»Û‡W;ÍôÍÎAú‹çð·³{ÐüÉ.qwgÿ'x{ôª³ß`S¶~ÙßÜÛiÊTi_nn5¶¶±¹xêR£öýç;/d¾s­ïµõŠ¢WELÞln”ú@ô •Í&> ;ºñ~ËݭæÛ·´ð{”€¼0ËyA™À´ú•ñ’ÀÓîû1²tëI¸¬{QU$mÁâ‰úEÄ cKÅ;6tõ¤&Zøªe¾7÷N—|/¿û‡sûàyú%œ§ “w¢‚ߪâ4hC¬<Ÿ *%ÇÃQ™«ìnßÖîyNÎú^YÎ穵 GÞ{gìbÙ¤OOSª~þõ×¹ªVæ‹gÀeŽq|¡o*øÚ€½`Ê|׈üx᎖ G>q6V”ØÙOFêrk ­UÍÏبÛ5éEó?¹ÚÄó"xªpàq$'CÍ<àT´JÎœ‘ž?jÏ!|ý”>g/òµÄé¾ÃØ‹8(x¨à— Öa,A`–‘¯CéP“×Ýzª¥EP§ˆ–9‹•ÂR[ÔÏûã>á0”ÙŠZ¿uîux[ÄK%½º †£)‰é}”6b DêÃþäÂó§dM¤¥bøZ‰[ü6GæËwèxçxo=>ü¥³ýóænfBÖR•v#„£~‹&`¾|M ¤G±ÓíkûŸw®;Xð;d pÒÿgïK›8Ò„çkô+: $ar Ž™²M|½’È0Ym[jÛ=HjZÂxö·¿ÏUWwµC2Ç&»cìîªê:žzîëvÅ’3E¥J*6Y”m­ ‚çç}‚ o9Ñø”¢ÿ¢w!ØA·(°dt>u{²ÜV;DB­C?GF«C-¹Ú»Th,ûÔ•E·j?V;¶ÄFHÅêfˆN¤äeU%4p+ñ½¯’*aŠ©±,Õ¼ìÈKí„“ß¿3…ߺœ…Â5dÕßm½Ÿª¥7é,݇ӉpýrðÈ àkÎ’Ð1£gÜ,7EÌ¢A›¶¥ËÑ¡MÍlgÅ'IÝ«Þ îÝ“ÕÐ2j‡ðËþ/Oë(Âàp ÆìäÆì¬;æ¨hÌQnÌÑšcÚª48ŽÂ]Ú/øô¾ýe–“ùðV~Ûþr¦Ècá=2@eî»ÛLâ`í#—¾™aH½Æ#  ´§Š1àuQ|g"n8_ æî]Œ|Bà öÜŒÅáhâêÛ_õƤéÅÌÓ§]hô]*,Qª“nŠ½#^—ût]þÖæY«P7Ëiíþ[w~^·í…ÂXé/^¤úgÍ­Úh‹Ï” –²$ÒöŠ„• ¨+Ë”a„c6ÏIë !pÄèãHa\Ü^âdÁEûíÈöþÊ f7õ^¶uwÎyç씹æ7ºÞ¥Œú~˜Š¹·‡Wàr‚ûö˜’ÃÞ‰"‘Ò\55è—”(À-Æ(žI(l¥rÌþÃí¹NƒÅÔôNÐÿD”¶ÒCÎD9àšg={ŠQ@G9Äc Ù“‚@^È,8Z žÆ«¾dÁa=è]kî>Qy/›½§EP Í€] %…>‚F©d‘ <7f⚣ÄáÅa‹«à…uÔÉ„u‘K4s3—õnõñã'écŸ Ú¹v,€ŠhâÎo$ê|gáx«„…w02‚©¥%ÅúȨm:=éôÐ|Ôl„DŠ?ðešH¼z*1º1H¦9W–&‘·ô&çg†2Ú,~ÿæÍ£ÚÅ{J(^ü>xTÿŠãÐ;WÂwÉÛ0¨BqäC^´ùàgg2ºJë ™a Q{I<¯¢ážøÌgøsëòÁƒ-¤b½N¢†IC² [èW)\¾¶RZ™.ØÎœO\2‘c„6Š‘ gô†gÌÆ”T`>BSÝc“+-© ÜÖpÎJt¹ApmÂt*¦AR+iÆ/nZI×9ÞYÒ£²„ó%©+°‡îÍL4TŸªÉ€ûz6¬dD5 S7"ÂHž¯_Ó#€òÕÚò ³¥…ñOì×ÒW¯­êÁ9㣂›l¾\¶»èTïéyÑ晿`Ø»O…Qþ2Ø!ˆFq7èð÷¿ý4†CÍK‰RX2Nj—IëŽæ‹)ŠÏŽ";f4cÝ@͈&UÜÝWõ¯«Dq‚ÓvSW{$%: ú„Ìr8ˆŠ±¡`¸óH@Ô%V6ª²&QîÅùÎí|*€¦ßP±¤Ž²ˆäS¥à®ëíª?²ŠYZ)»57¦ßõY{½SkIÒè›|ÄÎÜ—~âÞçÁç—÷äÏÿ>ÿüÞÿ Ñ–ÑJVf]tÁLðY:œ7½ŒRÛ±QÏÍDCvŠónàDspI¡óÙ-"©cA§MBþ´Þɸd—gS8é%ïF fnÛµg µ!éœ5s±HðÀºÐ)D™Cã™(ƒsKWæÀ¼uK[ÚÉÿü›o” WáekB!šZBRF_ö]QFæ¯Âà9à’`°o¾1Ó‡™¢E~£%G×ÓeCYC æ°W (7šÌ•ÙvÃøm”(æõ,žgԦÍ=a„ïeí™m@ŽSû+œu_–Í*%Gà€>”ß–·ð™ÆœÈ!ム"ƒŒõº®²kùậйïºçy‡+òù+­íâZZ•ùØýâòDÆmý¾¾¥õ}{½MÛY¤ýÃ¥_ódŒY2}­â H ñ¼?3º ·Á8.FQÁ¶ÊË¥[ï÷A^Lˆå(­t½“}\Êû¡ºc=)-s½c=)­v*/­ÚãÝ„®‹¤¬%w#NWÚ–b#Ï%T÷/f@2H3²i4!ßD=€qèb¦ÔX¶}í_`¿K£ãö2ô Àòï¾sÒüLí: È%ô>„>II%¤óPžœ†ÃaSU0\4©CR‘8n¡Ä†–ç6ÞdgtñD¼€m[м…ÕØû‡È‘è`1›1e)_Ã)V3Ç_F#Ëd"ñ”:ˆ}y+ŽSñø¾WY%ƺšՓIM&j%°Í1ž¹eYšäh”h÷#ØHö$Pãñ.²·Z‘ÁþÖ_óößy‘=w«´âËØ‘ÿ¬ë7`¾)ÊýAë£ù½¾”/AJÁ•~óðò2ºÔ‹Ôç&96‘G›[JíDÉã£>&¸gxéÃó÷Ÿ’(ŒÂ«¡£À—2n˜ÏNðŸÓÃF¯Ur)íô™R%5uCµd’CIR g—p“9ÉÆ}rÿy>Z~ûw^82fö¿ü ¤¶Wsëƒå€ù\5Q &£{¸k¹©úu³ÙÖè¶ÐW§üFû{’ß0Ïé›oJ–UÂq µ$$ñHn¾l5¿o+=´Ã›ÔèÊɆâœõfÎú ÿT)ù¿¡Lµ¸ùؾè6’œ¼žœ¡]žKN‚Fûu5/Ô">$Òæ¡òùIñìÈzJ¡XZxÙàæ,Ü‚´kÉô¶’OÜ/â÷,s§ø™3mg!45Û…Ü9@®³Œ6ÁÜߺcÿù¿U¤ÿJÉÏíÂè0eÑ7rÏ{ºØ4E{9¯±†¨Ä|,JL]q"¿~Ìø‘¶c0]Ðâìc„Ž$­ MYÀRqoºQŸå§§­EYu†Û:3ó“RKiÔÅÔÅùz"8ÓEäw‰.cÙ:5wש”øÈ›ÿgäñæïâøïâø*q¼ Òø¿r¥ñf8N£¢ßó;¼ýÚBr9Y”>RXÿ]Dÿ]Dÿ]Dÿ]DGláG0¿‡éÿ_ ÓÿeúæR‘¾é•è_4ÿüëÙ×ñ=f’úsø.ÔYˆ5Ùfó_K¾7û!¾ŽžUÜD§Bk©K.ærIƒÖï•5þoÖ/<ƒl `¬Ë /e­€À[ËGµ˜ßBÖ÷žg¨ƒ¶~V‘…‚¬Ésàr—*¯¼yóÓOÈ(¾«À4ö‚÷p&ŸŠEÎ3È›²Ç…Ìqk¼)cœa‹ 8ௌ¿ ù"Æ€¸¶u9øpƪ<’`I›-^ÊöP¬å¼ð€ÿ áL‘Eï±Ú”ŠfF„"à-Ê®*Vj‰q*¼xR_[=ö¯¡)å©÷§¢ÜŸjR좋ïÇ'ýN¯×:X@È Èør"^DÂ× ÐúŒúU…»ƒó€K˜#Ë¢\@’khG†Æžüú$öEò/NWOV‘Õ“M©*,ÙKS/“5)jn€ßšžªèv$]\aé&Aø4vÙ~§›· ›'M¤›ƒËĦœ'¿áL~§›¿ÓÍÿ<ºyâ%›_ÏØŒï_Å“!†Éb"e"1ÿÒô³Ó\A?;ÍMég§é§Ÿ³Ášô37ÀoL?ï¥!õ8jô3ýÓ‚­»°èéV5ØÙÞ®¤Ol½û8‚zgÉt~§¦ëRS&¥ ¤€¡‡pÿ -݆KÛPn²Ej•ë ŸXµÉV ê'~T˜Ã|YÜx LØq”t–ÆÉÅ}ø©ƒÖó³cW+Åiáâ ÀeÄæEàþ ²[þôæÈmë>à` €nR¿wrrX†Õàrð·ª2¬0"ˆæ¤EÿYéÀ“¤FWOö·j—AídWÙ?`ØîÙ³n¯¬T~‚ÿ{ó¢2fzN0Ý@à“Rã¬ß8l7º´êÌúí¥= T>¦¶Sœ|¥ŠGñüæ 5t633,NÁ>‰ç |çp"ÚÞ¬“&n0ÕJ)3b§¹jD@ì¹;0 Ürå>ušö6!µø»ÄƒÊ’túËÖvÉQkx@…$È¢3NpM°¦@ÐXÌDTôí*IÄxŽu9‹¦H—ß…ñˆ’ÞÙ-0èE<£’ß:%̽4@^&KLͳ„T­‰_æ’'ª×ÏÍkãä…ÏÈ*†¿ìÓdÕÇ8ÞŽ?H±up•h9Æà eDÁ|I Ç’qË£å2 Z–$]å?Ï|2š…£€‹W[Ýðl“I 65ÂÜZ41Tgð¸Í™Óò$› †N'ê²ë)â =¼±a‰¥f\5›áÙi›ßy‚Ôh„lªg ¤ mü¾/­3[ ¿"[KÔ.ð˜r/œõ«¹õw[™µ#“w ÞŠWéÅb4º©©ìÃx€“OTEZ1p€ÕxGIÐŒx-:y$}…îˆóžB›{÷‚;òˆ3 ÷µðê~\ú5LífS=‘‡wÌgïXÃgÝ•¸UŠš?ØJÀ=îƒ`Õp%Ç+iÈ9jéú‘Û2f¾ßߖ߀:çð¥0 .ÒÙÃ÷ÓËÇÏãÉC:üT.ÜüfŠéâå¶E§Q)¿‹(›x&’OuO¯ëLgæLDöÏ®97Ùs:ìÏ1Ý”µM\’Ãä:Ãl¶ºÚ®×–|ÑÜ%Kú+ʲÞ?¶¶wv=þêëo¾ý#?jnOÝþ6YS䇼èí æ:“ n—$g¾¦T0ådúΚî/̔ރ¡}Uƒ`¬Ë¼o¦·ç@¿ß–®¯H…3[DV¦Ô¹½#Îïf©ó1g­[•%áYf/a´©0`ËÉó 7÷éÓìc3eÎLò0¼óðá=Ø«¡5LY²«Z|fR3® ÔÀîê4þõOÛÛÄK‚Š'˜)70·Ø˜Ó¨aÒpbt+ÚÎvPÍõ¹À¤™‘mPúŸèýt؃ÁÎÿ”ÜŒ~ÎXµK󮣋Ì-µ;™—K €NÞ  ª‘ÕÉbêt™Ç•ŽŸ×`óMð§æÖv…°ÿüâ® k 7Ì w_¶ûÏ[Þ,c‰žš* þâ’Õ Yƒ® ÜÜgÉbR \ñ×Ýv`ÒZ¡W}2#v† íqM …ÀÞÃÎÏÏUðM‰;€E9(5Ú‡û_oï‹ êmðÏ 9<¾ç•à©Á ˆ*4ˆÀaRû}ú©Rùé§$¨D?†ßTïñ÷mü‘_<†‡Ì(ñWlQã-–²KâóÖzÖ<ÀÜS³ Ñm¶Ûœš‰S½þeÜûëÎöÎ=N0ר Ã96”8Nê'ó¯6 Í9ÍtÍI;+5Q…¯Ê»Ë4a188ŸñR»§»Ç‡û÷à›Ý~¼ ?vvïñ›ãÃÝÙù _Püß=Î,…™¿PkÉÌÌÌ3?ð &/ñ÷¬tUfÇiÙvý;É ÂÀY£Sæ|AÒenµ‚¾'CèßͪÂòŠÛ÷^ ukˆëjžÿÐêtÛ'ÇT”¢¿tWUù 2÷ÂV7²O‚š*í2qSÒžÎ#lŠÄ¨š<ó¤O®ÑÔ¿ PWµ¬¦U§b¯Š¶¡ÝM¦€÷¾`“H4£29hjĤulÁÈhû‘XOà÷wX0try½®…»âÑT5Ç'Çífã°ÿò¤Ûój«L“ggíÃÝÆå믒kR­ÐæÏÇŽÖzW‰¡&'r\ç8,`ðíÝDÛ­“S>Öî×hÙ÷ƒŠå®ÏßÓÎúv+t÷ÌÄöá’ØŒ«ç›ût`²~Š½°Ýõ£Ý¼ç<~jpsyOÔŒ6›»Nó×æäªDR÷'ñûÍ? ¾¤]칞OnM¿á.ó‡?ùFO@^üö׿‚ÌÓ‡VØ1oë<% lMðŠŒ¶Ô-§]O+¥Û-×JC˜ëvÇ?\Ž—ò7sÔA¹—Œô}ݪ&f…©øXƒ(ù­°ª…Ž'«06´1ÐÉlO0‡ag/­R ë˜È é§è„~ ô¶j"KЛ ³¹#Þñ©ŠœfY(r_ÚP”y³¼Í`óøý¿Mþ»Ô¾©?®ï>?~8š U?þ”ß@9øëÇñßo¾Ú¶ÿÅÿví<ú*@=Þýêñ6´ÛÙÁæÁ¿ÕFÊbô¿ÿ&ÿ¡×Š9u࿵þz²ŸÃ¯Ÿ}ö -£Ê†?¨¬c4“éÍ,¾¼šåf%ØÝÞ~\…Ÿ;;5øñ(x>‹"£.æ×È/?GqÂÕ =Ôi€W3ÔÉOHÞ$óyðgÂúh< 'ó* i•ŒÙvu§2ðǽ|+¸ JÂÅdc”ò¦(>¤©x] ` È™?z0ŒÑ:z¾À"Wó*ká1þ ; 2N†ñEÌ*åY6׆)kóAžŒ4C(ÓhöÕÖÐí¿táÉ>©€þ‹Üy¢YŽ‚ÇÛ¾u »Øi8#57ªüÙCLéíAb7FóûÆ  †Œ §îâ®?Þù°´¿q§õCÛ×Úñ@PÈU\zC¦Š¾Ìwÿžîz¯ÄofÑ»8÷JŠjàô¯ÛðùWTHTÌ'¸VS ¸),xø'›Ü¨QÔ·`2 þŽÌ?ÿÿo‚YW@Æþ¤`9þßyôÍ7-üÿàÿÝÝíßñÿo…ÿíSG jÒ T—R¾ü@µ`wؘP ™'(Ò°Œ2MØþŠ0ú7ô󅤂¸5¹¨ÿûÓ ! _e¦Ä&Pª·†¶*,”7‹8'˦‰P§Fù·Ï“dÓ §SÎHΕ6§=‘ºréÜFµ¨\Ö•µØm>x‡Z”Q÷zÆTP#Í Éi‡ê¼±©]ì)gŒ&=¼æèUgè裨VåºΘÞº4NÛ$™¡…œÐL~š.½¤. wᎪ3G‹S²`—ªÞ4Øç1Õ¼å2¬#ô/!9ÔKXL‚¾”à¡ŒñÐÚ&”ôgÑ8BÞˆÎ5ã¼ç1Yw`!¥œ‚žmûº,…Îm_J³€'‰È×|#ÆÂÓç¢IÚï'A9žç¬(¢¡Ò«xrCÞSzã%jI‘ á9ÚôÖÊQ‡s̬Q¯Ð^vôXh`hÅÛTÕGŽ{šÆd‘…ç´ž4áBœbŒ¶r0Z 0qž|,vƒ—TI‚´©±¹Ô€¯lš…å\È| w\*”ÓnÃ>H6TDÃAX;2Do þ £ øR 9½^I¤D—©Ê—SaY kA5R¿ð‹à©ÍeÀFú6h¿xmEimnúša´“Â`kv¨ÎÂk, aF5cV ”aÒ¥áPyÜál~Ä$W\ç< ')ï-ƒ•úšÃ=™ð‚T1; eiº;˜óá ¦/XL}³ÏÙ©êçÓ$žÌy õ *ÕIÎï¼Ó¬Ãáæè3Çù°Õ<©—žŽIÜGG# 1—šÔÇUg®ßŒ¯A¼î°¬'Ϻ'‡­žÃ KÕ¦t-κ¶Ÿ¡g™ò‰?9íQ§ÏÞ˜A [U˜»Î:3‰£æg™1lïR·cß²1f Ä;YÒÎ?"Û_ÚÇí^f:ù÷üØUQAýFûµw:Ù6ž‘hƇ½£FûØ3û­ìÊï_ƒ¼ËŸÅaïà°ß:n<;lÁ»½Æáaþ\=m F:í´NN[ÇùsuÞo£ŠÆ(ÜCÝÀ?uùw€Þxf-0‹cŸôæËö­BØζ+8ŠÎýƒC\k¿Û:|î]M¶MñÜèè›MŒf+œ—Ýfù*1®(GÀ‰ €¥Ù¶Å#£ïm»ã9w÷}Øö¶^®Ø8“lˆ^áÒ ;,ß9ø½ßíuÚ§K¡Ã´ò`>¼þGí¦ó™w(füâø¬gÊËâ®ÖáIã ñ#¹ùûÚäG:hbl¤˜­Z½—'¹¡¼VÁv&ÂsùÁåZ/?µ‡'ÏøëÑ3¡}ÚZ òžæëÎþ´Ý\sæ§ÞC΂'‡¢.¿ò¦Ù’ñNº=8D¿­bàÍ4ËŒgSUéν.îNBEÉ )S­6z·ßú:{Büò(ÙÛÊ3Z>.0?–§Mv$}ëx÷³«Ê¾^ã­ÞÙi1âå×~2ÅwôàðyóØO4íËo™›l)‚Ì4-dfT(o?#¯=hªÝ%Våy£Û+äi¼ x :¤2¦^¾B½]Òùù7ß,éŒo—t¦ »ÂÎÊWx2<9]į;­–m‚w$o‹Uszýz½Y™vËgõÌ GÊ~Ó.#¶lnV»åg¿rnÅ#e¿ig^[67«ÝrÐZ9·â‘²ßì¬hu ­³Ô:kÀš…äßû'ÂY"€…vÞi8 flÚÍUÐn‰ü ÀÜ<=õ£»WÊÄ@ŽÚþÿ;;A@£ã™TA»"¹u•D¾¦8ÎÑ£^t©_vköjvòãuýª"3×þ“..ÃÙ'¶þ¯´ÿl?~¼mÙ¡ýÿÑöïöŸßÌþ£Nm?*éôø1ù'£ð&š¢yÌ?K?øë·Ël?Ëe÷yŽ\?ÔƒÂÅåU8ùOq“Ï×ÖYü:êÑîÙ‹Fǣݮ‹v”²˜ôÿ–`ºM önt^ì ä×y±[¯×W$¯cíÓY2\À*±+ÅÖQWþ N,Á@L´¼ùÉ$áÈ¿«(¦ô;iš âBWë@88&ŸkÖ^£BV,AkMšs‚kÛÆnýëÝjƨǼáQ8Å”âG+·cìK›\…C©CmùLÈnèìå7w¾ÐÞðÆ›Mžîâ7wv²Þ¨n»Üƒÿ‡öªÜÙ†84J¯â‹yYÿrç¿*•ŠÂîj6}ßtxäÝÌ„ >»ƒ“[ï» ƒpV>lw{ùshþÌœüQ8‰§ JJ3~Lši][-•Ý…œçÑlƒWÙº d­`2(Hâ{4œ(³[ÿêÊ õ÷E‚Ñ}pã.".X‘=9˜º¬ú'wyÙCÝæ qÎÃ<Ú~‚ †a"XÈà'ª«n v*;¹sÒLÝ-Ξ,ÅÈP»Ÿ(7ÚýpŠU¨ËGf礆z€j€:¸ã.‘««ïeö’v"±Ìš Í ¥1žSš¬1§©Ì;¦£EÜÓß»wçp®e2—˜Ü‰¤_×íáÍdºtðÑû)\t «TÖà€×G¡ð}k6!¡¾ò( ßIÍî®Q‘Ðꀸrò.y +<-k± Å 8«Ï5½£wq²H1i“*R”5TQiÀ4ê bªh<ßT,_¶ò"†_‚£¼hɃ’’ ’€‘-ot£÷ÎZÚBéÕè÷ã|Ö é| 7ES4™žy˜ðü‘É+ë+€¾ 76–» ’ ødXaã›Ü“;x~ù}¹ˆæp+­©½á¹­ ̾¹Ð< =ÂC³ÁÅš•ê)üãªLO{jìÞãå “]Šô¼Öëà/oà·çÃnëÓÜàüµñlKÙ=€ói!–—Œ;w¾Î_<šG3Yfn…¾âMøxr[xì4›_þʈ%¾°$4Âkƒð£‹p1š—i±À…W`**VDŽº¨‹ÈGÒÅÿ §Šº ‚‡;PU2ÉE7&åÇÀ2ÿÁÕgŸ ÌA Ÿ‚Äü”§‰?:áÿ-ÿoÉßô›Æÿì~óÍWvüÏ.Åÿ|ó»þï7Òÿ½ŒFSÚLÔ< W œ—ëGzuë…eôéûýŸ­Äp s %'Iò_ìûHJ¢†£Æñ‹Ã–¸;:\3?¢?6T=8RHæH_è)ÿÙGîò|Î)ûdùÎN¿g ɇµ4jÙ®ý±ÿ¡ogÖÝVïÓM¡'—ë`A·„Å~û+ÈnÇ$/r–ú³m¢ƒƒÆgJ•PEXšâK<Ûx—ì„ô'ÖgRU;|DZ³è׳ûhíòˆùc4ÜH…"j5f5H1- Ñ^Ý ¿.‰ªËoθ"qpgGíá½;»÷Ü$¿rníç+Ž¸:X(3u(ÉÀÍð`¢LÊ£Éðx~üUÉ”Iß•Ï™œ¹#Ðów¤§¥ ‹yÇgLJ­nW:t}û!z=¯ØwÔ:¥Þ*WTRÇxb.€™™J›o‹êqW#»cé ré ¢ŽÎ3 ¬¢qX½µfD›!´å¦í>åHûÉÊ6m #ê-£E¥tºÑÁ•<@lîaá±mrT˜ëÊÚrŠe¡|;5±ŒXz0 ÕÇeÌ(è¦dÊLÃ`.0FBA:‡tx0Õ`D54±?ç­Ü —¿}ÜrQG$ NܳJi`hÁx"•ª¥R¹B ¬¬ˆsIi­íü‰ÒGdœ–n E B‘)À¯Ð‘ýèß`’3Ê'‡yº˜5ˆ [sb.yŒXd;®cDëEqÊ9NNôù\#‰n@†ÂjçÀ7DC•p>ƒÌ‚7ÃQ2p¥o¤ò(?à‚µ?UVpOíÖ†£‘5=ƒ‘FÖ0f¥.“„£7"Ô[£æ|r5Ì,œ,RÒÂ’Þ5™NŠ’µVUþ0éš ¯¨ícYsªBŽVGvp†ÅV°ÀA·QŒ 2Ø=®Õz, ÷¤fM=$õ>ܤµ×ªÚ9gü Ù]HebL Ú¤ÈeÊÔÖ8 ©2ë~›¥Êž .è¾lt( ÝêѸê¡KÊfFë5zèg»z´i<¨QDÎ$©MÍ8¯Ú½—쪻zˆ‹0פ>±ž–ýð'A²ö ]çC†&•ºÃºÓ%*ò³ ˜ÝÍ‹dAD>˜@%Y*(«K»µÆsY\fe>‡[ÀàÒ²ü-=Ìp¹ðÇ£ü:6ÎW ǦœÙ¹qiµ_Kac.âG‰¦ùê³ñ[³]ðÆÈ1^YÊŒ¨„§„2Œ¸‰Üƒ ug÷&É=–HÎÒÏÁÜÌÁ§¦9ÁÒe®\ÛXî}_í‰ÖvÝÙ©_Äÿƒñ+:Gf£óBú–ß(vNÊ uû/[‡§}ö¸(¿Él×}÷ä¿öO¿Ñý¯'Oÿ‹ <œÔL6sŸÏ€UÊúö*œêF9½™îßùYò÷Ô¤ó+ÙÏä¦<à„s¸&áyû<D±*GÜ$ɾþ^ÞÝW‰³ ä1¥ñ«êO*_(Š'OP%Ñò¡¤/àÃ!AU{ô¥u“Uš’ÄÇ©›~dòó+%Ÿé[Ê©oM‰Æ?£žÖ€¥Ïtì×w Ï¨‚ßTÒëÏ‚ü•>“œö:«=þ—9—pO“;`ñéR‘Å 0–`¥/¸øojq7F¬Ø&Àz%)”1‘!bH?¨YŒ·3‹ÒrJ½DŠ)¿¹ÁaaàåüÙjy¨üf’0'kRz§OJâËÝñb"`ÉëŽlMXO™#boÄÔ:ßÈ.«’å5²3r«(“­Òí”CŸ˜t»5ñÌLÒ¢;ò3Q.`9 ô“ЖwstFÈ ½Í“yüÛ’–º‹É ½¿-™9™¡f…d†÷r 2ãLõS’šA™á—y2“}ÿLeôþ|**Ãn•I˜Ò8F«šVP˜ ”y( Í`…)ÖlmJa–´>…Ñ×ûֆ籌¬ñì²–P-È­b)…±{¹?…ÑßXJaìVY ckק3«¨£Ì, 9v›{’@ëžOñùÓ7껈 Ù­nI‹2ÊÝåÉnœ¥KÔ÷fÿƒ¦lHkVJ‘(ß:>!¡Â‰ôe"äÊiR,ešýçÒ®ì–}" æ » OJf÷´èXö1Q³ÀCΖC¦›oÜ3§ôͽE…Ö‘ iÝÚ£úéÞYžîeÑÊm©Ÿ3³_O LóROo¦‡söÁŸUc-ý›¯ÙO†~#¤`–“xO[Eç• ²üæèä Ø;ÛCËÑ­™E\=ï1éfÓç=6–eÉ5~û–´ú<™_創6­²Jé*>*¿™.ïÔ’ò’Ý|F^‘X!†~8I&µS,†EêwWÌÆ83—TB^A-q.­üi!Ì©Öù}Ý Ku ô_†âš…ÊÜ× €ÜIˆ þaÑA½ÒO@üôXŽŸ¢aŒŸáb©ÉD¾Ujd`C«­†~_Ðn િ÷)‘@³¤i0°?O²_¾ŽÂ·TׄXï*üߦ¹nxá%ß2ÓïoÀ½¿À'æÐÒÅ$I›³K 63{%CA®¥oãàzf®PAÑÑé›m0‚ yΉÒÀ[Fu‹¤žô^¶:”+àô´Ù©i&ú¤»Û?j|ßÂwÁqÏüþ¬Ù4üÕ΄ Èãy¬‡rñuz|¸i4ÿÛxÚÇ—]-³…ãø2t´h.¿µˆÇ¶yÀ¼ZQÿYú5H4jŠÿï¬Ýü>èœÈŒP‘‚¥xÒzzåŽ1ô£÷´•©=lýçQ8p»Eˆ@ œta•­£×fÏ°Û0:_\^bTúÕ|<*èJg…óžn—ïH'õÁò!h}}¹¶¼˜ …Ц%BÒcÖ&€ì¬7½Œ ·újjÿµ˜§ìDÝ·  „·v«áßÜá,IÞ‚ÑôÊÀ1‹÷Á+ $a·›‡g-Ú9‘mþ±Ðœ¿–>Ë¿‹Š»0*•ÎzíCøœ`3W&°Qšó†Míð$éרÓb†•¡Ḃ$Áø`MÁP¦ÐÓRó¬ÓÅuÖFÒ§†ÉNÆÄ r]± à6“k’£@<ža­Êw!f›cŒTHo€‹ãøÏ07`p]gºaå2y²Õ»ŠFVìªß9@’jóÑä]¿‡™ÈÄ£p÷s…1Øô:$éc8Ý)ÃDj‡>0c@µp׆híZ”ûÁ®—¦ˆ/.Øž€pŠvr¬CÛ쇳Yx“VI({9æÐ@µ:À1É2T¿í*ãÞÐRI¤ K<1²Ïÿ˜s*•P€.kØ–ÏÜ:ì;e •ÒgÑà* žªKé³Ù8¨]À\úòU§ôY]1O‘N3èž6:m„È<Û æJ0[¤ §ùéIWÅòƒë1Š‡¨­1K³Q±|_N°z˶ÁEœNh‘Jzª"gГªxt¡éÃI©DŒÂÅñ5çž»šÖ‘øOàѦ'ðhƒ0S\¹÷r{ow®­ÑÛÙõ’0ØL6Ü çÌ`}Ÿ²6_£Ž GQªŽŠï+á…8GbÏÈf.—ÌI-¦ué»™=oõ…À;û,_žöOÁÖV ´WWKÌ@þÙë)²®w4 sgîçð ðƒÙÖ+¿ž]:Ü™ž,ßDÙè‚Mò_Ç›^Çk_5ו×æqæÚ˜Žµ5z:W>åßòÎaK%E7ZºÍŠ£ú랟t¿z¤¢oà“|{Ô1X:#8÷;Tž½»˜@7˜æÆÖ’;:ÈÏÖ‘&yÊdfªfW{_²:-éCÀ\úl4qÚ³U#MJÄ×_ÿð¤û|íéBÜ ÃG†Šû«Ñ7L+½~™&æ6´§Öî´_o2«x¿/ØEÜ=k~–\æªû®˜ªigÏôd¡ ¦JÂÓ’¹’ÚßÙLÓÃ?ÃDÍÐjh¦hÍ6·­YÔk:ä®±¥´€ÄîK^ñ~„8Öm»Óк]…`œæç¦FQ˜‚ú4O_6€ä{^ú&¿Jª58ï§=ËÔzxÏpÞ!¾øìHfµp†y~ØÓjjGÑY@÷ JÄËù¦±r@]Žh!5¥V P™°EÆÍóKñRëmäÂ)%5ÿ¯“y/Kƒj@V£,ü‹#ÈW<Èq`ËŠÅã•>¿ |º[þ—MV?”(™R2õY:G²–è:ÑÖ2Xñë]†(Â?Ù2x<½Œ¬Ê™ÿ¶¦Æ:hïÔD'ÿɦÆãé©ñ—óÚðb&;7ËœMÀáÖ…¿å <œ§êV"Ï9tºÇ¯ƒÜj“åÂÀ¦Ó¬ƒó".ñWþ²…\ú‰åÚ|Þc Ô/€8bòs¡¥ží ÷fƒ¯ƒñ[˜CAÉgŒ/.2C­²è8æ¬fy-ÿ›‚Ù0úøÙ±ò¯Â üOݲ²üÏF÷i'c ¾Þé’þWý¼RÚßm?úöëà°}|öú7øð’ÝgÎà·šˆÿÞgÝTŠç±ò¹T”J>͸#Ïg¬ëhÕ½´ø¶Ü7Ïwè…Ãæßù„»¤Á¬«Z :€~M"LéJI^£K4ú±hIñ xqôÅ|l7Ébf¬v AžÏ’·V.zÁˇ7RL Ý© ÛìFz µÆò"XLôtê¥" Íã9k„B½ðgŸÝ~ŠfáÅöOÒ34kÈŸÁ÷ £vò!¸KÞ’¡-I•‡,YWÈapFÃàû»ËØú¤¤¿û¤9Ü¡âª?ôÚH…ìµ÷y1hee÷ÍmxnÞuç1"Ÿú<œ!L±oײåKSÉ´†-€wˆ§$Ó<äÕÈ(Yú¬<Z®×ƒ=ô#ï.®‚Zð?8³\¯ÿÁ±øA©4E£eS/}&¾t[Ç ¦ ›ìHý/OÔ·>C0™a nõqirùÓæòñT¿‡{=büål7¢Ògø2¨Ýó7 ~ ¢ËY4 jï‚­i’¦1¦Êo0 ÿñ%{! sþ(ÿž'³ù/˜³ù—ô|öö˜l‚~R¿¤7):má•xÖ;|"UÎælRY¢bÕêUÄVÍÅŒK:Ò-J94J¢›T׉þ¾ˆa‹Ð(M±OÑE@9wÚ61 qƒQŒ @çtï´;Á~ð?Óëáÿ”2Tý‰r%ÐúWuQñŒ]á÷Žõ{âeiH¯{9 Jƒ^%D²K¥îG})FGØÑ,ýÓë¿(Ãátú‡ß6þgË=cüÏ£o½³óžïlóÍ£ßã~‹ÿ> ~ˆÑ €"Qñ'¿ )eúš…abaðÚ–¿PÑ[ÚÞ¼õ_*é?»þ“ãHÿ›ÞÿÝG¬ø?ªÿôø«ßïÿorÿï—‚ûVͦ?~ûmþ1xNÒÚŸëÁ³$ºWƒÆ$øó Ñv{•èóÇüxŒéó_G³ä=4˜M‰Ì `€Q@ÍÓÀT> èû½—ínpÔÀà¢Æa¿ŸvN~h´0ŠªÝ­Iµ=9<ëµ ŽO‚WÃsÜû1h½bÚí¶p¤“NÐ>:=l·ð‹Ç?gÝØè?žœu‚“WÇA§Ýý^}ùÔz1 %˜ýå,œÌ™i¡Ä 3Žr¤0rÉrŒ}/(üí&˜.`™iT ð廘Ø>ÆõžXl›EXÙ“ãØØX6#Ìrà̾J5¤nÄê h–bÖ»öW™¢š·Còä“9Wq°5§Á^¡*IEB‹þäuHg¬¿C¡„ô¹ˆ5ö@Ä zˆüUT ^6~hõ›'ÇÏÛ/ú/)²PS¥Ðïh_2½N›'¨RPXLâ°XR/Ìí€Åª±94Ò dp Dd[ƒCŽØ;QÕYBO\ª 1‹Ó·dÀ¼Œ¸4=W(£–ɽ—vƒñ#­ï ÔÙöOú–ÔÁQ«û.£~¦~õ´Tz—ÄCèo!Ù2ºTöçäYY)ýLn›p0‹Ù¤l5¨TöJpS°zk©„„xF éö7šïi×ï‡÷à»m1•ǹ橤ÛZLbÉqkØ X‹5D7¡$‹àIr' rj—MT'÷?:n:@6ŸüN\ÿè&˜ä·£ÿ;ÛÛw³ñÿ¿×üþÔÒ‰®¥ºb:V®áDÚ(lèa†éÃA=¨}ÿ·ë™QšÃd2'ÚÈôb6¬©€0e•àÆi8ïc>"$¢ôÇ,º¬c¨lfÌxÒ]™Ù±ÙÜO¥Ãöñ÷­Î~Š‚6üñ ~OÆ#Ï ÍÓ3©‚²dèR šíýíö×Ûž!ž¯7Ä\Kÿ`,1üïI:ûíNãHr3;9:m¶:KÇ.•Ú/ŽO:­ý@þýö+õÛÎWõ¯_ïè_·a 8âQû/­}àNý‚ üãr”œ‡#ã×4Œ¦ó+ìlM£hz•Œ¨ù(I¦8Ïnó%pdºI<áB”ú9Fé±$’@5EhÐSM0TÝè)cœ‘šy%À¹S†Ÿ,Jv¿ãÎV€ïëöÍï©.GðC«ó줋tGÓ—gÇßÃk©i ¿µåèbP †‹A}ð+gV ú}`ûÝ»Ï]¬@Ó5Ó@ ïiÅ´oµ_4úÝïÛ§ýnë…õÜ0¯ß¡æŽ˜ ­qxxÒô¼ë´z=ÏO;íã&Jíz^¾hâER“ð†çÿ—Õ”uuiar3õ(GïÛÇ/`1Ä»io½l Â,¸óv­†·F\zuL+E›íêßKÚâ8Œ0©Sp¿Îñn4q›É[mlT¿`kõ«zmügÙ)€MF϶•×è×ÉO23åǸ †Zúö‹fQèI×zÆjAÔ'2«ˆ*0F†½5ôTvÆc¤RgG{Á4•’¶Ù˜U°ùéÊ÷«ÉÜü¸ÃgÜÍž¸Ûa{*X³³§ ;FJPõÕl\šY‚»JßØÖÊa2{ï‡ÁgÏVÂà¿Dš[ïâÆ®­ÿaU¶;‹ƒ½Õ–ë7Ê3„ç(fºF†Â/Á’8þ¬çbΩÒýpS¾ „Û{ä3ÓÆwÀL?—1PÏãæ~ âÏ0…³HÌÙ(-Gå~<Ñy,€7µÕÑ<%4Y 8´jÿ›RÉÀÎ+A†ÛÝ~ÎÐ'¤=±óiä>l^¨®™OTî ·‹~¨šk°}bRrp xTe V3ýMòOì„™oÛ/TWsEžXù?ÜŽösû“úsÞO¹ËÔUÄíd?Wý¬kúÄN:âöt^¨®Öµ~b')q»:/~&ÀWaAÔ&é3ˆÍ£ýUø.R¦¶T©[Xÿ“2ñcB&ré¡ >êÕGb€É¶°Ì;gŠ;3ç…Z”‹•ždÒ¬dÛ}§Æ°p™£“éí¼Ð]5î{b%rÉt´žë³Ð˜ÏBg_Éž…ýš^lÁ:=K48ö‰•Æ×í½ÓÏBäOì´4nOç…êj#þ'N·³ûFõ6¤â‰åÆíê¼0KÕ$ðIàĸ‹µ^¨®†(=±óé¸=zº‘\Ií$íÌS=ìÊ®jF(碢Ø!ê–÷_‘$çÚO¬E.""ž¨ }JÙH‚œ¿šÏóã믂$r¡ i>o¯?ïච3ŠÏ]Æú]GöBÿǤôWSêÿvw¾†·ûßöΣßóþ›Úÿ¾ÚÐþ—f`„—Ñ5ýóÚ)êgCh5ž†“›ßíˆÿ·ìˆbJÔC;K §Ù²^£É-NÈâöE|!ª®aù¨KuS+XáV=ë÷_Ÿ5ûýŠm±‹Þ¦sìþ…X#Þ§X“Œ Eá,ay¢½9JNó€3  Þ`ªW\È`(24&©C1Uœ¥ ºÃß“·Á(º@C&ìð%ÊDŽ­¬‰/š} ¾.SFZ˜àéôz½Nÿì õ ¨7»Ù7%×|§Ú=*áñš#|U8Â×™7ló„Mi¡EWõ¶» û2²*ˆ‡`5ihbOxbÒÔàš´Ór‹ÃÑMÃ>Ñö µsñ·eŸúiÆ>¨¦åDÀÐÅŽnȳ3 ìžGˆ¡a†‚© ­¯:v§üBÿÇCµç÷Rž Þ¬ªLä:¢„4„Ê@ød<‚›¦óÉ&ö•¡ôFâ[ æÚ*gÛðOžýùûöñÎà´×yÞiµ`àçà.æ?‚ö¸“¸‘T…a¡ø"Æ…â ƒ@Žeßî?Ì^”šÿ‚_=èö[Ç/z/«ÁóÆa·%ÿäš?¼_ÅoŸ|EUš‡ö9»þ%øPÅéŸtŽ€Ô™éåf·Î Èw`ø78}^ƒ:A¤L­×½N£ÿìÇ^«k» ¨ÿz³vǔϣhr‰=ásÀåÓûMåZRrå….nµÒO>]å¯â3•Ä+c­õ„·[AͲmVÊG-­Û;{öì¤sÜ'ëz@@Wfß–û\Dú¯r(¼‚{¥åDÞH¾Ertc+;îZ OoÙÿ¡qsþŠÚ‘oÎzsÙ^Ýñ#¦ðxÓ)ÇÒ}²Üû:RûB1ž5x†Ò‘8ÓùŒø!«DóÃ0Xûé)^¸¢üD–‹¦‚ù+6:pm[ ¤0Y»æE'<EÛö•'»0¿Ãä•ûpF3JžH\ }3Èzê‘œ%ìXÎ3Ïmz6†sUÑSr¥ä¼ùQ1H¥^|¸YŒ¡vežÙ¥9nÐQ·|rŒxB·‡_Γd”ÙÐy’ôST•C'¢X{¨%§Jò¡oü œôáðö4xYJ ¬>pÛ} =œ3bjg:·=IGUN Ø!⮢pú'ˆ“R*~Âݨ( #ÀC³ãd®abƒ'âÜÀb"5¦0¹px Qâ«3þU˜ÂAG ðŸ;Ÿ ŠV•¬,~YË\ü5¯ñÚÇ€¬Ûõ Xoßi™ÉsØW‹%òŸq`u¡às %B¡cÇLc¶àÞ³·-ýLÌÙ¡=·¹™~Y=«d6˜vÕbiÐÁŠ_¢ü`Uç+Ç´ A|·¯Æ¿؃«aû'ÏŸw[4z%øYßä왽‰QjÛQWýƒáŒ¼ßbòîÕIç û—²ZÙƒ€Tö‚âÕߘîf>'|•Ú½„ÓVó”rÙ]U¿Õp ™¹{; CI xßÍ÷ ¶H·ê¹haš&ƒ˜è ÎIÁ{µ Î%HâûFëÃÞõ©aÙAÇW¢à.Æ㯆'ÐJ¬€‘Ws?蔯X(áþEPnw]Þܾ’JD¯TÅ84óH–¦ªÊ¤„ühöŠæ%¢¿¬Žï½„2zéÂcdP³€ŽsÒ_zDª„"ßÀ©3hGª¨Ø <„4¢I9SÉÍ"áÛ®U3ugV>¤‡YcôïÇ2[œ;`Ì’Å\J9œá! ¿„)ó„ç˜?ãŸZÌFsåA‚z7–ö¦å:Ð 0yÚ딧 ýù]« }NdÔ=9>)—Ñ<¯Lá"ȯfYÔ­áæó"<Ìc[cÒ–Æ ®<È_8~÷·¾`»Ì…ùWÞ°õ÷‹é‚³ü p¹b ®ò 0ç²ÌòÐA æ¬º/±üòKð9ì6VÜz8²EÆexÕÁ È #a»PÚúG4KêœÀq,H×?“ tïã1r2Ã)÷3Žy@bÕë4] 8wÒÒRF“t1†0äÑQšÉá œÕ;ÆbÀ3²Œ@X¦¾žä¸dcõžH"Yø–8#Þq*Lõ¿"d {]†9WV'nõ6bímw0ÄÒáÄrj2@2€f¼˜$èø™¹¸ "ìÑŒÞÌbä¥Du4O3âѽ?/£#)ìweu¬ÉU/Iµ¦ì[ÇÙÃ1E—¦âΦ~îßd` äó,‹þ,5c±`oÁx’-]Ä*P!¥¯àa¹ÏMð Œ÷¼ýú¨õ$è²ÙãøÓtE§Ñlý)À¼{7,³O|C¹;j[’ðªÈÖÓ€ÍèE³)Åg*•=TóôìáI×$g¿*Vä÷£÷}Yu¹BDÂÞ0xäΪÌå¸&˜‡M‹Éu 'Kv!Ú2¢©(‡ÕVr1y|X©+‰@°°»Hc¥yH^cXO‡tðáX‰(šyh¼zˆ¹);2K—WDñúÒY¹®‚<Éú 7ö:b쉉Ò+Ôo3z˜^…iTw»6“¥„»˜…câÔƒ…Ã!%LƒMˆÑ× 67à÷$wi'¬9–4 â ;Š1ÍJA&%Þ8 N¾g_®Têe[®_J FÓµawø –ËŽr,‹à™ 9i³ "RZ]=æIU…®ÑP¦¾8GŸdŠEÄj˜®g †oÀ$Õ$¬j>ˆ|‚ðקhÄ“PèÇQC6Ûà\¸­â¡À}&×X<`N9ï, ³]Θ¥Bòcâ>v£f?J®y3DGÇF”ktT¢KêJhÙJX‘úQg/ÆSL€±3_½å­Oú&³?+N+î»UÃ×ÛÃt¥ +Ò6 ÓÁ•ËÛÚÜ,m§pÏO*|xò­HÍvK‡‰v»=%ù/kµ›æüÓ}Ën[¬••é ŒùwݾÅ.¼H‚­!š«®rVÍù¢1ƒ’Û(§5^P,T¡=B—×Y”³¨“©'š™ÉY™˜ ‚ð"ÞO 5 ïMŒkÙGÅ–PDyŠvîyçäÈÚò‡Õ’ƒ¶‰T”ßgK®XÂ\K#Ï·BÌ œøSÛ<9>èž¼àèöçå­#ËŒÿåha[ùÿ:Ùª–ÖÜZm8¢Ë\ñ›•½¢9ÑŠǤeqÇs/_aG¯Än~!·P]&Jî휜ôøâ¶üßûPZþäÃú¨Á±Î|rü<ð¸X<|LHá‹Ü&k‹]¿¾Å–ëèT¿JÖUNÚ¢µó»‘<¼_L 6ºê´òzåíÏ.ÞhSþÉ8!#ø}Ü`ÝC\þï×о†öwž8€±úFÞCôņ)™9%vSÑÞa*ƒ˜Œa(à©Ð„9fƒÜÌ,'6 ‰/½d>!f›5µ' ¶mo!¥ÙÒ¦'ÜÖßëÆÍ›]7”È7ëg-ˬ”ÌjOÕ-­8“—0 –' H.¢–ZŠÕÚË ÐÂÙàÊì釒â}µY_!"2Þ úR.[Á}¤}eòõ£ ¬ÄADÃ>K~ýë+€Í¾q”“”’ûÉb#-Ó:†:Äd35þk–±MLµc,Y§„ù—?­wŠÊUëVVƒ¢T8–>ÌZë LÄÛJm­ñÊQ†§?~+Hw‘‘·Av'/3@T\`ÑõìÁ4ÊdÙf‹'lèt 8 drdí ošL(l Ó»¡vå&šg½ƒ¤jv’ _PW©,GIò–ÑŸ@{bb)Xì1†Ñ³€LX±I†³4škO1×p’CSgèÆ6 #¼5è¥f&@¨ÍköŽ^ïj¡×n{Ð ˆ«H•ŽÕƒÜ! £JŠËŒsvH˜D˜‡KI‰¹ŸNÑã_=<î=ÄÄ2ê¹È,Z40,”©Ëðeöc’Õ›áQD<óú8ÌY‹®³ã[A³”az£½ˆâ‰;†¶õ^G÷†è¿Œ¦î9Õh ŽZXWªýC£×‚/ÐÆkqà#œ‡©Äú+ãt_‚=û\ž+ŽÒr¥R÷®…3 çs¿#€4[slDÊ–ùtÙôÒY Ai(%5Iå<Ú!îv÷=]9ï<üþ4k9KË ý>^ˆŸ]ºøÅV£®ŸÉÿðY˜öhî°Oå 2P†ÑËòPÁŸr<¹iÜzÝjžõZý—ãLþÄz‡Œ_ûø¬Õï¶æK—»Làä™8ÃÌÜ %¥/ÎÒÛýnþÁhtÆ“Úy˜Ì?Ÿ´GºÞP=B´BÛT£pQ(<ÜëÈD(kGê°Ü¥äÍ@Ç8ôKÊÕ°ÆÙxà]ØcàSF®k%Â9A~(–Á ©Y€|(ÞÓ™ç6®ƒ—¢Ï Å΂p—d¿6²YC‰È·”°ƒ¼“=Ú¬ 0+CIjÂɸ”“Y›Y1·‚´ Žb¯" Hȹñî S!èÌõÄÍD*—.¦ÓöºkÜAôÁDcCªJZ“ Ê{…¼Ë-RȘÅØ2H4Ó\»bá®ß½›»-Ѐ»ÕÕj÷³ÝžÆ"a:†ì÷UÄ7üQÞ&a|ùåEúd»|¹½÷wk¶b‘­RYkƒÆÂq`$èn43½o¹Ðû‹A‘=Br¡š)ë"ÁB2øQ¯ÅàrpEhߥ‘ˆ#€ÌGèë!ˆ=ž×oq œ£A‹á Ì–‡x’)äº8C¦þfñ¦û÷¼èð nYN&¿·ä=ù—;"!:»RDSÀ5ìƒøQæZ¨0aËQJ‰Åì3XuС’ô/Cü­Èa ÕŠ”’ÎG²…Ç›ŽUÆ9 ³˜\XÔAKsŒ©g(M B+]A abf‘075ð\h‘Œ/.â`xáhÀ#EG¢Š:Ý"\ÃÁ¿£gÓÔWÎqy«írвÃ21,|"Ä^¡óJ°]qÏÚ÷Æ„) ,¾P\(e€Ö›ƒz½îÌ샀•_`åß1¦VœÝô‰5n¥{z-€M{>:Åa¦ÛóÅE…âç*¼ÁÆÈ#鈗Ä0Ë‚Iy/ˆq…·åd=½'ʶ•§=EbGœ=ÁVœó©5ÃÚrs¬—8æß²™°­ŒgË>úP- %w •žÌWKX/]&¶Ó*¬L6z„;ÛýfðÒˆt4~^µO`«DyKlöÞɹ“%ƒÄïMñ"ÌJ(½…]gÙòVhCÆ«Úɪb¢|“ÎD©- #[ià­íìIL£$,üI¡ è,ŽìÞÈ ^©+S›q:]g_,õ¿`ð@·HÙ‹ªæØht€×ž °•äªÙF4c-©ácå‡aqî•r÷HŸ(Y!†Q þà”Ä…}¨A¼ŸÖÜê.rô‡Ý®ãÁdŤ®ÕÜóú Ê¢Õ‰í)ç•@Ró !fщ—ûæ}ý-Ušt¤ÐÊò^ÅôcÎAWEåc'ÍP¹•²þ—C(8«ÒÞpºÂsL£xÃõõÂdîpXókT>[ð¢ü` ÈS¶VÊbŠ®.è¾*JlªdHšWv¿M.”W½ù }³Åúc{çšÈKT‡ÓþnS°ªåû? 1Qg¤_2r¦Ct€åbÍ[Ê)€¢fS—N‘û<—"d(2çƒ<9ë+o½¬ÊhwD1N0(‹cBW`Ó)µ¥Ê— Œ Ž`ÊÏIùLA§i‚DV´¸¡Ø;xKZÀ†Ñc€QéÛÎéSt_Æ%œ±?:a>☆Èà5½^bœL(õ.p¾Ô~Nég‡ïB˜ÇSÖ]Œâ—¥^e³_â0ù„ù¾k.½•LHœS›‰l|¤Òf¨˜7ÑüÍ«p¦ÐAŠjCÏ÷¼Æh Z&›ÅÖå,¼‰†[œOËFÖh—@ `Y’ƒÌÃåÞ¿ÙÊióµîSl9°lCʤR¾í ÑŽ ¹†(<>">ŒÑŸè¥Áô§{Fr’¨?L,è¨ìõéÐË0q< nCA—MÓnµyÈš­§_^8T}³óS í­E 8W BÉžð’”Ú)rkL9õ ô º‰}tRè#`˜n¤žÔ}ø¯‚­æa£Óê¿<èô›æKN(QIÝÓÃv¯ßi¿hõ)ùN°³û-ë$í4¹f\²[Ï ÷«,êk`Vå‚<éî’€ˆÑÀ¯!v“LÃt˜ñl°“P¬<«r,Š ²ø"*Eî)Ò¾{WÙS’g¿0$Q ¥²dFÓ©lO—_d´ŠNH&3,X•ÊÂï)^Ö21qãL›E émý›ÊžÝh†Ü|ƒ„=DQ4Fg|FuOà]æö#y0—ÁÚa€=GAlK@)fÀ!ÆBÑa›Ú¢¤‹Y"{(É=jÐ(Ìâ9ÇàÝ Ùa³·dêPFÚ™Y±WmJÅt…F"? Œ‹Às ޮȧ(C±îì]€ÿ-Óé÷N8¡V9w{*èÎX©è«½Æ‹®XC ¶Õ´ÓRÄA»\D‘¸õ‰kã=Ä$—²‡ã)O)V(LI?ËN,Q‰¢ ‹ôŠb$Á…„f‡ÒÒÖ­ˆ>¿TÞ8Ë uÂ\J½jfŒBZ±#{µŽ)Z¼×i4[Å.s¨¦hƒôÍM Г¯§ZeÙÜõ 9žh-\Fr‰ùÍ'ó t ¾ørñ„“Ÿ*ƒÔž(Ý¿J ‚lúÒ“ 7zП$UƒwªYög–õûÂuH%]‚µ…&qN‘'½íÓªÈÖK¤hœ{wûñ·¹s`(yê4d‡3%@ŸAÃsÙM·ã9LÛƒU½Dâ©<Ä õàË’Ö¬íä¼Ô–Ð ôÑ,ÐZÝ„r`º!5=½uC»(uoˆÉtIov­¢Ç—ÇÚ§áˆáF¸¯´^<”»¸²19+nåGÞÌOu;—ÜÐ(¥ŠNC{ñ9EOŸ/§s=íy)¨¬ò_rMÝnÖè²£ó=¬7`]26kà\ ”5oNnÉ|÷ZEÛ3×uÅ[ydgÖûì¿9 2¾X¯Ú,iÞ‚Ôd<¹Aº7¹á2"µÖHtÏÈÕ̯f€Ø¾íã™”Ñîå6œ¡2áFÙˆÀ¤qØ~qŒÉiì5gÜæ-ñY»wÔ8}R¯µÚ¿P•6ݵ܅åܱµÝÊúp‰3ÒéX4Ïãù8œÊÕ\Å­†Òõº~$ï”Å(w÷ƒÿµ… a³ ÈØ»sÀ¢jär¼¿3²ˆÈüÏ=!¤!–ʧ¢¸tO°©KÑ]–¢û•BÆæyûõÙ©ª§®€%GÂðëjT “ZC‚¢¿¼T`g)]|”ú´ÓzÞê5_*€ù®?z)ï¡íšøï[”gI$d-ç€ò#b€ò¬O?^e€ìŽøâÕ¼1Ó« ØxŒ\"‡úã^7³ûÕ¼Ò}éYnÝ!h'ÏsßËb1 ¿Ûφ+:lPwý!ãJnÌ^¼ÎtÿX½}aZe Nñâ¯Ùt_?u>~kÔ\%ý¿+f6˜&Cþ’„x—°“pF÷±aY8­rUnz–ßÖñêS{kÃ*çTo5{6Ä‚§ªÉè´²Ïrh±–,¡t¥štäÙR¶:ósï¢/ÖÀ;•›idi#3†D ~öMkpnñ$§yÝ4¾›uý8¾Y8?,$šè&d:˜´é¡¤Üš£ îµµ>ßJt)J³ÎUÐÙÞt’Ý,t’§·/¤¤g¨˜ûè’8˜€g€Ô Ù|ìÕ‚ýØ”>ŽSZÌHêH)$ Æ ÂÔ3±÷îA³÷¦  ƒmô2²_±ß—5˜¶«FL.’Ù|1.óXYü(A«¶ùÑÚ=CÉè²™¤øõ/ã6bc‘±lÐõ—‚sr ËR¶EgQSû› ®Àc5Ň> ®ª}|ÐbO£»ô`ŠJ!ÝÖ{Y°lU ®ÐSI'B;8+å4ãȆ!•}ï| "Êå–†×VvSÔ¾3<çË ­Yþœ|§ô¡´\/ã‰?UŠ”m+•-&õ!X'n¸ö³‰Êg› \íwZVð*{OðªñÒ>›]˲Ä~9ãÕd,-ç¢$©{Ô8®ûum\çDo%ÖG1$ºŽ¹×ѽYDNwvû[¼©ì!æ¤ÏË™}DKŸV¶Ôv4B0<œRþg°<ö ?»ÅQ¾D¿¥^ð¸´$ŠÛÀEŸZA“¸~¶mjŸM-”qŽ$$SÕF·qZP¤¬5žÆ3‘|D”}UÇJ]E£iŽ0)Ö¯“47Þ¡Ôt°ƒ¥Â,7Lôðõ·_c¹f ‡ç#)È=J€ëÍaÄÅTÝq ‰S©<§è'Cœ ‘ëÁ@¼ß¥Gn(Á¿”óG-ã<šãPìAœ¼Ã*.#‹\íÿ¾d6¿É u¡x!š5ºK“ï0ú’j¡¾&‰†qÊ{{îEÔÊfZî“Eÿ°}Ü¢œ¥Ê&îáÞy4átR@eSböp)é`Tg ú^-¥¤à/yõ3úí š¬rÆ;!OF‘,)Ï^û§.n$úGy-˜Êìeæg R É@ûpb;LÊ…6qôYÓ¹¹^Í1GwÑõÇóÛ/ý~˜·:Ìå.9êÎì ßí‘Ï,ú\thÇIÂ*§áQtCž×3X…ã2ÿ!"4bý 9š‘“²ó*0¼-­§›]¥•Õ§jó>ë ±O§Èå¸*C)Ád®6ë(I¯Ñ…„ ¬Í]Q,$ËE[IìdYî*ÃÍ_•LÁjÅòZ½M”Ék¨‘w6P#¯bê–©‡7Tš}eðJ5ðn%›I"§ÕÍ!Âë°mz œHÿä'Ì¥)Ð-ÝyßÅœß@Ó‰a=³1Ša„Ñ_7Á[,,*YϱØE*žæП#ÿ`dÅÿùé­Á›s‹h­/þiºûÉ!µ€àP] ¨^0Uî §+¡ô±5A‹=ñUãÿI°—ûýâš5žr¾H©úX Û*-¥üçœäü†Aš\×5€ÈPv1s+šõ¹ö© ‚LmiUÄ‚[¦õ½Šn1«p0ßEËfÅ-ìI}âYm0ÔQxÃY0PÒeŸ_ùcã¡$]Æó¤7ƒŠ@Ïó ‡JTÂY‚7âT¶«ZàC˜Þ¤\äA)HÕ¼2UÁUMs‚n*[GµÀE¾>¹àï=Éâ5øn:OfQ80DÈ}ÊN”›†®¾—°ûÙ„Ê­X].# £#謊½,D…",òV£0î •V¬ÄÍl ¤`ù]bìG^·bK‘íi§¼–}!/­*æŸÚãÛ±ä|`?¿üRpQrã|ŠPÛÄ d§}¡)JH4…9¸ªÔ£É>¹Æá ÄÚ »_}wÌŠSßØ:øàAœOÒZÎG¦(½û)Õ^•«ýÓàÛJ>'}•p0‚Ë(n”ÊIMo‚sŠ­-ÆþŒ©³ ëCØs IØmpû8T|c¦üb.²Ú‰ Œoúúè'KfƒØ¬*ÏÓF—äÚ­Ÿn:bfsêØz©ŸÄ3§ð²É<¹l°=M˜,‘ª*òcÚ1M'šÇÓ$%XÕÚ'µ(Œ@ãAõÌJʺU-ȱ0{¾Üˆ/S4·µ æbÌLµ0&‹¹† ýi`[•¡`Ý ?,dg°lÈ«èôºˆß« cªX¤72ãXò¬yrúc™!L6¯jŸù}e(تثQ‘`NÓ´²JŽƒÔý?ÊwsG_ÉÀ¾:Uý…bµÖø+¸“2v%Xa0²NÛ_‹²E•¹Óà] 0“­C¬Nç6&²)-žÙò’Î{ÂkÉÝ,C”Ì㋪±ÌÙFÊ*W' ÐYoWpžŒN&r‰«Þ>vJpÕåÙB(9’u,k8¸Š£wÌ°"t+7sÏe†=çTÂÕJú àüøn˜ôMž ¤lÞ Á{üÏVpŸæ '{vùÂã>KUí^«Ó vJ–áZƒlûä¸[ò8×kш éi!ØÑ/ÃuËÎØMWA<¥kQ£G–î'€Œ… S9É2zK,ìJóúE5—EdMï»\ò‘~aÕ“<]57CVÜ!]“Á¬‚ÈM¦sá2@ð‹ÕƒÝ‚ íy¢›‡A~{Պ܈>x|$ q¥•9Ã~— òÕMJy¯WG}ô]VÍåwÈ0»ÿ4pÄŠ|\¡1ö§W¡TÄ©ª’?œ…"žd°P±P4Wú½)}˜ä›ÁÍê+˜Ñžh³Qµ0¡Ì°˜Ë"™Ï©ŠD/ySf‘2¤ EG\/’ªb+w­b¯ úœ AL‚®‘ø{Ù™ïÃà5YÒ~îά¼ù‚åwîán¡PDb}ýiÁ¥/˜ƒ†:kˆï²€XÉ}}‹kˆwŒq4ÆüÌK»ù1¦³SÖ7H›à瘲H»‚‰3»Ü†çÅ”FyØ:îa[ŒŽyÑê_>3Hy‰¾I“O ¥®¢PvNÓˆ9ÓðBL¥bF`'óÙ”’‡ä0_ L#Cl‰N0õT[=Ô)€t–ç,¥Þ|(LV¤,V:¥_ÞÀI“ ‚XûüÊ^é|9„»IÉÏ w¤ˆpTÄa ·É¦…?÷@ŒÎ¬sÉ̃—EäÊœ-À¬Ëîß-ª¯µ´B—QŸå>QÐ=×Nßï²Zµu¨ª‰0·î(4û¡ÕyvÒm92^W)¢ ΄‰WaÖ=0š± y}÷'2ú¤ŸLx–æîFfÞ¿Œ,ÕT^þ7O5¢É¾à›»ƒ-áþ<¤ø‹/ª÷àÓ¢1¾+OþHFÊ¥{~t]£ã6_§œîZ oê9…eóÎò>”áí¸—-ªa¦P°A…#3Øʶ ˆs?½§h^- ±–À?ûµ{á7Æõ"ŒGiUûú\JAkS«q—k5p¦¹UÖ7g'?Ø&¾S)…y­Ë·í¢€öWñãl:vt-còÿLlÀEP1Ká¢%ç%°Añ@Æv«ši-¢‹¤A[Séd¹&h°£(u`…é½UÚQo)8«¸H‘Ž”rÛVƒ¢ä:5ý:ÜRfˆ[íÔš»åá<|:çdÙý,›æWß9˜•j¬ÝšEÃv/žë´_{—IÑ»‘PælCfî•B_vñòÌ®ý©'È5+N­«&ð*R‚‚²ŠEଗV©cii1šm/”9>»‚b¿ ŠrÇGìeA–{‡„mu^(•°;$•X2”WÜ©ovŒ‡¨xXrTŠÊó¹<ûG÷Qç¶ñy)*ôùCÎ’1›ã9·›¨G ϱªÑ ™ cNtÇ5/αÐÍ(ås׉ۋ†Ð‘NKŠ(Ii‰&2ë >gѼœOù<'«‡\I:̼d; ë7Åc¬5+[žt‹DYê"ã&¹l¨ód~eï8¬–ËnöÃâ#Xá9œDjðe@lãK¾Í¢-¿æÁ¥¸|z<õ<žÄto=òÔA‘E’—WÃ[ ‰ù–í.p}<]¤ ö#ôæA®—T,÷Ò“ès¼±Mq‚ð2Œ'„ÿŠR 7)âF3j}=4W X?͹l²ýá¸K 1¯Ö§„WB4®«Asù<‹íù.Ø îgWìq,Æ'c’ÉûUÝäfæ©Ö|®R¦²þw—I%ÿGD{×ô¸ÚâóAL±§ì´œê\üᬛ`õà«ÈºM!t¨½th_ÝQN²Sà÷ ¹Â”æŽsà†ò^Þ«²úñ–ØÕØÿÒÝ¢7^;ÛO^®?ñ”4H1É-’ègT^LQuŒy¿ŸUêº2Ó Å¥k»ÿòä3°r·¼5ÕôPÚD‹¶éÀŽjñ\"GÓð‚1ßFÑ'n¹CD²R"hÑ®Cu-ˆ3ÏB¦œzVÕ—ó•ÂÚnë¿ü’ã`ÐíOž;NéŸ;uŽ¤ªrosàû¾LmØD§Þ\¨ú:ªNea³*~NØá|5±.(˜0IÌ÷ó HÒ˜8·Û«f?P3cpq.*À0)·q°EôH&èáçï pU÷yÔ²]Ù[°}q `Ûö‚¬cÂ%Ü|ãÙyj»úå˜%ÃJ;}M±;›åeg)Ó´6b%ø+C™–3ض ó¡óØ^¢Ë®ÞRŒIC¢î47FÙ4o´…å Í¼83/^ÏÆš£/=êÔ_é4D7I%¡ .m3±ÂGø’cØS˜kC]þæÙí‘DǾí4 [vP&B×ÚKùŠE=+Êq<³p>¸êÓ å‰ñHàN.åÌ’$Ij†ª’_è¡K™öÔPqáå¬ò8söO*Cê^¨zÅ'gç4y>Åh(Y–“ÄÈkØw”`R¾¯­’aë*ºjŸó<ÈcIÎíòQH23ħ‘WR\¸•²ž–Jx‘‡tœ}V†±wꪖD±i:7ŒÀp%yuƪ/øF—]»Òh8_²|õ€Ó X;´dYo Ƀ.]ê‹r}dWµø«‡Áã‚|Ëè 1si¿Á~²Þµ!Ù_9µÄâëXA*îëæß+E”?X1Ð2¢uÜFtÃ):„U«ûðÏ£ø¤Ôi!¦½GÂBfŒ# `qÙúŸØSçÉFd® §DÝë0íÓ–ª «SþÂJÑEŒöIk4ø,T€E4̧Ð#ÒÍŽ¥È»rjì†f11`HuæL)·¬Ðx«•áçœå™%z2.+×+ñójlõÁ:ç/¤&ìÇöÎ6ôÉ^¯Ó?;>ë¶ ”,›þKÿêçÖH ¨Ã†å£î«öñ£Ý *âœgÍ~“VÜï†Ñ`¤? ÒÛD@¤P;äÐh·ˆž~Ñotú'þqû°Lª¬ù´h¢mÔã¢ñŽnxœÌúê²» ¨:>ƒSÚ\Œ£±FÀlØçJæeUçŒÿ•¬®2Ad[ú8ËN«åÎÉA•0sª`uˆŠC£þñIç¨qÈ‹ŒÛ™1­î;DËIåg6ÒíA,É]Pàý‡Õ`ÝÃ7Sªb! )—ÍçT%í4NÕ¼yRZ2ë™{Ý8>k"Ž¯H ^zÜ{Ùi5ºëÆ6nш\XäˆZ‹Êq=ªXQ¾b„‘¦¶Z…ä&±Õ8~ÀMÉÜLEGÂHXÌÀ48“@Á“eÓ]£ûªÄÞ•5SŒC¤$™XwÁ—"S§Ã´‡@‹!‹³×ÚÆL»cEö-½¾ŠÈ9WCÃÔ­!h;Ïcq©>>éI É°Œ1TB2OIer’')šRB¥WPļ³ë&ûÁ‚ëHýj݇|ßjöŸá+!º…¾=Š;…yEK'¤D²4YÌ‘S_}“a*vÊ Kó‘V™õ]°#Îeæ•œô¨êã<úÓVÎÀeÚ³"Á‡ [½ò]Ž~}pÅ@Ñ”­»7*–4²NôÈ«ˆ\s)¡âN­,Ïyc~,PÅ×/øM4ç1ðŽFº¬ìó¡ª&w6V{‚ðâ‚‚*Ð¥iùêAI>]ÃÇæ‰Ð¬šWáU}Úú"ÊÃç!”J_ce‰/'¤R5S)ú¤ˆØÒ,šµªíìÇå9_F€ƒÇñhˆŽ~‹ód:ÇáÛ¾BLY¯tè渣Já‘<³¬ïF¥ÝpHJ){Ä·õ[à©Hy_K„fñoÊ Üvö ãgâåìloo—JÂárfdæpùn±A–zqÔÁ5Pòbëïó Nl·›…³Ë÷Ï]à‚ù|qñÆ™ÍO€%Qþ°[‡ÃÖ[…®É"j¦*Rαj>l~Ý­îß|8ûŸê䎰o­uE{ÚƧֆ¬èdo•àâÜæ­W]éŸÿ¶ß»Íÿ­Ûy—;ï®èŒímÃFîPžî»°T)8·æäȼ(mâÉDù¶Ñö©S¢L{¶úÓËûŠ’Rh}Ì[è|´¶³Ä’Ñykµ,Œ¹$ldS³|ý§™¯‚Ø " ÃÃwò/°2ô”¡ÊC2ýôO‰Øb‡ÅjGÑ“/Ó |9xòå¢ÊWíÉ—£EïËÑë*ÿS`¤Ö3°ÒTÌd}]2Æljlƒ¨·7­=ÍÁäaÕyéÂÜa%c½uVN¨ RšGlvöÑ‚š‡äŽ H¯%ðÂîâ{ΧHä!¸ÁÙ±jN‰õµRCãSq(CÛh GŠv×Ä5q–jŽ >SÒ¨hÑBS¨P˜tÅÌ œªlüHžÑTJñ¿ãhKé>n¨²”]Dh¶’×TMª…—°ÖÛ…Ú@.´œ+Ož[be ¹o e–×D|ê{úwoS`;2ÏyuV]AÙK2¯zGÐU?¨{ažU'GÝŠïسÊt+_ÏèµÉ’CÆÆ)àˆ¥Éܦ@ ‡ ±šý€U™N‘[Ê°6–œ|Ë´Up"hšFƒ3U.lÀGõPá>wùÜ“uY¨…Œ-XbIŒÒ¼h8r$ƒ¿c阩ãS’Qþ½ØÚ×/ȵZ ÎKóó:- Ìëq¢ï£-lzï£#1+ÄKŽN;'=”H^ɪhå¾»ŠZK&ÿq ÕŸv •NΧ`Ë›üšìŒygÕ¤Ôæ³Ü!Ú¤ÏÕ"íz&´zýæ¬Ûb‡*`LïþZ2—(ÍáËvjj¾è€lwتð¶ÂœäAŸ*Îã-Ú±/"NÐ":âF³Ù:lu½“N×nGmd¨òß+2û¿aüìy,(òïº÷ß+o¶Úó6¶÷e«qZÖ«Áß=BYÅ7Ìe¨dýŨ`#vÿã7"È}n矃~v>ñÞ?þ}ï?ýÞç?¹{ËOîÞþ“nùÉG·„0¦Æ*÷¹‹.[úð£2Ó!m[ ~-—G•¯ƒz„˜¬†ò³í@¿OœË³e²Ÿ«–ÅjKñÒV…`ì Ö²º+„ºÅá ì¸N6WUÖÖ’FÑe{i“ñw©Ü%½cíéÕ9•ÂÍpøÛ©ó‡fXøï¿[è‘E&‘ˆ”kÍj¦Âo‘ƒ&²Eä}Ac¤ã ƒˆ,‹&OÞ…³wÕH”ç:ƪ<£8¤œKqš.¢ÔÉyêpyª42J-õM¹¼[óزÖV*¼¥Ž¾¹4ùy/b¶r¯ä²tîx…ï¨o†}ÏLÏ3’·-OnÅØ¿²Dá0ØWõçÉPù;L™ÏJsW×½KÃ&Úäf”Q¶% /~&÷‘fÿ• ŸË%žS·9{÷²fÓXüÝyp>T6cøŠ®0_lÚÜ vü¹u2$wYO‡]lz¿ç«“NŸ}út?›kË‘jÒ ¹_<ì‡Ò§—i~…{°RÇlÞ¤õ ¯˜¿#Χ(4ÀSˆNûŸ“4 ä­¥OIçQÛ ÊBÕ@¤Ú¤fÊr:·û/Hç~'¿“‡ßɃ7“”Ûv)‹Ç×#*»ì‘¶aÙý°ü†„ůnúý_²<þÊÂÞJ³8}[䎭$Ó+[œ G‘ˆ÷¥Âk¾¢˜8(Ñ÷)ÍûŠbˆjÂÙVålî?t{c.0XO:X@# ôI­br’ýP’VeRÌQúŽOƒ£Æë“g¤AL#®äzìù41¹¢²BšÔµ@¬¤×ñ|pU¦Q†R†ø.Ì‚¬ÞOÖe0-~¬äK²ó$ö¦”æWŽ_2ŸÈ¿e'‡À¶ÐºwK‡QÐð»OJ¹È+¥­È}ÀýD!ßlÿ¸püÇ+Ç ‰û«Äë £ù“‚Êt–¥ø×Î 6TåÒqÀ5|€h¤ÿнà/mµ9yþ¼Ûê©óÏÓm삸©›PfßZ%qꟼˆ£1(/a{.gã@ÙhõìÏʽêß¡|PŠ} Jî¿+y¸H胸 kSÈÙA»Û} ]qw¦Êu𸺇ÉmN™ªQ”{Ù}CX餆™þÑ÷ ³˜HA¾ùu‚•†1+¨ÈcŠ3¢àÕ@ÛUIƒ¢och棾FÒë8Âì4šjEµQœ¢]• Ÿ-RezÄ.ø‘Z8’:LÑûyMEå„©.‰ê™ÕGl»7ÍÀÂÚeœAð«°¿'°ŠÊç¢5~%‚½’\kw©•¤ºt á¥TA‘‚J&“2?"‰NAJÛ~ÿ¨’Éü)õFxÙÎ`eå^°,­ çtF„`Ð'Kñ±ÕpÝ)쥞IÝa¥dÞP‡§/½Q«¯” Mßíñ¹å\p<æ(`Õ54É9®,RY @h¨ÈÊæÂg¾I72­(Ž¸¬b>s«Òhxˆ¶Y¥‰Ù1ñëk„ƒ£@@6 ‰Žºü‡B¥oã)éAJUI;‡|ò©]™QBSU|  }Äà‡u~žb‹š›qEM‡ñËhù`h ¢»ªX@²^,Æ ¬îvÅ׎&…ž" Úå+}rªç¸—MÁt.£Iž—ΰÒ20B€~¿ûŽ¾;i~ß-;—¥RY'ª ÑñS½b˜”ÉàD,©’‰…²'eîûÊãó^~sã—ãçÞ’¿ã€&EÜ 2˜¾p1Ý*.¹>\ø‚èÖ•µÀe%Ȭ 6Fwer}t{gÏ`‡ŽûCŽì'  åî«`ÕÇ—ÇÆgó0ÄL]챜Eò d}ZK ³^úÒÓ8zßgrƒšíp¸ˆõ‡ÒÝ­Ä"x¨€•WÜ;3 @ÿ7ÜE÷Ÿ¯ï­[Ž—ùÞåIC|MWðõq 1A¨*ogqá òg’*Œç }Ij5*ÌAfjüdb¤­ ð_ÏEº©Áÿ)D°ÆM?;nžÂÚTŠ{y¡³àgÑOV!˱eMŒ’Yâ‹3;>h÷Ú'Ç€¹~¬H‚B‘Í?ÝBÌó«Þó ‰õ~ÿïÿè—ƒÚ7õÇõ݇טý/uêƒOù ŒýüúëÇøïÎ7_mÛÿno?‚wß|ý‡ÝGí~ýhg{÷Û;;_³ý‡àßj#%ÆUÿûoòÇ´6“é çè/*ÁÎÿø88¿ ^G³ä=¼›M“eúÙŠJ-SJÙ={'‡s#|#tãQ H2x1 §Wñ Ýd€oq€çÑìr‘/#,u‘n0ƒ]8ƒü Q^F×£h>¯†ƒ·ál‡0J¦Tè ‰¥'74DÁÐøª÷²Ý:ÑkuÚÀÖÀ陸Ú­ƒ Ñ…?«Á«vï%ˆݓó^ëðÇàøSxwǽ1¯T§Õí¶p¤“NÐ>:=l·p1Ç?¢!lô‚OÎ:ÁÉ«ã Óî~¯¾|ŠÚÙ”Žã”œp`Eèï3çôᘨ˜Œ,Ÿ³øPÔpŒ}‘û 5ÊÎ0ÅBÂðò]<”ì$\í•Ñ `­6W^ ‰yšb’×Ì<à«”€êF‚’‡^ ‡10H10w‘IQEïa^2ç*¶æ4XgÊ;‰°VŸ‡Òß¡ ´ƒÑbhW­PMlðH5 "*·¶¦³ø]8^0Rü]ýjËMo4ŸòÖõuR-ßòóÃV$žãƒþüb’ox^bÄ¡Xž¤ÑñI·Õù¡Ýl™ }èx˜\§õ«§ÚÔÁŸîsu®¾r+` .ðHy‚‹1œz~”L±<`Ò±a¾/¾Ã9;šdq4c~OÚUþÚì?…êÇŒ•™’B§?¦¢RDoƒF]7iÓÚÉ×',³!Ïs|"gáñêqªª˜£i8'2×fâT§af”üFMéÜ‹üá©lå ù}ž™;LA­ûnüë¾d‹oÿ¥ÕYk]NÞ…¥ësúØw£I^"¼bõ¬õ>ž»OúçÑe<á¥DïõSJ?S†1ißd}Íf“÷wµÕxÑhs(,hxs ÀZ£¢yñ›\‡d{ŒRÞ`þ¦ÚÏÍ;÷øoI<É="\±?¥Ò&ÁΨï¶_5ºß[-ª#ìí8Lßê½ËdwfQOµÅ”å’Ç3¥'1ÒHSLG"Hsnmï– ŠWAn?æŽì7z íñluûÅP¦4WçKq¢ŸçÒcÚ_)D)¢NHÇâtÕ9bIÅVt¢ôwÕ>XW²WPAØ2…5F£#ÀÕ5L16T©â8¾m&ÕìSu1i%ùYÜ‘^5ö¬qá'sM«êDS"¯âI³•K_…r…©Ôrtåº@¬é(k–3dÉJI~<ù¡ÕùÑ>WgQ0F¹V²ß8ÕÄBÞœ—¯ŸLS¢ÚTúEÙ4%Oûã$ˆÞó9Øc´âæsth™»CøûÓÜ(gBÄ$ˆÂ®ägAÞÊp-."¢*¤šÆÙŸ&iü^NIòÂ0“Bj£dfhO$Ó"ñLÜ© ÈÕ!5~ÉA Í×uwÀ "SÊ#TU³Øþ*yéLž~ûœéfʤ`¼ßª ߪÄæ}¯RžYeE\`ç8ó"u`ªL+òmc.G‚剨:ÔÄð)z}ô¢Hè,¤.» Í’ÀºªÜæ:#æAXÊqi5mÞ„˜ï“­Öém¤Òh¢I _P±#4óš->;EÀ”Ý™ÄXy4þ‡v¡z´”U–ŠÌ|>†4ª*Á»Ž;—ªÌ„o±ˆ-€ÊÖðf¦ÙÊ Ùït)ßg„DÞ°ô|<añù 3–J棴žIhíår¼Á…DËÉ̽%úÎ)@?_Ä£9á,ÊÉx]áô V€´–*äˆÈ'¤bR. ç:Õ_j”Ð|c§£pŽŸÅ5d]kTf†P‡éC[zîÕ ª_Ö‡-(øÚ]Èt NLfrIÈÅdMm|!Œ<\äøco û¹à ÔRMÃ`ÎCÑc/f\ÁÉÎì"Ô­'s#Iér@x'ß…#)—1Š'o#5W3Ä@§µ’©WŠ~HåÉŸªuø¼†A>zr°æWÁ4¹¯XÐÀ‚.’•HÅÅoa:îìWI‚EO¶ªâsE…o¤Ú3÷#¤8"*õÅ2%_@€ë眉w]Ïb"“å?U`bí{xŽ¦jÞ /,K[añža˜=(#ÌJÙÚN² á;'8E½Ä¥œŠÞßÔ¹Ê|þY¿vÓOÂÒ'(Þn×âªs¼O…4Qn”Ëp-ÝyÍÝ5^÷ !ý¬‡œ9Êôïì¾ù‰èÝö 55Ñq¶×o’ŠWÅríxŽÈD)T–¹}ê–¼"ÐB5áQñÊ §EÙ_•—J â]5weVɹy‚Í]t_5×H;9`:Q@ùRl1Šé³4O1uL8TÒkPY¹d”#[VxÕ€ðŽ ‡¬çÉ9ºÓª¯íئ2_Ïo¦ÚÑæ@LZ¶ ÐFøFæ&¶ÞK;çóÉ`!µ¨ù6ž¿A °5úÂÜ—ë$ÑSÁå`@!d©<ïÊ9p¾·Iã Cà PéË€}[}ôaË3°¥}½[v1o“Ìj|–v$̓iš©zªª) ÌPîå‡Ê•%²­©CßÄ‹FÉTm(HGv6;†Á{^)Ï…‡Íƒn×Éì-•5|l«7É"ÀÔž1Q  ý|8‚"Oàb]OêéàZPFÿyª Å {žUÂXÎÕâïb’.¦Ódð¼å&cÃë‚þK¨ ÷Šf¦Ø:+‘ÊŸû€C—ù¬äëƒ"®–=&s%Þð+º¼w¹²gçk“Û ÕsˆcdDÉß«ô›d×>lµ{:•:{±Õv*:1ŒÀŠ«~'š’Õu1Áíû9³¸Â3 Šhœô‘ŽâAïÂ@OqίyL¯·˜§’5Lí?ãD:0ç³L ¡;‘¦x"5 †âƼÖìa w™~á¸]v鯯;•®#öŸîl!@º0â=¼û䆷tç_†XAD]ä5õ l°mki3–q”­a ¹–´§¡Á’+‡ Í Å7UÐ+ªŸò´Þ,ˆDb=4?!Ž´éf´Ö—‹Œ+šdaºzĘ™ÆåC8éç-a'ƒªYª˜GC|æã=-QÀ½ŸïJÔ^3Bˆ‡{F× Z3k0€ÛO¥$xwp ò˜ýxˆÁÈ3 :é“•™ØkÁÁ‚Åçè%¤3 Äň\-DLN†£ÖÓ=º,Ù¡p©pû‘¸O ŠâËš7™¤2ˆ·‡ð£ ÓŒHl¡P²å~5(㻋yH« rl'JÝQóÄÌPðu~ÕÄôpïçåJe㼬/ Ê—ãƒÃVy^ Êü« dxR{m"Åïe {ËÇÂÞÜÐÖ»K]òG2¹gŒ5$BU¶~» Â hÝö÷ŸråHN$`'¬]Þõs& 4€™y@IW …ÀÈZn²"ü!ò›Xye‚âc<^ŒƒòU2ÇPÝŠöB^þuàÃ%­Â̦‹ÀŸÍÑ ¯N»ñõc+>ãºbD â&¦H*=¹cêœð~:5U#Ng ŸP=:„úæÆÔÐZ%Õ`â«4Ž8Ç5]„ÅD>\_{¨öéÑ°¸C2©áÀUG’Ù`Vá€Ã–dmJ &ˆŠ”fm½¡T ¿xºi#)ÕÒÆv˜DéšC!øNs§cA‹X‘léʦ¶”È|¨ =©õás¹‡{ë|ÿT•!¡û·ÅЙ²Çä+—ÖÝ•+à8 „Ÿ³{e['é|#‚5¢ÛGúŠåBª¤ ø‘ðDœn0”ÞÊ£4$C>¸&–Sl²¦ DxB,ö¬ îÙm¨ …i2, ×Úr.|C‹Ä”Ýýì(°Îu—0*Â<0T][p“€­Ypšúu‡ºFa, £˜¬jJš/J×ßòq4N3—EJAÍEFvf»R÷o9mgÊÔö1 ‘’ú²éŠ„cR-ḑ¶„“9tðܳ}Mg‘¹çíãv÷eë Øq×ØS´= Ð*y£Ý¡Z½F‡ÚõE,sZ¾fãÐü­Ñ¥5Ô÷Ç'¯ŽûjnD}Ëø³ö”©öÕÛŠÐÑ¥éßbV6e£b›E*V¤Ê°*Aâ‹ ÈUÄêr”Ã'Ԉͪ,fá$·-cAPèÖb×±ÝYÐF±œÁ|t‘ZÒ(ðšJeS ‘hþžn©ÅÅâ.ïT;š¥@ÕÂàbLl3Hƒú ÈkÈ b 8U£Á ÇIÎf º¦Ê,I–`±½ °®]:g±…,Æ~œ!ÕÚAfb©£¦øu,ØNq}¢_bßË^mÜW*Þ0»‚QTM?ôЂmAÒôVÑípŽP=¦,É߆˜ ÐÝR—¤úàÈSññ;›Åž/&Rã e¡¾Tèf4f£,9tгy‚˜JŠ;ÁQ”²T[ á"µ'Žl0QADÓ¯•ê#¿Ic„#srï´XÛÀÇñ9~ɤŸÖg«À({`¤Ë@×£9££bÉìµã–Õï¿8>köû†¦Ê¡–YÍÐ(ƒ1H[F6¶œAeJ©Mf$ùµg*ׄ-?«»ó|£O)Jg¥Çê<ôåÌE'l¢’0›œj ¢K«HØÙ—Z}R’ÃŒ5ÇÒëZ ¦3Aм¨eùn~W¸ æ&uXÙ.Šü;e.©x*Yº:O”Ìr’Lûù‚Eãˆäa L °VC1›ªÚN…3 ù³ºKÜeÍ£ÄRÏúr!VЖ&îß ;VÔ»žU¡2š'é¬ÍñN4’c•°|+”Û¿–ºS@„À½§Kœå1ª¯J®ÐU÷ ±Ë iè˜Jø¨˜4 "[¤MQ¦+rJbé’+]_SÔ—KâšØŸ‘í«]Cy¥hPGmªüAVØH1óê-F¨’¿’Ôr,©Ú+6$IÞ2B^LYG–rNsàá×p6¸ò±]ËIrÎ h­æ'cŸÑƒõ†4ÓïU¿x‚Þp¤ž^¾âZST!ck@éÙ/¯Ö2pÉrDŒÆœzP9Þ¢óArÍú'©-µ H%ä´žƒRà{ÉûJkX«|c4Jk×$`&ΓÙ,¹fô!tÝ™Ðc‹´zkÙ obñsàÕïþÅ*Dè¾v¿úZ‹ ×쬴Ë:2¢a¥nl»Ú”àŒÑ>>h½.…T6>úãéÓ`·|™ý^Å²ß áÒ¿¥o2bKšÄÂI¤á1J b‰éÚ¨K-Í­%¿«b.Âh™Ñ¸Ì¶?”rØGz»¦=ª%H“Oa<”Bà\%y •í[¤7Üb~K¥óA,‰Šï¶‰áÑ{×hšeΘ(í—YèÚ'TSÔk›Ù‰ydT“ÀAö-áÛvH©Û¥‰–§É#iÖy»¾ ”Ò‘O y(ª‹$·­ÊŠŠ¡ì4Ó¥¿ Cú¬ž u h]Ë_e¥þæÐPÊÑqõ-l^ÈÝc®HÛ Óň³¥›_»ÿòäëËxK¡éAš; )ä­¨3‰)PÝ¥ØTÏ1*bìDC[H/kµç~ªì¨*¾HJ*?u ’߉~e$¯É…w„J5à ¿í~'Ÿ!@)vZÆ=RÊǶ~(ÙÝAfŽqí x+áäSçAMëù¸N‰&öm rõî'ç4é 4Q‡Z¤±0›k>À©4q#åú›æºØ w‚*«æ朗!/Âi»-»æãýrüW)mJîŽ"£s>l·´)e¨™RURuj#mƒ¤¼ÛŒbðÜB_–6ÿ~zÎðLÍÕóé9>qœ­yU;÷É©ÚuW@÷º«:Ê¿–û–œ„í3ð +©³~”Ô(Þ& ýñ…ÀT¤}̪K) MB®H±ì»xENÁÚQݬf„úáÈ @Ú°¦²@LÜž ¯ àõðvUDÇÊ×Q»ã²üØt9óÜ`ÖÕž®åcu‰¤vr"’Û©2ebA:*ÛŸ‡Ê„÷DïÑ‘Ny³Üê^M½E5‰Ž²¾Ud‹êE8>FRHt9n"Êzªt ÄÎÝØÓñèë‰å„hIÚ+£åjɽ˕•t¸³7Hö´R,žN§ñŒò²D¦7Q±wñ<ëÃ#w)q-xùlÄ%… E–¡bƬè(#¿xõ [[[ŒÑ˜A÷úZ2·  º\)ˆ¶¯¯¯>:F}ÊÿØg;æÌvzYí/¹J!s7ÙÄ5ϸ½.&šÕ“UÈðŒç£”Zy+Ýp^€ñBñû3…»<ž²#ú§¢sBzо… wŒ‘ ¢/D³‹¹N«‡:G|˜R âüf©6ê m‹€ìΗœ¬J’2ÆÁSßtì«o]‹¶âbÊeô'¯ÜõuÍ°0¹?uà'ƒlÜÑ@ (AËj L `˜dAYx&:ÂHwíJ´hL7Ö'j;VðŠÛÕ¯eÍ€xvqc”ÆrªÕŠ7ú ìÉŠgC_YTJÜÈ1¡s‰¶RDžgõyåIP(ñ’êG>ùž!‚ÂzXzYLØíK©õdé´WÿcX÷å_³äk‘÷­ü­‚ž‡ñˆñ°Ö9ŠùÂDú)Ác¢Tb¶]¹f8êX£Kby­EÁSã$€¥DT¤|4º°9bcnp=<³>“e¥!—4Z åŠOŽ•Œ iº²žfðSŽªC/Êü‹/ß…ÅA‘ïyâKzlË{}¥åÚH0tÕøÎÛ !ñœ„ï ;8;=l7½V¿Û8jQBÿn×±½¨ô;å­ÌV?[Þá·ž`Ü?2‡wï¿|½U ÊÊ{¦[„ÎŽ­Ù,™é‹óÁº‹¼®$Šqi]X^у!­é9 IäKœK8u ² U§v<õLÙå0¶å—E'Ž譙ˢYÑïìrŠ!¥qtÍ®¿*UÇ·ˆÿ¾‰b%7¯a„–Ö~Æ«o“Yñ†Óm´ÜwÚ“}À ä°}iÊHVЋ¦RFÀ®=¥ß+¾»ý‘®¤ð4n"ð.5gÒçmÛ‡ÄQ,ˆÒq×äzÿ.æø¥ð‚í2qj™·-öéUto°aؘ0ž‹ŒgI¾%:Ä5äQsEo2Üæ4J0MùŽl&âØC)c`ùA¤\H4;..X­aî'jõ)öí3r²ê˜òÒd¯¾–tOF£Gþ8EN̤TQŽµv´–«hs{‡hµ6–x# +iI%®÷p‰6‹ˆŠN4ô"xE´˜ò5ê©(øtqžfñtŽø2™¥ìw„~›Äæ~g÷£çV¦çËhž›ˆŽ4 ¸ÙÓ ¿W©ÕݶÊÜ#m²lŸìƒ‡Ï’7ÜO©’Å ˆ3n(Õ&àg©i2QºBmº‹-§YQåvÎä±Y1%i»µRZ£¯ ‡-cë}´ÊÖþ}Áºï<‹k¨40À¶’ȆXt(ÑöZ­lÇ}òÄçȨÔoO”Ú]YãÙb™²E"p—¦EîÌÚ«È(«æÑ¡b¦ª1Jö C9‡žá 9Ì覢ö&— lP/6b¢ÏÆbêê¶=êè_C š»Þ{SÙËkq‚ÓñK×»w=ŒNùsñbê‹2µ¼\¥ã˺‹É„<}bª¢—åø­ø²$àZiŒ˜žL*#Aør"ƒ¾æµ\²û·`oÜ¡òª)Š¤ÏÓFA ööþÉA¸>Á­%Íš ¦Â[9§I£O-{¯“%{*¢–)Eˆ¿·kÜ]š/[Íïá»'ߟö~”‹‚tÊJE>«˜˜bïEÌG¡Uw_‘¼+ë|Ù>oã¤Ën*$AyþƒÐVVÞÞ 9Z¿ÙF’sf~+uc$P_LCÌ%uÒpŒ¨I‚,Y©Éø)д}EÉØ;ª!¦,”X¾ÞF Xïڱߵ§Ùo³™Ikñ/ç(Sì¨á$«™ŽÍÐ¥&L£®q|G$e’ÏÙ ¤ à,ÍâAbUÔV(å@Ÿ SDeðU©IÊÙ@Ué7¨!Ÿü”*U‹ò$š´$yqþw2XÉb³›UÏ8õ(h£RX7ýdæ]$YKÊØ"e_Ð R©[fèš[A›?r¿xüOwú‹80:˜¬†H§9Ëô@¨b¶ ÿKÀå!¡²oáDeÒòEÝÛÅZ-dP49Þj›ÂÉ_GÙËxºèÁ£@‘/OÝKÚp…¸ë—€-,˜³s|÷»]ºŽE­üýÅ´ó¡”©¸{ME£,~ü®ÿ”>ä²ÍZaH –‹ø–¨ëraÝG.—+uí¯=€RMÊÓaŸ4’àþ6ÕRlHçM;hií#CÙâË´vÏÑnt%‚àìØD‰{äã 3B9H>ïj݅öÁ–™Ößåcù$ö4ÓöòŒÌ!à€™s%Éò³VŽµÐ´obé-œ‘sôÀ]òlÇÞ¯±ïYÆÊ»Ù0Àçûr=˜Ä¡±2]Ì´ÔOUÛ@.FU´òÒ™ÚÎ`x—8xæÉ0´‘sñr·N1TNgdÛ È‡# …vʺNpQ™¬ëh¬¨È¢ªë½³Ï/†È°-ÍTª‡"›|8·fEoÅ,¥óRIÒ´“£‚Öpª.ðÑÜÞÙ±z.ôa®LUÂ(/¦rñœli#7©éÏßñ¡›»‹ž›Te½hoœ£Ñn9‹ÆÉ»¨/°'^Æ&§½4­;::Dúˆï)_—í,wë[¯iªc¡(ñî/(·“œLå†ÏÿÐ8,Om†_ÿžƒãLÞ:{k&¿¬zÞ?mtXN¤²ù7ëS›%o_EŒö-ÁÌÈ$öÐÕKo¢¹çjP)5:¬r²%Îù'9N¸ˆç„|ÑݬN*sv¡N!¥Y*öîX&º¡ 'ßëy“{¨Ró±Vo–J! ³q¼À¢~ñ(R´«ßb2B;Kp+ÅåvÄ;€¼sCȱ LÌ)šÊ'o1èibby6]D=9šÑr9*.ö¡…Ø&žð™¼Öb˜¸(1I(ÌÖöÇ;jÛÔ×%©2ËÍUîOoC° ( M’»Žr½MÄJ´x²Ë®ž±Ða5çئ’˜JòFçÊa÷jS3+Éðy> 'XHØšQÀîäiQ¾©Ff&C[Ý·@ñ´Á;r-Á~’Hw:ƒ„ W ü‹YŒ +böȹ„D»´&Ó>ÑP`ßU‚Ñ3ÆK)¸jžóÂÖSÆÿ^?RV!_ Àeù\9…'W*™TDòê–‹ƒåcOÆQ‹½É¬¤§„€µ"WV»NÌÇÚÚ¬¢¦ÀíH–µÍÔ]î¨ &Ãé"æ~Í×}]¹½S+÷àéïVØ£Aœh ÿ'?ÿy è„ìÝÒâØ"ÿ•§#ÏrO¿Ñ%Âç³pšâÊtLº”ZdÇ ±Š-%4kQ¢Ó…¤ÀT/ ŒÞB4(/b¡°®­ÄÎ Z^2ùJ}Bâ‚Z…ámZS,¶ÐÕÑ ˆ  „_5:Çå­rš¸à!ÞsŽ„@™“ |¹EMû§öر`믓-|å/Ï»ŒBÎíÒ·v·] µÜÈynzù­|›p¹€©ÃØþö¿9ÞOúĘR>þŒŠ)N+´SA”«‰‘Xò½ÒcŽâZL*WEyUqš¹Nþb4FC#§º‰… Jú½ ë[ ørxØÂp<”aL2&£p=Èó BY^<åÆC° ¥­Jd`…·eRäj—iaò1;åu‚Ʋú–õu5½Œ ?weâÿçD†õ„ d*UcŸQ¯DïbfR£ e(¦³Ïä‚D®#v§VÎ-\ ¬KJzö¢Y7|šQ­¯<²]u–Ÿç¡´0Ž*=¯zl©ì÷Ä‘¿ìëJ6׆â:V¢–_eLr2Ó;9Ö;ƒðž«t£Ž}ÔJíÆ1“ùð¨ô¨&%Ç&ëuÑ¥W)ÃuÏÈÐÄè.Ýt‹¦â§önZ ¢rµNWyîåÏæî~ð¿j¼=.ß@ÕÖLÒ+Ù½UùIÏ`©ÓšñY+*™ìî`á.:BDP,FˆöÐܳxU«à±$õ/2>y™)¼«}¸«ÈuHšÔš)½~ XUc¬¥áânèÿLedtQ¦²ä [±ù`wq“D3ðWa:2:áÏ›¢—Юˆž çŠl-ù@ˆu‡Š»Ó«ªmRÚWL+F—SÅÂCÊÿ´®£\wÇ-$îýMK}¿MÙ™~ØÅóù(’»³r'jºõºÝ“¯—ü ÙEÑcÒqn(ù€FGvËŠ…Ûè]Á–L"à Ó:\sºãÙ৪‹‰‡®Þ'G•7úAëÙÙ‹~&ö}”\ŠR¢¼u6±Ižàí÷_ŽÞ“^ÆJy•«‘•étU ¨5\fE À%Mü&O”*¤ ó¾å]jî¢ÒSdˆ‚ L겈Dêoè*Ä•¨ˆƒú“3ž+\î€Á^še^½ÞMv%ËŸ/äÒ¨uù¢œuªÅÙ[öQóÞĶÊÔžq•Í¤5Dï{gÖ1‡½Ç|×¢ÿ6:šþÛ覂wó®c¦ÔPllrã’HÛ›;?+?—àa Õ®dĵC¦i~1)õSTgåÃFw•µÚÔ¦4žbyÒ–‹’ÔÊ3$Äö]ËtÉÆ26ÍòL¶Y æ^ÍÌظ˜ 8‚Ž¨&J6è‚Î¥·(úX1êÐø°ØÊ9…ÆÅhr9ç\Nñ8º½õTŒä¯"žå~puL w³Ò…¦È]+?*' Æ„ÂUU„S¼ƒé&ôzþÙñYó•þl’ëA(ñý`h%˜É¼«Ðà› lYôæͺÍ<0üÎ(% ß¡jú2ErKïÊNšxÙj9N2ȃ/ä²<0ke8áåé¥îå‚}<_¤œGp—öâÎÌ&ïëpÁtL7¤"Ì|Øœdâ–MšöT²À븞hCœç)棇‰Ð³‹I¥œ}I=¤¯eKâ2HìUv‘I@*GíÀßâ•ï™Úu§ü¹«ÑŽ‹_J0¾Ý89–uU´w”\u…)BàCo25zl­pˆNá±ìv%!ÛÚ|é~e;·œ[4²Ê‰þ¢iFµª=LìäçÐVÄfHü2œcM3aN1#]Në…õyîÛ¦oûÐ3XnL}1Ù0«ŠB7TØ8¦ ¡:‡žIõÛ¢”eè`CpÌƃ}W칄.Rße³´ï\½³¿ï_š“¿Åôý 0Kø`¹I)Uiü¤ÀÌ'wbj;¹‘FŠ%SEb(z¡q,ÅûÏO:ß뀻5LË\!{Dyΰ€ŠF¥û–5¹R¥ ÚÁÛˆb-5}‡é] FGÜ¡ù[”?r‹ÿžŒõZ4è¡Aï}˜Oéz.“À æU*"[e=‡2Šíµæ)o•Ï\ÅJJ£Í¦…H%²õ3ÿzpœ‡ßB·uÁÛb¹²%[1Ë–¿Ì´ýS÷ÙÔõ¾sr_:†Ç`}wm†šúT²V(k ~3Ø4c/sº¬²ñ¸>8‹qLÔ¼C:Ð,›Pèl˜¥ l/×7Ò¡‘%C¹Náºo£-VâfK.øLÓcW±FŽø«t›ñàà æåæ½4¯ÃO¤«Ø+å²Y¾²eÉ6ûL²[iÝ%µEY±‚"_Õß2§œÊܯý–WðÏM—Ï2Z3N»UéÜ×Áj“¼íJzÖmõ›gÝÞÉQ¿{Új¶Ÿ·›ŽŒüðaóæòSØ«˜0ª®VA,¾œ¸áËVª|R©{xÓïÏ?ç@3;àŇò²—]w»ûô5Ô I’]CÒ"ÇyeÒ¼rVq?’©Z&}ö¾ËŸŒÛ_†sr\Å£a%{FV‚-D‘aþoûÓYD¥Ë€ÃxÈ°âW¾°ðµã œ]˜ré­¸:íÕ1‹(vÙ3Åeî’ñíc§!‚\-ˆäq[Þd«›åwêc'%ÁLË'•e‹&Ið)æèÐÔ¢YºzéªÝÝ(áïŒ3 ÌÞuèw/ðI¥¨ÖG^8¹¸ÐnáÚÐ+ì%­ÍràEí‰(­g'û4ÃÝÇôê¬`¹VÙèTž_¿¬ÌºRL«ÇÞ‰í\WVþà‡ób^Xo«çÀQ§•,æ€GSvÁüÊ*hœÊÓp‘Þ2—z€3U\åV~K ™S+у7ˆanc«Ö¢&L²ú4æw–Êãñ€Yý9º]·ùšu-×ýAÒ-¾eÝ®\^ˆŒXFƒúQibˆ>miÛÑÿPÙê5ô7Lñ+ᤘñªJžÄ8’dÊ”,¢ô»˜Eež-†—¯/¡³ÞpP’$•+¶[y!'4Š¶Hu‘èüx…#ÎrvÌ>ª¸ag¦Á¼žg³–¿°“Ʀ U¹m†ô½¬7G&óJq1&u¢ó¼wö6g \æÔ™ÍÍ9÷æÛÎh"•ç¤,*²Ç¯%‚«•JÙ%¿’g¿òÖ\gߨu¦üsüÓ§LÜÞ£­œ/q§ø4›˜CœW6ÞÚ%û© “L&ÅM‘ˆ0%®/Ëfq»mÖ£À¥UºvÍyø¸Î†æ‹Â•®ËèXõ¡5°­ª_ˆ37ª“°°®E°¿ÚQk¯”cÅ8gЊ¬q)¨×OÀá;z2n$[XÌ£ÝÛ’\ÞbúÞùƒ?±Ó¿ ñíý'ØýÚÿuO @Ëc^/?¢b„õéZÂl Ε®¥ ÷ñ ˆþ¿:"Š| ú^'¨n :™Z¨*1£î«x¢äQ¬‘ËugR©«C†°(Ä¢É*£2 ³˜âêÐ?k3°Èúõãàûø™ñFey‚ö¶àÏMU¼f÷Q²œÍC1K²Ð霓-M•Ãê–.dt)&*á¤<¤õƒYÂE¸Ä‰™¢¿P¼š§/åpvI¡¥&(²·¾ŽœøÿZPéNº5@]ŸiʳUVE±Mð(¥¸=/u…'ž|¥¾4Ñï êG³3õíÊ©/` «:W1Vi…ʺwƒÿå'ÛïŸÃ•|jaþìy “ɼÿw%«ÆÁ¢(¸!áve-É]¤B8€ÿĽÎ§JHxšMÚ½Ie.B¬Ó,M5ÃápÆίÛ{êõQëè¤ócÿY£ÛFêûü¤sÔÀUsÌ&ºW’ÙœëSdX .•¦ÈÔy°•nQ +ìÖʽ”©ôÛÁjå¸ÕeD,n¶Ò5eªœ\œF'á~¼³—TÒýì)*¹"Ë*uê¸i98±hð¶:–ŒšÎšþã<™Ï“ñZ\FŠ¸ß>*EBl )º«O§ªl@ú‰²ÿdŽŸÎbÔa[ñß<"‹}7!¹zJiH±™hG†þ%@F•zØì¤Ö9(:¹R䡯 ¤|¥`§m[¡áÌè#û–¥Ój ¯!]¶åaä÷=Ñ…k†¯ËlŠ‚9‰ÔMPAÊJ®¸£5ÌÒ°Ë HÅA™s8À{ñ`.˜t©É’+ÙXiG}†Ù0š?Å!æãÒÝ8ÞÕú .&™¢Ý‹DÚjrj‰rÅòvmž÷Z¯{*í„„YóuéðœüŒ÷U[rÐ}Ñêü¢þÆ;'‡{V9…ì'3Œ1ËNpäK•Œu"ÛßbŒu7eÀÉk8ÖXBÍ8ñy` àÁ’Táù ”9ƒ—Ée¨Fâr?ƒÑb(õQ,o".Þú­Úè©Aþ‡º À½dŒ%éËò¡{A2c)OVpÑ@ª°Ì³îË2Ì«¢ïa2‰„wR§„¯³v˳êl·”eˆØmùu·’kþ˜›Wgª³ÇÒI QUÒ»J6ßPûÑ·_«Óã¡ZøÚJáçï«­á{=@k‡ïõDZçÆ·ÛN“¢ÖÕâˆw´[ß{ýí×ý¯»_ì„﫽3„ÿ¿¯ìÉ;瀄:i,vÊ¡‘Í¥ë·Ðâð¿mü±#MáÅÎ.>x„?㯖N¶ãl£sĆ)ëƒÛÕÎNµ³[í<ªTåÑãjç«jçëjçýèÛ*Ì 'Es²FØÁ™-J×7“îË÷Kæx&¬šÉ.íl‘>QØ©å›´ó•gjGíÓ®;·ödÞ˜WáçÛôs6¶õœð/~¶K?áÏÞvæhñµêQ«·zlÒûŠž}M?¿ÁŸ]Ï(]¥K£ti”®3J—FéÒ(]¥÷­g.Ä7ßÓŠ¾ç¿]º[ØÂw”§§Mw»^Lg¼ðóý|L?¿Âºtúý×ôìúù-ýücf†ðÎîÐÏ]úiÖ‰}EϾ¦ŸßÐÏo=£üßìÒX»4Öî®=Êî#zö˜~Òˆ»_çGÙ¥ñw¿¥Ÿ4â£m gø×ÎÒ½ÃyøîãáéËFÖÊzüS Æœª1žóø©Zã@‰@NUCÌói~”õw¡Û{êßàY|K?ÿèƒ{Y ¯f‡š¯nVp1ç`+œ ®bä1‰©Øq$ŽÈr&©"údwsðçE1|¡rÌH¢ªžŽ*›-9D´†e¦´9ÅíÑÃÑ®[ì¨5Ä<$‹U8|Næ(mˆ•LÌoÍuakTLc‰Ú¦p”Úzú€$ Ø0r–-%¶Üì z²tú‡í£vÏÍíFêˆ.ܧ±9Kk䥺›<.ñOÁŸJK:ùŽO,ö×(WÝ’éßcQÍÌÒyû“q2¤’LvEú5ž3«u5¿Ýóš[æ{ÝP2ßéÛ’“WÇŽ?*QªÂ¬›Ä[„ΖóàííõTÆt1–Û oÊ…ªÓáØÍMuË¢¬lkEÃHn¯åV(U9téifõOÕëìH ?bg‹Ó $1´S~—™®9éR®"4×UýË«x¡4z‹8¨ŠGù:R¾ä:¼IutñSòb=kF§´]ÅF^*.Êþ`›gK2»ü§%c@ï'…çS)ÂYK4b²O‰ò¦b‚é\¡t1\à—ɱI 2ah¹µéÏ—2 ,ŠOÚÂV§åبh'Ü$n1ò.§kºš-&oÿí”M ªØÕŸìµ­ùuúúðë ±R¶d‡ve÷Ü¡Œë-#wlùsóνÐúÃk âÞ…B!»õÖT1nKVã £âi»lE>íx.ñ8ª\kÇm`ößùž=¸áK_N ÁOz€¯0¹?™ ºçØاJ šoÍUn<ΗʱB7,<Žjâ²Ì^p5¯´õvš²¶/•dP®*8e]4ei›KÈO&îV*P¡':ê‘ʋɪ°–ûol>!ÓBóÕ’9^AlëÔÎ+"ÒyÄ¿&b+å!ª:pÄãeDNy•<­8õ§z6£®´o8hŸ‚ÅÍ°Ž_•ÂÜ0H憲Cfá)ê蟄ËDoŵ§Ãj¹~è+d¥Í4 j*Ëýƒlàfè£ξRã¹;Q^:§lBî| ˜ ð&þ‚ËüG¨.)äú¹ßOoáølŠnSƘ>e×ÐÞâkÅu›'ÇÏÛ/hé¦B¼Ò~“YÕ8‘9cžÌûŽÊëO魯i.® Üoã„d¹Âèì\Ú½%O;-Dn—Õ¨mÞ³ze³~X»ý`ßcJšW—xÖÌ ~²|ô,°Ë‘lîéhÙfNI9ÿ¦÷SZâ¤ø{@®ëdn0¸ÏNº­þáÉ ,DxÜ{Îîø—CGÛ“~™Ríµäe‰¯½E%ÿ´ÒÔ¸p´m2Qá·š1˜qâÒ-l¶¶\F<[½!hõ–Äqâ9š, T€Hðø$ÐsÂ!'G«glfÎrÏr¾rýA­ðÀÆkzÔêtmkõ8ØùÚ®㸯p ƒ~:}cw¨;?í)'¯êÒÐÕÜ‘Ã Rðü'¶}I˜P÷ø#e²Íú&yî›åª•¹¢Œ§ÿS? sÚ˜òU2G%MEkdÖØãý+ÃvÍ Ð=ä&‹Ó®½¡™º_, ‰!ýÓD±%ÚØ™Ñãr0&ÖþaåXUYÕª›Œß»p¼!—¥j0ŠÇ+*„gÄ{D2²ãM#uðýQBîr÷¯bNr8Áò Ú5ÐEÊ8«Š1WØ…»Â×’[’ Î:*gwˆ«øòJiši jƒsLr H(„‰Ã»à¾lÿAŸYàŸÃZT?Xž”›UôŸ+ÑC$wc{*à‡B×kÄœÛð ûÉèþ4§ „\*XE6ÔçN»`MVpL…À¸Ì¶'îúa”Y»?ßkÖçÅ^”¨ÅÅÒIÙ‰YpQ°Ñ9 6Yã^ÊI™£ƒéÍn6Ý#IJAû‘9ñ)]2A¹µU–A°³À´¶[|ïû ÜïťȪJàKëÈ5¥œjOëZ8…Q’hqÕZ|ÅÕ¸IƵ°xuâ´@é — †L¤«¥ßXYz”Þ»î膹8]á¥ÿ<ï'`zÍf˜\+Añ§8ºÍÏw|wçyí¦ãƒ¯pÂ|m£ñ9`‚¬)b-ÞŒ™oœ]žiþbiâªì¡:ɦ0Ùfì?ÃÎÅ?íeêjÞ*[–bùT®;oCVÌø4ieeô²hñO¹\§YÔo ²6äcj‹±vÝ—úƒk4G°GÎcßþ²ò^t&“µ M%.ÕÎå‘È(Þs»?šìÖ}ž+••Ë1²ÊÍÓ\f¶ÏߊqÝÐRìOŸá¨Î}K':GrZÖTÆœ©Uئû6žª(|B… _üpδÓ`Ó¼f—B²Ÿz="D†">U1Ýïžê\º¡1è˼Káäæ:¼©¬›«ÍN`ÂxáˆMÏJ¾Y2ßsJÂsιCRµO¹¼ ¹Su\FFBƒ^”‘4’çAíÅ”´;wÌÙŽö‰ŸM”¡•oMÐ’uws¦,ˆgíèýk-\û£ˆ×(Š#èÃ’\<1Ë?›[›}9šå_“e<øÜõ_^f%Dœç `ž+4ÞÒ¥NöëEÀ¾{#%c…äJs’)ú2m¹þ·¾ÑÝì1ëÌDÜé%Í­¦ÉýÁ»œ^AfYÂÓ·0yRÊ2÷8œ`¬æf›ådÂ)Š[)*ÀP´ WÑhÍÖ öjt¹YL{x›ÅP^&•±ÔAcýWÓá¹k-F©òÚxW¬¥$q€Â±Xç:CÉýR3²»ÌK'û[9e“ ƒ‹èšx8J+õåé'4©ât ›=W™ˆ–ddÑYí-½˜~³¹èsŸ‘§h¶ùÂx\ù¼ÏX€˜d23Øáé'p$<˜“ÓK:k»MÃPå#)œO6ËF`—a'á:Röí½¬3ëªù÷ÚNEY½8-ÍÛH¹ðϨŸNe8d5ÔOž/|\³¥†Ìô-*‘š©‘¼Š Ü›è|§ æ>0&‚ÃJf -ëú™­­é‚?ë´›‘˜'ÝLW³d‚‹ýÎ0Ø\Áäâ¢DõË:fã Ñe ˜Ï6}=[³¶ýŠtmt˜/î•ÜÜ´ÅÆäœ9¹«˜Ý(k0YEýr´(4!V-ªÛnmANhüŠuÙimWÍ°¬šVR‹²aõ,.Ž‚l­Ž”ÇÚ¶Û¯hYŒ®Ò7? ¥LB •tµ¨"‡Î·4ñÕö°æ¾ ãÒ ;›²#îæ³¼Pó@…úßÉ„êWOKvµ¦\­39™K¾ÚÁ2k>ÿv~h–]|f¹yÌæÎ6®…ô£÷ƒh:w…K7*Q½´ï©Ôðr:,ñbŽ&˜Í²^œÉWhEÛNP™ì=1²[»åY Î,b?µeRg ‰•ö;ãY‘µ ¸Jœ-ÎI9‚ÿäk§L¢ko/_¥Ý?89îåò+6’±¬w1ñ2J+N5[ÂÍð$šÆ™ÌáÖ¦óÍ`¼ìç/IDvvJ˜Iqé{c(Ü]ü$±[æä²YøÇÖuaV'<ƈG­êÂMøÙkõZ=¬ýt`•fð}Ö+5˜×ù¶;§&+T7ùô-žUr2®ò]5Õ€W¹Rï"Ôj ¬PEè{¦T ;WÑtµQDL̲u2“o;2ržÅ¼T,‘äa’{l–Ös /¥c-.ÿ”Ívï¿gR}B ÊJØ<9>pÌÿ]†V´ÿÛ$W¦G‹s>iÒÅ/OÉ”åEeëÝÇ Ú>&Žˆ°l©öÊà5/ôTÎÔ%(}cÕäÊL~¹Š:ç¿Š9¼Y9OÜÜŒþºB÷×™ô^ѧ—n¯§“ÎQ°m‘Ná<Ì™jQUö¥äæb½?ÿßÓõåÎz­×ýöq»×n¶ÿÒêìyÇÉ)€NGù΂ 5?‚¤Õã\—=9·ªºÔ‡ ûPØ»JÕçê- RåêÕóø↜ï²#QŒ‡æ"¬Ðåü„ÊGM¢Y< «0dì격ۥ‹í©«¥]˜Í—<ûèÀ%‘§b,¢“3†çÓ„æ‰ør8þ|-(µÈ” 2ôÍ»l¤…|3ÄÈtËAWÊÈí–B°YÑ|pE¹Ãáp‡ò¾Y[çTyë°ìiïÜíÃNLîò€›??>*ÞXn·µÜѳ¹Ö ° ûR¡@†~Öxm$Y¦Å©¾É\Adk§É$}’»u;•)+å̦´Iºðè¥äьއcÓI5‡®ÌnR 3ˆÊ§(7†#šF€óÀ\U "Mäc6ºA}9•aâ¯IʧœS8Ö†*ªet#r5'R¹QŠª`K¼¬køÁ­ 9ÿ´N«A®Ì!ií¡M6gOtŽ(vH^U[7WæÐÆk1„yq´ò]ƒ}«Á&°£‡(œUhdß"Oºëæ7)‡½½èlIrd!‚¾ÌÈOÝ È€oÁ…µŒŠæŸ'3#äýÛ"d:ÂóYÀÛ °Þéë®Ëq‡ŸêÓ2Ö!ùþ#Zü‰.LæßòXT¸)ËN]ÖþÉŽœÕܸîÓY<Ž8ÏÂjß! ‡Ówysä ÛB#L/Æ=‘½]M9Ö¾T±ñž‚EŽÝÕ©á‘›³r¾+¤,ð,&¨ìÈè¡Ä¯*¬ '›˜ÂÅ<©‘ÉÊäç0Ã…Ù¶ªLtªgv›e™¨ì:p›¨€lÎ,[S&Çå ŒÀ›«³ë)]ç±€/°»Mv-ræÇ°õ0 ¬NÙµ!þp mÉø¯ èânkçäæÄ{ŽÐ\ßD‡¾™^œ©’Ò¤Iú:Í2ùJ¢‚º´Rgö?ªÕ@Þ»G ²n2‚®*קK:£MFP³Ÿ LUn<|UA>Núª@דt×ÚJºÕV¯©£r=»² ®ò³ªAÿ<ºŒ%¦}6¹P ÖŒ÷ô>ZI†«vg4Mõ¶µcâ 1ï¹Ö(9[ •ÎlõT`öbxÍ‹¡Ò²w‹ƒ`ÔÚýÙÜÖPÉy4r:Qî8Içª|#«31ÿ Ë(xF[(°æ^j¶êYƒô¦ê½ã™GÙç N·+M(oÖȺ!«™›£$UE†¥x[õY;Žœpk xHU —b Šx~CjÆ€ÁjªVŽ“ÑÔVª(“Þ ˆú\VõË/®²MD*µO i¿:xp…”#s°@Ž\²Ì˜üÆ„ÐÎo¦QÅË6¨($«@ÆmþÁëŽjopîWI-P°8[.ËH³A”VðxDî,ßÈcÖ8Oƒ8#‰™—µšÙ&{A±tzüäcÔ?•zœá.Ε·§¦XnÿÄ-1l¯¸»Årúxð5ôŽ×Ño¨˜÷9Qüƺøý‚Yü³”ër"˜‡Ý„3pô‡ú8Ÿ7ÛâHÓ»FÈÊéå©Ï@šµ€U}Ñ°ZŒx †ÚÞ’ï404ŒÕ¨&Ô,­n0T-3– A8-z§¶p´b(®XÏYÄÛ¨“ãa[ïWZ¥³³*1ð /£*víò·P¸´S;ý›ëæýpm¡&ß>Ýõ@YÎœ›ÓA/®.çëQ»o®xφ9í” /nÄ'S_瑆€gØt]!‘}½IOl\ĵ—½ŽÄR³¶†w¦}ÇöV¹ÜÈ+hñ<™uA¢E'¤7.ç5ícŒ]ïµHöyÕh÷úÏíÃÖ·ä…gHOå‹ëLr,貃taÜùœGêþM”aŸÆ°²þ!NTíüwîÁ£Ë]Hµr<²©²ºÑœ¥÷QÇ-áŠ\y©WõZi´iO|Jò‡~Ås…Ê(˜û.8=é¶_g2‹ÂóaF‡XÁØã³Û‰35H¶èiÄ“d IÆÚ‚Ì<åD‹Š­ƒÚImUtm4¬+ÏoÊÁÑkÆõ®Çäu“JŽªdY¼’‰7ï´eÒ¥*4Uü Ó@4×ç+,¥è&þfd…R>åÊ­·ç#Zš?L‹Í éXÙ„?Âö!—Îþs»â£x«fØë%ä_~±?‹TøQo[–€ºéáÁkË,.Ë®­ü]Ýn€lÿùÆ ¥Àj€Ø Z¨ƒÀ–ŸçrÄõÁUÔó ±Löö¼‚l^¼ç¤–W».¿%…–‘•ê^>¯¸~–%­ù6îТ^,¹‚m\«e ‹rŸŒË9ê ‹é©©f”Á{ë8’•¼7±Þ¬¾‚Ë/`Ñõ[›ÑÙàÞ-CZc:ûm@€_a2œ¸L)‹tÒ4ãò]ˆ..âAM€XÄMdÁÉ.»ü) ;Á?Ó«MƒÅŠØe°—X—dHQu‰© 1ˆž:iPÂuÄh¸K.ЗØÒ¯õ®)gèUa‘丢‹¡‘‡xf9*¾zaÄ*Òs–ò+’¤áÔè8;½~çä¬×>n±íhOZPÜú9HQylÎ.S‚Ž\ úf?k4¿7)–ØøO&¦¦ü‹•]î~z^Ý$!’\ñ“0‘Šÿ‘YÌ"=ýâ¢e±l­&¸_Á±(íoù…íesJ«pýþøF….¥ç•=ç†XýŒÂ ¦RS½¤hÙͺɺ³I:C‚í÷_ŽÞkÃ_½Î^¾eŽ;ðSÖ¼\*Ï2®Ë¸-6G0g)k9 ¢B‰è‰ÞÇÊN<ŸA O© ‹1ㆳ£Œ`õUñ<‚`–±|‹ÉÄK[ŽJ褘rø‚דð08êV¤òÛx4òú+iõ ÙòûýÇgÍ~_v¸ß‡%fÂ~6Qå Žj¿Ìiy*e†Êž“§Áÿ‹xè»è#$¤z@Éçʼ)ˆpÐYRÎVº ³dPg¹\ŒL|¸º„,$‘´ÐƒŠt®³*pÅ¥3uŠ\“šÜà²ÛT†d+í|X'3 Ç^Yˆ‡O»­æY§Ýû±ßèõ:ígg½V7M¹_c>ŸÅç z-É:Ÿ¢ÂÀdLê÷‚á5¥pîÆÿX¢»)@a£)iù%Ҳ£é)f4ÇMácÓ&\/ªì´lî –ÚšRfF‹W œ’Ô„BÌZ­×§­f¯¬¢Rú–×J•Ìù+–_êh—rÅçBáš)ZD_4QØn0\Ìpl¥éLâQÒ²ÿÕ¯ó‘3в¸èÑuãÝB‘Må ѹfGï?Å5\®T®—þxvàtmÀ \˜ËB› MÞ¤÷=ÂŽb…M@‡öãE+xYjåY VñƒZžÐ™öâ‚s· ,Öv˜qƒqòåo#I_°Ø^`1±_ £”[ÎI§|Òë·ŽOÎ^¼ìsùNkB²Õ”+Æc‚D%ñbªà@|µÒÒnpŠ$â\ÜSØË´RüŠuvˆÚ$Š†ýyžén~Nu‘³^+ÁÂE¿«¸9œè:0a§šÀI‘–ÊâRÒŠ›á&ƒˆ>d0ÿA«yØôGÕiõÎ:ÇÌ0JÐFFV¬$>j¢ZO㼤ÙÃê½gBrM$·¸Þ¸¹,TùøŠæÉdrÆ{L¸l²ê8¥u¹fåQ5žg’})12ÿéne°Ï<®x©8¤ji^έI!Fw‰¦töcˆ³È©ŸÌº€RL³6¦ZÿNtkãH÷!]k/OÔér ¦ï}æð¶ :pÀs Å°¨A0Ð`UX•ã_ƒh-![l\ïÃd€ÎY7y÷>ÞÒ4ØFÝ>WþÂÊä©ÅdÚ³Ù$Á9Fœõ²ÕxÑhÊN0Æä&ÐG£´ÚÇ?4ŸçaÚeÎé.¼¦e“4˜ÓK‰s©À‘&(f‡Brªg&S‚µxýä–93ñû2„}R:gˆ¥ª,ef°” çIzÙÏéW¨ÝËuW´^àÕÊœ¸œÒ;´~ëS\ÌÝK 4ú¯¬Ë0S°äº­Ï ð+£'©þ 8Hï„^Œ YÙDF!ßJFØó)… >@Ñ,´/<; ìwZíТ’Q¨p±Ûóí‹‚ºøçÝ+̇Ž}üZJÒÂx‡‡¶ºÉ®Äiq%êÙÙñA«Ó‡‡vö 5%Ün¯râ+øÇNTÔNšY9C”bH¾‡ªœËAýª®èÔ‚t(°*ÔžJŸi $IŠ–‘•e‚åÁGñÀVˆrÖ2À-†Õ“±Ê/ÛÇpß`½ÕÀúÕ2Båœ5b^=ªî\µ'哸ö[/NgÑ;÷ef[FÓæxx+ÚÓ… &p|×ð”5¯Èô³êW rp4+vÃbåJv¸à¾"_åü+Œ¾Üó(e¬Ä–µ§zHù‚앯 ºÜCï„BíC%«P2Zç뼡¥=¹@d©ÌQâšÓ.9Š<ŸÑÇu0µ¬?{™<;êDý1A™Ûà òÇ™¼•„sðX;_w»_ˆUÍÆ1°¡Ò·Oe°÷e(ÊŽ@ÔϹ[“u§h^}šQæ^±Æ)£L´ŒUWÇ”ÉÁs,[ºn&ÆœäÍ0ßÒÞ"˜Y­áÚQŧo8(¾t¤Ü-Ç|"DBó¡ …ƒ8襉ý<Ï@Á<uì0aÇ8ØÙòò›¸®‘G]I5Û˜Ym$VÉÛ\£¹Í¥ •^4l£mÝÞrb6-ýŠ+U¼>!K¦ã(óÝpÜÞˆòìè©D£h5?7êr-(ròRB<*RÊSñ)su³|³Œ†ªôÐd?$ ±"à‚¨PCîý7èÊÈ÷Ñ`£‚Þ}U TT¢UÊkLÏ÷ì¤]gpDMéyŸM?N!; “›I‹”j JLÖy”<É‘ïšÄæÁ—ˆpôƸ”À§ÏwyI«Ì·5[®×êË …ÆåY4Ek1Z/ȵ 3‹þ¾ˆRÊÜdWvÃq¬èdõÖx¾š ³Ûoôr©§LFì‰vû· ýÓ—ûhX«ü(¤ÜµôdÙ¥¦Æ$¬RÛJ.¸@‹»#t@MäÍ‘ŒŠ³Žr¡Bîò˜þ¸Ñ&þ¬ªôS~‹ÓÕv–¤•¢FÙkëò°!_9Ü@…ž±Œ:ÀòÓódH …bÈÖPì[ù-õÊM:_²{ÝE㲶V"Tݳf³ÕíVö2|¾ã­àJ6R D9‚ÀõD² £µz­ã¹IŠ×-ÇÄã9Âgq>ÏGÉ9é¡Âygú ªÙqå@;Èfß®XäK‡uHNžðmÉƘ\phŒãÆD93Êä´õ8()°al%à‰S6W7.ˆFÞ…é['Æ2ðèJQÞ¤X —E9‰›…UêÁRņ³8¢ fÄúðú˜6éäB¦–ÀͤU;ñwv22pÃR–a¢C²ÉãÊò ¦ |›8…ÊF™ºªÌè­Í;R¦äq¶ƒé";¡ÿ¡œ.oË•5ÅÏÜU79ÜîÊ\³@0ñ¾4ÎÆøaäP¦5®äÁw+t OYo×Ý}³u5Ìeã¸OÚðœÚ+trÚÀŽÙ:ÖAUË'y&ßFŽÁSfÊH»ÃNÌ£qª碋&ï0ÆÝÌÝÿ.óQZX)ë ¦×‘o¼·¤^E1ŽYSpN ,˜Sñ#лíÉ3m´šIm„îÝpÐi_MªGËTà“zR¾G;Zñç*v ;-ÌB™qÿ;à|’n¢Iô@²ÏÍÊZiÊxZ/³AŒ¹‹µÅ̽ŒZ m#ø¹¸ÈM°z^Uov²47¶/áÂ+Ü&qc•äIÄù•àÜLºË`2lœü 0é›ÌàþC98>>nî·ÏÛp»©›l"Kçý›ÏK!0¬Äxí}·^e¦ õ* 2O¬È=QЦn8HiÈÞf\.aˆq $>LKƒ({ÍH„—€ëO¾Ï"y<ŽúŒ ÷ÚG­þÙ1e¦hìåê-õ­5<ï¶ðº£$y»˜š"cèrê gÅ-ç÷Ò8êjF¢«Xâ™[ Âòðógô «SöøûqÁqPÄ[¤ˆÒÂlêÞjæ t=•Ømmµ'ÝMNhù`[,a\ùÑ]$Žs­x:öÅaP›yöJŽOiب‚3üG¬ÈÞ³<2 ÃÝ‘ø[OÊ&ÃòTk§ª2ò}c‡1õ{•@˜S–÷ yØ×á‚-ã¦+€ó¹×À¼w+ïÊ/§e2Sô.…óïÈ»BÃx>'x&Ú¦®`Õ%CÆCß/qg4Mö™Å¹GC±+¡Ñ”Ü×<Ž¥{Эÿ&2ÌP¾˜Gl°ÅªÚuaHÒ4Æy¡gèàfà8åš1¤ªX{.•Î±ÏÇ¥d†V‡“Ã,G”G>7F.éÚ5\Ÿ`í¯yꞾ⫅ Α¯:; ,뎢hZÞÙΟ€ØïM@ø×æC7E‚w‚ºI0=ÕÉ㇌X&ñßm¾så l7,¢cÝ£“} Ð „àØÊéYÿ¦ïç˜ýËB»“„M¸sÓxÀVç¸qØÞiµô  2ÔGÞO¬î“¤ªÊµÿÒÕñ¬VøNÕmjÞ\^c(:n4Á§ŽÇŒÇ9“ê“óCD˜¢0¦"MtlIŒÿüˆQ½^'-– ;q“šÃ 8úŒ#ŠÁKtƒâï[ùÐWñXÖfIBxº½l¶þûkeU_Nͪ¾è’,­ÉJ”õ~%gçÛxŒ)¿°ŠeñZA÷J9y²e\Ǩ .ii±ÞØQJŒÇT—AÅŠqÎâóY8Àãøá8E‡„wqJ &•q*IïÕU¯v®ÊJ%Sy0X+™]{ÌÂáÊ'GV~´ÿÞsš„°÷ýJ4…Ê•àî]» ¥ ¨—nÅ.xp7kO·d³îûû…Å,iÜîñ÷#Ó't÷Óèt‰Ëß-Q澂ëø:娫 !»ï¿…ªÄ¦ °âè²y,Øt2²J.¶¬u‚Èõtõ;t2F±7ƒCçÌçÓGÑé 9ÕùQ› è:ÔÎàC¥zñeScl¡ê“ ¬epÊÊã¨@¸=ûÜC&ÄnC^{•uî6›•Ä[¨Ð"9HƒÅ,UÙ?-D§oVU©ü¹¦}&áy0“­=K{Ð… òÇà=ŠõäçtÓæ³s{(;¯MÆ*\å8”lä¶g!šà,3Ï)ËÓÛÕý2CÙL(Çäªm±w‹M3ÌΠ‘H…’¹“˜ Ú@g† ´i9ˆp#Š âÁpAö/ i j1u+TL ^"ËšcB]¼¢q ˜h‚#8d{ÀgÐmÔw‰âážæ]B$8qá/û¢=9¶\+hæIéžU‰ §&¢{n*"ONA“ÆóYS|âT⽟£(œ ³H¯Ê ôÉÛm× '•g‡¦ kéÉ9Û…4zžL6¾Ë}7á®ò±Øå6Ñ™·Ç6›P%‡•}dC”%1šj–‰ÒÌTÈbÙØÛ?ØÌÙW ©ùg¨$uÏÔZC¹òÛ‰—y²’‘ÄuÅE$F_"N˜ ¯ýdn0ÈåÀ œ4+¾Ä+ÀצÓh_Äë¾nHrwÕžÎG©þB*?©¶Tð¢|·¬›zcm”t7ÈsÃFÓ j%Ùe2.\ä…©°Ò;@BS¼‡@Ha ù½ ^D¿Ð®Æ‹ÖßAÊ–Ë´š('Ñr¤ŸEãä]ÔW[j{H«g¨àÒ3"âtÉœBv/ öÎ<>ÑÙm¿8jtµ3[Â>üE¬K`õËq˜Zéì°]RÅ6䀩W‰ôØ(Áö+ddÄh@g¯«˜ØŠ*¯_¦Ñ…øg.ØtH°€x6À±Xö“ô9> .{yÅçÞ=³Œùõ0‰µ"‚¸~uwøUVùnR3.fIØ­,TÁéj…´ø[žÛFÝí|ŠÄutšKõšF@t·øC¡Öï‹h”) ¬svûínóä‡VçÇŠÅí†D7™1Wyä8;]UýÁ ¸ÊÈ˦Q4–Ê ~V5fí Jt‡›9[LtÅÄÖLiź“»Œ3iƒ(»jz˜ãÅàJ µÙã(e®ã¹DÁÉ)\ÍPð~bܶ1]]z¥ìÌf ¦—³ØŠ¨r¸xÒœbŽ@ ¤³ª® ;°ô`ç(‰ÐŸeˆYƒÓ9NT XYB›_SYÖ99 “zÅŽÍ|Ü>î¶Zº£¾ÐzOø–ur$H€ lÛÄXgùxbs0H¦#ÿZ>‡ÏNN­i`… ¤Dc÷zþÙñY·uP Î(û/§§_‚Š%&3'ÎP¯èc Ç»_9UÑYÊHc'¬µcw½þ-è_åÑÊêjàâ“+_ÐH-󚬫O° Ç¡Üùa€„žd¼¢\‹±'麖D³™ÖsŽONñ×\ÂýWÊéºÃ| høV«³cÕW'q/ð0„Æ9©UëÝb3ìƒV'÷(ë:²=°§ùÄš˜ÞìÓÎ :´êÝÎ:™9øȽ¡ÎÝwV½nž4q“öí&ÀTÆüóL.¼¬ÏddGp‚ÄÐ cÉø°”(7Óvâð8OzÙ{+Æ‚ø3*žñõËåg·½+]7æ Ð3'88û2¤»:gÚ/wöȊƾ‰~ÀIê×urÒÛaŒ¶p¥×±œû«Jö3á6°Éõ*B#ÌË8€ýŠ=C®’i$Þñ‹ÉD’Ð2ˆOæÑ{’PðO5÷AÖ GvoÅí\'ü~31Ëõ0-Úu½³»°Þ|œ:ÞÚ/ý®å{Ë×a žX Ðw+x:Wzg_ÉÝ‘™5N€w†åß-›©õÉ2õ&þ©>×+,Ò¨RÉxú.cïz†*t×õ„ m.Tx>> †¶®|°b‡>/àB)ªÙò1RE§œ(Õ{Á‘¶”ÂÀ£ÅAÄ-[íJ–Ð%CZJÖúJE° cRNÆž˜¥Â®G˜„J¹Ú¬k±¾L2Z wá8•Ãm.ʵôª0¨/ÖQ¬¶mØᢔʮïç ôs°„{±[Á" ÎCTä§ å9@‰kŠÕ팓Š÷ŠS÷Óz8+«ðN¯Êa@*$²8'æK,¨jdŒ·“ä¿ìzè"z'©B±ˆª¢ÃËäcG«ÂS«²Ç9׬¨ òC9tÔˆ1†qÁ¾î‰Õ žvœÜ5N¾§/Ãi3´±'.¶ŽÐPJYOfÙ#Ò´ÙågaW¸œ³íµXÚR«²cx}1‹‰ïMÌkòýÙiÿèGÁ#e­ªW÷ÆUfÔ‰F~vÝM"ƒnKëg°)yò£vJ4WäÎmv‡ò¼c¤d=³¥ˆ¿Ü‚âÀÇÒ©¨:½Ó"^›.Ãù; CïxÖGÓiÌnÒŸŒÒH¡)Ó¡\*QÇ.¶ ÍZRW]ó‚+¤ƒ„E¯£{däÊ°ÆÈz¯¬«C©Dô>—d5]«D Æ㽟G”èfÍâdEÂ܆0.uJ%üìØeì²ÝzgÓ®X¨ìK!ߎûÃ/Öø>Y»¢\ƒà‡æƒx·Ò tz0Bí¬Ò•Õ'Y0%ûÞc‹ÃF(Rm:ŸÑ=Åcºüͺ´ÕLÑf Þtùæ”Ý)ûžs &]Lpß‘½ >‡÷c6¼O€X;ØÂ|5Q¬¢0ORòbZWɳÃúD¹j0@ƪj5}ÝÔ76íæ Âr{f,AÌTŸ¦œ‹Y4„u*l`¶ö¢@@¯ñì°Õïþ%ÃRë)c>Á÷˜Ûä`§{¾š¢>XÁ ~6úçߟ¼:î+-cyZñ Œ~·-êˆ#QDÏÁ*heäÌÀÈ Ó”– >AÁžŽR4¿;5Vš|Þv+ ŸCHé±b\D­aLS.ããvÂèÁ4oÂKÛ<ëöNŽú˜Õ¯ý¼­í)™±Ò!­ -ÃoÁ}ŸDÇR0‹Â\i] =%1LùÊåtc«Pwi`Æ“±”E¦6 硈ã `iLk =TnKXêµu`Á’Œ•ø%ÿL4¸ø,gî qì?ùi†ÂäéG€†/¥áµLnÒRå_è* êDéœù=æo‰ŸEÃxÆB]=ãÅ.^Ç 8“•ÂngòVº™0© ç_rÓ„ÙÝ7¹Ä”öVN,gëy& —ÇÄ–Ý£ÌfkÇxKäüÃGÿw9¨}S\ß}ˆA«µá,©àŸø¿mø¾Âw¾ùjÛþÝÞýæ›?ìì>züèñîW_}ýøÛ;;»_=úCð‡§ÿx1Ûúß“ÿ¾ø$ÜNtRF³…0±öJ¬èÜß]ÍçÓ'^__×/'‹z2»|8â1Ò‡O릕^ÈËÀgL‘qä/žCÉ0œ1 aA!ÍåE[ËË&ÔL§ˆÚí0žÀw¡/üq_.f"aÑÍR‘§¬qo,æ ¶ªÜ£@ÎêÄH÷ÀhŠ!¹z.´‚yú(ö]ȉ`ctPåçzóJ id|Ši® Œ8 Û¨Sª5ƒ (ác48h·Fa\õþqã¨@ªáIìŸ6z/±Á,5g8Ï7µÚÿgï]ûÓÈÎ|Ñý¶ë+œ7⌠$Ûí¸“Ö8³`™4 Û=Þ%‰6P„ËJ¦÷g?ÏmݪVÈÌì}Næ7q‹ªZ÷µžõ\ÿLðN qãõ·‡8ýÏUòóønš,’ µšž*\¡q7ÙÌ4þÔ­&[dÜ£Ö°{9°~4šÃó«‹N<ú1@¯ƒ#ktGuü©ÆvD:€#3¸#¡™JŽ@B B÷q€33‹õD4KxÕ (niÞ‰èÆ àH³ÂïÈl ;Ã}8àn»ÞiÓÖ¦/6èBYÉ%Ð0’uì²›ržùHÍü* h¾#žoøÉóá¼F2¯0­Ç^R=O~6n·(ÏÌ’@ìGOžÁž… ʳV³7Ü)ïµ'ÿvzJÈR“jo¬'Îu]É–ÔëR ÍÔ>‹<½›ßlå#µZµPÏnöµ~PšÆì'Ö&ĨE3CÙÝŒoÎüæ>ÏíÚZè™ñl±šüÛ=ü²Ú§¿¢±›iO~=yvT¡OFÔŒÓɣͱÂ`–¬â XÎSŒ| húŠ¶mø©òDÏqÎOhMr¾«<±ÚËSÑU¨%¨„‡U¡ÏÔ VèÐÔÚVŒ[–Jìo*(~:ÅcÖ™BÒä%h_@²«´{̹®oÝJƒ›y [Äÿˆ¯)§Á©3e­Í#†£§kùuø]¯ùÞF%öÃjÊ\ÅÑb~}2Yž}¾Ý¬äñsz|üã _,néÅ3õ¢Gò­z}½ØÉëôúl±‹ñùòVÕ÷[z~c‡›ù˜¨ðÿï×a?á³d‰}&°‹Ô!jœš ú¨$ÍÓ,!wîWG›eظ õ õN9 «L6ÒmMQt{$s²+éöÕ³ç¿? ŸHE•ð™õæë§ö›ç֛Ϝ2_Û¯¾v^ý–XC¬É»xÇ6‰ã òäÂ¥lºýüÿò,ˆ9ÌáÕ“3û O *Á Hlnµßÿ^ïU×3š.&ÎòìÛ'.ub’ýô[ØdDä^=ÙâvúêýeXj`vqG!ýo‘ÝÅ¿ˆ†<ýöKô“£2·ì#ùŠŠè2ÐS)³J¨È7ßP*ëJEFßu/}ET3¿ÿ½)Û€ÊPΗ’®}i g!eÞ#|iI;_ZÃQS@E Û!"àb?ÀÝvš,éF¿èd+-|Øß ÖŸŸü ª„aÿ |™¡¬\‡E75ùÖpÄ[21eæÇ zTÈÍ®êÿ–¨.€šáØ^æ0¨¯nÉõdÑð}ìùZFMŸÐ_þÏp>óUC*‡= %h–2ßà {¤Î}«ø_tÕC°¬oኋx˜Þ5Ð)dµð-ö•Pp±} ‚êlÖ¸K’áÑýd}"óô Þ¦»|¹FÖüjP¼Ë·pPE@ÅýÝ!&øÕo¾}hüæéó%þ3;†Þd¾¤?ÿ —&||5neÞ‚àÏE±€ï:ð øÿü¿¿“þÝ^'¸[îþÇ­þï믟Ã;£ÿ{Šú¿§¿}ùOýßþϨÿd „ ý—VYÔåÂ%µÒH¦=9à³é÷ŽŸ~c©I—læ·óˆÙ)»w¾öløÛ°ºœoOvÛùâ„«JÕ>ÆÖ>ÀÌÓSžyÖ"š%–WéÝ„®¢tÃýGêG3ª öÿ (™ô8ŒÌhEÝû¦Ž¯ÇïšÃNØ…—ÃÁÛn»Ó+Íü®Ôµ*W©qÃÁkRë~×í·ëaçýå³Ì9Ò½¸ìu1H¡Ûoõ®ÚÝþyx%ûƒq(táx@MJeÝΫË(|Q‰¼Oá ]hCÅýnÿõÚé nu­}xvÞ¯pôSÎ@kPœA4€Z®.³t-³\;Œ¥Õkv/êa»yÑ<Ç. ÔÒgÜ¥ðÝ›=êöQGÛ›-´Cbï¡æñ~Öapñ.ü®;êÔÃæ°;Âyx=@8Pb€Õ`¹~§ÕÀEÀšpžÝå€Ïð÷Õ¨czÔî4{Pß+°?æÕìºU½¢ÓUJ{öª›cÜ–(ûÁ&+²»àSÔ¡JND£™eÝÎI¢…íeœ\ð° M¶±h|1ƒªuÕWD DÒoSÝ—MXoæP9¾m ÍíàéFüö˜HÛ=m?¶[Ò˜q¯Œ^#•[Ý’&×VyO¬5ëÊg j…ÄÂPÙ‰‰žHqš÷`0Ýø¤2„åAÅ•¡çu8én¡¦#Ô±5c:GÜB].ì'Id–º$Þ­êZ£oæXÇýÛD4x5ê›±ˆe–1¢&ºHL8N_ÇaœÚº^uG¢-ƒüef‘dQÜûtƒ*îã X-^GA÷õèU%¬T¾x²Z¸‚ªçö ;zpNÈPÀÉEÉÅš1ü–#pÕ¿mˆÓҋ㯱;HÇâÉf1GkŠ©8‰´Ü|{ ’>ˆùOþ¦šjü¬eãÆ_A®Â×-õâ/Àãé+üG©ÌSúœ$b¸w¤`Ÿ\ƒœ††š}Ü÷©ØI¤'w¢M%§,2‘ÁÄÞ¡3´¤ˆïûq¾IV”<íãd“¤Mïn7käG ç­7çÃKê:=ý^Âݤ_^ ÚòžâËä~¥_Þõå%<…—K]é…T¹Ä õSyÏ–fó<¾ø®ÝÒz /?ª7oùñÇŸƒÍRž /èÙfùs€7¥ª{4v¹zzŠƒ$ŠPê{uôoGñ2Žì7b4€¥2OIùVù· Æ(ýÍ@^ 1ã¦>ÿÃÉ,þx²Ú-zaɯÐÔdl¬W°KŒÎ!Gª—4ðW´ã”BŸ £™â é@ VžÎ>…2€¬ât9{ÅK†=Ñ‹Ç+Eo—éÏ*L$þª<á …UxéÓ ÝL_³t ÿÌ7ˆsA¿ø¯ù(YEL«^ÝLp„«$Ú"ƒ¶ØÕ$Ù<¼‹Ï«ÊŸÄ4>yþ0¸Ä{âGôkù¡1þ1 [¯»p‰µGcü/NL²É}*_ðovç ¿/ø¶±5ŸØ‹>ŸéÏ»ü]Ðejû,%·Û%skº§@?¤³ÇêËçÈcÂÿ¾ÞÌäc$_ªm*¡z¤Ë¼Øp»A0X Eۆ͌ê>O׋ÉS.zJ¤é’ ùVÌõ·ê4™ÏQ+?u "$±ú;5Zn Sc%,+Ü'HHªk‰Ì¤-&0_dÉ!¶V²«‘Î*Ù•ÊÀÕnAŽÏÔ¡&ÙÕn!^ã6<®.¹üM½2‡ƒ.Oú -C ]P’ƒá+„R™™•¡)#ÄÎW?¤2©=¸'š&eËзöþÔ³;_¹»¾Ûu²)NÛbq!dŠŸžÉXÛŽKìÅŒ‹·ÿ“àáb© bp£í€6›¾BMñCMÞC¡æ!ÓïPÓëé3”g¢j"Àœ±Å­b¿-wc-<_ÄF«fÈ ÂJë׳Z¨“óüŠ)rX±vÈ“ç•à e£ Ì¡Rv½'D¨µ¬ ~õäyð÷—(2tù‹0üò(<ú2üOøïòßàèKxŽ})OþMþûÃÑ—5,c›¼•Œu‹T3ÛÀù;ìÊ3èɤ¿Ít?Á‘ i¯X[Ô3ÒÁÈ„´›©_oa.…¶ã(åØ ’sð-lž%EQ£Eø—òÈÒö¢ŽîTÜÚ2ERÌR'à‡Wªþ©ö«M[Ç'껢!Žk¡ïVqü£ÆäÙÊ #®Çljûu8PòQÝw;o¦&[‡*ƒ4ÄŸ?ùŸXÅ{ln‰ÅUlOÁ § ;t¶¶=ùŸ*„ $¾%ÐíàœwŒ½y%Uü=F™Á 6 ÉlejVïqU fúÆ°_æ÷14§A=ø%GB­Ú§‚;tÈÁ BÀ»ŠöS©åÖ9xkÙójv÷ qzÑ]ƒÄ ³ìÊGQŸ@&é×aWBËâБ%b6fG&TRöï ÷Ð¥ðá_W,jYÒöA²vð±òøyê ×?*mb;ê&6†Tø›{2~¼1Õy™µ§:/s&U÷mΪŠ£a~gD ÈIªÂò„óÙÂÆNEìM’ù¦%»”nƒ”§OÙ>Rá¬ix -ä´Ñ”ˆ&¦pBiÑXº…ªõ«®,ÞËÈ\.1¼o~8ÿølÔ/_¾x÷Ê:¢^ÃŒ|-[ðK4¬ÏŸkú÷ÃÓÆ7?Ö ’†Y*u稵úb­»4ÚÜ¿ ,ìëñÑoÂçOŸ©X™¹Ê3¦šýsüi §­z~óÍ7aCö›ðÙÓ§OãÚQøD×õgÕñ¿S×껯6÷…£Ž˜ÆÍ]€û—âö6Ó€ˆß/#%¼œP™æ™\‚bøéB¥·yº€‚R?PEÄOTrÆôÞT¬¯"ã S&{ SmïN^‘óT@‚f1ÝÀ@ã"üŽ Ø.×Å’J]œ``:A%Fæž3¸=Ú²¡Ó‰ë)H,×ULµTeÅ46i³fîàÜŽ[êWèºQÁr}yÿŠgŸ9÷–åΈíhÈ3Ž6ÔÕ¢¯´Ÿ‚Üõ^‹·ïp϶¡WZªVkսɱF–¨‡D¸UÎBueàæ=|VLµ`æw–ìP›—³pÇ1Køˆ–îĪMåŽÑÙ¬þOŸYk®eD߆]§óÇ–=¼Ù}n&ŸüQEH½Ì«üg§”Ú÷O³<Þ¨kÅ>`iÖ\V FÃc³ [5æ[r®¿Q_JtzìvîÏÁUõž§ÊÑ;…ÿùŸ8: ‰ïùmømxôþOÕã/ø_'?þ©vrBàÿ¾<ùòÉQø§ÿ ÿÄÂE¦ÄÉÉŸjøÙžOJ«øSÞç{ˆ ¥>þO.Œ ù£“ÿeuöO'²º ?9ù[ð~œBÓÏNøï¿à~ƨ0âžyðçV\ÛWez_Ÿœ†QWÖŸU$ŸhzɦlI& ªyæƒ42ýšEÆŸ8µPŒšu‚øŽ°ô‰†á<:ª¡|×RùÐ=žÍE “JF!ºTá¾GŽ…õ8†`ÓuwŒ•(àÒ€cêÉSx„e“´÷~Óxö´ñüwPFîpúÏŸ•¨¨nâã'Ì(±ÈXȤ ÐýÃó¯_~ó#ÿ Ò9O_Ãô'Ãðø˧?<}þ#þ®ÈãìßnAæg¾0ì íQû f=¤“_…ÏŸëS€|?&Fþ}ñ¾ÐÏž?-ø¿t>ä¯þÌýÿÒ7´úmÒ¸×â2.Ã;d3­G$«X|oh ±«ÀfÚ4ôEAËL+iIyŒU…Ù~b5 ß”ñ_¨y"5IcI¬tø'ç]ðîñ/lM7omÙ öøò‡gÏ¿þ-.3®‡½(@a£î{®8l¬QìƒûÕý§ðz¾%óÉfFQåÌ@³Æ¼*O©YÃS~“¨RåNýKøõÓ§ éxÌÕ¨Eâ_ÀAÐ]ò·ñÅe»;lœÀƒŸÑoâÉ°Ùo.OžÈ‡(2¡ÈðäßNÃÍÇPyÂÅOfýwÅ5/qd"® MÜ9{±0“Ä_ I3weVg¬Ñ°Û¬…¹&Oî©,nž1‘õg«‘Ä_KT4r{¼:f‚…{åYn,U‰7—«÷á³gÇÏ¿&n·;„b/«v©×ö¤¢u#L6ª(1Æ ”y(ß,;.5£¯ÛÞqDp!ºmµØ/Ÿå›SbÙZzU*¿H£Å,’%ÿó" ‹™Y¸?óG¼¥íOigó„Îþ þ¯ñoôŠ×ºt>$ß<}Š[Ëù®áûî·¿5ß}‰¹âá$©'Hx' *Úì8n5™Ý@üíßT­vç£g…#Õ†3û{tÂwŸDÏ*üýÏr*@=X$›$|«Þ±¿JŽ‰hJ…Øðù: Ñ­¶ˆoén¾¢kl²š@Ü¢¯½Òc·M¥¬£s|Óÿ4ìÃÉTgù|Ã)UDÚVáó+—±sEüWå†ÌŸç'Ú2¼ïP»Ì‹¾4ÃßFUsªcuŸ“Ï÷|6Ÿî„?Š±…Ô+-¾ 7‚pÈEç»®+A;„ʉëˆÙz‚Í$ÜL¦±Qó‡Š÷@(U…9±äz±HîÃû é6^ã‚á댓 DJ¬6Eã>o“c5&­gSÇíäË9?Ì?½::9Â5ù¡!²õæ˜_¡*W=::U¨fåBrí…Yöš+ê£}žÀ?òž¸kŽß‡lGÎé.¥û¶Î² ðW7V O°YÕEœ¾ ,Ø‘™bA“à :±È‘ã9}»ÅßùjãÍsð„ÿûdfÝÿxúù±uý›Öô­r¶µ½O­Û¤ª4&™MÎC|ìN¯aßIÿ®nwvâÀ I×Ö}ÂöµÕT4"" xÊS‹9õ¹1â'Âã6•›>†…ÈðŸŽ`ýEæïÏ"ŸêºH橤'°ÿ$ÿwttr[†Où_ÜéWïØ>â,®ªvôDŠEDj„ÿs«:Ñ`>a[U§×ö³g³ˆ3‘ô'kÿd/´îAGe/‰OXBã+é[ÒÕ>=Øß,6GרEêo¨ŸiµÅÏ*s—[’ nI~VX²òÄ3Ý Uç+¾êq~lQ“f÷·a~&ºRÓ¼™GWsGáÁèK»ƒ‹‘|ëâåÚñ:G´M²f=‡bŽD¾…›YkQ"Ü-ÇOžD Q¾tÞm–ôFÚã͉ÊqL“îÖ ÑQµNFãèe¤YG§ˆèÖBupygn ½’Ù«UK¹¹R{ø€›QYiz±B›H‰úR´ƒºH–T[ÈÜ"¹F~DBóÐþÒÊ°MðØ>ÝÍg$Ëp~mÔtTy;¦¬/ªÌì5º`çïï’…ÊSrqÎ|q8ÛD)è8{“„h‘ή´þ„¨b&… X,¸˜ÔaÞjßߊÚp% ]{@;kXËg·’ÂÚ`VÏhù°ófUaֲѪ‹çÞµÀ?&ì7Dj¾5@lìý 7«Ö >qÝ#¬‚ÉböêϽ½j…ȵÏ=9ù_XœëŸ­2«ø¾¨ ö>WL•+刬úóŒõ¼Ÿ`>,8^ØýoŸ<ÿöÉ‹oŸüöÛ'/ó¢~>Ä>|˜g•ìN+‚»˜±˜9}ÿE™2‹¬de-'+™Á¡ByÝð5ÊšðÍÙ`”mGW o)òÛËÒ7êYFÑêpö›Xk•Ñ:´ún²FpQ6¤,?¢Y–Påé»4YÆœuÅé1ž}ÊâLR§Š³Ð2•SQ‚ƒ®GaX6nÔàþ†ìEx}ÎCCB‰m):(QZÌÄýyë(4/é¿0ß¼øÃ!{’C*¾»°<ÄÝ Á U:j´–À`±pú²Å2•0×+‚ZfÓf—Þ¥ÄEÓYŲŒòª]qG®°.‹‹mIø%•…ÆÑÐal|gÀh™|ÀÄïyG¶\ñ†qþMóB¿Ò¡",’ìòç´^f•ðHº¼ʺ-í2Š'ÿ›§üç§á·§,Ôÿ¬[3ö™)ƒïÊ:ªm:n^;<±ÿ™2ßÓ u2áÔ»åÀ#ô…3ØìÑqoæ78b<³ŽÌ1«°ÐvXè?£=ÿùñŸ‹÷ÑEó»zhþB#_"®[þÛoÿíù˯Ÿ=}ö?àÑËß>ûgüçIü'âF'Ïuæ5£A¢`kØñCè]”±±H ûúø›gõðv: Ÿÿöø›z/?…OwG7~†µ¢‡H ßþ+A_“ùr¾˜ C™,à~BDa2õÝL$"oƒôÂÛæñ^AÓÌ!‡¨"ôº>[«duÙÚ ç ˜¿Ç!ƒ7_Y –‡Q ½ ƒ·ö*|R凵 œý¦‰`¼ÄÞXLæKø žLï®àO˜|·œLï¢Y¼†?“Tþ ¬ä ùIx‡ø¥›TâG×?EË ~u½˜L?,Ò-üIL%HXð'f$—f+Ê(‚^ßF˶w³ZüUþ\ªþ¥ÛÝõu²Y äpº[b‹Û‡õL>]o7 LN?èRŸŽØƒa;â¡Ò¶Ä®Ó)–Õ¿?¿dÿ^oV[]–ch;ÂXx›ýÎú©KçŸÆøåŸlˆ4O1”<ïˆM#B€FGÉt†[_£i±bì:çÃú Mâ­«á{ÚXH™¦v[y $ÚÙÄB£-y£áN`»-„Òa¹ê?CØðØý_«IT‚N£ ?…¦?°õƒ 7ÇDS´ó›N¯—á#6ô8 w¯(Àð ׸ÙãSLI•šVf:NS(LsKÈ ãIª]Š`¡p©_Ð_ fU9ÿÈáÃ>·L1õ#…rSÉ%ƒ¢ep¸aO}ËWÅí ’· xRÅÍÅiÇÉ·Îþ@œòÎv€gw38*wÙ}Ä»Ã~ÈÙÒ°ßá®»“…„ñajÕ”¼ô5=W; V¨^¥Æ@J¬´bºe♢JB ÌˆýùÖ)F˜b$`”ŽïBe(T^z€A ß:æ¸Ûs"÷Ž„ŠÜyÞa@×hþø£ ÀiÇzh®A6ª6‡5¸Æx9¬ÇLyk|t»`1Mjæë%ÌÕf¾ÎUùÅt]päUïù§ïC¢ê3üQTS§FE0…ñzÛgø ¸¬Ü³;\ª5 •ƒ ÑSf髯p_sÅuؤ>Ý39ªxh­9טûć9¿ÔëV ãج«§tÈCÍ_:0w“[¿Ð«_Ø©£á¹›sç8× biÍ'S—ðŽÍu#ɈϨ7°8à‚~ÁËâ¥O $ÙÓqáºÿþMb[ÄXçHšÁoƒ/XaLo¹¾­ûQPU%¿„ü@fUmã[˜Z,9°!Àèïq«þ˜Ð¿S4þèåtÝžà‹÷õËÿ4Ôl™L· fÖO¾@ ¦-ÅSÄ3g(ŠM'4éøÖîÁèU¼mdÐM¨š¥Küz“|ˆÑëä|ª%Ö³¢Ï:r9c¹ Ò.,ón¥»CøŪ?ÙIBö‰UÐåK¼Ó‘©®¤6Fåý6WÂb ¾8>±ÞâO~|Á_þºvýSøÓÿi‰kúQëÿž~ýì›ç–þï9´ø§þï¿äÿN¾ Â/-ܳg¿ÿÝïêøïïÃ7“UÚøãqx–ÄwË:f@õàg;^‚hè–ªN -íYƒ Ó®Â÷ñ&ùlÖÉFEÛ61"˜QÅT‚ìc¨k¿éŽÂ‹&jnš=‹ð°+lž½«q§÷=ÂMid,Ãê´±&yb<,l±ÿ=á8A…ÍqøýàjÞõÃawôj¹ ÍMÀÏH÷Å.&ÖåÌpázÃDk¾ü8Ÿqþ/ñ4`(ñ?Š k4tØq¦Ð*㬉*h+„4+Àu ÷óT#ÐaevƒEá‰Â8“¬NÒ$‚îAUºöCgì3í¤ïRÃQ¦9QkVlDÈŠ›‡î¢Ù¿jö¢·í3•n$ÔHé̪ˆÕKNä?P‰w‚Ê»ùr¹#¿êZ.gªÊÊÆ¡Zo‰É5âõ&žJ6SÌM—¤˜’.^îN!¡%¹ìˆ¦Ÿ¢,a òWŸìÉL‡#X-0T:E¡[•@CqĪ!bÊb ëö¡ZÃ=B#O9sÞ5®éü¦ñ,Sz ‡”\úQ‰æòyUf.î*ض”¢ŒÒ5/»:Ÿý'{¢”™¨… o”S W!R—IPËâÚä§ã4­Uýq^JîBÓꊪ7^Ít¥âCR¥ –>¬Mýz<‚Úzoå\Ÿé´S±óUHI[µƒ¹ßÐ÷€ò7™}a2:þŸ=]Å£úûÏ’NsåNÓ?y¯ÿ³ø?1ÿý—óÏ^<ýæi†ÿ{úÍËoþÉÿýwðÈÉ=G€¸UÞÄ÷‹x»m\ÂÕ‚×o ƒ¤VÿdåþÉÊ8ySÙjwW <ùÇ á(À”¬b´°—v:£X¦ãâ”ʔۛÅ…âF5º+ÍÆ EáÆÑ6‘R®ç×ûòm·<Ÿ2;•½$¿_…ëöß6{Ývôïãn»>¥ÿWÏ8Uc·ý³›Èš’Wgò§2]¼ÚR, C êg…ˆ*žqbBÖõ˜àŸ8~‰L³0dJˆ´%3!B(‘§ŠédzS£Q1¡û|"y^)µîqvÊtrbdmáLJø!âx^IˆN i¿ ñ9°`œöÊÉèJˆµ¦ Ô˜KŠZ½NsHœPrƒoj5o¡YûËnƒ!ß²]‘:ª’6ßÇì’2Ù&K˜QJ-šªaëD¦Õê}²™Õªÿb-¤${ýM¨Û1¼å&T=Õ`šOñw»&ŒYØé.:§ž$Ýèf\ý—ª ³ñJ'^«‡ý«^O*Í%°»ÕzÓ‰FÝÿèdÒךzhÕ~˜ÿˆSG9¬es~yr¿í‘&¿,ç[v2º™tGÑ›æè¯öLš>ÝMÒ;èÒñÚž3Õ®I-û¥lŠPÍã©Åäb¾wà1m1CjâD‰ØïâgXÏìÄPX9G¼™póÕà s±‹Õ6Tk´ É¿ö•~€?«j±W[Q„ã¯BœŠ*¾—×:q=M7ZÙ¤fn¨ú_½ÊÑ‚šÎÍ=KVÛèvúÕW§¸·áF áó–Ú±L `‘Ýö J\ËÕÜhdö.Õ˜Ûº… 櫘TXm\©W‡\€ãI:©ÙP „zTQÈÜuJËch?„úð°Á¸ öÆh㨹†ýsê~*‰_ÑjeÞѺÂ+úïifúõWÙÂ&xeÖé´˘°Ÿó‹œ@ÎNàž"·Ø ºrOÈ? .¾ÐbjWh>™ÙLuhÓnÐg+Ik$ØLèsz\–úXAD”+’\ÕñMÔ$©‡Uøt[ãEõQ Ýªx³GNâ½·’ÁE¢·˜öóN! ´6B¸Ò *Y3  JBŸr%Š²ó}”?ê:Ü»U ·G<+;átÐä\ëß_’Cø«ð_ 6î£Î‘:ÜT)?bìQÙ¹@9𢠘°ÌaøŸC’U¿ªÎ ÓDØÓÔÏæ±Äù#æƒrƒ®qê>Å')Ù¡Hÿ$ÀŽÄhr6gÿ33±H’»5Fä-f¶ÏÐ\%W Þ—ì¤VΘfµs¦ÕhÕ*9s¡^"AÇôWö¹d(:`,s[Ž¿dbñ@ú85Ar ¼zâªàì¢ïbƒì LŠ¹F IQ=_”›"=š@ÿJ̘“x ž§ÕTSÊ õqž„0 ¼| &¬Â‚S >jR£#ì_;³¯t8Ÿ¤éˆE?ËÑ´8x„[n“*DxŽ¨Ü¸tä2—Q]'sÉÞŠ?”æ•Ó×^O0ž_ú}êŒzSüÝm’•v Ó,$‡áHž .Õ¥`·+'U'8QÝ>M–ìj†? —@Åà˜ª4ì$]A‚=9Wž ™]ʉ°)’#ñœò‚ñ!½Ce19Ê«("$u›¯3ê&"Šç5Á¼eñ";oÑ*!h+\Œj–hs$¤T·B+yJHlÉÌ;^« Çh¥7JÌì$ k/?µÄ*Áun g›æG†¨·ÏѱònõKRÕa7%ß}δ1±rhðæ,0ž†rúsi|ñûèÖϦ¢8B­r32Ó©‰‡lE[Ôú\ƒÅìZ†ï"Êü+/»õÙ÷›ê‡¤ÿœ¹2^©+Cøü¡™=D8åÉ’K(˘ʵÂ|þ0r;Ò4•M'7±äbj¬I²Kx¯u$<1§ŽÜŽz ®}÷“ÝíÝ­@·f;Ì1´Þmæ©ŠÇÕâÝ*ÞÑiÜÄëÅdJ™aVru㩨>U>æ¹*Rš^îp†Œþ£w›ZgŽš·•nFÆ*$C:¦¶Ù5XùÞapùn©Åx>é1Ϫªê&¾%{M˪»"ã_û…_gH‚•²ü@Ib†ÙÑ雈 N·›Ýt‹æV~.cÑÃéGòÁ «7âÙñãø]c#¡ ¤÷ùͦL,ˆÏUf!G›‡TD< ¿‚æiÄ}@Ë` e«ÕÌ™jž à´V®VüY–ñoЈɴZ©ÙGíšútíPÔœ†kAÄwkÍ®Z†âQ¬í1èqDÍáù³}ƒ¡MQ©‡”ë~³†¿Ö5³wv‚,~´zFÆiëgN lI•†lëeð4D爫ϧÝÏ–eÎ9¬Õï¼Ñ'‹TâáÒ]ŠÁ*'|—ce f™7¨0ZÐ )j4NÇM:¤uroÖÓÈð»O:2)øÒ‚l|½ûi¾Mw–ë,A‚@lü=êÉí|Š!)T_¿öôä»Z/×ßÔ°º×óOáQC`ßXgxc+ÅƀĽ[ÍÒ# Ž-d7+Ž¿Db‰m ¡`ݦººÉVYôf(°ß»ï°¨³¥‰$Ð#]e¾]Ý6¾>~¦{&=¯…­‡[Pãå «Tï¡ *àf&n!¡Ê;ž`x`Jò{àš2°L‘¬K¨1P¸—ñ¸JV ²$`tبËKLi8T%£ðm 3ÉëqèaàÒÜìVS:âP*|×FU6î¼Wk!å²á 7u§Z_%±²2ã ÄÔé5‰ï櫯Ÿëé¢[o“$Œ§Š†Uñ¹†:›+糓O¿{I|d¿ý]Ø^„G·ÉbvDš³x£*"%yR]'[`>q2Ï€<›¾<ùw{Câ÷…2‹×áñBEL‘D8_É©Áõ¨Ž.›C¢»MXFÝå䙇,nSá¦äv6¤À ¹;-kªôöaÐÌhŒ«æÕøÍ`8¢!jJ®R8iåî5lìx‹èä4|sÈôlÇ1†›¼‰ãã»íraÃ}¡5ûíî¨Õ¶£wƒa{IJÿy+Ë7G­n7”f¸&Rip•âK‚™Å€À¸,¢÷¦éÁÍ&z+£ð7ÇÏoTÊã Єì)²¯1ñ³o,Bvtý€~ùZ7p„:J­{L•0åp¦o¬:hî°l³¹™ÞÁ)¬¾|Ñ@WØA5 )W`1êS¨¡7èŸGÃÎëQÔŒ£~§ƒÞ$~PSñ'¶¥/˜NRVªsçqû`U„Hò¦;?yCêÇ*ìK§›—]«ÐzÂ9Є+_II Ø1¥ªÅ;Ú-¯ãM-&×?qf²V¼9ù“¡oÆùæ ÊgD³ ¥x•îðì²a’¦8Jonàð–¢ðEY #›Ÿ$ÕQÈ详üâª7æˆwÞ·@¹Y™¿ÄÝty’ fŽíôQniUeœ Amf6™’:‘ØtRè«BËÉj7Y†0ÅÂnœql† U…þÔT™ª’à–Ùmãõ‡ÛŠ£0M± dØa~·MðƒðùñËßQr×ÅŒ©Ve¶loOp¯¶Z„» »Î*“: >LVü§ Dwá!ò žòž™äom¾ri¼Ó»¹Y© :Cr>¬Ã-ÿ‰g[mLÒNDD¬U95W jËlá~kÊhR Søxs‚K|²[©ß§“.æãD4¯âô6 «¼Š2vµ\ñŒOé}<ù°‰oܳNàsÊØZc²ëÛé Þõ¾Ï¸HQ@Zç3Ì0è„™`1¤èΪ Äã%ô}¾]IJ—Åí7e­Ó4$ò,÷Í|Eù\u Ä&H’X&6ÌYŠoŠ-RèPžý[hE¿ •Ñ* ¾:Å+:•3ÛD ~Ò•f•§qß„Läu˜øFÝé<-[DÇ5ü¡@ø© ã(›…w§¨Ôª=ä kK)Êͨædƒäö„Ý7<[fTgñõŽÞ[5‘µ–¸J,AW®Œ Xt`b¼/ºõb —ð©©SA‚9Ìaz§ }£TÙKðRï ±;¹êÍC¯v 3éæí”è †8ùèk¹d°ô&•{ˆ¼^S.Ì{ }'ì³V‰–²U¥»ªáÜRï˜éTehž|Œ7×IC_n#YC+×%|f¿¸ ­íÍœ:!ü­8^pãS|ÇÀ‰«,qÛU¸lí*“ÅúnR©™Ê€§ùýïéöaA¨gx‚ ƒ±Ôñ ."Ô/m¯Â…(I¥õ;)h„ѳ(‡{3Â4DésÁÌ"ÅÛ[êAà‰£ÑÕè²Óç$Ëø{üfwýhÜŽ%·Î6ziS©w;žÈHìAÉæXƤC×ñ ²J@éÕÑ'S8›Quáö†·‚þ@0MÂ'µ(UºþÒ;âÀé,ÅÙæ®$+L,NÖË¥¼Û|˜%÷+|Û–ëB&·rDL¡ÓÅRöõêÕjþIú@ù¯f ¡›j¡OÉ û`¸|úPüwPˆhKíV] î2¸øWH aç}wL…¢xìFyBwüÁÓDöá.L1źãnÄ‹“N&[ƒ9úVؾ….?"µ(ßN8WÈž]Ã0þ›°?ˆ`ƒ·ô~½± ¯”L9fiVtG¼ Í ž"¤9¼Ç#fän _•*_§™Uî5EÉa ¡0­ÖÒKvžŠÎ;c$û—vòÇ/ÃÎINb·Æ n¢á28Y/qS·ñê8½ã"ó%ÂïÅá \’~Åð¶le8ʈý¸G¼s cU¥d8ø4^Û¹®82É©Ñ 9T[¨¨eêÚ­ PéÌìS˜(§" êàc l¾ÚÒL]ŽŒÞĪÓtÂÞNn2“¯ƒn`t{$ëè>ÙâÒ>_E<].£úæòäê}¦6š6G”\6!$jŒ[ÐVé03îNöÑÝÝ –Ÿ‡E»Œ¢Õö®¸þÙpœM!™tÑT°ÏFíZaaæ­t u]/ƒ†å f0Y“ìÂ&hß‚ŒÎN¾â…Ƽ°QÉd&]Sò ¢Ü¨£èÖÇýìjÔ€Rt¿Î”²S:U@„%¢ÛASQ‹(˜zôÔ¢:ý¼ÑSÅâž¿bþŠ€©‘„ÁÀ#4ÖÃ,ë¬ç”Ü!Ùîܪ‚: ‰}Ó=Í ÐRG²jÌâ%£ÈÁ÷–ð5Pêq²ÜŒp­Âj›®–šUÞcdÔ=œa˜Â)‰ªŠKøõñÓ¯ì2~Z[a †Ÿ.ju3+&\ëö¤±êÈRé°F-(a¼õá!«©´LåBeÆ}`®…‡Ui¥˜oIpþ@‚ÙCîe{aÆ,5tûÝ1µ ƒñH±Ã¶Ðùº×íw…3þ É?Õ €ã|ŠK¹šaä .tͪAñ¢¬üØn1¬’Œ,«f´•¸µqÞûiÌÞìPcª”jIó©ŠtOm*t4§ø _mÔ•bW9Ì@„«ƪ6$»„G¿> Ó‡åu²AŽ•'X]†I)rYµÒОyaeƒ[o‡ãQ…Yg”°À³ÙœˆŽ‰Ä –,ÅÒh‚¹‰—Ô<ÍVt1::Ãá`xÒEÝ×*Œ)Ù‚©‘œ't".ý‰ä!/A6$áÑ5‚ÜÃG¦®5!8²£ß¼èŒ.›­Ž ßc3Ó4¹]áö†/Ú ¹F0gZ×@,A•’¤Š.’ß)ºŒÁ¡†gµ\-Y<²Õ>Ûq»FXWª¸aÌø¬á»awÜÁ¦¢(/©óxšýöpÐmG½Á¹+¥Y7 [úzžFxëžQÀâù‡7j?óT›ÎðSd&KyŒÂñÇù˜¿c^0Šo ÂîuYeN’XÛxÿža2+üö…Œ³Êmi¥tòìªÛk;ìžBGkmÐ{1AhRbHåêðò 曲÷߉ °[ç–Ò6qª4ÆwZc9­?–³³çË0ánpž#v2DôæòŠy ×ÃNÇ9X˜ð•¬Ã…᎗(þ´…F>‘Yh4ºŒ¯_:cÙع@ìtw-ÛA%ZMÌ3‰Õd6B¡ˆJi¶!O>èÓ^ŒDsÇœ)±‰ïšÃ>sôF4Qëb“#«6Xº3P¸•“–MÎ,hPÕÚ×mUÍvˆ-²–æYy´ÏÎOºý×ÓY»¤u|Oì3+‡æE'HÀe÷°Ve´Í˜Ç¥ÜWˆÐÊDUu&ûäòèMêV-–]6£L·&Y–àämgx6u"ÿèR{.`çÅ«qsÓ?·?…a6€} ·Jð²‘fðÇKàý’0ö+Vh%FJŒ·¯PÞ€áLÇKS°ûdñbà¡»c="™jQ^«áSµÑç+ ¤Édè“UwuNÞ[,,"²Œ2ˆ‘­v³r¨q vÆw¤j< 8~íD²¡Õ´æV…¡ Ä¦Óébø{m|û¹‚n³‡ŠëKŠìo‰Z¯ŽÓ_µFثęy·¢mÏò(—g¶±½X\`lP;Ž M8’pº DÇÇ‘D¹ :K«L¼-áš}Ýí7{ÝÿhbèŸ~§tPäxSò¸'oç›-ÐÎ&1„zók–®æZØae·ZÅy:Ù¨³ÒëÝ\æ«Jà©nw&çš‹²ÉÃð@8…’[m[GéÚB³¬Jq’UëjuWžGd{à4CYVœ30æ\l‘þ1pg‹/½O";;³ÒV-DÓ“Ç߃r)‰Z$ÚlBíE-ð•j®_D»×ÃyƒÿDÀÒ g5ÁM+âpÕX:N.æ«ów5·4 ƒþ[YÏ›[È<ƒIì߸6˜½š£ŽüÆ2»+b…Dåv3Yßš42õ5ìGÖPyªðªd­A°²)K&´§T>Àèø R” K 66› €?nr4îe«óÌÍE·O¬-ÜðÄóâ)@Å'°P¢ACf_X+Ža`ÏÆÔªç²9„CÑéQM´à"ÃArÁ˜Ž‘×ÊŽda‹µuýÄyzNˆµ; ݉á5:ŸèàÛcÄ(P¼<‚j³ê½“«œeó|•—“Õ|½cÒ-5¡?¯b,±÷‡-¿SPƒé ÞÓõb—âÿŽÂìUÅçd9»ŠóÆ!©°ðùœm]Y3ÚZã禂,&€3Óå´ÿãÌUŒ[Gh'õùhDqe£žhÛ»VLUm±sÔXǨ£™ÃåÈw»*-nQÔ¥8«²l„W²ø*# —jµ¶ñÀécB¢tÆÓj)¢™1£ç`7n“ ô|‰{ûšœn`•æ[bé(¾c·Z;Éð<ÚýƪKæ4J6âÎjÕÉ[jõ 3½lÔ°‰¥Eã6lXl¯³}0œ¨EË€Cääk¿‘¬¹˜xí™ík~7'×qV & ÙZA¬ýqõÒ)³Ïd‰~ç|Eà˜5ê-‰Œž.;<&0#˜¸²á²wd¤qüO'äl)äÙ9 °¤ÿMfh-¥ZçëT*¸ý*šdof(]1É*ÿuÁyeÙ¸´¾¡ü˜¶*+¥Þ™2|m¦n¶ÝF\†+ô$÷µ•zÆ„?Hn/ëÛÖ¼ŠÙ®yIªpÊz_â(ª:‹:ÀctŸ;aÊPãj8=ËdÆ¡– $’,ˆQ„QʵŽHÍÂ\’>‹ ¿“Ÿ8ÑoCbF”,‰n¢¤NÓÄÄTu²@Çì‘%©ßGDµaÓ¥Žùı b< ‹®‰wÍïGFÿ‚s‰\7ìeøóȺlÅ7Þ„À4LÚ7^{µ4ËŽìS‰îÜS• ˜ÓƒEÂÈi­¸T»/­ÏŒ[áÅd:EcrFRæ9%ûÉÇxI/ç·`µÙØ;ªªñ%Õñ]<ÔÄpëì4«¢ä:MPyª[#T…#ßQÊ3˜*û² ÝÛ?[èñ$ÉÜ¡Ž• uRÎ×ÃÑy·G/Ÿ>} ²o<ì¾wÔ\\ h0n¶¾A¬kIyÒØÞn®Ú^14#Ø ýq( ª¢¨.þ•Àx,‹·R×6‡ç#DRVváR(5±„ì±þ¶¥|êŽ\g7Ku¾Lï‰K¤âÉzòQVƒë ©Š(B,ÄH#Äù@›·©BÁã“o¢å3»¥£!–C¤/×8H ØDFõ]²r "^»Ÿ.šïP(öoÖGvê\ñ4ìiÂQ$WóÌÖÕ}„/u·%-T‘ßÇß౺aµ8Þ°t“©JéÔµï=]¢øWµFÒÆîÓ1 Mª­cÎ`…ã@0Úrž‚¤6ÚîfóD)ˆ'»OóÅ;뉔ãÎÑsÉŒ(g9gc`–@æ˜?Œn ¿ÂÐÕÆuÜÀ5¡,ÛJ¹–ŠøŸÓ­)=o…‚#*Ž‹£ýžwl9ã%‚ò¶Ã8qÒE~µ&X2ڨ莥&QK•Ä zÊ‘åÈ ä.¿x²2ÃTU®ÁàâŽå0B¯#ùZ YÄ7µö•hb1œÙ(%ì¿*¶[I"O‘¡ @r+¢±N>’}d3ŸnÐÁ ‡{ª›ÇÍ.šWæõ¤Ïoº¦à•K0qNQS·dŠ©jÍGͯÖ>Y‘Hîã\(6º4ÂNü8ïéèÔÉŸ…8”H®÷»ºòù‡¿$ÖOŸirÐnÏVåërý ÕQá³ãg/ŽŸÕ‘oCÎî°px_<ûE3ã%ì·ôM˜Š9f :!]T:çx‘ð¢‡áH ƒ»” )Fšˆ¹ý=BL^é ˆEËådÍQ!1kQÈ— ؃“Yüñä¯ñ&É]-Û¾~Îf(r.¶»Á5çŸ-féÍ„,R\Úü†¸ŸóÞàLm[U‰öpaÇ*)M:Ù’»22´MfqÇ1“­ñZÂjŒqíã²m‘o÷ÙžIÆÙ±‘Ä“žkâ·\Ó4Ò’3IäšcÆo‘ׂU&´”òj" ¦T_$©µ1h2o?ž`äädºuÄçŒXtO6£ax…ðk7Ѭ$$¤´†ôt+ªOA€§*,)ï^ã¥ÅžlªÆl4¯ö=UFC´/B5Ó†ÔUA¤½ÚŽ!p&©¥ùU¦ªka¸Ó  Q92ÅTæš] åßR¥î>8üÂa5„áÐ//´[¡LÉaT¯^±Ê•=J’Mê½—>Š/YDNb”óu·Ö»C½%õaŒ´TÝq}è5«Ã¬³‹›|QçýxØæPÃWhYõ‡Öû÷?Jna2ì`ÔÑ——?rúøŒg—#1F‘ˆ¢]ž¡"É‹EÖmØ¡p2Ä ¯Ó‡Utóæ¸fñG3å—ò»ÆÓß[B—³òÖufQá9j~Ú7ˆø¸ŸPN³¡KÀ° º¬ÅøìèÙ½6þYÏmåCÖGø´8Ô+úq·’MDô©ªâBxºáz·WÐçFº ®ZŽtœ¾4(òA»¡{]°ð»n¸%Åâ*8§,m4þY*hµR{å=²ðÔ±ª“€zrA‹føúÝËÒž€è·É á^xQ D§–0ŽVBÇ–à@‡'‡>¤jÚ0øx$ Ì ÊËÌ )}šÜ∴)Ö èp@’ìTrT£0·H¡!›)ø b{³` [”?· ‰"‘§¬ šú1@†{µŸ8~¾+Ýuׇ¢j¯Y ©>ØÇØÅ\ÀƒU…í©ê©¨ÒhȲkׇ Ùsy‚æƒå†¦-cbÇßd ¡´KR‘‹»©¸ÞbgPç¸bôæäèÈ^0ä“¢\b(<­ä [ZU‚ØâÖ’ŽÒ¢òñ=¤o/nƒx?R“¤¾ëuÏûdÎh]^2ÜÙ86ûW½Ntöý¸3:Œ8èÿ'*r&~׃…„=¯Xƒ*8"BŽEºq¸ß£ð}X%w+•l]±ñÔÝ…†Ì!ë{Ð7‘yB]”’Áx7*Ì.˜4”’¥[“xK1_@ ’l;¦x?" œ>T1õÉJp¬­zˆÊ‰ç!°¤G¹øä¢ÓYöH«ØÐþ57œþèÞ8.NÛøÅ)Ÿ5¾gb߬6%³;ÖÊADÚaQÇH‹ºfù ¢$ÄØ®,44ÓnÉXIù6OpXĵäŒ@nÕ›¼F4õN]ŽRZ.ZJcˆÒ5Pf“>Î*;ÝïEÏkôÃöæÌ+H¬C3ÍE\4÷@ÂÊ_CF€¢æ«¢-Dwô~’½jÍF«*”áx•ö‚®lJë\ϹwØLˆ;OŠè›–¹Û ßŽó%^& ;·AËœ‹Ø VÜÂò8…¢ø{µBmM±yjåÈF@8åZ3  ÜFå%{ÆÌ­Ù8 g.r W§ìEt¤„Ú[øGX„¢<ˆVoß{AÁ`8BéåxH«ÑÞtÛèrÐí;Ñ©Iʼn¾°ƒ½fKÌÀj¦ =¸m¢ ‡HÔ³qû¬ ¿^ÐÙíûÀÜ*øü³ËËÙëyvæd‡4ÞÌFmœÆÓ~>ÐulÝHcŽüžì hŒ[ß Ïž¿t¥nÛÏÛ=¢µF|´ªÃëg$ºÙù»™ªÒ¾eâä“tþ©bØo1Qz=Ïz°àlÊÕÁRy–ÜgÐ¥LÍ–r†"_t‚ê_Áû?†rµ-tØ2ÇT õQB‹bE™rÖjŠh8j¥ƒÙµ¨îÌ–¡fÈlw^Û Ç‰DÍìZv÷QCŒÍ\[äpmRTZf¤®ºÏX«Fé&”ñ „kωڼ_<4&3F.3ü,’·ãø¯X ²Õ+G†UÃyd¶Q†qâˆòú° ûKØasñáSîá¸s1²Î j(ÄŸB"òpÌY4`xñÌ âÊ’_m»ÖТt»aÎL¸a*EKÖi=ñ$èCccad²Y_¸YÅ°2èE!ÎäÓdCÍØDÈK™Ñ´D6ŠÝyI‚Û3’¼_ˆà¦OMd:qœÞ}+«|îHk#qÓx™a`ø1LUíÛ\p¯[‘SÁdVI£„Qc(K1|Ü'²7î¶"eæ@ 21£Õc¤¶ÉõO¦U³]ñ]€­P¬-kŽ¹¾÷/_”W†‹ƒ‘¯w±’€ðuSá´¤ŽCúÕZ¹Õ¤Øžoà#v¦ž"š ±-B#”€ŽÇ€® ’žØjJ†Ñ:&4Ún&ˆà[Ï¡~r%4’]‚EvËTZE{Lt?I#Äsb8„Ì@f×·Ñr¡z)žqrQÐ9…q4c¶œAÂᆰ«hz‘Lc–’…†#òÊõZÝ;ÁL²ÂégE@Ûº…l2Ǻ0i —ÊôEIÒbñs"U#ÂIæU¦ºÛéOÖ”0ëªÑK뼇wPý©`i/|Í™£Ôp$âœ+»ùm¶j-L6ÉýL$s^Ù’‚ìèˆ"q` 2çuF—§¬Ì· vмÎb÷¨/ ª9a–ÌDFÔüZÅÛëtÅ‹ªÀx ¡µõ3¼ÿô¦ÎÁ*ѵÜ6|%PAùã]Œ¾Ó~’ »‚pKڌԶrF×1к-Vñ[¨(°+Àr©‰w [02-²õO¤#Õðý½…:’=3¥iÇkTU€°[¬ŒàpD"‚Óè' ¨ë¥ùˆ*hW_QSq«®§mùñFm¥‘¼°m²ILf?M¦(‘[l½ÚÄ¥HH|$R5®2Ô<§À!P\t^’|J¹Ü@™Üªó™S7Ê,ÕNíDe6ïøºÙu£UŸ%Óñ’¢®}«Õë*iïµ/hÛ‰Lxb¥„Ù¿3»º;ÙÈ.Sn­[î£ÂÜ Éö‰@ª1OÊVƒ!SqßœûôEÂ9~×¼ëcÌgwô¦Ó®Ö›`ÈScA%)ïD´þU¾9XÖA‰;JLÿq†?É›¿ r(Lr b;Ë°ÉÕè σßÛ@9|À GÝô)¥>q:3™¢s†A=P‹ÖžHY%.Ûó*;RZ€«£A¯9쎞ÿ–‰,[tvu3ø¾Ó†þµ)o¯¨BpÈ*îÓž0ÐԜР*E³é©nâÅÞouýÏ^=p#•¬Î©¬5VÃûè¶qÀñÎsZð Hjn–ö5-‡K ÆqáT;Ú8[o¬ŸÎoѿѦÒèÃÊ`…Û€ÙzÇ…µhÎåœYdò,rP–üë§"¢<* ¾F­´!ü™Öz( Íâ¡ØÅ-V&PAsƒ~«CØqÇŸÕ}Ç«3oáð9—›¹l‰ÊÆwØ‹v{‰.w“àŒ¦]K¨Ð~tÆ+]}èX~W5_+q¦ºYR_)ð6èqºHîm Heç@0HŠüDÞÖ /)ozhÁIÕƒ\Oôžfy¡¢ïXÁ@9›’ßîkWák¶H¼¡ð Ú$ƒ¿i*èê‚ÓBÚ€%ˆµŸœNž÷ºg­èyô,º¸wÞS=AY=¾ÜÁ¶ -ªpvÛ@¡.—h GWýÁè·0ª‘æ åëýà`OQÀÏ(ØwK¼ „QnÖOŒ[ol))Ð!> cs6.õy ê¬×±RcaÛ’£¬e4# +â#G°6ד 14D•.§+»¿/ÐOˆ‹*ëPq# ‘ZnS9VrAt†&=bHÛÆ+j( È©ƒb6 jÙ#Ü‹¥é0%g%4Œê,W¡±â|ؼ‰ÐsäVuä+ï~W°¸Paæy¯Ýl·áèbWýêgܼ§bÌÕ_|5°Ež¼ùÂ9Æq‚;qKV“Ri@Î*Ž[ðŽY,Âå‹ï·Ü–ÌW—¤ÉÀWõgØ_?§+؉KªSrc@F©°¨¹ÞÕÉÃ~£?¯›à_%Œ ,:IÞ"òj;ÊgKɹëÍoeU\Nc|ðþ3H?YŸ9Oå ¥èÅŽEö ´ò£òkJ B"àžÚLʸN9Hœ—Ž>Úý¢–áç÷;Kd}Wå¡ç¤Èý“5Z“4µZÑ—#p²±/$lƒ´ùÆÌ s—Ù*µR91ç=¥EÙ¥_Œ¡£@*ÎÕæ=gE²”¬ë¤\ü…îPPÑ{¶R" })F²Æ~uMÖ¯©ÈmFr(7~øÑ®‡emçíl‹_«"½˜.æýd¾µ½Øyü–—ŸZkS¤º±yÔ„*‘ßƵ ´idŸR†÷Ï᤾ Æl@ð¡xüœ+†=3‹é>œj°Ùy\Í@î °ãcêGø¶R‰<Ò°µ‰&¾*ˆa$¥äCmócP(c¹Í´’'á|‚fð@ú|â~ëZ‹x²Sò¸³ÝýÖ;ß*_sÕvו:6B¤S8böJê`8C­K¾ÅÖ ~I€d¦l@µª"@©‰"<Ä+7•¿qj[Ü‚Òwõ¾Æß_’wwt>q¤?@û¿d:w;ÕŽ]Þ¤4¬ðç 8üòw@`¢,tÂ×þ¹r `“MÞcŸq–&ÑM|Ý nb*äùì?:ÃAÕç§ÊEÈ/”Ûcví§PFå=Sìk,§˜Ÿe¾¼^Àõ¸`%ÙÇ»ˆÏÉÜñXÄ+ŸªÊõöWðgÑ8Èd}„Dn¾êB•±!³"@%À뎃•É°Y™% Ê}Ya‹RN£VXä*má5Æ˪LfFÍálXò9ÛÌNð„a+í°Í>J(îE‹É_41WY¢‚Š“˜=©M’Î »ªGæõ;3r>>rF™¯`ˆïÕ€£ÖÉf¹Ùñör§ÿ„gF|p" üÎÍóÕwèYã™2;Iºƒ;DõÎßÅu¨##\ïÐe* ÂsŒsˆiìU¶©Þ•õ°8~¤ €O^0®HÉÏ)š‚bôƒ# SÌ7ÂKåfL¯'kvÇ«ìÀ÷V>™"r_ű]5ZWñ"À¸€†œ ¹J.‰ð]DY·tF:·ÑLhÇ?›ãi7çPÖWײë³&»Ûo÷:Íï¢v§×ü>Âtˆ4¨©Îdë÷˜ñ—+óe´6 ¹nÞ¯vúmúËp³xE-àÆ—/(GÂd3½›£B{*©Ý,(·DÛCŠî2ÿ~~Ó1úD„ ÍƬ2dcP°ƒ¶¶ÿÆ÷¬»¬,GÁȆ†®JÜ´g­ ž}uë³sjôx]35‹ÎT÷”²=HÌ@J:_I£R¼\Ù¦4ŸÑÙÌ>™ˆîEZ •BôøÀ:þ‡Ò-ÂFÃ#¹ÓzVÕ­g©@³’ %ëSBtä¤dkÈ—J—ò Ðœá^¿=ËIPîÖ½Þ¬2— EZ%É¢Ø=ÍÑõª¬Ú:×µ»^ò+"3ˆ‚+R'òåhq* €j£Cþýµ©â¬ù€‹Õäþá”5ëèr8<šßD7hsÌ’U…Y®ˆÄix£È03És7@~-3q„nˆQÙúÕnY)º:œ>žE|úØí*NH¼¡¤dÅ)‡ ½¬Ü˜ÞV;zÑ&®»@€ªZÑkàz «š^¹æ÷eÑ—¬bÓB&Að—¸ÈtG™ùXñ¯ÚßÜÆÙ@•)bœ*ôc;—æ"3Oé²R–S‚ ô,Æ4~Çaú­k­LL_cö–¬òàQ|(Cßnãåû‹¢½ÚF§r±§‘MqƒØ_Ïy‘³1°¥ñ®v×;ãhð&êuûþÕE9ýãõ‡i­‡›ñ —ÑnÅd#\Šv„¥<¶d¡kY1f ïÅß¹`.–SJñëý­ª¸’|‡¹?ùÆ[á0œ¯lïk¿OÈ¢Tæ•ü>1á3u™߹48„رæÈ>eBÍï3.÷¹«Ï†×£¾ÈÔ¤w ã÷ é)W*[A€rà&FŸ“èrô¦9ì´Ô3­Ìù¢x¢xI¥ªµ=nnìq¸[œþ^Cð‘Sªi/@çÔt?[š…V›æœ-¨]~1·Û©»°Æ€<5qê9àA³î’ÝbF6j$ˆÚ•ú³ÄØ2 |b¥@bl«]2VvB›A:• ŸÜ)&DŒ·óišó†t©2«ßïfÆžté'ERƒLÍP™Ø/¦>aŠÙ¾ôÞRÝñhŸÍhÔë£Î{ø§ûîÞñóq@̬ªàÓ™–Õd(•ºÕ6í 8ŸÂ›ƒ(Ùà­ž*ãŠd}T0ÎÜV¬µ€µ–¬»tåÓí·†ÔÚÈð­°|s‚x=:=ª—zîëA¿32'XΚˆ®ÊkÔ z¬Ö(Û¿jøÑè?œØT®lvð4dc³ó»uŸ{ŸùDÎ,„V`GN1µGnÂ’ 4bQÄïš@9•s '§\긆ü=xXì§ZÂ$Ïxw¤º°Š–&ôÖÔ‰ËÊÜÏœ†Éœ½~çvJk8„ÚXȬj‘èÙ¤å!Ô&—Ú¾ÚôÏ£‹«ÞXÃÀð>pœ@22P§}ˆ˜–U(p…ýìÒåc›ÙcÔýE‡/WÀ#0^o@⊷)Í*DAHôï(GŠ3‰y­ëRû%Q9¹ÕºäC^ªgŽ–Ï“ÂH8L™Ùdä¢Kw˜.WY·÷ói¬}Ç_Ô…®´UÂTkv–b[Ù"urìÖåUº¾ :ï_‰£©‰!@Kô8 ÄPôÂÅ6p$i¨ØÅw’gqKT’ Ç ³•ã30 1g”†álã¥ä͆gíP”l®Ù‹Þt0—'0L¤–¸h¾ï^\]˜§5'ôØR„]ÂN˜hæ9úpT.ðŸó#I1EQ›&†Óè„4âÓS‰‰‚5&K·²[ÛL,æ s„E’Ù…J4´ìÏ¡aJóáÅKhÀ«3Å ZV1£"xÉ”!w‚ ç’P0㌀Lå Y³M‹~ASÔùÒÕgÀí‡ùba™ràzý[Yinâ [ïNpW ½H§-¯‘¯+9ÏÎŒ_ŒÎõûL­ðC¼Íæìuú¼ùÉ|žßžï´ûwà{)>àaÎü@k€\À»C?j;‘DÓ£¯ gg"ÿ“ ‰Çr„ý¶"ª­Ô_ÁjOì9ßRˆŠRáxï¦Mí­Íð¼ÇDýd¼¸9IÓ(]ã £õÉGϪ£Ü·ÜÙ»Ým¬£ÛÊ S¨¬Ácœc¸u8ÚºÞZ7+Nðwÿ2l¤Û‡…7£_¸Èi5û£nØR7D¾QÝŽ#Þ‰³ v÷””4°³©ù±)Ÿ…J©$]\öÔ$?÷ÁË ‹E7ËmêÄi ç5™+×B«hï9 %ѱ¼#i'gºö4¦ómÔ3)8ØâÏs°A¥ ±Ìo瀂;|/)át¬F–3»ƒ«…‰ª *Ù£\5Â]wÐí¿` k¦sÌ”ˆ3©=\Ô¹¦\=¼›O…´!Ó¨½Ó~ ™&ÄɱäÄ3ôºûþ¢³Ï@£„†¥¤bæúáˆS¼¥*¿&æ••/(O?`ª?TtZì2­[«×i£öàê¬×Q¬”CcÌ•£cËW—ƒÄŨãÑe§ßî žVéx(Úbr —×Ý|z•’¿·Í\à 钜À| Â)©þX;° íî¨ cjGç-+ʨ„A`Ð9Ò+ìf¥vûî,Åôz(aRöÑoÃð"™¡"r Ìâ–©6í…õzúòEƒÑ¬©—Ífu|)«'lÍ3t'ôÑH!QãŒödi)ŒÃä„ ì7Ä°ÃúT£ãp ¼²‚ç3ðVC.ØÔRÍJYV¢!qúxn¶D±÷YbÓkàuÅ[×’ý¦Ùà`¨6¾t¿Íæ³;Àt†ŽB¶8’}ý '‚?¹QšY·e48û¤¶ xSÒfTùZÐÛKp‘è²KkîX‡"X‰’nt~Ÿ[®»å<2T¬3¼Y>9*= õÖX݇M1¼sÆÖ\:¢ú½)>ùÜâJJíÕhl–ê´{u®ŸÌë‹ÃÚf¥þ¾Ÿ¦,¸kµk0Ä҃Ĭ¤†Úà 'íYg–Fö_J©{H'bwí“]³zÍŒ¤‘Nö{‘Í‹µ/0¤NOæñðU¸m‚úø®Ê«¾`‰ÕÏ‚ü°Œ^û,È)ÿÝ`Øk×Cª¶}uq¹_ŽÖ=S]’¾°˜Œ tjÿoG÷q¼ÕT9›gZÔÂ×íýÇÒº¿§©ÞTw¶¹‹›b…çžÓZà$§ügõ†ÉVqSÞò¶×.º­7A¯;½É¬…t¯6îCàs©D.vtÑ$\ºœEQßÕr-Y7*–Ãû¤Ó.%ÄZë©n*6-T&ãØÊðp†GØ( “Ífò°G!UàÅ«M©pîâùíÝVäád%7‚eƒ€Âo:Ýó7ã ºRü{-ƒû[„›©!s#[½™í@à[cGfKîÄ’©žž<#N&÷±Ê™e…Dq+0ˆ¸Ç‡1@Þ0ÑböKk—¯V³Ä²"i¦2Pv$æ9Ó»ù p’•i…†P™UŒKšòª†MQ¬kw0Ôa¯SD·˜b(ZpZN ù†îkÆÈÚ6€Ã‡­&w \ÎëÈgrjÐ@p%6Æ£¿irkí »À ©üÇåá0x8è÷¾}Ž0O()VüÑ0bžP6mÞ§:½g¨G¡ö$à;ŸºxCíaS¹v¬üd\(Rá»ùõ|«<4r½ÍŽ¶„)Í=ˆ/õrXSÿ"’¯–a}ÌܘÙà”œo™Ti¤D’¡v0âØ„¯iww‚MªÖ'·AžºÜ¬# ÜÙÍazÅúQ’ IX(œ»éÝõ⃥}ÄŸÆŠ÷¨5u;˜D“…W`©«.l­‚öôÕ”˜çò㛘Ò$Jcy¾žâØÛL96åªøe'Wzi~%•ÚKRÅâ,ÁÄèz¼ðê¡úäf9ò" èñ/ç+Iȶ{f:Ð3MûÂAÀ´pŠ²1±>ƒ[Ó3¹¸å “+¸ ªpÝ@¸H†&.‰ÚdÈË£QìÙÎäÝ­y¼gtLE*8l Ž„•³Lçc'R¬ŠzXê'Ÿ@f· á QÓiY±ugOkƒˆ,è›ôxÎíÂÀwÞ©-•b½Û¬ñѱmúbig¡ŸE;V‘ä€CR9s+À–!ÊB<ïÞÜž¡ÚŽXUÎ7’Å9þËáUÑñZðØf1¡í^ô¶3<Œ:ö™~¼–V'¦£WqâîÚÍá»nŸCŠ­^R9%r«L@UæiüÈqùê¼ou. [ñM³ßîuûv{>æP§ T›§²ª˜|×XØ¡”‚îÏ‘Ä]h}ŽƒBZ—Ž±'°Â¶®öSxmg} è_%TÀÅçùûÞ³¾.)ÐÙËñð-Azjc@X5ЋylïCa¤ëaÿêød•r4궙<;ˆØÖMeìnIÏdJ"àcŠ¨ƒx~‹_Fp™§.‰˜2²£` úÄÊ‚•¬„m Ø¶ôƒ/°O´c‰÷‹LÊo¼îc‡Ê„ÃGóV>aÐ?^þÅÀ‰nlÔYDwk j’üÕ´Á3L¶‘õ胎»Â·îLµ¦ôžº¥j­¤EÉ+Q2F¨Ot)Þ>4Øoëä‰89z©rßö;ïh2à¿â9 ŽÆWggƒaŸx5|u)°!w ñ€¥EÞü4Ó^À‚ÄèmDíSwÜN®®’j2Ón»ùÌ@Hƒ6Ø'R|~&7HU¸mã9Û&€VïªÝl÷ºgµÒµU°RSù/‹—~,ÐÙXâÖ¡•[ Îtï–Â6ô‘2'){…ÃXEÃ%ÂPoë:a\R¸(íà¿Â–ôªÚÕé•q²¿¾aµõ¦ÓúŽè±r¥ÛÿCÉgy«h¯ ÷~ MÑ’V ŽµõÛÆmJؼyËFdBé%8%ä¢+~á“Õdñ€±>UÒ£‘Ê…Ò’dÁHèQ¤Iº½†«¤!A¥ÀæX/ôщ‰Éç Tv× ¸Ìo£Â\V&@YÂ"ü±ìõ r½»A(1¸àÄ3ã°ÈöÀŽlÏL#ÓÈW:B*~5ŸP oŽm¦ÍNR¶v\X­NÎ4eù³{Yfbò<€}s ,€‘ƒ”{ŸmÛcÇ>qÈôV»™hJgãБ7§‚F°öjÁLrô”sáÙ^E²‚Ž&>0•ÀlJÄ÷”BðŸ’ä}ϱG9XXè” Ó˜‰"²ÕŠ§Ñ}rqkG¥E<o¼Ôvïgqy¡dX®û4óŠI‰¿[sT§Þ”b)²|gªµƒvOÎÁÓ­*W Ní](}ž¢woÿ™Íe6=:¸m ªöÂféfQ7"ÅáÏ9p„kw“©çªŸ§YxJ˱8hýª m¤là’„ÜJÓ`5 R¨™Ì°Ây3Ó GÏÉÕET*IÖÙGVb6/\#ÎV®ª©õ¯¼òVA`Ÿì?•Þí§]?-٭쀰£• „Ø2 )bûµÂ§æ)mQe'Tx¥,X/ç³ôÈÖWù†Pè•wãê]W`ãa÷'Y¾YèašöE.û»âøGÈYGœª¼öšÃóŽür< ƒ½ Ÿ`¡îfñ>8Åcãt ô2´›BfÂn,ã¦Y² Z——än†Øi"áø›í?Ö’Ùà×ñf^2F±ã%>›sb Gô¦ ~]¾G J »€~µÃÁ`Œ@K£zˆ?õ¸ðÑ£”¥- Bk¹‚M¶tžP)À>ÝÜ Ñ·Rÿ:S{Hè;·RIî*¬iº{É°eusý ø!í ­˜*J¢Yâ~¨üëÆ©WÜ<0æ‘ Í¯ C¯‘ íô[߻ޯ™=ªÃ—éÇiS€ R F£Ö­|4:\Å‚Šd/l¡Ž€á;²Õ„Õ+Ââaì> S *1ýîTñ·“T0<ÑÙâ Œ€ˆÈZîøàq3š4!QÙ3æ'Aæ°±€½&mB 4Ö`—bpÂ¥Ò°ÇO#bÀÃdë&á¨sþ–®ì5 |>Ä–ŸŽºÁÃÃwUo&a¶«Ù¾A]°Ñ%’›t7“éööÛœ ÞùqwäØœ.¸\¿Ëx†V;tØ&¶‹1'úx0£â†Q ÖNŠn\Áû,'+J%±‡¤tÞ_eЗ'õtg˜bü’o5÷_–EL¤™õ hÖ5Ô únæÓ-(Q„?^3ä3Ž;¤º‰)ëê̺mOeåþePô56)cóO¼ŠòØR„qSŸ,Æ„¼ËC¸Ð`á"î6±Þ”‚  ƒÉÔæ P\ ž s· £Åʿ¤_“é]¡Ùó¡àC#VŒå yoŠÇj’ÍC#¨èîØÝœv_•Dò¿¸ƒq‹ðSÓIvØ ͬEƒ›½Z ÔáSóçõ Ž@å¸ þáäv‚íh}S?©ì‘³¼ƒtèJÏË¥e³2I\ìQS)³œF‹°WNéB‡ElL­àœÍ¶³qc-40˜ëÙnÊö´%ûZ­BÀ”:¹C:Ü*¬ «:Ÿ‚çá˜S*vö!Ŧ³Kèœdn뽡 @úÍÄÊPÖéæ¶å±OÙìdA‡Û±240 v9¡¸„òbrÈJ†ç¸‹l¥ëŸMÚYÏd꬇&$(ðÓ ÅA¾ âÆ꬞ðu’5í~F²Ò=ÆXÅ>¿iêKÞœ\ïGŒÚàì{ŠgTß³'1Ù°,üK6'ÝZ»Â³v^!÷Q»7¸ìˆbz ýGÝó‹æ軺íÛØ‚ÇÄÁŽ8¬@½ Óæø쳫1³ŠVU­f¿Õé„zp¬8ØÃ>KmáºüÑ£hëúAÒCeqöõÉÑQ¢ÍI©GüË(Ê '5ÓÑ ×¡ý¤¦Ì—s~KŽ/¥î©³ŽÇgŽŒ«G.åzɈ æCc!OìäÔ w|ðöËí“~ÝV6g<¿lqÉ6ÈLrÀå×h‰¼Ù“'Îå1 ·fWnP[ž€[˜-R£`mš…Úbv1{²Jˆñl²„i|kàT&äûm)Ü‚…•‰ Ì îâj4Ž†eÿlw^wû¶TÙÏ}x™ºC œ…¢9`¸`=äÿæ® «b¸{¶¸™®°@!oP1øÜ—”AmoÏ–Ïœoyê?àB¿ìN&%ŽÐNó+x6jkwe2‘-xìi×ç2ß¿R§°î®yÉÉ<五ÓÂã?%¦ÊßÝê“‹÷˜{}Wž\¿Þð¢ò‰ôßwÏ9״ѲF >‹,‘[8~IxëÂôÂdš¯; %\†Ró'¸-Î@Óô¦ù¶]u{c82ˆ=6[|½CSмÆ⌅7’~ßí~§âlJA`i!³Ž!ðT„g¨hºËh *Ö¡EÙA'•1ø`uºÚ.Ä'ûU ê ëVƒb¨@Ùh¥ÕfÌ•dDEV¿{qÙ#‰N»¸òE6&q¨„rÈ­9å€T·]¸¾lö'ëd]PwÆ›—œvV»¥ñÖa÷]z®“2>k#´¥p±Þç¾^[ùÎñ±®˜xÿç–‘ßzÊ°d!8©@N¬¤Œ7 M…‰ø.œ6¡R]÷1Ý ÂœdJó3Õ@ˆMìû†u¡ Ÿ¯e  ot]!=¼îˆÇhÇnÐ)lº4^J1^yõ,̶ډÐ2!¯A>äÕ—%·EC¯/“»`x}µ·œ)™ÊÁN讧6jDà‰á1€;:Š÷uQÚ÷×­dç^²/#¿ëœ@ GÀ±‹ žöÖËߥ‚ü’l‚òþòGUÛC:%5X’|8ÀùË%é6S°Ì)ÐœÞôn·%÷+ÛaŽ¯q¬PS}Àùµ :¹Ëÿ±6Ïû1øŸÆ¬x 3Q$ŠúySÿ,žÂ`ßjܯÐrD+˜H·ÍøÞ^' ×ÔUw  3ù‘Ió Õu?Y)H p@ɵ;h9Úg# ÿ*!_âÊPcýs¹DÅq:ø˜QSX¡¬AŽ¯·Ør;þ,nþ%G´õFq$%øè9Ép6lLvj 2Å:Iµ ‚·djó­M²ÑЂ;Ô“š‡K†°öpEDr; Zø"E&:J|ø9‘Óæy‡R2(×KE@Íá9<ÒÏ‘ê†ÁDõµ¹—Ü= bÕÖ¯¹µ'QòI·›Õï¢æïNJÍÂ.¡”<"¬LÒ¥¸ÏéŒ,Á‡øq}I;Ëàr@¨i<[i$œvM+JO—Ýh0B½‚…=zdË;aËW×q &òñÞ¸PÇÅjù¡ ÌÀ(Iä«ônai½ê)Šº­ ¼ÏM¼‰áš¡0[ÿôÿòXCòÆBH,ä€Ð º^‹•7Õ´’_|Vû/Û°™s}*zJf¡D¨¢Ù¹~œOÈÌ•S}hØL˜çuúuÌ‚×îŒPзÞXpÃfwÔ©í·3›ÍéK\ %úw_cÔòlæ&0+Ó…hŒ”œÉJÒ…\c~Ì!„Y'ß_wa_|§ùS•qÕU2úî9™`½{~v5š^oâXT·®Ö ÝáÊŒ EÍV«3¢ß±”P³د ýy´Dµ¦Q‘k>­‰ãœ¬#Øt,OQLr46j˸ÿkNt óaíæ¸I˜qOåУî(z}Õo=* :ßb`2pcÕ !åÛƒ‡þÖoq‚•AÃ+¹’—=Ò3eZ(ÕÚ+›ƒ5ö’²ý}¯aPú}u/à¢T{ô`ÀjV|O¶‚%V7ñKp2¶öýx£ñ”õjœÈ¨­«a‡ìËa®ù',ûê+Òxçë˜ká´J,±*ÝXš®f¨“ŽçL˜Û(í^Îp\4Oy‹1~£k-p-t1B/ðçÙ÷ý¦½"0÷1ÇEÉED3I©‰Èëµ:?ŽëI/–JXRªs„ÍáEí ÈìKôÚd®¨ 8 Ðu²Ý&Ë@Hš‰•ûo®ÑqIA¬ú9Ò9ÚYtÂr_²A^9Y ¸0õ%z}y…, ª¢³«sÒy¼ÿÝËèå áM p[^Ã}6NÖƒ›‘8Ëä­ÀJx)âU‰tå »°{9øö¥Çê#e{6ð¯Bóœt7Èï‘Š0H·ø¸t7ØdBèa¨Ïu€š/ŠÉÛ­¢¨•ä Kgþ€[¶xRÚןHîÉd9{ùBÃñnÓð¼7¿žÚøfØŒw’(òzwëE=ÙP#t~Éa©ÈH(9Dp-Ȉ†X’ýR°eÄ!Ô>˜*‹R“NŒ¡†è:øüˆE­¦lò™"~ø\ÌͱPn7بÞ§õL›AææË8öòU¿lшڣœ¿Æ!…@£(H¹Ü ao¢·í3:V7s×ÙÇ4"½ì¢#~³ÝíŸ IÁ+‚ìðóUõ&)Mó؊ȹÒÑ ­ð£ «µÇHÅ;ó§;ØŸ*†jíUZã|uè×¥1‡€ ÎJIaeC²ÔÉ;ÊÌç'uY¢Wî»ÜMïÌ{)̬ÏJT¢ž–pJA‡ß¾m¨ºÅ ©feí$#_ î&M9ñ‚´’U\B»;j Þv†ß@jãNR ­í»wª›†+— eÄ„tPhqŸD­ÁU\rÏÇžoá­‘HèÌu$(èHxhG²È~ª«s6—WÃL¾ë_´ïº°÷†E˜)—t].c.·–ô0¿¼KVñÉür2Û×p· ¬ƒ:¯Â¡WçÉŤ{øs_}o:WÃîÔgv­$6›\Rû*q#\qL#<ÓÑ„ðjäOÛ¡Áj?šn@™Ø»™DŽõ"–‘žH41=Š4 H¶è´#—òýèPkBwösòrÙï'"ŠXbhñB¶f £>P¡)W{ÔhòÑ·^,J›LSV+¸G°s1Hm]Ž¾ÎÜšnÅ»o1¿N­`IVå0ÌgXi,äHUØx f‹J-p²`ºÈ“§ ¯U|@²ØFË…9DãbÂ^nBgt~‚h슡[±·¼#«¢.Ñ4ùf(4‚¢sÊ «=YïŽ9±1¨³l•ì€œ¬¢û5fn÷Љ&ž°÷áb².Çe PŒrò¤+ÈPZ®‚úäÁð]sˆ2ytFp¥À÷¢rdGrSÚâEÝlE+Ó=«ÖÈþ§<×*¶qÄfƒÅæ„À¥K é«£ŽÚeåÚª“ˆÉË@%¹Ãå@¼9šñ¦™%1{½Jj@XÀŒh퀔¶÷‘8²£óµÄ©³°tëM>Ć/È:¡‘ðªÒë“k .óé>‡¡ ­ˆó‡ùb‘õœÑÁ¶ªêCœre¶ ú¬ž–Ã*²%3ÒÁQOlçµý!ôF;³úÂy=¥Cl [NÒÉMlT{pœ¶ˆ“p÷¶.Ë&êBƒÉ5Ú…Ä8€`;Ÿ±'+r;×”Ò)?´Üäæ;Á8àPQ@€U‰Ñ|fI», ІïÔ\nQô‰”yJQ†Vžôa÷Ü‘ˆÔë(aŒøßšæû£Htʾkº^¼üÝwû2ä°B3W¬P¦`xA e=Cžñã|âä%f”ÂÅñÜQ„£– Ô±L˜…óÿK0œËÞ¨*ÈœÇa9v.œ@[™Jrá”'¿)ñ÷+ÊÆòøßGŠeÃ]¯ù‚ûW™@Hwmu®h‹/Éøšû:bZ΢¢äÁOÕ2¦FDq!k9¾Ÿr¬Ú”£"ÔÏW ƒŠ§»-+Öq­Ð¾¹¬…ìn5άòÉ™è©ã´{h´êž÷ý4ž±,)âÁÉÙÕHŸŒ02ö«AHè9&–dµ ,:aÜ{`xELã³ñnÄ :Ý1ºŸ2ªåH%ŽNS›d =Ÿ€šÍoph¾PiÐZVß8\›¸•?=— ô†væ2NÎAæ’ñ‰ªî2cEÑÑÎ-”ͼu´.&â&·8Þ~Úªˆ“xEI/ß¡ý>›‡-›ïhÄǤ59rÔÊô¦¨U Òôˆ!â:éàЮµˆDS¨XO[He‚‚eÈ›³UìŒ=äsÉòY•çÕÁBÖ±”%h™-T˜Kjç`¶õÿ›],h”Þ-ÉÊ d ‹:uìî®z{±¸P@ØÖ*y7b[Rã¢WÏ Jxo׋:AW¬ùÌû; uNØÍ"I>ìÖ.οqt‘êë¡ùrmY;œÙpM{ìÄЈ¯‹ÆhI Áá/A°­æKd@‰-O ƒÚ¡ˆ¬AÅH!»uEÑó†á 8_ý•Ú“ÚÒŒHØR–1rƒl€ŽÞÎ ÷™x7õ­f/"hâ@M Î»É#™Ã¨l³j}}IÖ |” ?ûvP'…ö¶xìv&gÍq¼F—ž6“ú‘lÆ|S9¼)· Q¶Ãy¥—ÇPáþ^[– tãŲSOî7²q‰WÃg^§ÆÖd¶-»Uþ²ƒþ²Ÿš¡zèYÈ~8§B"ž¤˜3cŒÑd‘œø úà\õ8S=öú³a™ E8CÍŽí¥íc-¶ó¥8½gÇ ½hgÝoô,Múù9fa:Ø…ks˜Ö£YépvŸ@ñ*‹¹g ͉!&ª Œ)Þߥ=se’ÏN¡ÂŒ<›dâíxx»yi¹¥ÈôþéU°1ö®ˆ‡!¥¼KgÃä-'®5 ÅÞ iŽîC¹FKOúÆ dDHZ‰n*·{&ÈH‹ÕLá¶)u¬ðR.gF0Xé“cI™‰Pë—Í!Ã:¶¾£vNó–wç€Ê)È"ô*¹¯="˜º6ì>WkuR‹zùÙçôŠÁ‚í‚u âÓé„-¬ç'6 °Rá°4_…²ßõŬ(IÂS¶’ºwl®v§J¾‹ŠËÅý„ëLÐ÷áTaAÛMÿðcíïâbÛá‘US׺‡+[=ã"±¿øœÚ%Pâ£Ïµ3¡hKsópP¬u½ÄgÏŽÃ3VËm, l.å¥ñ¿²rgÇãRïBµ¦3Ô þ:’› Ó FÞ*—ç)ï&…ÆÙP'BE «ùè;œòhËé*oŽ’¬+ÙúûÓáÓA€·K>µÂãPVNS]Úbï¡‚ÕZífŠ£l/„!Jž–øâ( udè1¯Öz»ŸG7t {vòÃ÷G›²ˆo»Rź±GÎ¥H%•M¥sg§“$ÊŠµ»$|SOE=PRW3uJ:KkÌbåW@¨ñÎís0µ²Ž²E¯(à„x;;í¡”ZùK’Íɳ/T®Úò\Ìî½¥|Ñ40JnS[Vs4ê Ñý~„’É ¢ ®s~‚„¼‚Pl”ýè‘+ÂkÇ3„AÆ”4WÂxgúU…±O0üЪ¡±i)‡ØÙF›ì0°ü@ëÀu쪶‹RÎÔ uH¨[¬|Û8vQÒ+w©›ÀåNõåàÔïÉ—'Þ yÀöW¢gæ¡ã0:œÔ; É5ØE•œí©X¸– WcÑ<䢄˜«8Lv  ãnp’ÑHBÎ,Òï 9ò~a0ÃÍüÓã..¼¼e^)ÏA<Ë¢’T-ÀÿP[²©udqÞµÆ1ÓÃs‡MhmjØ–»Q¥;§2¬Ð. 0­u°âdÑpСD2$!Ï¡d—ávÞ)ˆ_>‡ÜˇyUø©â7Ý)âFÇ! ʆúUëþ›-·-”~Mo<®’Ò³„בá’6_1'“1Þ•˜Ã»oש ÌSD`TÞXWa2wO[ûÑ'|¥Fñö„™å­¹l%ŽC­!vøÇ:hšO»=Û‚'°@î©ù„%[´ÁŽ%ûˆÿ8Oï&:û¦ãK‹FBy.»-þ„)’æ’õ\pø³ áAšß®”vÐ?ç…}Üg7?¨`fBŠ§BÅÄìV’Æ 'ÃSç0F§=Æ:3U¦™Êඨ¬¹™Jž­íÉ~ÄŽ$õáQŒÓíùf`œD‚Í­‹f „ˆTdg¹Kã›_×þPTç öWíxÐP^òQY³³Lé‡9šNxÓÑ”éÔZùÝ„ìf1¹Myˆ©_Ž&[ˆ<¯Ú†§;–F~®Sо­›¿;2=£²V4Ïë$Y|nϜƎܵ·G˜o‘Ö¦öxrf榆U%ø#…W ¶ñÝ[t† żŽ·÷1aàß&8ËT+oöÍrt8´/4o›ÕÓÔ´qƒnCíH/òÚmõm‹ÞPã>=P&<øPï‘ mÌ+#/š›BåZWÒ7?5±ë†ËyÔÂç ¦ƒ”ià7ªEMU&ªÈÄò‘ ÙÅ®)ÝFÉþÊÚ²Y‡¨çr©ãe‹fë¶Ý“°&öŒFÿq|¸&°i#WìÕý•ÚDyéÃø“itxÕ‘õÌM1“ôÕ,¨ðrÌPÖ¿ÁH T’>J1DYœsIH7dòñqyyž&`WܹÍäý5Š1­¨PY(D™eHÍ•žhU%ÆÞ²¸ì v5@éBWj [ž0Bž­À2Íg6S«SË«Zg˜b\kßÇp<-"öëmQâ”É@[=¡íP :)¤dÒåK#Ì?r¥òª÷@|ð*j®sÎYÊf¦Ü·0>y²™Þ) ØãJ²àú+!UŽ+ %BJOƒcÃÁjnVqñvIq—˜“aë´‰¶Âr\ÅzÃIáŒ×lHq·ØM;¶ã ¥„ë•ô–ÚZÕÙB”ÛdO§Q´Á”ŽCß<7‰±ŽÞ,äE2:¦GYè,}¸%ßß{ö^úbp:µe³v¨iï5õBO?ƒ­ê—©4Ö£ÜóöeËög…™¡+¯U¦4ó´úŽÎ]P"r¶úÀ1òV]…¬Ý.ÂFTγT¢ÈõÆ¢ö[3u_±7 ´Œt.užžù3†DÝ~¯ÛïíGáå^«°>P£WUt½Ý,ÀîÁ´ZïKp½è“ê0ã¤ÞîEÝqgˆ1×oÚCL > @ü¬O”¦4Œ5pÈiÚŽÆ7Þ;è‡ý1ñEažU饥ªå͸rmJjØÞÞþB¨1² pÔ@[DÙjß°*}<”‚‰Ù!Ú€“œOZ­Ž)ÒyÄ)¢vŒÉ¬-=ÔÔ‰\§±à†Âß|UØȥʆ2¬…Vß\^½Ïç)Å #t:&0ÍÌW”t‘{soÛ0—#¼4`B‘~{ò0?„•©dö…,ÂÎECŸ~0 ìVtëÝfGÉ|Ñ|þ)J×Õšíü4ÉÃÐîOut•Š*¨â§9ü…8†¿ÀÂÃ!ÿJtúh· [­=uô—öð ÄV €mÒ݆ÊÅ‚qcÀmÒÚ#Ôã:G°>Tåwù8‘÷"Þ ŸzŸð=b%çrdnµb-àc5웃t4ÝÌ,USq%ªí‹xyd“&â@2/³šbp˜¶¥6ÊÒ­?Òb™ÆÛÀd5ØÆÂÐòy=sL®‰ò•À–mc>H6¸—mCÍ×ù¸‰‘ä»›t]7óõI<_׃ é³êáþwÿÿSøŠ¡h8¢õT#̧LÕ¹Kñõ:ÐÐóØšä>¼C˜­$Ùm[4=,`[ò­®áÐjç5ÅÜCËAÜì»æ°OŠªù׿{Y”¹è8ØlÇ>—I¿›œ¥ÑµÄÉ_.óhŠûÈ¢”BcñQ,Wý*kþ ï¿ÀE5(`À¤°×÷YíÐDr¾,F’V*ȽÓy¦rÉ (€H~¶W3?Ì,Eürªr„Vxl i¾®™‚[Š–=áNø¥ 7¶Y Ëëõôå‹ Ö¥Í2l¡‰8š·>Œ:ï;-T̺q¹lž«ï•¯(!kFV áÔV¦ÏÎzе¥ÌÉ°4ö8Û¥z. g¹!‹MYA_ÂjE¹‹V ´gÖ"93VR½XÍtÕ²#¢Ï¢G\”>,ÓÌ°Vö+.¶ÎíÂÐo4ÕRü‚šEùP¸ù`¨Ò TÙË逖JLfíîõô讵<"U‹ÌŒ MÉf~‹öJ©ÖD¹sã>^T\­•ø‰ìO?º'“†ÊƒfÖ-²­qåÇ!æ›[>´ê\ÅÙT9Ö«–/Ú£G”#Ö£Ò¦ã%Š‡I&Ôí)m~»§‡îO Ôd•DÇ 9à >Åìªðä¼¹?6öì:Ü´B?s,|ÿb?k7Ü0'íÁ“{OÈym#LÏëAÅšhÜW(ØM)ÛÓE¯+§ô>­å‚ôpuv6öÍ¥£˜“ûÑé‘Àï…ÖéxÉè.ÞÄû4¼¹¯-x^ÌfE‰PLú—÷(:rÓ$sÎ>чËåâF¸‡ÕÑ°¥ÜäÝbø1~K'Ë°JLO´˜D£ÁÕ°ÕÉÆwëo)nAÕ{?œýqäm?¹þÉì˜i&™µ†˜÷õ»¹c³Ö«²·‡}20eT0]$){Ä¢ãëNg -ûN–' Š‰› ”KdyóåUä¾&žÙ™Ÿ†‹“¶ÐÑf£—˜X•î/àþì=ÑÛ‚N¡¢ÒMÜeük%BSo`†„Ñw\Á`rªþ°Ú(Ñ%ºì /º£QwÐwaÝ Âj‹Jš ö ½î9m)™P\²­¸/à¶ìgù¾¿'ùÌ>ƒË±‘S¬˜p¸¥èb¿~È /!(ߟ•,ƒtÞǤ{”ØAfï×4!É+‚‚‘ÆrDB N§(ig6XºÊ¶ù¸Ötüµz'ÙÓØ|mKŽW+Q(LO®u·ö0_{~äÓ`£`ÞÑ›ôøøXÏ¿;‰éÊìNs3…ßUÞËÉ'yóW4˜=ú2c‰4Úº¼JƒKåjZ¸MˆÅÂÛMr¿½~îL´³A_ÞÍW/_Ô~0ƒŽø“}~~Ë=úúùçõ¨–M ò’R@]j×yÛ=ÌÂ"Ì’ÅJ˜D[ýþ Tókoážß—{Ñß?!%ä€Y5NÚ²o?:qu¿–«M«âDEjyÍ<‚w0ZzÝ3ÅKb:‡z˜yõ:ý:¬þªNè×»’mŒÚ$bôò›p8†9îwÞ=«4O‰;‚‡°þf ~ìÿ–2`öCŽ2ty, Y[·l»Óê.;dÂI³mLc¸qæoLr2O»Yq­å¬y»ÔÖbl;áæš*ò3uJîöLP¤?Õ2¬–Ã(O“ÍLáð¢Rq“FÖmØDÌ‹±ÔTq™Î {“ñÙϼR—=üê‚åR÷á–PÄЪª´8‚)újUr98œ¬@&tnóíCjʬ®ô‘{uN¬jßN'ßE‹ªp'ʈ\‚F«¬è@ÄzXNÌÒ\\v{ˆÒÓ(HÜû­‰§éª#NÚ°µŒ–O89¦a„®c/O×» ùGü†EµÉkZ2S,Öw¥‰¬„¸e︢³Ëœo Þ+Œs¬K%«&ý %£¡õ¸t.ĆŒw©®ºj£X“)ÚÃÅàbšgÅ®þ ‘ú—®Teã¤¹É öêq/?M>NÔ» 'ó"WáÕVà9;qMýðÕ-Û¤h°­Ð¶m²*b2>Óúlv$V¸™`†Fs°-.4uÅ“U-Ÿ¾ËÍ夹’<œ92%¢ol(Ó>f¾‘3Ãêj‡BÃÁ Ì° T/~*ÍP²°ìÃ4Jןlâ UÊ6b®K¹1Uk®4]ä0&G4ÉÖNjüÌv‘ªLfEOkF%»˜ŒµÕ»*æ qßœÁÛ$N+UÒ¯S^›™òÕ%UH )Pµ¡?¾ë¡t¡;ŠÀÙâN«al…­ó¦ãÍ…#É„‹m“µ ¾{ÿòÅÁßšt9®^¿î¾ïŒ*vMÊjJauÀL×°¥¦ÁZ¹æÀÞ{;F÷éoÙÇ©T˜‹óV¸HnI•J¢5àô88üöà_´Ì%ó#kUùÓ*VØ†Ò WÔJ˜¬ù4*cJ ‹²õùð¼Õ9Vó¢å„PL“õƒ˜?ô‚ ^CýX¯ÿ['µ¬aÜevèx¬Ëôí+ª%r¤|f¸ ·SºR@ ;d4jT‹Yº€˜¨|IV#œÃ²tøÊ×ùv ¯g‹Åñ ÷ÆðãúUDJv‚È%ÔÆ«!þC'´ú ¥„œDb2¾´ËÉÃ5òúJfâïpû ñn a‡’Â.¸ŽCF׌Ån©KåëŒÅ‰PßY 0eš5ê¼<÷Ÿez™RöÆ ó ›Ã.©G»ñþ.HZJEÇÑxT绵$çÃæ…RŠf!Q=Å3Ÿ(õl=[äÖf»]GyËzƒ¦h£Ó­‡Þ·0¨â¢½öë^ó¼¨h»ƒÈG~‹¦D2™ú†á›@œ\­Ç‹I9f¬­îÎ}„L³Ø!®¥ÞÝÊ|&œ>›1$¿“äAÙ¨Ô§ø_JµÁ§Ä¶Ügš¹_mÜ Ð4ˆ®V›]üXPl+é„îO°§?v¶ â^§w¬Ö²ÓÔC=l£FÄ ç¤Ã­F?Z6M‹ž¼¦F¿Ô§TMﾧK5³Kþ‰ûGB3u½›/¸ Õc­ª`s'ôÑô8(ï.óÏÑv¹6ËŸäkâ¡V§a 3tXŸú¼-ì™Üyª{ZÔQè ~EiFÏ®ÎÏ»ýsϺ•Ì/†ÒíøÈõ+J l×T:¤UzÄú»ÝyHÅjÔö•-퉣D.®A†ÃiÐëÄÏ+XR‚Kv@á9¥2jÒUéo•8yIû˜k— ÁèBûîXýé³…>Ît/?ñ!•uõ:›ê‚üîq‚BbttI˜£¨ä ¥Û’Hfÿì‹ éw†z`ŠŽ-± RÐm­Ãá8Ž+G¿ù¾t·bJ4ÂÞnj 9! 7ó,¹Oû$Ý;ªÞà<„Á”¹[þȪc‡¥t‘~;™] Õ †LúÃ*©'V±hÑÚðÀ†¡AS·j”¶ÀD£ïGãάïë—‡mr?Ù̪ó‡÷Ä:å†bb ŒÍjO-Nîø¬ÕÈ$…JñꮿÿÐFÔP¹µ6nê“-äÕØ\Ô°ªô –tT_>¥‡¥¨tBoú€rÚàIĤ6µS•Üm¢Ÿ18«sŒ¼a¬#qzT¦A7¼IC‘ø™ñãlµÜy볺5&ë±(¢ï6ÞœÜÒ´,[롟ˆªñI A6”ªzS~×° ®PPåˆÈ`50ÚÚc…’¾8l•”ËONP29%†íÏH#nC[°‘u⛲ćUDl¯Û¿zÙy")¶Lnw“RyžÌÔò õ(`»Îc‡Çƒ$Ù@kuQªfð„k —/Ò»d·˜a¦#QÔéŒ)ˆùÞÅ ¶ÇáÔßn&ë;Š(‚Av0ºârØig¼›>YG¸XÖ~—'¦Ðnõêü;Äx4M±²ÀWp%xUµ•Ý­0í`ñ3¤\([TOg?2ñ³8Hè`èépŸ°QOÒà¤ÚŽŽ9¥´ÆS?ù0WºvøAUÒL’,£›•nÃú)æ…GƒS;×yò|¯ö%÷ÉèÖy&h?å–§0*ZžoÓYDIqØIbûWÕl êáµ­Ì»Nˆñã€J|þx1€‡ÅAÈ"S\¼ÍÝ‰Ø Íš/̓]¥|Fé°<¾9+èaP8ÞGO[&σíMËsf‡Òˆ››³ÎgNiåd]Úvª¡í<¤4ÞÞœ8âµÙí·zWíNÔî;­ñ56ì[>l1¾g:v©x…“i8…ﳎšd¿-mRitÈG9 ú@ñæ–-2[°@I.-&0*ÇÁý™h¤7ÍQtyÙr"àŽ“µº„Ë”B¯{m羋ŠðU¿ûþé×6wVÐœN’í;û&eÒ¿O{‚K¾<¾û- =ÿM· |„Ê+ÌFy6j’Ѧë•ÝE…HsxM–f‹±OÈo–×å"+#ãªjçlLªÆÀÔêéZÀ»â“&‘NòÑådõ h*ú·é4Z¹‹mÀ••Žì÷ØkÝZ|®%.Ó…¦ Ìè5[‹Nµ;½…dXª¹Îòz²™Nf1æ¬EFŸLOVÉ=‰gÉfi`ÃÖW_™ö/Ÿ?û긨Åþ \bœ>æò켋šÃaó{·ÙÉj:‡^oízyÿ<&]!b÷ºÄZÁ™B”8FM¡½fá½RT+-q»œÛ›N›A´,|y@žq‹‡`Ëoó•êÕüf÷ÿ|ÃZÙiLìÌ­P|¶•,ˆµƒYéEÞYaæÀ‡wûãΰßìE¯‡[‚“P”HÅ i™i?P0äݳ2(§¤^yÝíwG¸¸6|D€©9>ÄIo¬s¶LtþˆÀ´müœÌ¬}F2DŒþãò¡Þ7žP†âÚK&Ä„?sI…õúOE‹PC¹Ë|Çr¶MÍ)‚¬5 ‚1 )wTx—,f.àiù5ƒÙ%ß„'˜Vi>{'ž9;NÒ 4’ºwÌb.ŠÜ¨yÑ~ù"2^œÊ¦ŽÆ~ÉYÔJV)NöŠ‘$bEÀëgÇé›Ð4w>l^Ú,¤ f‰Ô¶D$ììOËŒ Éäá”JÒ¾™Çͽž6˜"'fØ0qYHH—a°.F„‘T)Ÿ•B¹ Ϻç’OÐŽžAY<Å3Þ£ã}mšL~ö Þ8§B*#͈É«ºŽEms³Š(!¥ 3Í·è £A8<¬&Ï.Öi0CÒPáw•öÖÁS"R•Ô!ÈwŸúa‚CÙ)ó\bÛ|„EZqànßo^t[ â6ÛdÀ€›w BôEÔì·‡ƒn›ŒTFaŒiêP¨ø‘…‰Cvf'[G¶ b­$ó¿Røï ÛòôR–_•eJDRgdø-O5§«)jã»Pm“dñ¡ ¿†Ý̨Ó¶Þj½*#-c<ŸCÉ_ýéw/µŽr_ þurXß• üó3ß;úš½£j5û­N/5_w<)»Ý×W(<ƒ¥¥”É⬣å,´úà˳Lœ%þŽVÛ»\Š±J`<´„~\*"G‚Ø5$³ÙË‹¼òKqÇH,}iMnc¸èÒÏ0'²µ3¦d•‹iŠÈ6ˆ"¼©ŒùR[¶Úñ•Ù¯ç¼ºx£pbof>UémÝ;c,€ÛYy]kjét–÷‰5 ¶‹¦frmŒ0P ÄönÛ7Öw£+rú°\wõ™Ði(³]¶âÞïˆGHÄÃp/šTçuóªG9z=¥x~<©Íëñ¥+ž<Ù-š ¬Ê¤Õ9 ñÛû{ßfý‡ocW+:8sqùôüF&™ p%·˜œ™aìÝrÆ– @ÿ çq*¹döì=_ɺӤfmùe6idAr…K¯F}Q²‰ƒ3þï[Ý3JÅ°t›\ *óŽ2”„=¿^ûÔTBÆlŠ5Î~¼dåÌV|ªÙ!˯>¢"M\ð'çI²&D½ÆøòXR¼ªg‹xuK,³/´ÃÖ¹ÃË´Ïñ1Óõ:}OT4kU£:Y¡§“pÝT€Xe^Ú×5aW•›Ý ÚÅ£yÇ‘J<ÿ¾jýµ*÷iË»ŽÝD´áN&ȸÿo<ïJéR²r¶ "lÕ‘M•çKvÃ#ºôwÆ&^nŒ½ÂáYŒR Äg@>eýâZ„Ik»,J¦&‚ÑÄ%ª²%]êƒjÂjM@­AüøÓê(ÐXâͳÁplcvç'»Ô²›q~p Œç(ÑOnÐÍß™R»¡¼õÐþå†üæÄç÷ V‰Öæ+4 a3n΄¿<ìœwGã;}¨‰ýtê°»=pÂ6Šóg9U+Ò‚]ù;££€Ñ\¶†¡ â=‘÷ ç¶‰0È ±ZÎ4¸ÿb*V`¼A͸œàyz²ç)œßl¸0¼óº4Á«Wáß?§àÑ?b€ÕïÏž7ž> _½Ê›]›Ñ·[ƒ‹‹fŸ2tüûdû0ÝLA’cÍ«ßÜ“‡?Ï’â ZG„Ý[Öffì ¶oÎÖõúa§¬å¡ü°”ó5B•-zš¤k` @&ý8Oa–®Äùe*n©Â]@Õá•# s«PÑfé€ç‘¡˜E­æDåmâ›ÀiÖã ÝF£q=¼¼ê úçÑåxèäž´€÷츧’Üéwrn‚¹æ‚ ,W$¥^ƾeQÅxûn3ßÆï&[„ÙXEDe;p`Î+ö¥¹¿·ÉôzUO+~¢•ÉÄb^Ñ o½I¸NîãM#¹iÀÒ•!±´±ažByÝÝ~»ó>‹磡èed¹~ˆ7HÎð*Ö?8綣‰mô8“Hvš|Çö$§ÉõSá8\4/£7ÍÑdža¿¤ÚzòâàafÈØ’7ªå §·óA°6ÉúNÒXѵ\ù5¹øTJx^N)㥸ǵ×_G™}JÑÍnøý|ëÓ ÚN}Öágǘ„dçºõµt¾u µ¨ûõö}á´ž¥7–iÜ\KœöðKb (ÆÌVÌ‘/—Å[-}Fæ!£ç-VÄx±: ¾Í±f™šŒ}Q¯Óì£}˜×&Jç»ÉF8ç7¨µkõñ3û¿Ýc(`e#\1Ɇ“h°{Á :Ãk›T#szññ,]®Éo¿i»³ùa!JÐlLÿ'0kU’VPŽ÷E0 g;<‡¨Ž÷:q°7ÙtÝÈJ)‹Æ,º/wèÞ«×6)çïßò£x7žòReÒèŽ=Ø›×ÙÜ+`ìð¨ŵéL·’aÉm^#A”žyu¸Gé0ØÍL×)?1 µâü×V~&ô ¡ˆr¶ÈµŒæ{ÛB0•ü^E0BTÅÔ†ñ¾X Oƒ2²²‡ Y A[Öy&à%+u¸•bHÓ„òg)$G35ä°¥WEá›YÖxBÖsÀäùP©B^ªÂå9y­jÛm²(œ#÷Ÿ[û 9ñ'¥uí)ïBZ“Åt· :ÈšHTבIÂl¦®“í)®™qwxJ‚ 5“ä7®„«AtùÎbJlLð‘£hI&iØ£Ó†•ß¬+¡$Q#”3'Ž1U’“»97–:rTå7‹O•ÏK?Z`·+µîUøbªÖ)(š½„Áë—™È.V…4x)·¢SAš öÄ©xç*•;ФYâv0š±Ã{m,Êy;h9³¨l˜ÏÂW¯Bì;lÊ|ûÆ?*Ï4ÍvË5ÆøIРˆ¡´Ãì­iR2Roå駊7ÏÁS_Ö£’B­iPÛ$À#È^øÀ ù{t ã˜üø‰JN9S‡ÝjÉèÒ0ÉæFÈQŽª ä‹8Ë0Œ‘Öd܆çà#\~áÇÞp{2r„U;úKi£¿`K(#ö&n%éI0ú~TÀÙ|[ôÇÀDLnù¥ÂÉaã(•™ þ˜ʺÞ|p$eS¼áù^Õ‘.³È3ŠX®w[•ô—&_ùBÚdÕ“'ǹ×\Øsµf?Ï#=1–Oàb`ç¶/×Ã2P®6ͦ—×bÜï€i_%¸îñ§i¼Þ†®¢ßËÒ³Œwn²~Ð97DT(X¢‚¦z×xŸÖÙ+Ž[X2W!‡Ó%z„*ãˆÔ oêtR8(ÜbÚ j7®k§yŽŽÀ$`Ø×—¸\bœ~Pí ‡è÷ȺýÁÕù4º †ß×j‡6?dÜϧºM}ebұƳòüZ‡åÒiÜú¡†Fô‚Ô”?:8¸e{¿:>m®ÓAUÙƒrƒØç1§8Å>/D#ÜA¶}K C®ˆ¤Ì€!±š¡~âWs“Ô°äíٓĈ쎽 “èI=ò‚ÿô»—èÛ|ÿõs´ï%Ɉ1e‚ХĩoÄ dºQjеìÀÁ:˜è.RW‰ÎUJH;„'d¦ß²yéù€¹á² «b²ëAA˜¶ ÿð“ \´Û-)›”F–b>Œ,ÅŸÍ°’d·‰øZ´ŸâõGÅÌ1º[{ZI66Ö##¹þ)Ã8qÃx¤ ì†bÃé1ë7öÌ6Ï3æÄë¼Y¤&º…ìNâäH,4m‚ ¯lðf*Y‚€Q\ànå{˜I0£Q.ì²^2òRÀ!™æyÎÇð@îÚã.“š”è&qº®&Ÿ¯ÍmöúVÅ7#ŠÅ$H,’Èfä U}YIOR„‘‹g]’ƒû$Ï]ô”ÜÀ&H–T˜¼Høóvª: ÕæÚÂÎêœÒb2 @k7Tζ(½Žæ”‹0JnnÈ™Òú\>CÈÚ²:–š_KêÓ™¬t¬—ÚsMœòì!·,™wZpyÍ@'»xOéô <Þ ¿öyþqït¨7qq˜»Ðlù–°ø5ÈFSŒŠ,šW~º!+Õg¦Bª’Ð1ØäRW`="îÝA²”'ò Í ªðÑ6Ìúx™‡ø#ÿÌéÿ%-¹/Q´z¥@ˆRZ ‹°E©Kh`´@¬‰¦÷ìæ°à…wÓ²ÈWàªçS!Áúq][k};¹45Ó`±•Äd‚F ÞbH ín& …ú®1O≄×B½ Î!= \èC½[Ä[¢eác„xÖtIäf‚†’"…Ôû-Îfr»l ÍÍ"¹7u£uNöób- ÚM[šð*Òl~Ø&!ý=^›F¸w‰:9>zè|æ„æÁÒ„¸ /ýÎöt뛘*»œc÷™¾œ{ ÕLi…/Udû´e†¿âz­­aæ Ø|%ñ:sƒ†h‹Wc¶âf¡¡0„st·×HÝÖ9¢>OÉGDknðžGþžoè É`Ø77iœšÇ{j-$y²!ÌgU1=lu\¯Õ Hä‘A‰gÞ’†p®âíu:‹GÚõÓ‡÷R°ˆ¹# Ôçh¨‡³’À*=d¾àkŒxÄ\Iˆq³w]ÁŒ/žfœ”û®Ðâ$CÞ½AKø/µæœš$Ð,÷­<÷1FèTaf$Eÿtc4Üø ~øC. Âsm2ÈÏ‹ÊJœ˜û“ ¢å(”ÃÁQa-0p@óÚãâ÷™Ꭷ‡ÌVG†‚Þ-<ñÜ+Þ‡·|Ð4z‰aŸo '%µñd¢ëXÑhÈàA ¼0&ìa"td2ýËn¾‰M˜ìy¶s™§¡O-!ju H‹@ÁØÈ©¡oå®È|ÆOûbyð­äå,Úîz!íˆõC»(´5eç2:ؾ–öÛz¾»¹9ݳH=.ïþðùÏÙAþ…Þs¼¤Ä…Î ¼»$<|—þ]²KX®/Þáz/û•ë? ½²eÔ9'–Ebù冣[*’x÷’ÎÌe%¹绅õ5”'?«åÜhÏÁ¸DÞ{ôÞ/F-Ë Ô{ÂMÔt ò^é E=Ú£40÷ǹ€\@MWlÜ_ÚŽåõv>]¦1X,¶ðYñSî”ÜÀû“ëhG·)vYns¦%®sÞˆìùådËЮÔfŠÃB–úvYkm¼ü·—ß(Š8›nÉ"þÓå„3³P«ÿ˜@4…EìOWVàºÚëÕx4Ö$£G°sœÜÙmèÞøÂÖu@àß!E3Þ˜~<ºÒ€•‚^,¿’ï‹.Q  ¬ ß_Jû¾/ÂG+QÔ³8½uý€£´Cpfu\¥9yZ›ô¯îíÏ·\øBó>ÀåµHÒÝÆVüf£eÐRÚE .ïñÖnÁš·d=ù³ìƒçFÂ^d¿0¿-7dSªÄ7Ù~娸³j¤ÃE3îmk Z‘å¿/|6Îì€OÁãݯ¯ç«Ù8YnFÂ1&"QsâƒÑ(8ƒíA]6‡££æú¸Áœ*? Õ>;Þ´‡£¨Ùëyµûz˜Æ+±_{-¥wAZqº`Ê.³I¤Ó[’ÍlŸ-¢€EÍb¡ø¢>'ÈKÕâ êÊ0´ñê/»ÄO”ip^=£«Ã'1ñàv2_ö¼ª0vž7 &T;ôšÃîÈñAç¨åUÙz0Ž!¦;YÍ ³‘ŠŒÂùj¹^x)Ù„mf¡*›R¥™çìs„ÈL,z_­w׋ù´¬Z¤¸KrÙ 0ökœ¤:Pù>ì¹ÙA–³ øúü}upÄ“°L:Ñsy…÷ˆhfl§Rê4â%‰r•aG”¬É6ï gâ{†(06¥ÊdÙuøÜrç~ =zÍg‰:ËôE7k|·ŒÖÑ >5;£q!(Å =èÒ³„9u]úÁfŠOö2û$–ªEh=NrþŽó]]|ÄIYNRFr@h‘cbq’‘ðÐ XNkåµe.%·¦ƒkñ^pÞº'1sÛ•WÎÚ§ÔªÓ<Ô÷ñ#Ñ°Ê®•‚å¡ò¸<~Æâ ]P¤ z7RØS@!Ù—W£7—=ÊxÚdêöñB*\ô»6ÒíÃÂ(¶,w?‘ßìºa ñ3Ç…ØØrESqDkbpe®gšEmœ÷¯ÂVqðCy…v. ²QuY}²ÕÍÉ|Wòõd1›l^o`â-†¿žß4~/Òþ]Í ¶kV»ì³Hæ9¯Ìi)Ï^`]`Ö èŸµ\Q?1ÊÆ1镳/e* æRÌ…„@¹4ÈÒÞ°˜ö–Ù™`Úà8§w”D•´ÁɺV¤”Ï^p‹«¨÷ŽŒÃe#+Æ£Žs1#N$C¡Í 0‚hä–=¹Ae»IQ+ Ç÷ås¿ ³À‡l¾´ü&®¢žî‰CCÀT"2²Ãx²{AŸl+62óÍ‚\¥¾ñFÆt¼²5ÚnæëpsÊc¤ ›#2.(ì(»¤¿nŒG9à+eƒÛó*gê»ñ÷— 켩‡e…~š|œ|º™î«õˆ~«ðš| g‘5“ 7Z`ÐBw>™”À¥šÛk¹ÛÆŸ(ÚyºÚ††ŒŒR¯½¯düó§¿'¨µð¨wDö¤£öQMáý"F¥Òw:ñW£1™÷0Ÿï°Óî¼>¾µ{èâ`©ÆoB.(?ÁÅÆt̼¹9¥¿‘µEö !ÇH6• 1Q P턧 È&onàæ>nf’éÔ¡J+¦R)% ÄMn±Sµ\ÎLôúªßª‡C´ÝàŸN'}Ðîásš'úŠ×C;&¬¢Ê Ü­æp¡Ð,¦¡]mg<Ø™ÃÒkr#hËì[”ÄÛ,‡æ©Ãšý=¦µrs¦bÔ3zoµß5²óí?ŸÍâ•BV̧±v,ؤKYY銧ևr,l¯^ÌÀr…ÀÜτñHÍøks—rÅ$.@½ýf)ÌÜE)‘G!°Ü¥„åAøÊ o&·Z6óhég2s>¤ˆ‚!Ç’´Ól*ØîëxÃi)<©FÝ[ɶ G”Àsè|æU¿µGò,4M+~GW¤µÑO ½zŒ—Sûcî£ Û!%Gƒ6«5+â2Áìd%°eÒ:‘z5µü*„FÖ|ñ¸ét3¿ŽÉøݬÒrÍÑkdva¥a[ijÞ|õáBŒk6¾Üb~M6ke€$gl“ò[=Á¾’80Ûæ;öÔ†[*ûˆ‰~NmmM4lÖY¡±Yã+ÍàÑ"óÉ‚Þî1Y²ËY.a}Ö‰¼d8z.zà [ÂI3§¡!<¸geiè5ŒŒãÌÙg^m`ïx ñüÊ)›ß^ïR¥Q¼‡]qN^½ä— 0Ó§­Yɪj,·õ"s¯¨p}¶X8ª2Æöà&¸Ëg®ÓÞœ®ýå ×ÉfD¹I¤ýﮈÎÄxØ^Qá›” Þ±„†é y0ZÉ*g>ðŸybR•Ëêrn ü Æ2!.Yšij`7axÕ¼–N±pd é’&…Y€‹¥Åèe¼‘;ºa=PØ +ŽÌ8ØÇ£´´ÊÀŸºÅ'éÃjJ 2ë»-ÃIQl6ÛXøŒPn[‘ëb‰c-¥º]ÛJYål=WŽðaö&.Ë>‹aoÞ8NW 2Z¶VŸ¸X—¨ÊÞ¿/ª´´8óÇ0ù‘òj6š ûÞÈ]hx*IU!³X{A¥ß–½@ɤ«ûâ‹Š}Jð³yS²wŠÊ\ÂoðÀóE‚ßTkb—-¶`{¤õX¨ádºÄönÞüc÷„ZÌÝe$éû®3’¤Y-“JI'½îÞî{ªºå ÑÕeÇæ\ÐUôiˆ©G¬~¨hƒ¢œø¬ÏEAO)â‚Ž—/l±fùÙ"<^@‡Æòý'pµ"¾?hS¼¼Œ-¡øÅö'×i‚¯è+çÆ×Éšã ½/ÓÝídãeú’Ñl•…“{æd/^ nÃù¶ÚxÆIÃýé p&¬DâÕÌéTèøÌ1@yE9‰(”$¶ë¸Çd¢Øâdb«¤‘¬Ò%¸æ‹fU·ÒäNDi#:8“faï$˜¨¢(š(B™‡S¥—åoØßÆ¡6˜\Þ—Í;>oµ3›UÜx7a&|ñð68%Œk2შIÒâÛÒe­ÄÞÙ8›Ñ÷^rûzNHŒ3mêyWö’ÀTL¡`þ(;ŸÄ´á jw‡Õ–/~¬e<ÄI Ùê Zp4/^÷šç£ðUØè¾'aÇ>t&åræ4*‡„°ªÈXÿ;¤vµ¿ê·A¤o¡ˆ9·a NFÜÐdÄ øŠ õÒ°V‰ø#´]Á¹•'tEG™ä…þDoû&±@jÓøòÊ•ƒZìüe5dªÒ—¡Þ©"Mˆ±#9EP™= ©IiIæEn$‡jrzpê´Lë"¿ç:[­•¡l=ʺ曈 Ÿ ²¸Až”lgssÌ>CSÂjP*¥IñY½ REy·óuû=·Ž÷ù#yГ(RC³r©=yapß,Ò„øÌ.˜Y4 m,F/+;íÞ”;BnýÔ9­øt£«uC¹IW bn’›LÏ%DCì캹f^Ñ\2|©Ä^V;U©écø«WáS1&¸uTk·Ñ½±f÷UˆWªäÌZÓòªJNŠý#”l“ÖÐ!|ŠWq¾¢äÆßP•Ü§0á\Ž“-œ}ô8æ+[_¬g—™ª¨¸598iIý©ŽZ£q|æ p´šûƹwf?élöd#vZ°ë ¼õȃ¿ê¶¾sé‰{ú“V{ÏU¥Ñ®CwÒ¥[­¼e¾IVX¨8Xæàa±ýÞ.ÈlØ gûy×Ý^'jŽÇÃîÙÕ¸õËf¸Rþ?E¾Væ0+3LËœüb—Þa.?˜<’´ñ"¤_ðÏu¢¢óÌ쑼h ùÇñ§øx‘Ü¢I~Ááã\¡—™«?ÿÖÅu+1Ç(A»ÓÝ–S#ÇB(¸©d–ø(ÞÒ«S¾HU߬/l­ô2#˜ W¸;œeÛ‰=ijûéÓ'¤¯6ú¡äÇ:IdÅ>±8Z Üü€B讑kÛ×]Ü@ž@ IržpÊÚ×›8FaPŽGWÐ-Zàº”Ì p|f±¤èÓ1™ôÜaè*­-5 ‚co׆ñd³ÑcÎw à@{œÈQa*œÀP¿‘Ê¿ WB}Ëb3G\¾ÿ^?W"¨ŠŠ- AæK.›i"´0 Q˜R:ú«hØéôÇÃfŒÕ¬“ö¸’­Ýd’ •¾UˆM×që–ñhDýr…ëá/Ë3Tß {.Hq‡ÓXK²Þú;W-¼û2ZvËÙ•ÂÂE0‹.§ T:ä– ä+Y¶Û»‹èM÷¬3ì7ÇoÛªëÓLxï~çZàEº0Oj~1†ÂãnZ)¬C¯Â:Èj^°’ØÆÌórÞIÍböãBAK!ŸN†´xªtöçÐA Ž±í(„XÇŒNµ¬³IƒE­ïÏùÐF$Ž©ø½ 'eb±OšeÔBZÐLB  ²Uy†s£.B!Õ yçê¢Û§9ºh¾÷X«]÷?w1ÓU5ÐkÆaóˆùm :쑳»®!Qas·MÈ­å꺖’JUHË5lzB? [Ï9 2;êе—2#⽨ùËÜÖaLró •›'© 2.ž®¿ fü ÅK“›˜2t°ñÿÞí¿Ðoðÿ&ßlÀZÌ”.7ÁÿO½µõås·ƒó£P¾ ªV÷¼Š£wÍa?F "NFá*©øûóVXìHSpA¬_UØÇÓþ$³ïä…Ñìõ­joÐ?'ŠE*ƒcϬÐò|X9…”{Šý=0¯“œ“TdA)|±¾˜|š/wËæš3xCM†l“TåFy[¥üäøöj :Æ4ã-ø¶3Œ.{Íñk˜„•$°<ãÙÄMFŸOæìÙ+£di¢×åâígÃ¥9ÕZY0L\Éøkä°3‚ü’Q‡/kj(2Èw­NÔ¹¸‚‘wýS䋶½šÁ¸¸ößúòÌ0E¥#¼ë2Ê:tÖXÞãuŸîJäö˜ú rŸ“Àë­Ó<âýâÉ-Å’vYù8g ³e-½¨xU±3p³ ,˜ ïj½qŠæô°Q¡èü$g£B3›¦¸r›çRƒž…Ù.¢¡ðÚ¶mI„}‡–“ëù-z¸/ ûñEøÝü¬æuþÖîeÈ?iš¢ÜH1]¼5¶ãyž÷´Á3æ}_©Ãˆ“ù#YZZ›bJ♩Oßî´C™§Ô '½Ü¾R ˆìíŠ,B‰Æe£Éîf‚ù+öup0ûýYÜóÿ½œ²¿yëÛvNH#9HœmpÂð)Ò›þU¯GaèŽýœ¯Èož©ÜÄ+7zÑ8nɆd‰ã5æäÊ#ódÀ}pVèô¼P™ŒX†¦d æE Ÿª Ù/ÕóLcÙ°6248¡HvP†'’ÜWü5SƒYæ!HÈb9|ò^åÉšžs‡r{ã¦\îÅñÏq”yÀ#ÜMzk1’ºýȳ7é£ Èé!ˆyÎFh{qòGÅç~‰.q@w{ÓVœIÐOJE”ÆÛ2—ßLzhŽGaëèíˆ@ªvâ8|ˆ^™6„eæoŠt®¿·+Ñ/ ÅõN|AñÇ /ßÇ™ö?(÷X&J‘t´óY)LìíûœƒÕuköÚÌOdÔÙo}½U猉u´¿D:šÂÙ7„ghoXþ´x«zyn™¼!Héci¢éG½ßàWwvÈi`ήò%w.÷2g/îYç¢,Óé/^Õëe¤’¾ ã4=&Æ— A£óÑÐ7 bjŸê ÒÇâ·íñ-Ô Lë L)l¿=vüA}ÞÉO½É¢AD†™D½îY³Ý>ýIµ9`¢ºÁåߌjÇáønž’;+òêø>Ö \ïð^›…Ít-uåNû (µUº»Á=‚àt=Tš à(k%ҌۆçƒãéÃ-l¶—–²Êrb²lÌæÑŒF(¦ÚT-µ6 þ8â[C¢‹æwt q»ß½ùâQß–t;=^N>d4æNGµªöSÅy×xvü¼’3ËЕ€GÁsÚ0•3DWôÇX s¥|¦g¥j l?:•‚ä¼¥Ö¨(b÷ Ž„DJ£³TU·JLvµpr ”ñÿz0%Ûܶ3P¥×Évû™‰Â1ÓA¹‰¥¢dç*£R6_‘FcÞ4qãSáŸ7èã"3Bó6Ùb€‘/¿ïáÞ¿v³F.¾œg° -šnw×× *lX&ŽA.ѦËs¡™_åº4¦Gí’`’>9[«œ4Œ%.ÙÜÉ ë(àŸ ´—p¡uÖ×dĤøÿ`ǃ_xiãù㯤àx}™ ƹqÏx㔃böãD>xQ› Fw`at‡|Y×<´q̓B•QèG2¼ø±J½éà«çp›ƒ2·Zû³úY,ëÀƒe]Œ3MMsEX âJc¥_EçrE9¢¸¡;8D¬wŸZ`T>‹m§×AL:vJqÑÇÃ<úxµÜ$Îä!6Y.Š_GóÛB$77´×ØùÊamã¼ßÅ‹µè·X«ow@ÚAfK6Œ°¶ýoÄç‘Ü*3‰.ÁÖÒ·çñ¶=ÙNF¤PÅvÅÅÙyð€Tàb2«^›¹åÞM–óÛ §yŠ—ÿØŠ'ãÄɤYý~dŽbÊXöä¨}¤’®@‹žËÚk"Ú1—$Ü% ó„.Oµ“”KŒy½˜¯vŸleº|I¾½Ô§ü†û…¾oD6è”ãäp2øƒ•69êðÛ_ ÷”¹;]g½_‰ÇÁ>æ7í½!Ñ“ÉVCœðeƒ•3yÙãW’IÂì/ñåÓû;FJfqˆ~PÂÌ«O xxgÃdu>Î5Ðv xªûOáWo úyÃÎ!qùµ·+êX¿(¸a•p»~8Ç/8íZxýNBÒ‹b(Ɖç¢}ýKíÓ{„œ–½‰ æ¦ÅÒö*Ù_=Á4(ï[S''“ ÝÄjÕšI¶eãvøúyˆ#š-Œ*/±Àç%fÅÉûÜLlœ^ã/w  Ž×zºƒ.Å­å%ÌÁÇ9ÆüÕçñ¢# A 3;»TûÝ`Ø.«Ìd[Ç'c¯¨œð…VÉý*ç&fy)Îó>r!—Ç*¨ùüø ±KXºrÓˆºýb_¤ÎÅåø{µ?쌮zìå׬ë«ÐŹ²ÝÅ7vñw³Yñ‡vO;ýÎ$uö †íëüŽºƒKÃ-ó3ð±ò¼ÀÒ.üái NÕ⺒·XɆ;@br†–ÑÖì+~Àˆ™ªà&r¸4jæ™÷µ FçÁö¸)¿£1»i°S__=W¯Æ‹#…+ÌÔlÇ®½±äæàF¥ÑÐoÊPpÕç:$³Ñøƒ€.MV!Ib ‡ Ž$œ‚ Qiwkà ø™tÄãçÛt†¬Þ\¥TÕÖ«|RU(×:C$‚#Ë÷ÙѸ™lû'‘¼ØVƒC u˜MµæËö­#—ŠÈƒ¿ïŸÁy6ѽi9ÙNï4Ðî|›Z›Ziõ3 š›$gÊÄ#0qŒÍn?Jëˆ3+`Ìy¢´`«ptì2¬Ï\ ›-Þ VÕk”O¯½É?âi .þl"kÈÕB_iïÌ–^Ç6$ýT4»×u>Xf²idf¸ÕÑ®ùøñ*ÙÝÞ‰"…Å»E|c'<ªpºXÌ+Ay­„|ÞÌ?Å„ˆ¯>–8ý-'ìB³tâ@Ä®rK¼éb¾Yò"%ÚMï8¿²‹U~¸ Ž[÷9œªbJïÔÆíVa«åH¶\BÅœ¥‚ŽnNíc7šM#§‹§¨¿geÞÁ»q´rOsX\QPXQ‘û)^ë1ÊœˆÅƒêoŸ*Äð%øO!!O~•ï“^‰AÃ<` #l=órƒ¨˜4VÆûæ¤"ã¡®í!̨°¥«ì~(™übÕëH;wœÞDÉn;£à>f+2•aš…ÉprGa² ÐÙ¸½XhÿÊ<0…÷FÊ‚T!"cÉ+(ß²šEú·^W¨€«ñq¨ßl3 ",ö4Cÿ“ŠZ"‰0Çl…Óçª4¬qP’¹8ä%ueZEoÐû»ùôNÉågÓ˜a˜£d˜÷kŽZ4²lÓÓæ`F𷞇–%†9YA£¸´…’í‹ø˘0ÅÒ©¿á ñœkŸh±ŒóÕÇäCl”òûÜ0JîûbezN-rÐáY_omc…zÙ¢,ÔzƦ^ÒKÑ'ņEµÿÀÅ¥ÃVyQæÞg UùÉ8¬bt¤‚’uX%'^ÚI ‡b:[+©Aa)ìך7èÔ`·]ï¶Fç$~Ðg È& Í ë¨ç>ÈbRÙ) ÄÍÚ¡ÌüäoÝ~«wÕîüçŽ6<"úqµ./ •ÐÑ1^T©Ð‰ð»î±nË„„Uˆ[PžÎ°úC–ëQlò@Õ¨ZMÙ$U÷cñPžœ³æ›h 4®Gñ°EúîR€zä¥2Yo•°ÆÍn_G×ö8Ê+¥’V1ÛëÝfÇYÅÙ«¾rƒãñàßå«A$d™ˆ¢ŒcÞDÁCáŨ²ùöeC®•K” |Ì#¯˜qì+mc_•²ñúâT­QrÔ»(AŠ\ÑÚ0_.ÌP 7çækQpU' §&Ï dy5 ­Xûì4x­ÏpPÚ”"ÚQ‘¨;F;? 0¤}NÆ5Z[%ýxÚ² —óͪõ\iÂó­7 °nI{ƒö.x÷#z3赉Ëz=¬ó›A?:o z="¯AyµUóVè:Ò*‡ÉZ¦´rT¿‡Oca_&'„ø}ýf̸‰' Š.·^!š…ñ§æ(";r¦D‘¼Ôœñ(ËWù0ÖàâPíóžú¿Ý×À‡XÂõMx¿76:ùxú!ÞúoÙL™E Ö¹©äw^~»„}Š\)Û4´ƒ*±xYË™J(æ“îfZ6m;Ì»9Èßò žš…nÐ@~uÑÁηïF¿ÿrC—Í!Ô×A—áwˆ/D°š3c­üô»—¼I\E‘Jím ·ÉÒ¸‘¢ûR¤e›3»> v¦Ùi@7ñì¢+e }’Í\å€\ÈR|nº‚ýÆlÏY%(®‘¸ÑyÉ{€QÑOuQ«©åI*RI MÔX‹Í¤â*šè‹;e³FÞN)õu6—ä y {¯ÌÎorE.&Ó|íËôã4‚Ï> ûÓX”ìsæ9óë4û¦sñÞ²¼^n÷×Ô#ætßÈnYÓsQWÝ®g§·®g¦èÙ¨gf n °nu¦î $Øßµ³¶Çz½ßæ øî=“§ûž\ÿT2}ÿmAÚ^gƒ\çËV>æýexÙ6ò;¢p‰Ú§ö‘µz°Ÿ¼Û«`ƒº!ûœ"vt ÷Ñÿ{|·].ôíÏ T³¡lU®5…ا›/œu³ôc¬xG}¬O@‰/(ç£=do4\FïÃ^ÛrÒ‘LaÚþ0f}ƒ àœ†ÚuÐÈƼ-˜Ž["~×1%‡›„•YÒP#©0ÊkiïÔ·¸a;ë8¬ “µ'¯<ܼ°r³ªØÔœ°I“ù,oçýD6Ö,JµêTuç€)Ï…†peiv }áÇly¹È_ÛÕ9šÅΔ׶'êNÏ„·Ó¸ø‡w\OŽ Ë8p~pãu›—/öµÒ¿Ž:ÃﯾHb©SùË@‚#OÇšóQ+KØ+èëÅÀÅX.”.î¹rÌš+˜²ûZèPIõ|Bp‘¢·Æœd‰ÁŸojâ³ü!¶|‹Úñ®A˜±  bæ½¼Ëeõèàñ‘¯"ò¦@ö“s°f«°Ô€"w{'¬Z«›Pøad泫×Î;×àÔ°'ì­,peböùu2{ðnðC©Ÿ¾oŽFò‰ûìdvTNª?”†Ìî"GJ^€|F#aÝ‘–S®Äuèmf(hàSÆXTÎ56± ~êçWÖ¤ÅÐq÷ÉÝåõ°`<ØHó²ë1Ñ•4`Udï9]½ænÍÃÃV9Ab¼ƒJüž HAñbVêõ“ –,Þ¹z׈ťh_Ù1K¹Z¸ø {Šd7œòe×ÌLÀ*øó!HÔÑÕ%93{ùN¥EÖ.Ä´ƒáH(>„á~“°2]Ìñü Çã›8§­BF·‰C|fé}žÖÙõ+Ò5sx(Áxá>( Éùظ.5­}KÉ´‡÷&ÇãËûÏÒ¾ 2»TóO↎BœtNÑþ>¡÷vY¿r°ëW©‚x÷Ígƒà*k’¬Ì3÷p‹ª¯ï eL?%©i+Ya”xµ•UtB…8~›PO:¿yÀ©âbϳÏkÙI- ïr}Xéþ\’ŽÓ‚¥Ë¶<N–UëänâlŠÊÛ8ß½W£Ï|Ãí|ïX´s=2.-y…٠ȯÍ^OTÍ”ÌýòzƒÖwµz/ÒXûçj‡ù–EƒQGyE]ÉØÕJ‰¯l‡fûh“øQÒÁD°ìí"¢ÐÖv᜾nöF#$«ñjŽqO>Ë GgHàå°;»$ç'i$d³g€AE˜sâ@<Îís«+àÝÈÅR®Š‘g½x0ÌÇt«0[š +ëøánˆ˜åÓqï‡USôm`¼=1s;vúBÒªrÐΊ›½Ê&l²›ábëL @¾Ù¸kàP´Ü$J\HO1 n`}&…ä‚}ŠPFQ$ªßÙôÐñ¢§Æç  ÛËðÅeö¬‡ÆêcÓ"G¬»ÑúgXrèe•ÞáÇ91&x^òBþ˘:Îl<–ÈäƒÕ(»(ä?1|ÌdùÉ šL”sf²Î\ ¦K(ädTŠÊªx.£¶" $ÊD°[qßfzqa´íܳxŒºçýf¯Ùo¿k¢÷̆ü¡I¼ÙêDºZKe˜³Ú!μÉmX¼Ùƒìf÷­ äÌËZ Ï P”d‰Í–4d•Ÿ´´›ÃwÚÇoDþ––·(m ‹RÛç ÊûÅ=Åcl“ ë€^Ž¦˜µBGÓ5ܸYs°å¬SôF,Ä£­fiÑreR'Ÿ]u{m{ûRÒ[áó؇x‚—¢}1æ ^¸aGW­Vg4¢Ë§}uÙ붚ãN]²[]t.ÃïYùi=|F›úy=°áKj^NW×á8¢U-ˆšçþ‚Ž/ªé÷Ï"ÁºÔÈõn¦A_”žq€Ìci™‹º@ôÒ] í·LT,àÆ`SÉ2ºY™ðX;·93¼Ý$÷!AÏ¡þ3@.•$!Jé>ýP³²§‘HÄè DžÐ€ÀÖ–9NÞ˜Ú«è%ŠŒ \€(nsÅF·Ï`˶‡#d/kž9+™ +_Båîn¶ÉånÇ{S!!hM™× 8¬Æa“Ãd;Ã'¹(V’é¬Â 5 j%ç«°¤Fäþè² ªŽL+t>C9¹í±3”€ÖQœ”z„âÀ$KÊëNAHv¢Sƒ{¦'‡3ŸaˆáÊRø4¿Ÿÿb)ŽÓÈ]"ÅpòQŽ”§qôz¥{…¸ÕQ¶B×"ë4åzåoBŠ“áÊ‚NÐríÛ6ˆUY¾.âg2)f,…yÒè•‚ÎÄXÛÝnTÅMè>q¢‹Éô.D€PÍôácz¢â€™ŸS°¼^µ!±&¨[=†:Ma 8á!G)5W³wU,ŠA;ˆ¿°µ¢Æ&SrÜ3¸É^G)µžÖ¾ ¨wQ½ÃjáÎ'v@Öñ#SØì¼Ø·_ÐD71©@šÌ€å¬=¾·V„´\oø0ؤŠ›î¢C 8üúäz“Lf$[£°œã•›Jˆ»¸.w‹íŠ0™âþŒÍŽqÄ„’;cµ«åWîfÒ‘»ûjr£-ëY‹’À{×-íž!c…¨l 2ôe4ÆjµŸåBÍA™BÑÙÀ@èÁìŽiã +Á@k’¡«1«‘k‡$„+½ ÈÈ«y³  ð®Èø¾!—Äšéí4Àå@å…‹Y™ù®$VÈæû'~I€†òW=ô½™Í?ÎÓ„½ÌÅ"ÍI™£ÅÿPQUËve¬øºÃÔÄxA±ù"žY ¨µBÓûÈŠ$][»Ncÿ/yÚÜH’d‰¢ßýWø°f:É*±fTVåT?A2¹5fDuK Ä8IÏà(8 æ•ûߟ]ÌÔÜ$³ºç¾+òDz¦2@À[Ôt9zN'i« ‡¤DkÙ­“4«s»båNj©èf5EŒvD¥%z{.­oógÑdǾK5¹PÔ0iQ»4¤8T©Ýc“:Ó¬øUÛ•“G¯¼ÃQ¯•)"‚ñqïôNÊ>±îWËrù° È3k•Ž1×zÆÂÔx÷D«½³ýóës±Ì7÷·ï¦¶ múmW1…äg}¯¾ó¯ž|dIïju­ÚÌ`¾î˜²áøñ_Ó£¹Y «‰@E¹û¡ìäI—»Ö1¹ËÓOϾêéºÜ®êû¯ÏJá¸k©»¥ œï ŽÒíýú èþpöŽ, ß ðÒRìàν|³.8°ì©WƒþÑÚ¾¿DËm¨aÄ sBE”ìJêÈÑÍŒFfÚ8ýÓ p…žÿäfÿÃ%-ù–ÛpÝ©³Þç«îóŠ`¹ô»ga‘°Ô ç~t…^“þ/ýá倾<êŸ÷Æg}&1'‰ ÐðÕ ѤV<Øï>5$Oöh®—5÷ÑàÚ¨R“_ hMñYÅY_#x*HŽ¸6àɾߒíN*îÂÍ¹Ø LÁÔfSO…{ÇE4?ø0òýæ[š.–ˆè‰vn·Ò]%r>›áoíõ³ÀˆÄó0Éád|Í›<À‹”Õ…ó^A Å]¼;8Oö'¥;‡½™ ¹ekÊééä!ž¼Q›QG†m<>ï_œ~zóÚ-6óbäÙ0w˜ù¶[ôoÒáÇ·6]Šþ{âE0øºÃÏ•Á ‰ù’?RTJsPnC„œëópEú=_‰­­r1‰û›;Š6+ #¸œ Å4v™~€p*œ6MIF)õ2J¡ºƒDyèH‹f™ ·>0©‹ â *ÿÇ6W «IºOguˆÜkxyÞ£bUÚýPgfòŠn¶±œœ?ꎂêPã-{uhð8'iß.Å}rÿ ¢y-dÒIü@æ =C‘²…õˆqüQ³LþXÁ y÷V·pó¢Šî`ú )°˜Ì%+h–ÔT…2ÖÜ/ƤԞ¡­w ØÞ€;a/Ñ­©gßI;³4í>çC"ú²} aÝ?nÚÙÄ(½~«ÑyÌPxÀ“H5ãOפºîþÕ ³,¿¢œ#ÚºêŽ>â( C\£„Ijvâ`ÇE1îŒ.=랟âÁññzs2¹u†Ûxûí™S”)7BÎ2É©°ÈBu­^v-©˜ðËo)d“p•\[ÍãyW½`Hø^ý&yø"ºE§‡ qÒÊ°4]¤x ¸gÅÞv+Ó[v2Õ:‰~™aï´Š%å\'QÚˇ1Þc]åc|Ø@I'î`þûxЃÚ@o|}uÕŒéž9OBœå·x÷׿£¦êByõ’9ën¶ó§qQãX\3ÝcÓ$ b‰QÿÒ°”@ý™BÁYö ¥®ùžþ•¯qð,ÌE„n{Ø&v Kã9Æ‘Ð?¿B^â´7:¾ˆŽ‹Ès(Ö¿XÏâ§u'V@Š´ãUZ®LÍS€ßÕÅÄw ÕDÿ:dýhàÅú=Çv&Ô¨ÕAÚ|&Oç¥ïg ïÏl±ù® ÍtýÝàMAgÇœšÖ`Jû‡ë|.Y›Yn¨´ÑSÓúKï…±<1fXÐO=S§&)Ø"(˜Œhîo¨.2I<3L»nØ‚¢¸6ÐÞýH/ÂH¿4 )?—ÀK?b7^¿Éþ×ç½OÉŽû'ûc,Âióo@¯F™§Ä\Öç7›÷gŸÊ–Ñ<çˆÇƒ–di~∔GÜÖ…ñ& vTp×zúMËnëÿüG°+5†p'ÒõK9ÍW"rŒýò‘€¨Œ’¤£8éÉCRCƒïëžòË@8ÿuYê.£àœ¨ͬº[½Ûyñ%—Ë°Ü›GƒËkãYalR"V¯»}hÁCÕÜÝg`‰Z)ÝBX¢ªI¿ånGìDÒà|' e×W߇ÿÓ߀Pë¼OcŠµàŸ&Õuj Ë‘S%²¸r]1LÃ0±6zÏ›¯°`¾¿E…«z]©±ßžñ>Q´ï‚Az#ç¤ËÀúkN|øXÑn•Õòøòg,ÆÜ–¬ ^a²3÷Z‹dl¾Iãº`üÊÜÈiõ¨]ìÈ. &VÞˆ YWb•˜†'1Xe²ÿÜœdQ` ÖÃÙƒÔ6( ²àÒM$Á—ðBˆµµ8¼³À^!ær?H³ó¤•‹]{Oü1»gZ“²Nó«¼¼¼ÌÃK§lVﾶýjÍ>Å.sÑd?½)ÓÆÓì¼ _^óµûÚب~ÅÓêK±Š:[¯P¥/Ÿ ìmœ– ©‰èÚ§Mmäy)˽æ3ì •EU¸•òØÂõ´×ÕóÇ”—.Ü݆½˜à¶{–Cº½ß@V#’@uõ3áÁLïF¶](‘ ¹óY¹|3Z•‡åÍ¡t‹²›°ï¢[·‚ÿXÞ°4óËé,qoÄ}¡8†lÃÌiMM‚QCyL¤üÑo±ðÇ¿(\¬Î˜ÝÄQ²‹s¼YŽä'Åy-ñÓ«Ê;ß,½j!µ¥ú02†`SϪ'[ v×P Ø Ö7»†‹$uEŸÆÒ}\±#†_ºFrÃî»ëÇÙ VÙ¹F£º!êÔñj³b;urUÊKJÄ4ÿ„/h©ÿFÀgú,yë¯Â_£A×, µ¹‰ê®)i¿ä±si°M¡Ph8ã…Hµ&åHúœã%ó)ꕳA›!!Önp%Ød¨ò õ[Sk>§1Ã'KÖ¾„ü?à±ÕþÎÐ作Iï&Ü”gã5<µÒ'×ÀÓó][!²yÂ,'m³¼ƒ‚}lªÍÑ<2ª»Æ?Z3ô‰Ú]C¯´¸ç¬eY·M® Ê#SRxdQBØ€–dððEWNu«ùü`gߤ¦¡÷´:²×l|ÔlûÁïéÍ|¤!ôy½šæ!OêM—ÿíá>žÍËU¾ôõ×ÇP|ìžÑÖsÑø¿â%,ÄÊ÷ëŒZ¯=—Hl¨Ú‘q;:oýbq»È*îgÔÏ~-‹eô%炸Sµ“Ö”F¿Hv}Ýׯž‚gï|yð¤åÁ›ÏyðÈTø‘%­:üÔ´hyZ#gÖ8J¿{»¿‡{°¼FºwÈòo˜dÝd«Vë³ =Ò PB<¿¶90½™lI@ïÏŸ?{^̆òØÕÇW<¾ºö?¿íŽOÝ£W/ÇÃËëJ܉áwÔåêä ð©ÀÞ)×£7z?<‰t ᘜ^~óûðñ:î3z‡)Š‘÷á¯âýñGÃÿr  ͤöû;ð,(íD"Ù(h|}û',ŹÆÎmžSçŠQïà ÷ ¾úäü…£h 0š¦ÙF•YüÀ–çO&Þh4ŒÏ‰$†6ý›9c8ÔO.…Éa”¥ƒlS.Š©¤†×³-3GÊÝçÆî P1Dþ,wŸ:§Üþ’/»ûmz ñOëßjŒæDµØWáÏÍ E_l>Uôgÿr¶=uË#<ý=Ɇ5Y8)Â䆕R[·Ó_ÕUóØóæÃ$úNý‘ž’’Ù¹P~×êøÛ‚h}ðdçü§ÿOÌ<ýa/‡%ølÕM±®6 |ðÿ«µ¡û= º¤æ>úIRÿä‘UÿøkW9ôØw½÷ÿkLœoæãÍ*þdTÅóOçä:*´È¾P,}?ÿFo×”r¹tø·øÈI¨Ãu47mOÚEÄÿÿÒT‡[Ðt6qó̪~|ÍwÒÐ*Ìmª?¶gÛ&-N·=ž{v m×µž—´‹¾õ_IêÕ¿ø_¦œ¡¯½ñæ¸Û¿\½¥ôµ™lËð ÅØ1Çhú_:FZPÏTÔ¥C"mÅþxPײÚ$`ø¤±ðÁ«7éøÙÔÕò˜Âàéî“]¨£xçÚÇz*{ð_»â#-ƒËKêê uÂsš®Šd_‰N"âÑ?µÐÒnÿs»ûQGíè8èýÞð1¼¾è·¡÷ÄòFºF£àŸj:ië/ðí(Ñ3=Éö§7_ðïÿ°þFþmï&iyËݳ·óeC4\úóçÏí "ÍÚH76 ôÝø»ÝéeFŠ:ã¹eéóâ|D‘EÜñ…pºßÁ ®uïÉ#“z‚ìZáØU }$Yì¬>œJl¯6|Ó¬þ!“­ß¬ºsÓµõà´å.w¥9±ew¤1Ÿ&iU!ͫ>^=¯ú¼t¨ìŒ\z|:¢JŸA€$ñܶ|SAdµOWÄfó÷ !H\{+‹›ÂOðT¯ ©Oï¸][¬X~-Ýbç®Q¨Ö†\.ŸìÖE)zÜ…1¦ý\„ot†=[Ï“RÞ¯£ÿÏðú5ðX{Å ø[$k¹—ÜRï/1Ñ\ÿüâúÿ³ð„fð”aÂ!Èh¿f`ZÀž®$ÍÐå) e hòŽü·Åþ’Æ<×ßs§‰j#w‡#ÉrOÝ‹a°z¨>òp4hˆd”…¶Ì«!þÓŽÏ£%3 ¬-`8¡ºLˆæuš+æ«J¨çX¿?s/õrÛÍ—m=ð@éQúÝð/6Ÿhj€sƒŠ¦[i_üô! WÎ~ýò$ud¶lþ§.²œÍ«ð+”hɇ×öñ(}²Î‰×*¾ñ )úÏÀçhJw»sQlâ ÏK±¶·èxrHÁ§ÜÏg²¾j±Ç·dî+Jr¯*o6{Ì¥Èýì÷nšöê0fzãyÇ¿êh§»>Oi}%4q+;¡oÙ§–ÃmëŸdók»kÕ[¼Š’4ø†$ÿ«¥mPÀ}@‹ï顨ºÛÓ­Xl¬ ‰§· Åù*yzgB¦«‡XAÆ}>k6‰Ìr¬Kb€þ1ͱÓõ¹ïÏsÆ=J£³ö¬žÆ(éÙ;ÿ8Ñs·uä†&A©Æ}íÆ‚6yƒ=®^~íÜJ6-‰´žH▛ǟËM0¡]øzv5ÆDú¥žÔ]œÈN9:O|W¬¶Ûz¾:^ÌΊeÞê…ë<7`ÂéÎß>V6t#?+ܽ‰¸MÙ$ã«Ñà¤ÿÁEjã“Þ‡þEïÄ@›jÆ—ÆÍÄÉÆÍ÷ÑÞÜ“Dk¹ªTo"a¯ËBÁ‰ä…uÒÓwiŠ÷ñ5‹›Ød £¦ÜG/àî‹fñáõÚ˜Z1Ü»l›tžî÷h¿R‚ó–Í~ã_ˆe÷#Aà±s0;‹³òd°C8•še¡{‘õÉõ}eŸ/÷DBœï×|Õ•',±Mz}qÒŒ™: ü–UÍL@-?Ouâ__tÏú§n‘“)@Ê/ê?Åf*f~ϼgê÷@Œº±X¢Ó±¼1ˆyÚ[<>Wx¾;8'Ó >vÒ ã?ÆO^÷<ï]ŒˆXÆ- ôì©yîiAµæÇZâýtIÍ×^õŽûúÇÍCr<Ƨ}Ï“‹¦lqÇwàÏÚ;ñGgÃñåõh|‰ÜÒIïsoˆ^ké¡å{Äš…¡™ cÂ’-‘ïÆ|Mpô&¯vÜê‘.êÍô.[Ãi‘wÆ‚å¦QnÈýÛ‡dBKzÔû<ògÍ%wð2>G¹¨ó¼œmç¡ ž¢>^»ÿrÃ7d:Ôîr6\¹ñA÷Ï~ÍKxŠ)³v«®Ïd4a_¥¢wtKp³.‰®uòàvbÿøò¤½æÙåé¬hí䬶Ílì/[{r®[œ•·ŠyÞÎÐINÄ›×/èÅY5pjpW–ÒÉRg:§ed z£ÞÅ/æÍ{¡ áÉèÙïóãàYüp…”…7%ª’_/ zm? ýðC³\+xª _”“‚ÅÚÙÁÿ$ÅT¶AÆ §I[¦~G}"ö¢}÷þZ-™XÞB-ÿÇÓ»_®è/Ý+”ˆ7ˆ¿Ÿ¤f8ã•ž3'èûò†Û9ÌÙ‹þðœ³ãZ»ÿ7p/Ý„nµÜìÄ3,,*’¾;=kñCòÄñ]°[_/„1JS·Ö‡7.Øu{ç!ͤ*!rÁ÷ק§ý‹ÓÔ>¼åØéÃ(»QÔmŒ] ]*îkGbnò˜²8 =oôdÇRåÞ–¦UP¼v&%û ŽÊ´q€@xc’'ë\-%Ä#”ˆ`ÏóiðΓ0MŸýC·mfW¹©íMÝgò:Í®Ž-Z¹AYäîåxÓü& Š B”ñ›[.Á;/×iþ̽×IWaÕnè—SÛ ÿ8åWN­3q+6¯¹Þ.ÇD¨Î¼ £\„–$q&“mâÉKt©Z»]N²yæ&ËMŽ ò¿`‹eò‡âæð mpÿÿÒE.é„ק.ªÇN]à•œqâ$D¹íøn«Ý7ÆòY“$O‘ì¹ßGQ§¼ÙÇ9Ÿþñ ý×ôíRþrYWWci ÿ=ýÛßÒwo÷,Gi²g tÊ쵶xÇOÂÃ!XŒ"Åá®{võ Ñé¾ß)Éž:Ï{P\É‘YÖäÙ¾Ë*‘™2gDÁãnVÙYyo¦bïl/eÝ=U—¢MÄî(½Ô&Ú9Jÿ"7¸J{VQ¯ƒsðØ@EÄ0£ggê- rU>>™Ï¹9õàhGçWøy'}„=LVFx'/Æã ƒ§¹=v‘‡<ùÚn¤„–Èk«Å&Q’;Úý…Ë¡‚Àô€ã”¯©úÍü’\Ô¬9úl\ÒÛxpÕË“Ã6SÕŠª€sD©^¶â þŒ«q&ÎÞ½“®“ò›î€e(ü,¿lWñçi]I²“ñ¾“†ë¬Ì·‰É÷a¯·Ó ó‹Eá´MÄ>9¶t‹aöž¦È9Ú,Ü[`¸f;$ÌC]SæY7Š•Í•…§¨Eö­N•Q¥F·£¶²÷-´ŽÄr%í”ÎQ™] u® KÉUW@|œE‚HÈ„¼$ôð |[kÀû+©=Àmr€†Và9´½o¢ˆ'ÅO«ÌqÒI;í½z_Î È—_q7çÖ]1‹D÷†ºKγê‹Éí¤˜cCÿñlŠ‹õï;ëaW‹~Ý~&WòtàÕ ¦¥‡¼ËªÊk…¥Ià"pì@/þš‘žãk\×ÿŽWå®[§ ’¨•ê_ŽKØÝ푺Ã?Q99€ø›»÷üUË=B¡íaéœy‘””ã»±ûÆ:£r¡`™=ÌgÆqùù_‡ÕæaY…Öè^ ûé±rU<ó¡$P^«F綧_!Àþ é…ú`ÐÂ}ssœ´ò|ø‘‡‰²@.†£îÜÕ€—e `óá?Y–õ&x*Þ*AS{$Œù¸X¸³w2Ëúø»³ÍLª\&‚ºXµ‹µ×L^²O\šAvŽê˜På=€? ‰Û Ù_ÐaÝp„w¯| ~±¡tY?Ñí  üà9ok?öUƒE(Šþî…‚þ”r󜩠V}õ¸ËÀæxcC)Ð*ߤu‰Êq ¯ûòÒÒ¥âçIëC2X(Û{ÇþÚ®Uù˜¸ÚnìÎð؈–WzŽ­hl¢6±fñŒ¶Œ¤Þ–‘þ3&ô‘:»v©>úóuÆ[·'õ~zÜ\BtS~S³Z2;]nö£½ÿø½Ú*¢‹ zÿ´© ÇÜîÆÞØŽ¯>–ήÓ;‹÷ÔkšÄ i³SŽ¤ž3n»Ž¬‡ß¾¶ã:éD’”³áŠ…’‘yTŸ 7œ)€‡•ïßøJb¾"ÒsTÉX«ÅŽfÙ?õ¼!Ô'áŠ|Ç}戕÷Ê`íæ4ÓCàÞ-ꞃaUÿ;à†øî2Í«ÍCº1ù3§´ ÂEš½bù[|Oœ“îÒÿ¶-¦_Ü!ÂiPÜ€Þ•sü‰}÷ö‡î乃¦÷Ãw,-ܤWç´d‘r-7f¡Š Æ ýÞÌ'‡9» ”«ÿé!‡ŠIõ$>a½C_Ñß+>kÕJo“Hõ¦Æ¬UIX¤Øq7à.B2—‘dçKH¼T{²G_¸VG²ôëV^2õ=úÍ'L‚"i¹nàtq„[‘¹î½¥ßœ8Éfy—év]‘;K§ó‚H‰ôR)ëBÂw’Ò½œÄë$?&y9È…A«> žB‹}ŒtçÚáVà S"d"È`¥Œ\_©=À#£Bû^^ê¡‘Iüxå}´„ ܱöÁa4õSNX…5VwœBoRRƒ«î^ágšÿ¸ßîý¦eÏæzógœé?¶¹a:K µ©ŸþÜë]‘&a ^@ŠŠÿy:è^}<øÝv,fs×>£ÅÍ%OvÔµÍ%©CxïšôÎ%åSMËÏÑ°2Ìý\qøõMX²œÄ%áC-Δ')¨ŸÓŽõ_6ÈøhIíh#OM u,(¦ü`wêú÷?W»¾”¤!!…Ã4BëñÚ½½ŠÊ$?X ¨<Ür™m§Ðôl±†Ýÿ‘»±;’JùÙ÷Ñ‘Ïìånq øò·ëlug‹­nêѦ„«m$.5xîg²Óìÿ™œw$ælƒ{ò#3¬@A‚^†¸Ú.ª:šÕ@ÅÒ—kË.r}q=$„r{ã1#*Æã½äKþ@€ä˜ŒÝÛ}á GHŒz6¼j/þ´=+°çßn4 óV›É¬$xk ¶Ç&Ý«>ôl~‰q¢š<Í*Ë.ç¼ß¯šS&Z᮵Á¤“íÆSya2MÃJÉ©Am<ªèsP mûJûpéÎ’é§eÈîózmÿöBœ`ÀûÀëò­D:ê©?þL7¥QËŽ°Å&)·›ªË*´´O ?Ù‡ËÁywIJBìD8‰€Sæ< >±Às½F½mÉ]C²'Á m’uû"Áíæ Ú2…žÒçÍŸž1íÜԇYÒïeI\jQ.Qªœû£Þ ;ê¯>ž·ÌØE+…½M]Ž¯öaçï‡'éŸ^þ‰•Û²éwÆRqd¿Ws(݉v€×TÊ„f_:oÒ»ÉøfžÝâÒ‘³å!¬x'Óq9}HÒvq¶L8 )xHë eô†æóÊÞf+£É@Þ= í úëQòäbÔ±ä.™(!û’Ò£„†õµt†´”R…é}ß­ÒÞ`|ùþ§NÊê^ïÏpõ‡£‘Ý^ .± ÝGï]4qÙbÙH—5îDã¦c¬£âg—ÇÝ3&~é$|»#i¦§smpWR+ë}pïfÁL‘1Ì]ûmȧƒÝ*1¬“îº[Rë¢ñ%þ'1T5cw?·c? œ¥øÔÜAcÜú|€‡ð_+ªÄ¹».Z#ï¢ýácôe%áȹÝJÆüÞçúãÖ˜œŸš¼Ú”u#Q)³ºq6Ç\öª–y‰yöM=§™xµ5€è;Šâu”]$JÙ"t ûG½ŽìßSLÌ|’ŸáÃêrضSw4ˆ=yÇ°ô»ôkÝ0 íÝZœæö;¥fw«QæXúgO?}ÂŒí±…T:tù#µa½y ¡ ‰„(ÌS{DÓŽ|Øñz»úZ/ðhßÞ“·ÝÑa^¯ËzäG'ÝÙ<•ì°mÏeÜðh~¾µ9B/´RÓ\‹áôlzƨ‰íHWˆ .º£šäiÄìÚÌÛqûCŒ£·ÿ5[~çü²uq‹ï¥+Ø¿6_ŸÃãåæN Ñ5/Ýu„UŒEŒXIH:=+þ|ècˆ&Ê¿dU3~ŒO~Néóà<èEÙË»Ÿ }7Å¡Q抮Ÿ’¬ZSì 6?V:2¥:ûøû-:c”AÆjä¢(ó鬈Yr9Ë¿©“<p#šüíoéüùèu6_Ýe¯ÿ3}ýòå__¾;|õ:ýÛß’Fƒ£tí/² @žrò+]|ù0Û,½%eUïwïPj‹™.åîñ[½$y6š>@Üš™Nsé" ˆ§Ò¬¡¾¥J`u-eÑ÷§Ì&n›òæy¬Q€Æã¹ç¨‡º·”hb”ËÚ·Bü(†ÎF'öüçžÕZ,àâ``8˃Ð>vÜáÇ}‚Ü9Ý¿º~_^ôÆÇ{Ç?÷ªÄ²¶ú'þ(µÒbOe©¸Ç£üÁN Läœ[wü__¯.‡Ú¸Ù¤2L•.]±.¦1'`mD ÉY0XT‹‘Žïú£%þò›–'t«Á?žíê¢K€ÉàšQv°ÁæÎm‹€—;ÛP¯1>njwÙXV=iM%{¾Žm1$fœ_.î?ôјöï½Áp?Ò”*–ˆ"•]®jü%>%ãÉíÎâ&*¦ŒIÓ9dd<;BHŠ™å$Y±=ßj:1÷fA‚˜Œ(Ø™{Œ £…¬¢–]ÿ¿äsw¯\5„ºð|nœé+Ír¡Úš’œŠ;Š¤$é›÷©<È+‡l ó¸h7–…­þ·–g­³e…¡ èM™4à>/JVp»´(¤½ùíž·±ì½µfÛ{ÅQN¾É0"XÎS©ƒÜq ©¢*vîr|nBj0¦°»LM6IJÁyG0¹¡èG)›‘”:ƒ³Œ Þ£QÛÓËä³=ÒSaV:1fí—9x¾×õ¨»Xåi;€¸pˆ¾#¯˜™¶§x¸2x&»F2 J ÑÓ4á‰O›þÊzqª|ó$,hb[.îÙô+TÑÝ_*åÔ-›ÉÔ7wÍCüú>,v¬žÚGö6Ó^]. ˆÞ †ôæ^õ?&ÿY­ž¯›º¦“Ö±Jsiå¼ÔeÞ¿ÈÇçn^ü«ž°(×cyتÁæSÃ.´S5=ƒèqª¦ÿGY™"ò]êNXK]'mh#ˆï>‚(%„Ãoîk…Oa[##·[„†#ß2ÑI}«!™u»¸'S)‘.šè%öÛRŽ5¥ÝÓ}»{ºowN÷íîé¾m™îÛÆtßÆÓ}»{ºo[¦ûvÇtß6§û6žnqź/z¤vkH+þ¬û°Z!ßëü°Á‹OI5³zbÖ›,» èöõޚȫÃIkÔÑ&¡×ñÀ×&l[®°£«¾ÉëvÛÊôÖà\»­}hÕ²|Mù—[þO35^™œƒ@¾™ ´ÙˆA,ìj‰-ìLÏ!P§‰Yé°ú¦4A´ãåã´ +2ýÞ>hîVzóÚ=HÙIÖ¢b¾Búgm1Té~÷ BÞÐ¥Cx.Ü™+€)KÑnÇÚú[Ú0@¾½%±í-OTn®Îº#T¿ÇÝ‹“ÁeÿdgÁÈ5‹åöF‹Ømè~¨Ü΋Éôà©Ñp4]^ŸÅÒ>¦ýÜ:;d¯Ú¬7åvÎ N Šä¤[Ÿ›õ™ìóìêÝ[ð{¼{û( &HooãƒlS/Üÿ碽dŸƒzt‹ÒçÈ%å~“£‰E¡o4è÷ö:É^Ïó^‡¾ãÜÊþùõ¹ù<5¸ÐY/ìGpìûY=W¯/»FÙäò‰ŸïŒv)BgJêòRΧn¿UÎAty“t/ (WÕ$úw9Ú ù,7í¯$Úh?FI*„?û¾Qœ‹(¾ºi ?o¤zš.ól¼~ù2ý¹xOKçÍëÃÉ#±g]®6 ÔÅ/›aÖ³à€˜H÷²Nl¾$¨bºÚ¬ªˆ»õ»ïÞj—â?Ñj>Ì7Ió®tý”j®·$a §²¿!E)EÉ3£Žao¤Aâ¾ÇÝã=îŠB?ÑðÚ[·wΫ&»Fg Ýï~ün×[F5]‰Ú[Œ”HÒF„BiˆÇ[Q«­[ÄË™é`?­û¤õλ‰W~×ýžËÍÓˆ§ç;7k-2)š1Ù¯œQvÓ;ÉÉ~"‚žã0rÆè­ˆøŒ÷/\lóòÛÞAÇ7„U¸Îó#ìÿÞêÒ³¢Éë¥Ï4ѤÀ&ßk;:q9m[ÕÃØý=þÙž…V Åù)BãZø¨¹”IY†½j³_ËCd”Ÿ}Õ¸‰r‘=Œ'á¿ciïî=o»ÜU†ì0ûÜôêÚ~§>c”¬:t¼¯§ùá«CqŸIŠÔ,ʶ'ûf/qKƒ:ܪˆ¨]ªíäÕþÁãi/ÛC·‘ùÔÝx*ë\¤Š¤•”¶ß×¹I¸uF¹Èm8Ã-I‹çy4±ØnòoôÒSjºÁ®“H¡#d|IÆ ¼”³X­H>¡éÀãø¼\³zÎÕ\| TþÌ7±]¬ÆÜ–iv`Ò²Óß¿[ƒ©öðvw¦!‰âJzìEÕòüׯÎá ‡:/êaN38Áî³}ø"Ä—X—C.‰ÓÔä=‚’nõEƒjòÍS˜–Ç$…3^¡¨ÎCIg|«ÿ„Œ&‰¯KËÖvˆuÏîܱí¶ÄFxQ¬¤ñ8Ûpë@'=éº'½1@²– jTù?rï]-ïÏGù¨š¯Oõ‡,H¹Éæ>Öî¶Ôgœ‘åFö˜ý½9Ž§Õα‰¸ }W€2š©¹úÞ‘ÚBêó˾fÅœª‡T|”ŒŽ(¥¦Rk ™ù@Fù·Úmg¹”¦Nœ-\—ÿì?â¥ÁJžç=M¹ŽðW] I%gÔœöF;ðîU†MîÇé7í ¼0Ïuïâøïí#hy˜¸ªj1µ‡OZíC<o-¡K­^ÿÈÏ¥€lTí§»Þ?–\ªÞÃúÉ'ÎÜ’0½\ÿÃø¢×;.¹ªu‰Ä5Áˆ4ù‘œNí’t0P Ec]µ»X$kÌI,ÿ-bnI*»?ê5Ûà}K’¦R¦ƒà¾y´ÙO‰,¶¦™i2¸¹„2L1yJµ.ïÇAõq—ŽŠËQ#9Q§á®Þê1²Þß ËP è[˜‘‘ {åäW)ú´\þ‰ÓY&ø×^:÷%B¹ÍŠ¥í6}ªM·~Òïþî»M¬C³ZÚBÍÙ³gDŽÆü²{ÁZa±¾7…Q¾œ?¨5ÒÅDÔs€”xMÁëeÚ¢fdÚáw2^-¢Ü‡ÍfÓÙþÔö4ä®Ïëdªr‘«ÓZ'ê7I@Ê5~õÔ°$µaé´=é®i—£ê`ŒÍÒ `Wض.¥Z¿ü÷/…HéPÅœÿÉ_ØŒCê#–|\Jò˜ø,Óû ]©dhÇ„ö Ý‚­ÉŽ›<ƒùä2ê“šÇ.FÃ1·¬ÕO[*~|ö39}-Gom¶EeÌdòß—ë948+ DbÍsVµ\´\Àƒ,(1€“xÎ¥¢ÕmÎÛÝÓíÖ 5.𠶳¾Ø•®¼šÁ¢PrOM“ ðűM*wܹã`²Î–îž²[æn\¾–! ™î I?°‡ÎI|¥Ô¶dCd©»7†‘èè–Uh‰›Oð¯nCr"å9»Ã:Û.HÑPAþåÞ£PÂnETœG¬ê4¨8ž÷†FùŸ(ö¦Ç èû¹dÉ)rí±÷2趡{`j¥[¦Íû!q†x†ªiÊn_]WϺÉ:l0©zØ»$R Ê*õ‡~ŸòªöEòˆ»Å% 2‘†¼|=muð\õ3…щ4›ú$ÅWLÈvÅ>^ïâò¼w¾«ÛÒ"´Â9­466IsÂ{îª{@†_µGt«ÜJd÷ÑžwZAuÛ,/·j{a"ØÈÖ÷” URÑG0_CQ…òé^áÀØ9r‘\lÐèÉþ Ýý±6p£¹1# ƒ;w‰À¸éγ¡š{®rȉú}øCÀ³s–™/囫;7¦ Ö…XŸ¶.Û" ›D2¶6zRžï-l‹þ“P­…¡ìýÉáÀ+TXiÇ¥„$ßn¨AËtF/Tâ?á %J¾KÕJ¹›Šô.’ÿ±ôJ9S¸E(HêèIžA¹H+W³ó´zC{£@ü»˜âžõtÞT‡¼¬g:šø%6_\Ë{$­ï^ÏYŠëq9%ò(tRÀC®ýËØ9zçW¤4ðÐqŧ½'FwŠà H_ÿÍQ(%ñÆErW5ä‹È+G܎ɶ˜Ïdš¨4 êÙ5âêbQÿ.;ŒÒÒWQYx¢Úe,tKâí‘'ô~9‰5aåµå…Zn²áij‚Rzb¹ñàÚ'ãkÈè¸}ÑhªLšRîí[ÃǘAR2 2“ÝAf㬠À¬BÜ•”Q›!g£»–Á3*»}S겊>¬IV'O‰Y+Qƒ=rƒ¨‹i“’ e:ÇDö&ú{m[ñ §DQ§” po³¸i^ýéœNJþX¾&;#ôº“.h…Ïp%7þ¬tºåAá/š§#>ÊZ#ïÙŒ¦Û.~¡•=Æú‘€Ëƒÿ €®%(G9ve#Ÿ/;«m7hÜ“/²Õ[iD#œ/4.}”qˈ¹¸›|Tùš1ý£õfžìLÉ– ]g—|Ҳ䧶Y°ä ÑÁ_Òi¾9É6Ù6»CÙ.‹oúÁu;÷ -êGF½-ŒÓö²óU9\ËÝ“r³a£õØXD½ÔÏ…Ôý“ÌŠñcSVÐ&$9øßf®äXÐ6 /ã˜îÝM¾Ì¿ì5ˆJ¦w>]^¹ öÓE\åÃÚv³=ÆÄ)ë°ý!´ŠÓÕv½*+é4ˆîv{R‘L¨&:\3þu³uVTqÕ%y¤ê’>¿êò\cÚj8wS¿<™‚lÒ],nòˆxÙ¨ i-nôÛ*CfŸ8ÿ«gÖw}y´©<ŒåÈäóW†˳¢½}Ò·í¼`3ÔmáÎÎ6‰ 9Ûœk^Ž¶³ï@Ðþþ*îkL•Vd´ånî<Î|³÷ä™"î¤ú—p ìòÙ}¡í±äîsDÑÓ{c2Ì6x7]|äïhÈ-ƒÏC¨ºÔW\vIBuBJ¢%ÿ× ¨#YóNÒ6ÑfN”§b½]b´ ÙTRÒÄø¾G’¡ÆUÛr±c½€iåD¶¹ÈÞ½R»ü–ƒº*èF(=âÖ¢U¢¹M«‡å4Q±1â]Ý—âèd™¯ô¼qú M9X µÒæ=z>ð£Te9¶¡DAÉ·æ#C°®¸ýGÕ ôJ7È?Òç èø;¶a¨“Ö÷Ö[ÔSÈñ²ê¶ç4‚8&S—!¾qµ+ã‘ ±£I" gƒXPgºŒXKðB)ýÇÁìøÐö=âW¾¸ÔºäIïøŒ”T±gZ¡8üD|:/éÆé`‡OŸƒ™…%-`é¼öÑ`ÕJmû‘H©ÿtyÜë$…p?riÞ±õ!êAJÂî†L;’ÍÀÑuî¹'¦±q$Ö¸þš~ݨ4 cu¸„ÖÐ:ãôÄ :£+ΫÕTë=\L>¤XæB1ËiúÁƒé÷Jv.qI(%ƒí2òHЛ‘ÃMÉùD†TGæÜlxʤêÁ­é%ÿãô„¾^‹^žD3%\\;—`<è .ñHâ=Vwq§ÎÆKÜmÃ˳î ?ô…;‹«ÔWhYÝE¿cpàqß…[!”Y9Ýz9lÆ×®ªqu[Œ}!° ɪñyÿj8öÏÇÝ÷}éeNñß— h%ÂëüjZ?vöÎ:ãgü–Ééä³äkÁ¦Q¶õý] Ï—Oö¯/¤³Ð¦88œˆ»m \/n¸ßnµa.iì95à€1SHØÞ ÙÞ)¿•¯Ãø‡À7džåìi½߯•“°0è;˜ã’á%rYå}NÃÎËóÒ= WÚà¤í9:"ôfìM«F—“@¾W8¢N*¶Ýä=i需«æçr½ü®J‚L郋†*œ·S‰Ë… z¥…L˜Ç$K^5°M2¢ék±ÞlHL¡Õ$áÓý=½á^ê&Â3Ђ¼ˆ vrÓ†!FÿAÜâH ;ƒ¦¦óùüø©©è-i¢~Z2úLQÌ5+ž\n@Nšö7,°ƒR°Ö1•ê6<^bþ(!FO¦6Ô§H²ô BiWÇ/اðËívJ`Σ»ÍbÞB«Ï}Ž%)⦠‡Jü^{"¨6…ôT„#+Á|´ç `¨·v8»Ê Ò+Áòï„ÒðÖ æÅê«7…s£šg•ç}ÌËù²ɲôzø2´(A€+Ï/ñ%¬.8…$2?ʦ~QØLE24TÕ*[OiT ¨¸"nô¶x¨ŒHwmD“!ÙmÛJàŽG/ª —™“CK_`ã0ñÔͶÉ4ΗǗl¡}¬ËéHkhÇ ÕtB«cþN@ûG–AÇ¿eÈ éRë¤ÏÌ¥uBªª“´Am;l½“!²F'ÞóÖýa|Ö»HI]¡óyqKPO‘| ®ãHÊâYóÏǵ¤Êd> ª•dáÊ׆há`ÅÏËÛbêî7rî+Ðoó<[¦Û};ÿæ68Iù9cŸ¼QõÜðé/l›ÿm›£;°>îíÍ´œ„¡ZNèÀ%Ç ö£äŠõx4ħBdã$Å>’•“ª„J½ñ$ëÎl²¯×MdU hëµÄ¯T›1ëÜù7Îî%Çø‹;—ÎÜÿöˆæÂ;™BRPN-Ei"™J¯╜pPº_¿€ž*8€‰K$‰xãŽ*ávœ¼Þ_„â¸|$™PåÉȵ÷ëÞ—m=»Q»K,™a×ÙÓsŸ”ÈU¹]Osí`n´ó˜;#…èr“ìµ9~AN¡þÖR˜@ gë.Êš&€7ßç„|#Û¥ñXœªöܼFj.¸Z¹…Øάؚ<—UEuU®‡˜~\L»9$f£'•Æ—-$\ L]D¾Î fŠ„‘$T JýJô¾`¹hòbȬG}¯Ÿê^jLj9³#,xEi8nŽxIÖš|v&ù[Ñ #¡²]βå¦Þµ­K„¶°Ä1(ñŠ.àfzíÎŔΡ_¡hù Ñùa¾'ý”7:Ύ>Ö(ÜMÉ9jEMËó2 '?,4_—Í›+­º|t†  ‰}|î¡·´E÷ìf ã€JŠÎËs¯°^VäU±'Z1–g :ˆ5í:Vl!ò¬¯ ^€Ž1Lœì˜qŠ¦Ä='È=µñl”kIª$52ìšjÚMµtvÃQ:ì®NRÿ[‹ r×|±6G¥Ó´]J4’E_ä3ÊÖ]V1¿–œBiçù3}w…ûÿÝ}×7óò>ŽF^ý–qLÚ¢&â›ì£s@º^³Ò]Ôðs`­_“çv,n€Û7!%XK IaJëR†!ÌÅÃíòr˜~ûáÝUØf×¹FXˆQˆ¾ÙÊ€M Ñ@„•ÌTL)¯_Žÿô'ˆpüf‹H²¾¾úþèåˣׯ^¾~}ä>Æ—¾½{{ff²½MöÈΟ…ÝÝôD J@;­€Z/¿¥‡' p˜ôüU0?C÷‡ðpýË‹áA]³ryCZ9 >QuS†µšh…ì <øâ]Ž¤²üœùÁʺÅ8Ÿµ!CÚ7ø79öžóŸ7¡çÜv»ÅÔüµÄC,ñrÎ1xH@HÊÕ×tRÎLøNûêÆYÜZ?èôÈ8œ3ev#ø ¹ #´g=ÅFòÓ¤si±žÇðúœ9€ÚíÒslÜ_“D4Ö§U'Á»Ñ•Á»õ›ÿ1Ç>N0"Þs3ÝÎy&¹3OqÖy¨:-¼W6E„,êq•[Ëån ;s¥5ª¬ô¯éGç‰Â‹z „Ö§þÅq/Pîý“ÔHí艔ñ¡Ï'DӸΖ["ZE96úŸÉ ˜+&­W¬uÈD“q#åXRɱÔs4ò=½TkR¦Þ/àÛ˜ÏcúŽݦõ º ÛW6P2 }—Ï®×™IÜ;Cé78¯»²'‘G”ÄšÎ#Vü·ÕÊz)JG}G³1æ#‚ØzXokB‡õ3[¼!ï ǹž:pÊÌOð‘\œJHüg3+ò?Áãè$ 'Ë„8»<®Ð•Ÿ´9_žåWlþºË‚÷Äé9Hà’§ òðŸÿeJÚ¹Þj6QÕ±±dŠbBAùV#Í„U]ûfÒJÓG—$„—®Ôb½qÛCi†ª!,x‘ë%øF‡:$ݧùÝhD[‡¸ù)?`xÌhÏ+”·\UG•gÆ mtÃÄî´}x4¥¤o§QÅé$ó*[#?ë,³ctAF*Q«DÙ XÌÇÔT&®fÅl±Âi¶Y 3ða•î·=z²ûÑvä×u>–t}l>èSmWÈ>‘¹MZvîS{²%¦PQµ+þ ­Døb8“ á;lg΋®µ‹Jªîã³ËÓñ‡þѤ:öTöå¸$q‘uªš¶¦²vÔVê(.¯`/§(%ùC‰‹S&zÝ'*E$…tq ¾[¯Òkc.8(OTÁg9êazÓ=<Òž;íü5£‡¤DÍ ÎõÉÖ.éÆ>ægŠÔ9@Õ0^>?w¼KŸX†xt9ïytª…œö/NWåö l4™2Í¡‹þ†GÏÔ$DŽÜu9ÙV,fOyYùàn<;»Vó9ÒîèXtîl£YdˣΠ@§«ô»¤kß2­·ÛŸy6~®|UõïQŠ*1u† w…ÖŠaœ®ßW>ý’„`»º¿+¦„ $¸1õw̼RáQÍŠÁÈ{ŠxÃr‹H&`^Ló%H­¶ ·ñZcí«Aoìâ±Áf½¹ŽøŸ"L·OÑÂÿx@û ­Ž`áêSj %ÞnȃW„¡çß2ü¯ä D‘óð0§£èÁâ!wùÃÞKúqt~&õJºQwÅ\©ïüÑ1òSCwa…¹)†®~5÷ƒêhgJƒë.TvÛÕÇM»^ÊËŸ´×mh©Ì+]3R2(NùúG…rëbÆKàúñTwêyËÕ[f*|¹eµ¡‰šžd´\¬KL¤õL¯í.²á|íR©˜ÛGJÞëšø±/aŒ²í¦Äëצ(ò`ON¯?¿ùá»Hmë£é r2ÎxÅ££#Z×éÜ8·v9kYÌç¨/“7¼ “öß™^ ;O *³ÀÅa>”·¤íOõ¶½ ÔsòÒ_‹¿‹ض”ð îA˜h":^9¾¼¾áÔf€ñGœ±ÈJàÔõsÀÿSšg J0Š\„- ô*¤Ñ\'v·NpëJ`¡™ #d*p¿C®3úÊÖÎÚò‚愹›­)e½ 7‹©²+%'tÄ:ï)êAÑìõpœ8«ÖHš„B#šªå(«–}¦èÈ;„‡êÖÝé'÷e‘þ®žˆ—E ^ wCQ’aÉ€n½Iw¦|gð¿0Ñ¡?êö_ðo;Üm……àü#gGf"5™-ó}Gèç! V€Û òuÌ7ÝkVÜÜà$q€Ñ Vv.̈º ÉJ{¶²ýWÒ|i‡Ï z`éV‚é †–ਓ$ɦ,aÄ„&î™üHP»”Œ¡èðED|°Î ÖP'Ó…Q„÷Fp«G),gòº³ƒŽT×C À1{LTOë„3„³ŒœÊ#ÃRÝß¼€¬´^wvtp±¹áª¨ŸHÚ»C¹Ð…¡À1&eQÕ%¨píºÜW²¿ÈÐ,ë gEqRKé„™‘'gg;oÆQœ…Dˆ¨F¯³ÚõKïPê¤Àž@¡TΓpÒ<5ýG<úÚé@&SÁð ©ùã0âÖméãywݱ OŽÇcÍwqÓ)^Ò]Ózg%þ‘½Ã>mI`}í‚eöÔOQƒM Ú‡ô\™¯`16Ua™ ·ƒð Š‚Ó1…`S½>YÙžd/)F5Ô³¾ÑkU8eÜ°sQC¶ƒ»þ´jùá}<·…"-­}gî¿h@„핳=nïïÍ‹IHììá-¶(5%ç)HæçØpU „%TÂ^2Way– G>%!,¥#v ) €Ab†Ïq Â'^rM×àš@«n幈+Þ½í7–¸ûÀ:Õ.Äïvý-÷|ôáxsVÕ:Õ}¹Dd/ÃPS¼l9LvjZ¶ Wî©´â„é-ÊÝ™84û ÇgÍÐXGI[ÅY‚̱ m/Fƒîň»”´ÙEèZ[8ãŽZ-gÝãÞ¹»’ >Îz£^Ê §¾¸aBB•åýÇÒCæúCÍýFªùÍn} _"%öbǺ.D‚ªý°)»›ˆì®¦š«(Õ±É|†Ë5«ˆ0ª6jUåo:›çoGÛÞ8nBj¢Ü}K;5ÕOwaÁ>æeœÙU‡!kù x“ÎBšýb‘J²|/ýó‹KIdŠððÜÿ¸Åt‘üAA¼­*»¯„H ›;NшÝþ¡¾ ¤èGœÊzÄÿJêq‚N¼x¸.t‹ i-,¹%z?„P0(óÙx²­<êß=¬PLÄŽ~²V·9]`T‘!HnÖXo«‘w"¿Eaa¢£åQ  …ãÆ=à!^8MÔ6O&1•þ‡ÇT(ë“©,.Ó%Rá÷mÎ*õPj†ð¡Û lœ-YrHæLÇñ¼¬rV?ªéç¡;i¹ò®<`xîˆ+³JE%Eƒ…v”šˆ,_ÃI4W:ÍùüÆJFÀM­îQ[®(ÆnJ·Ý•Åð[²Phº¾8ï^uÖ¯’L¸åaóM«0ݺ“r}K×b°8'Uü¾;¯à Öãúzcq½5ñÏJ±S¶©iAªíÈ|YnoïÆsÓÖ ¥q›, \Ç?êÁL‹˜Ün¦¦VÆõÜÛ¢°ì¨³!u7s窛©¹øqX«ò”û`4)þu‹øÕ‹×yñòÞ‡Åòè mÚÁ9¡é#wÛÎIœ›¥Œ¸3-Œ¡ÄJCl(¸ŠJA’òáîhHhnŽô6ÑÌLÉ/©ûóaLw 5'mª 'ÔŽü S—s'c³¨/oP³25•é:F¦ )¥-Ãœ=L°Å´“Uˆ÷M† ·¶=.Q³Å«åÎÚjÔøß7¢˜z§Qã­-.•´’d+7S 㔀$–b^£HÄÖ ä¡[$”žÃ9çbmÖhf,QãµýHk,xž¶ì‡>²Ì¥êÄHMi¸èÇnC!ë¿ WºΫv¶ìÐAR˜ l¼J\’¡¶ÿõŽG¾Ù p82Ø€êü6 ¹¶ÄtÌvR%â(Arô(h‚hREXý§ å©krüñjœ×1jÍ“Zˆ­æÅÄ]lElM¯^ˆkÕl.¶î\ìxyÞI ä¤>Tݬ–Å6ti÷¤ÿ£¦JÅöÃCÅÓljÈ>dÃßçíèñþåÆw¸«ö4¸ð(¶åÇ“ø‚q"#üÍ…CÎfTˆu)øüú‚Øé¼á#®8"Š¼:<•7oÀKÇ@MÀ¿ø7£À–)}B÷<—Hñ§=˜6J C=cÔ~äõ[=¸a]0žžš¤’°Ìµ®­qÍ£5>;6ÅÀô¹@†ŒÏˆãº_¥|,sº~s—ÜÂÑáãŠî՚Дsæâ³ý»ï(·á2¿ÍÀÒÿ F±Aw9ÖÔG@À3S´j­Y‘ê+'ÄakT84*@¤x5¸dvÁ'ˆûïEIñ]ü3«dóÕ]öZ#–W‡¯^JÄËÎÅ41Î=„Ænžg`V&TÀQ!¨’Ùö@‡£½–h¯O™üPÖìÜ!õô¹:,²%7o´Csêiœ‘·œn™}˜bpy9 fHþ)°ZWGc¤Ðú½¡ñNiÙ­) ©š4ûØ#1•þÑn¶=Ñ;‘òá9“˜ Sß6[S›™—-&–ë•–[öÍfù´¨|öu×È=Ü'jœÐžFÝYàÄ©wʉ—÷6TTÓ’bçþê í~õI6CbŠN×£ÆRÃÔ]ŒÆŸß½Õ4äø¼ûsØ8ú²üM¸5ë_Ï ­ÌõÞ`ó¶"dº+¤ñïá•¥±Â¹Ôvw'"ò90÷&8H¢™7ñ4âÓYïïÙ¬o&OŠ±Ðk®"Õ–šké);(‡äÿaÁ®Æ!2'Ð Õ>ÜuüçiÝûÉWÙKpΊÐdX×n i çh¸žþÕ³.ÑF1ý¾‘§0¤5»ŒÂ~‘ÿÅÒrƒè©Ã¬sp‹m¨ˆ£b Üã/ä€ÖìY‡‡ÐÏ4š(Írn¹i?"P˜Þ ¼ZÚô3¤òAoK¸¨ø`6la²üÔDñÊÊæzRÁƒ£Ú™äXî×ît–mBYÓa\mÆÎ}ÞRé;Äñ}ÍYC õ qgOç‘.¥ä0&ªõû˜V¦r»9,okü]¿Ãïòȯ:ïœ&㦇bù0¾™ãÄ´°]U,Ìò.%û!ÃDÔ ’­Zü눯Ý_zã÷×ý³QÿbŒîÑ {Ü£ÉÜNÝÒ é6ÓÁ™F< `””YÓµ“ÈnJë„SzAÞÙAK+ (âÇÅÂEo˜Ù€Î$‚]  p@éA…$§\À”á[·Šßÿý¢ëNq1O¸žè×ÙaªrU’­]p‡Þ>°øŠ ÖALXÀö5?‘9ð™aÛëÞ* VççZ£E·¢+¡Ö¹¤´­M¤J—T½¨àÕ4± TòSõÌ5S To@ÂÄm‡Ò2Í’ÙX <œÑ!rzF*W‰åpk1f×µuã!³ö0É·–˵wö€õ?÷qÈEܤØ3üç^YséÎÙDšÁ ÅŸ•m¤Áª3ÉﲯE{~$ÏVë}ÒÏ4% yò–CÅ=*cÑÉ:a}ømå¶ôÿÜçî@"¾qòq>>TØxû㡳åðß{Ãáå`8¾¼8»8`aËkô?#™p†žµ`Ž;4Ýô6˜ïéÖå¬\E.¡;naJ$Œ«þ™º6w¨ùÐ…zì´NCøl©´&]D”(”ĆÝñ°Ú¿øpÙî‘_Λ¼ô¤´ ò&ÆÒšúòÑSYs9‡ýÅ$ {¡ãÈ4†ï^¾|CÜ">+|ÔëGŠ Í@TâÜ®Çr–ÉẔ=ú-Ç¢§»_$yù²ô4SO•;_Ä´`ê„š %SoӪ܊‹%ÃB;ZÈ¿¸?£#¶€œVℤ>T ønÍÝPîDB]oM‰Áô¸IÕq¥ÿ(y´áœÜ–¨ŽF>"õžÁ1L@ ¤ä‘q³ëTÍyø-Á”á&±4sÛˆ5Š¿?\Ægý÷ƒ.BÇ#ö«ð1÷YAÀõCÂ÷{AU0úÖ`aEÅh0bR!Á’Â>ãÈê¤õÓËS“€iJ‰`˜£Ç“A>×çV¢\œµÛ{UËÐ`}Ý6ùdB)’¤r§·ö슠ÆÉÙåUïbüiнⅡtÀ‡2» ™MGïq«‰½Öy¦Ãã1•¹=Ë–m­I?¼2½¤aƒ¦Áõ$CµUÉd€/áfrÓÊ£ùúgõÚÓðŽæUÿæ0Ö”N‘ØÓißAï‘óÜ€‰@n=AS´;‹Ší„$vcvŸGî9T:«¸k*JÂÐ~•¦ÇÐbî@-¤-ü/ê‰î«|š •€”w}§5Ÿ'ÞäáI¨~¶+ÅõçÕµu³Ì­µà ïèa«¯Ó±³øôÀùæœàï•M‘äÑRµYO!ü{#ÿ5®œ?•W )&ö· |I©Á?âÿ^Kjð1J“.uÎxƒØïJç“U¯ùxö@Ô)䙇1™’ï.ã'©¾½š¡&†%jI•²j%€»RŠüëJŸ#Çè¿êè e ;8A®—³í|PD®äˆ(éÌlÁH÷¡(ÏG,a"µ@éagLïå+Ô>¹Ý1Á,ÌÄqBÓþ,Bä+„æîºmxýgµ™Í‰RFÑüß4!`CzÀ£Î¡S†Þ›F§´ù¤“Ê_þíºü³ï¹BóÝZ¨6I¶t³´.—EÅÞip8Úš¬µC{±:š4bÑúošùHxćËò0ª êk­ûúDóô;NüG˜¬#ÏG…DÁB3žloXÒ¨Ü<‚œè`ÈéîàBˆSß,WTc‹I–݈9M"ý0òE¸,qºAƒõj—wá펒+• ‘ v–SŠ¥À-¼Pn%†Ëë¥ÀŠÃ¯xù'GÌ‘/(ÿ 3…wñÄ;›9…¶ðþi»Æme¬5†¬Æ¤¼ÝV1öîi‰ÔúµVã3m|¨y¹¹–Üû¯õÄ=×€÷á l Cü/þ|Ùoðå4bŽ7!·'ZÂõõ!çeùe» íErj‰„¼Q"Ư•”ñ±£etÇÌx¦Aé¼Ï2¹ÊÊy™Žòå4ƒ Šöºæ«Í̽_X-D?Ó¸êNha˜,·r=¦E[0Ø¢y¢ˆhôØ UËùŒj†Çè9ƽwX~Ý% j‰c¾K&Bk1·ïÞÆjÝt³‰z+ÓýiÝTîøÉãoxôŒ1À[xFÕyvêV*Y 0}ƒ°‰´cŠy°RQ$;˜cÝ¢(ÎÞhW„H-qog뮇1õé ÔþÉÞ¿]wÏ´ö¿(Ñ÷†ÌHh¸üyXg<Öw©´lÅÊFðùЧίZ}:I­ 0͇ÜQjkn¢+wµ£OjGÓ:gÓ+“ûIê~ðS£~vSif´ÝåMrq}ÞøE:îŸì~ÔfÈÕR)+ÛŠì¼â®|^à ÷"Ô‡nÄÞ?=C%MÇæìè„{û8+ûDžYj„Åä ¾Öï)^ö†×ïOúƒaú§¿¥G{uz¡öî‡ø¦5wз:Ý;wo‰†ðªù¥–û!­>îZRž#cVýé):mõ'ƒMñù–é×l]%ë©ÍÔñ½”"èÀf…#(*šhYÙB…-À‚œ·ú£€ÅõÎñ˜ÎTíÍucÃÿÒpˆeÁÕ´0t¢õSÊéH½€-âMVÌw‚N×À×gŒšXçûbòº®þþ•¦Ah{¹åþ’5xJ¤äØ”(¨1E·Š¹‘Xú<û2Ž;\@Õá çJoÓHª7­‰ìNªéŽç3 !Æ”À‰Ô;Ÿ…-è^Žî´sËw|ܶåÏ€$ÖÁñÍÞ”ÖôÂqÞÏE™‰&ÿ4åJ˜Ì¿hâõûÃWßKâTkî`|wôñ©É¬Hšîƒ³£ruy3$zPxÓXŸ-øH2ÙÞ> _ƒtW "Ûˆfõ…‡æLtä. bÊ"øp·¼›‡ž|¦ÜuÞ¯¡ññ±ÜÎ7æÇPZÓóPt¬_N쯻óüK•?¸9Xd_ʯä}¶^ãŸàr€p|Fá(xÍI>)²%éÙ¢J nÜxŒ{‚wÂlè÷Au‡Àü'>¡š•ó<É£}ÊDcµÏ‘²Š¡yžM/‡Ÿ9!‘syi½“ž»1'ì]¾°×íÎçî‘?VÛŽg€¾.&[ ¯Sg€»«Õ\_x]N2ÿ•Ž«2Ù{ÎTŸV ««Ú(‹;§®± èSß>ê /=ls„i™Õ“N#ñs/75Uçßx“ù‘§rÖô¯’þ;J>M'r8µzL‰'¤_\¨‘¯žÝ'qÎÊycêmölʵ²^v‹ãµPL6·=’'žø©Pë´wA??¾<¿ê:Ó½8?u¯Úà™—ñØÈÀåƵÜ Æ£3xÜIwpƒ>:5¡%Õ>GMûï››0w¦_ÎÝM¿«í8Rül®°"Nž°…‰øƒÝ^ÂŜܭ=Ââ*{G»tÈZˆpj:}©…iQÞ!ÛÍ>¥ù៨ï ,mQ‚ÀÌZîÝ`ªòe¾6B°d݉ ´ß—Tc3øïòOÉ•; ­ÅäK>*©ÅDŠ¬½¼¹)¦\<’zD>/ Ž]ÞñTu-ZS¤'œÓ1˜Çãó7»SI*Y‡Y¾ø*ŸÖxä(‹*é».Ñ".(à s€%ÒTâÜÅüá¿LÜ?Äéê6 |@cBQã©äÌãòx;•2 »ã‹³ùÜs}qó`@ßÕéÌ$³°ˆúv(SÌfÙ¤€BÊ~'*HŠ€‚_Ÿ cƒ<ðI$C ¼’A‘Ìa:­|.d)îmíkŒ¹;c7^oáåóºì<õ$rÀnÐ«ß ’I#$@8/8Ž•XZçLÀ>Íšl-“k#ÞÔ²`‹6y’rN™Ú£„QªÂ1IùfnµîïŸÆ>Y‡ 6_‡Á1rgVëR<ÎÕ ï–¡ ØÞ_º³R蜛”†÷9ðÃvÁ¹ù¡ÑCgïsïøzÔC‡éy8ì_^CFrA¥w6-Åé?¶%i5ZäSÉØ“î¨Û»8Ú‹áèòªu½xÖ­„Ù†»ï½$R ¡˜Ëjéâu·Œ™ùj=[ÎCe ¿–눢†Âj™×ŽÇtŸ¾8žg㳓gÝÓ¡"Û®öO(­âÆ8øæ óݹ3†œUP"„áËSw²‡äôÜíÝf;`Èbš0!Ì*|U0(ƒyYc¯Yñ3èšÚo¨!G²šmÚ“òèm४˕¹:`ε-ÆsØ?¼89ÞÅÌ”õ)×îõÈÏW¢–Óúònx°/ß­ÞP’ëânÃþþc¸öxTFyî¯À_ôz'c·…÷Ñ?ï:žúH˜–›ƒ¿&Ô˜;«³97) ¨¥ŒŸÞ.·éþÇíš»ös>aÁÍò‘ò¤¢pr„ÅôI8ïlU)[ÕŸ•·»ÖÜR¼§gBTÍ Ó££'z%ܤy #)ýëE™ej›Ä†ˆq>»fûÖ<s5LeRùb’¯f¯h’t¿øþ‡w‡ü¢¡N6K?v‡ãþ7êö!ÇdŽ?~®ýÍYÁ?º•ÃY‡”Kþ‘Š$d©ô˜fÚÿÞ§¯÷ ޽Š8Öf:­WšØæ‹ú“á;ghú ’LzPñ¥íÊ­\`áÎòÒ™œÙSfí¼œ1§àÌjTÓÄvæ|-~ ›ˆô÷2½ºüÔ\+‚úH²q6sèãÉ]¤Õ¶î·¶¬%¾µñøIOõù#ôâ¸!ÛŒµe·‰-oî´9×ßvƒ¥ob=Uñ¹vý1£G|¬ XÖOË ŽÇƒîgwý%àF.µñ¸×ýÌ1ÐŽåFßxÄ™ÊgÌÇÚ|ô´‡Œ¯Œ|ò?$¤\ÅUwÀ. ê„ç (ñ(£VŠ`ÝÏ ?c£+«ùŶé;JNZ&§©[X“Üq¾P»wD‰kÇŸŸgN¬k!³Bì(8Ö†Ó[ ” Leïóqï ï ‡¹mñoÍo‘ !I®Y²#â˜ýʽŠqÖöÏ”µ}wøò/‡¯þ¢ôˆÌÞýÙæl yÒl»XíX½®m®£–©C6ÊyKþ±·ön˺øî©ž‹ýSî¡S/+=%½BÆsk›†;qES'K±åTŠz[€èÀ¦$Ý)´FàtîBLN1rxN¤Ñ\Ë‹ ‘éio4>ïã«—Îù¿sCE6DÉàC.–|óDr$º XB1áìó4a769-ß“¥<}܃RB3}^ 5‹š8½G(n%²,ÐÈP‚A0¦%$áA7{ûÇžNÕÿÜwÎ?”Ÿ§sù ¹ôbY«$¢Jsì_š&K°0nŠo:µ!6Wöçƒèå^\9K®6s¦å…HöO·Ó_¥>gPŽ¸š^8LÚÌmÍqi»Dÿ‡%dÄÅü­P}î€ä'®%fˆª×ÓøšTôõIeƒ.Ñø˜ß@t£ ‡b`”î"E;,ÀcŠ"•¾~G¾»3zÃíyÁ{aÙÍq÷zŽœƒ8›ßEγp.ÙÜõÜÖ¿Õ6›_ŸäöâTN÷kÁ6>a6Â9ŸTJÇøçË‹r_ ËJ š‘Õ8õ YqRßÑ(Hhÿk,)åò½“¿&9a>(4Æã#ê7$•ñ*Ã,_í 7JÎIÙyä˹ø¯jEî—Äk€û)„ô¿[Ñn,78±'LS,à/ÊÀìà™ë”Sn&¡™ù!ÁêËæÌÀìâQŸ‚%]ä.D ™áÝ2²Øù)é Îd–°½l-—°‚˜.sÀÉxz2®¨˜h0®¥ê^£¶Ú*2ÍæÓªäÉlmžMÐ8RÅù1õé\èME%ar ™ñH¼`Ÿ)oðdÒNh{¥Ò 4+ã\Lƒy6®±«À3Q_ó˜¯stZÉT.ܸیlû•ÈTõye ¡E1µá”ÑÇ4ÎtÔhÝðf)8u­mÊ?ä’—9áSük 6îêÊÊ3èpÕÍž·w d¥²%A1ªÕv-LúRm ®{<²”>^_\¿6qLöåzþðè’3¥ù{'gæóªå\.¹«–ùpñ×Ë?~Óà±ê¤¾º/gÑVk]Ñ´Gçdý…97Ô#s_ío‘­¤E4@–ì Ô’_|{á¾R ï’–”ìñêaI î’ éÎkTƬֺ2¬MðÃjÃJàX=X赬®ü…qéÛÛ9À Cª)Øäùø!{’«€Y{æ`‚ÎW"B;LC0;rElŠÂvCJ)*9Ñ“-(™WÞ$Åòf…”-ª»¼sQ¡‘ÍZG ÂÈŒ¼K0(瘃óééZ{D0b`Ô£‚â9_êåä¦t)o‡ÊìŸoAÚ–kíŒÏ¦N"ØרÔ#ç>ý˜Íó‡-cªØÈ9‚^â´â‘ý¿>F×8ií¤ Ö´}s.9›Ã%æ9¦Ü- îä¢ è Qʼß VÜÿòðÕÑk½îÝÝÈÌ›•×`¢Oe[ˆôd‘¡Uh ­ikž=pÐÏ úÑÓAËsÂ*Z£6âœÈwÿž|÷ïỿ®ùîï:užÌ•6•ÑóhQ„öµ7u"“¦?ÅôÝ•÷¤K€w^ €/"ÄnàÎ`v9;7³‡Aæ:çjECVH*¦iÒ^Ä.@]!ᢂîr>âc¿–¬=­hû 5ºê‡,ËÃru®Yô¢ãÓFñXfùPHãYÅ“¼Ï©ÆaˉlÓ"mº îÁT£T¸ÑpÑ—oïwa²³a½3ú­)í÷„‘"“ö],€ÎbnϘáäv+‡m²³N°xlE&(•Ô2õpŸ=àͬA E jwv;(jýr}Ètïs–h6!sDþ‚{– ÅsFÅæNí©3•[§LzÖZ»« ³ÓæÇ¡ˆK~ȧªûQdR+iâQüú2²,°’f¥äœ¶Ë¶äÜlO€ïÞ“ß䜬i¦¤.zÏÊ9Òì ùQÕq•& 2Ó/¼€éiÝ4lRâ Ò`såþ»ƒ'¦ÆÍ;a¥Í½ä/,·H2¦~\E$Õ-fƒóûPéwdôõŒ þ]^l‘ç9-)“9`åîèD5hC+©áõÀxÔק|P`ÛÜ—” ¦'=u›{]ÌÔ¯Œ8<0 À1=ð±,íº4”ª(ã žÛz™,¨†OîéÅgó‡EAGhpuvÐóžÏ‚›—Ts`ˆ(¦ð=˜$úÇ¢Å½Ò –7ü Îà“PËØj8“¢r=''ÈÅ"Îla‰ÝŠwIóꆒJ@SŠZ ‘Î5\½7@ëQµ3ñ!#fšN$_ÖíjÊŸÇÍN~Ÿ"Á/"¢÷‚3ßÅFUÅ)’ñtSù,ÉRîgÏnË`Âô€6GžJ)ž°]°šã1Î*÷ò ¡®}$Þ×ùᛣ—HtpΈK9¢OCc®MOa!Î àÊTJZèÅÒ;"`­ýZä÷”‚á€`˜á¨Þ]‘ïx§¥¦… 6{,ðYÓ‰EË‚fHö•YIœCpVs°Îc_– Œâœƒwý~»¡~M›Èõ蘡CX4 òª~ä¿Õ#ÿ‡ÐÝ®ÞÇ»£ïq꿳§¾ž-@Ô®‹üfLn¶HXŒ«ì&Wó<_)§Õ,>¹»Õæ¢HøÖy¬ë:’]’k|’Q‚¡ëÆ­;Ýè.Wå^ƒJ”…±1“3ä[ ªÿ’ëɳÒ8k6ñôËRäh&ì4x6)¼èö?Ó*¢ôÀ‹d«é‰†ýÓaïôíÖ‚Ý ±ÖòAëö uL… çIðSê:¹á¸ÆžM7è^d&†4ý„Š$›pHò‘4—y)É2DÇtýænþ7‹ÞMãž÷ÙX´Êï±€ñ:ŸÓTDJfÜE:Œ¤>á¢1›äô•üçîÉ ë±ž^w'ã«îiÝTÄ/þ¸ղώÑÒ'ÕIgýÜ9™HìˆqgUE‚YUáòîÜü n‹KRL$EôãÌ3 o²)€+,ñ¬ºœþÇ’Êr% ¥%¤ûš—¡uªíM³{^²:Š%âäTȧàP¡4ÊRإٿ·iLs}»¾Ñíúöðõ²]» · µx[¸‘î¯x&IÌB 8wÙü†\±NÔ«á–•Ir‡Œ%kv¦Ù¼‹ìWø”[·÷ác”š§MSß°ñ+¾¯øòÏòŠž‰NØ0îIrGÒ5¬{—üs,>æÕ„8n”µÆLOâbá÷”[’jËŒ=w}¤W40Y‰˜¬[NSð)‰3š70Ü’{Ž’ñÄ}u5ƒ~MA·3ÅoEéìn±Î–EÝF¿ø.=Í7Ÿ° >Á2Ê-Ö›-“:ŸtRljZBÚAøæµµá«éØMî&ã–÷hV"‡H‡x ®èë³Äý2ÿ&ÍIºÑƒ¢?knºð"”ðÈQ/Θz!ìgõn×T’2ä}Ná<{‚+‘—T|Õ4R‡½!ÖXå¶Ú’]·kßU¡àî{åGLã wÓýš€Îw•iàgZa®oØ m‡ZúC‡\as¦„2±df¢Pö'ï™»2ŽØO~üE†å“åξån}æö5ÜϨéu0=Ð8M¯‘¼Ùl—„gìH. ¶’´T|NŠ_nוízý‹ÑÀ'å9ºpSŠØPDøUCò‰¼HwdùƒmÊéT){Q Ç Õò†xÁöMr¨ƒÞé½ÒÜ=Ø”sœ‚kÙØX±D›Ôy¬m¯@Í–ig¯ï©eÚKzõò‘­ f',6BéÝg <™gÑy|>ókró²GMD+Ã(R1KŸù”NgT9Kó©Ø\–DI´À*â:Œ†ÔM,œ+«pšÃóssÇøGØörWË€O¤ÄùÒbíÖ'e.˜Àç>>Þõ‰Q¦Î Ô­Ê#6Ô×Ðü I€™óú¬ÇPö0ÖE` Êt ¤.Ž u„ŠoÅ©3g䘚"*z¾:zÉ¡ÐIN.†%V²BE°gu¤q(šI§›•Þ`Ÿ^áS­Ul0‰ºª5Ô*T{pÖ¡ã|—'àóÞ¢q¶—OGÑ°µÖ‚i8Ü©K¹Qö·”—ƒ8”xcbZ‚fˆb@½çÀ„ÕuUÄ­Ù€S2ø‹½¨ª­4ÓËCjh6ZƒÆ¶Â?-,4c/œy®(Ô§š‰ „€“»¿zC!'Ô³¦XBLw†w£§Y1Ùgò-¿èŒ%MïÜêéê­ÂG¨$º.`ÂÅXK^7©¥¢Ç“ÚÇé†ðêãÇW^dH—úí—ÏBF˜TÏk@,㥗&j…Ù’‹>|¬QˆG2y7.zai9_XBŽaû­˜H📨ypH+Lµ.E\Me7)õAùd»(²cq*b„‘™sâ–²D©Áy]póPÅ’x†}I ѾÁGFüoë?ÕÄîPµ‘V“e;ûA6ù››ê§düuq†%羈VöÖYÅpçh¬Á…ìLíUgƀܘŠŸ:.A½\€¥¢âòýOΛp9‡ÙWUÕlt‚L¤«-‰éf.j+ÌY† F˜¿;3Q3e‚>âœ]&L" ¬Ìµ›ïŠ^ÇsóÞ#6ó5%*Ê܃âÀøVÔ?EmSΔuG{ùåQ‹s1Rm¯XçõM²îAjo/É6MêÊ¥j3Õ9â^-º>yBPloájÕÓ¶ Œyy«~—IÚħ±|–”,õ=pîȯ‘Pð¢”,Õ·Ö i“ꟜWÀŽP©cjã 8§:3$btª Qöû;Iÿe´ÇøöK•­Ä;v«›ÂÚˆ*d³b‘WÉFŠ.Tó©;±ï+VŽ:e ¸gâ¾{ãânºÙ.#“2ÊŸ+e±+élI¾Ñfp‘KÈçUîEmpG›/K2ÉÝåÛ5àçÓŽÇFåØDhb ôoÑ!£[.Ò3^Û¦Üd󄕈Ñüßaâ<ç”;’ ^lM ÿÕÙ­-3–Ê;×ÅŸ_mæ]H@?¹ ~OµR|pP"àÚx" ÁhGíç\%—€VØ}1Íÿš^òa•4q5£25 |c¸µ‚–ü…½6Õ²ñ ]r±‰­Kp›/Yä0rEµBö„Ýñµ##)*Yt`Áï¨b/zXYx1GÔì«r%È}ƒKñ€ôÀjJUmÜꢻ-›G >þ±jðV—$Ÿð³‘8/Û)UnIj^?I¹¬œu˜S…)¨R¢³˜þ°ÿï=Íø­«^‡®m%"ÓÏI. ˜? ä¥ØS‘id„« %‚=8Çzp&^Áк@—l^qKN.,3Ywa”!ÆAb¯YqƉþG߾󊌤;LdnH!Õ»” ÝÒEFý‹¿ÑlwÖ²—ãöO% °C’f8”;9øEao RËÔp^ÇÊ,%tÒ;[Q¬nΡ3×$ñIw“øx¥¦w¸¦ŸÓ_Î#Ô¶HÚº H‰ÞO”-“ -~ì~С?¾¬•0‰ŒÉ¶¯³Ûryãæ©æÑ*Ý’I‡år™/'9)Nb4º+î冪–6¶ˆ² µ8k€zl#­Ï¼ˆ{27¾îGÈTwùÞ˜/NlWÅ7%{‡34‡[vË(^€·TÙ‹*ô"œ" ÑaP"…nª] Ãë´XO· æê¨uʳåáûÌÙË ²¦Åײ¨¸ë‚iÖ„…’ 7P‘¹Û,‘ÉJÿ$*GñY§Ã ey_¬R:þ‰ÞÉç¸LŸQÓVÉ:2ÔL’‡×<‰Qc²¿kUz¹ÞÜ„åãûËÞ¸ÿ Ë'îáÓ%·—/g{dƒörÔ‚ôº·œÜ—F´y…ÕÃbRÎ…6†æ¦šRÙ„‘K.ìZgQö»ŠZ+©œn$žŸ` UŒ; ÓÉyšê.ê:¹?Õâ©-ï–éûòÞy'Úö„ý88§æwÛ•EÓkFëçì·mú±XÃÅ T Êíï×.Ü1ƒèd³ª’8úµ Ù@,®lìùLá§ÎYY~¦iKåb]NÛÙ¯QGò‹žû÷#ån"R8à#÷ SáXw™/î¼Éço^ÍÜ0Ñà‡T:ßrä¾ë¶Ùðp˜C#À$Wͯ³â6=Ÿž8Ï,Ÿ“¯¶þaðR”Z¨q#¬<Û.v?îÈ‹˜¸Å kËg³ÄéhØÂ/¹Dp`ÀÒká–Õ_ÿšþíÜ‘¹€8eK¤8h^ýÿ`0«¤ó:Únþó)Ïš»YÏâóø2"Š&¼¹âSÇc’5àóÜù•’¢¶*÷Fü¤â몂m‚¤JzÚ}ГS;ŸYÿgéîýCG÷—ߢ¼ðªÅ1C_R‡ýÇÆ•tŽ$0vÝŸæ@B^¸/yÄ“3Oå²LfÎùFž™™¼4#+AÊÇ„ L}‘U úJÞ¯Ð69ýÙ9(ëŒqëôø§4ÜŒÅ-8ç½sÄæ¿€RÀ‹wñºV(´‰É.ŸåŒ‘®ô,Žó=\ÂÅ“£Ë íÇš³%ß[Ÿ4Ÿ*”° "R·ª‹›1-w%¼ìålFq­àÖÀêåN)Eåð@®ÄAºRÄ|•K_ˆ.¸mÇ]†ŠH%U¡qÞdΛ6¾£ì wö©ü“Eœ^tíÁ…ßÏ ¢ª!P2¨G=§”ãÙ\{£bz6žÜÁâ%®ÝO_§y†T:ì#[´>—9$Ì!žXÚ”‡'ug,&dtÄÁ@tU ¬#]šiŸò`Ò¿°ß‘¬%e†6š¤ö«(-+Ü'ߟýLy÷^o_þå^Û]Äb+*Ìððög·Ònc$b£ÓîiÇÙ>³ 2Ê’rž-/›r׊%p3~L D’ÄU¾þ:híx.^g)yÏ@M‡‘Ç®fGöÛ£—G¯Ý®VÆÄùîµï_+”ÝVÊ9GtPÚ*­Œt3·@!áÎN*šŒ+0Up¿Ý.©Í‚äËŠpÙ†Ï:,‰Û5 :˜ÒŽHÁ­¨Q™VÎNTâ…±Yó—QïX D?áBnFÜâõ¼¬Ó/T>’©œÏ£®9õ~ú…J7‚!>)÷ý³ÚŒàû¾’Ùv¯–«éðˆœoFG½×¼¬< Fåp[’Êí,»+’UáN5’e—S[› C×OãB­í"}óšø‹ºïû!ž§)8àJ Š‡šÖŒ˜{΃IÕ€Là,—t%'T‰Œ’kRA^—’sgPÀ$îÖ¸ñÌœU#wÚº è¼ÆÛy‘­ —fá½ȬñâÍÚ-á§=rBáãŽ[œ ÉRO;s¸§d( †ZY0 {Lð”\B–Ëa4’©îž]}ìêMG·ùâðª;8~÷öÇ‘„6¨vý*%z~6Ž«çO‘͘لnXkN¦Ò)‘/¥’…¬jì9"Ž•Ž?þçhZÈ•ñЊfX¿†M÷º³™Mr^›–;†¤0½ ÕU$Ï8Ç{ù¢ÖuóÑQ‚ŠäžD,MÔ ËÚ~3í­I™fGnÏßOáv‘‰–îTWºAŒè Be™ðÞEUŸŠ!Š¡5`º1ªg¾ã؆pætÁ*ìÊ Tï ‹Á®›õý=ßrÓ’'ž‘úü¬QÑÂimëlóÚïÝÙ›Ïݲo#Š ñS%!C®üm.ê˜ÆwWÑî¦] º©ý„FÂù-gv؆©«uq#¹=Èá*bÞH}IoÄ‚šÚ@'©’ñ¸Ö,[Ühv½F²þu®h}ðlÉ邪Xn…·=üä!ªë úµ(¦h¼Ó2M„ýužmÜó¸#æ"§ ô.Ÿ¯„ƒ"F—P0®8ªƒ¨¿Þ¢óÓ¬ø6.œ ö‹GV7™'¦ÇÈ“Ö®ß]'{änû–R>LAŸ>g܃l%H–ÁÀ8B›,Ú3á"áœ:g=œ¸åü&MÈywLՙ˫”%ã‹ËÑq÷ŠShý"vñÙX(ßN{#àÚÁ!›ælΆÌÔ»9œ² »ßHû³"s!a–ßð´ï-Î4#qxŒ Š²òP-eÅYAþç”tUôõo!+7Vg\+øÈoœûúðõ+ex Ä˜±Ú!Þଯc?Šcœ^£üûxeÄþâ#]íeÕ¯‘Q p??m¼H8ÍŸÎK祦xx 4é­:&á®%LÑÄš“€qº”Džåø"M¾RcÜëÝ‘Nü56ã< õuNš…ü‹ñ&A¾4ŸKÞÉÝÛÒÐ ÐYâο;…–WTæ¼°ôżîãxé®Ä‰½Y¹ÜŒo§ˆ5Pˆ•C \àî„jܦl©¥+Æ ½wçýøc¯úq$XQp@P•ÊX2ËŸvR¸åX{¶oBý^¹™cmÂUH6ï·Lôk±±ï›).I3!Áòa!”UÇå’Ät£$6áI×¹„ù„˜e ) ™šOF•”ÙM`)”Zc A¨†¹EToþòò—jÕ¹ëùGù§¼¸u¥€[G1 =$àaÛ×mT=Üä7îR±}ÏMÝì‘æ$ȲÅ,.3Ÿgë©3íÓ» ;#_­îÞ´UÝ®]°ñ-²ôïYÒ7ãTÞÚZÉåˆõlµ^Š[à%Ù7a:2¶©nÀ¦~"µxÓB¯Å†æ{ÑD/ã²Î)aíÌîf<FŒ¸ºÔ’”§(Ö•~½ÝÛ, :WC D&\—•Ðž&/`EĤèf¤`ÜÁCÎÛ®ñV~´O²•ìÓq(mZ3ô%¾6\ÎõñõÂ$ˆFQ³y sLˆä.,·õ§ÞJLļ›3S1>Ø>¢£om‹fX,Üí¯ÊjùkÆÙýÙ²:ä·¸(敾†A[9ŸþrÐxÏ‘•[!hC¤þú[6ñ"1ò)r2±¯gÒpsÉŽsÕ1¨»ôÏ»§=ÐkãÔž¹1P*²)fcŠ<^Ÿ ,ÍÒ»âö.qÆé‹&eC÷l´Ó»ÕÝÜ)ïµìÆd[ô/$Àu­ a“#Ü×$¿#!b÷r*ÓÁvƒ@çÒEEÅÖÔðo¶k:ÂUä„h˜ÓíôÒn;yhö$Ò;ðGÖ4ŸQõ*þ™œ2µz®—gàAÂDË„ÓW•.m„p¤@¯Ñk¨\ ‹&£Êò ÚZdËŒ…Ñ=_ÝoŸi±Ôî>.ê¢~¶L¹ ý3€­Yª(-ÍsxÙ­ì¥ó{ÐV˜f’yQÚ@,i‚e‰ÌüL$4*`ñéžH¾, åÄàH¦Ì'£T+^jÄ_ì ,cé´'-1V¼/_«×$=kéÆŠŽ®ß¿¿\D؉haÑÖû˜}ÍãFd¯„U\C”MP}‰¨ã¼2)ï=›)—x_Ê@"ÜëÒņYù%. Ü-+7ço^¬KAGõå,M¶’uŸÏ˜>—H ¹Kî¬ÿ~“Éÿ:9ÿó*m u²»!ØÉ×3wÌf.Z5†xýæwnh6Ñ£k Š(öÙ¥y›V¼œ•‹ÌœñV¬•qšžÀú(©c@ÜE×÷9ïÜã•ezL¡À‰:»PKìãÐMjYb$¥ÈԬV´ë´nFÜ}»2Ô!û\ˆÁÆ®Ø üDa.ÇÏÓX ÷xTä qœ;ÁÜöwÇ,@BRŽÑÇ¥WCg%Ñ#âfúX ì_ÚÍ©½°±…ï:¤C·5å08^¤ÖmR-4L Î¶ßŠS÷?÷zWì3_Cô³ëvêPîçJÆ0/¹‰Ë/ˆGÂtWPeZd˜âîD1^z‰ŒZTN­ºiWpRÕ£ãxºÎª»@ðóîèÄzh'´…©‘B¢ÏŸE'Í¢:ä#j •Ã‘ÿS\c¼3ƒ4†9FŸmVbI ˜;O¾:Î6cꇀ°ï€Àžì }¤{Œ»Ê¹ÏœÔ/t}qÞ½Jˆ¦×&g§|€Z‡ËxÞ|$²÷Üב±®£­N wØ]¹a—<æE@ô²DÜê™_‹J§RÄ#&s–d”nW±¥ú÷r¾qûí7ìË«gÎNßGEfä±3Ï€³ñŒê—å&ʽXLƒ•'r0Ç­@<ÛYÓ\*Wµf+iá_d¿ŸJmHÞsb¨Rµ{¸“^Ô Ú¶(!౶Ñãë ·2N¨*çÙ3 9‚åqÐ1Ëæ2 5ÂÆŒ¤4^÷»•£Àzå6Ôeu¡¦•qÊ&Z@jl™_ ÇÚàøëb5žloŒÃEœ?_Á³¡|“„šù6ÃÀB ŠJ÷.ºß¨Ü)=5Fèðv/Óÿñ·&fBáhÌ&ä¾%ž4ÍìËvâÎEôÇÕ .w#¢-…rÉæw»2@²Á¨‹| Ÿž!á“FoÄ™YÌívV$cÔï(kbvPFp+äJE®zÇýýc*G3$‹ü °ú*.Û¥¬Œ/gÂ’] ¬€oüê° ð$Ù%WˆØ A.®¨r—Ãõ´Ç—ç.œö¼$]Ü»NÂ!¹²{†>$¥]‚øÜÝ*‚¦ÞrÃ-ƒŠÎ1¢uô_úl«=EÍ#*~ŽÄ‡Ü<­uë" XV¡Úµ #‚‚Êõ–ÐÍLÂçlyV3þçQk‡˜{B¤;Fƒî1÷Pjý›Éë0Fþ`Z¦Ç—ƒ€æ_ÏôÎ/‹5nDŽ¨‰ÑÛÝ;‚ÐÀWœãÑ$lÄ#44¬ÂceÌà¨-¥*‰Â,4–c[çó‰x´8Å`ò˜;çm9Sµà|M¬åeáD-náû‹)x¡M̯š- )8Úw h©§Ä—.lõ.~¡gЕ㞷îÎ/¿úä/oKf)'ñö«ù¶² 3)¸ë÷š<¨]Xªô¢üšÙ5KµÆZ“|ŒºÎø†9NÖk_‘ñT¾ažÃ˜Îybÿ^Ùl¿€JRÓ Æ,–ÄÝÇÃÌ.U"Ò’¯¢íäÝKß&¢óô5ýcV~²¹^°Þº—»\úƒNúrRM·ëV~z!’Zv– A>êìaƒN¿nÖ93>k²>òŒæô´» Ï1·|³_†G½QL_Áo ¤µ7Ø$Q„qû`‘ ,Ú6tTÈo’-»1¤ Š¥«™¥IÚË!åšb²]B é>/ ´CfŠF–SîÄÂŒ•,tøeÔa½ò†bÙé<¼¥æÊå “—OعÍ}ÎÝêTž¡@b ¸aší’ÄŠðöÔŒ6ä²€ÅÍÈSÐ`ú–Š%“v8c¿,ù‡˜‘ùÔ³Zãùr+ †UÜSÒhÛ €rÑèY(ºØÌ’Î;Ï8á@ÒLÊuq‹•Jlje…SåÁ£ÀW±LŠÐ`]Ómôò•û?‰ÓhÐ1äðÊ}.OFÜDªÁæÔ+ÂKP9î^@Šó —öÊá‚„ý]6õìJ®˜ø°m ‰K…8¥†\ Âv¼“8=*è½zŽG~FƉá*[Bċ϶å&þÚÔIE[› x— 5º%hMñ5çˆ#_³ìi›eO =aü›¸ÎCàê”m\)²öÉ'­§• %ãIæ2”½Œøgéá 'ÆE—“Ù/Qp0CÊÑ÷5¹—Ds‘×qayýA1%•Œ^¶^VwÙ=ŸçL!ݼnêO~:½º²“vRº½øs¶½A‹ušöÈlš-Ð]ÿšÜâ‰Òš’ðTîÜuA|­w 7|O::>ßLæ™´:'‡À TÛ +@q>Šev2/nÃÆ>Ý'î%Šî`Ê`¨{^ãå5n€Á¸ö?Ç\úņ‚}X¬¡a%š¡µ¬üØmª¨öÃF‡YÍÅfÌ 4’"¦“qþ7aÿÜžšL4üP­UáAÛÊʥΌ%*›Î´%zV­1E™÷¶Í ÀêÄù·«|E«ã¿Ðx´já¾ðà„Œë¥ég2;n;L~µccSÕ5àØÜ®)Ñ4ç¬+SñQ_³:º¤Z±x·R·Îô^÷w ¶Õ²ÔYB*krcfwb‰YÛ¹[‹™ <`ó‘S_E¦à&K`V‹'k!«'mæ1ÖìÙ¼,±l´êˆ =š”c¡çÈ).BEÚ­Û9í“Äù¬=Èëd“HÉp Eò*¾D²%ÚÑ[çQ»(³l! êqûv#·F WBþEp¶L‹ÛîÁ5Øäú¢ÿy|Öÿ¹‰=Í…Û3b£ó¬}Ø$î°)É‚3[7M,­ÀD1àV_ÎxζÖÛgçsk…Hð\DéÞ*ãηH$XŽ»Ž`à`4MF2QžÜÎwpÖïcNœΙ$úC“R5ÌâŸ5ä'ž?tμ3¤’kÈ…¬dõ±îËÐ¥áÞažþpô2d"u'â1°êB-ŸÐ`eó™ Ù¢À­Ì„[¬‹)ðǪ´'${÷¶îͼփÎy3oýA'Îh¤Î²XgŠ ¯ ÏJ)÷¼ŸúhšŠY#À†L0o&D‹WóI¶\>¤Ãž>²"îkúÀ¯|‡[¸0Y&¡9N”éèD Kð)¸‘Ð|ãþ?ßrgœ)ÉÇÒ§B(Ëõrñ«sèûÌæW*KrÍŠ çÙ×,>Tå|ãžÌVl5`jB†­Æ$ØÛó… ñ·Š×µ é oÓ ` eÓQQ±•Ž|‚î8O¢·.àáf»X݉Ç,Ô)Èdx3ìg®±ç¼Ö§yp'.’)¼GìIêµó!~‹¤Mý€ ˆZ›|®–ZBÅ®ú&܉@Ƹ7Œ•õF}K=%4·A¶%q¡þœ#"O–Il/4Ûœ„Ï $J S.}iWÕ¼°µiÙ³Òû´—àÌÀuɨ̰̚À@lOž|ÑCŒÁJADÒ >œâÿ5FmîJ÷~§n%òÚ äã ½ïj ED ÒBå"ÌM&³‘ G˜I%y±fðE­'šy\­É¼~×Ô=t^,O?)PŒEœéÑH^o¦òÔ´Å$Ò´'©  Y®[´ƒ.1ê˜\†—VçÜûZøÞõ×&̤Œ9£g×±»‡yz~äp'’ºùߥuŸ+­0ÖÛFiÆ“’‚ØfáT˜1x#¹ð£¤¯Bá¡©> ø±5OÏugÆßÔŒ j¶Øî£AÀ¨ é‚¡.%@U8Ÿ- ‘šYbZUGRdâ~Ôf¾¨ÆÍÂ3ä|Qö>TøE볜ã„Çœ¨~uKž€¤Ñ4¸©GRò‰rÝ’ zF2æ%O|ÒÞsQ'“{ϯrض/™È‹–È‹"Èl¼‘ÊÕEè›-€çýJ¸œ%boI›-©qµâVH„wTxÛÀöpîETÿ?õ”Ú+‰4^þùðõ»&“ - Å„È14y0(>­«<©¦,˜„©Dsõ•RyBàÊ+¹+r ß·ö}¦àˆPì!”Fs’¸ö©o‘Ã^ÍœgUÞâ„Ð.d¿èÌJt§Èh½}÷6È£S¦Û`òoS‘õ5›ËÚänéoNÈ>%"6(…¿G–¦¾X[ŽÙ€ ••ÔGÎ÷{àPqx*m”Ô-"ĵ7«&JºE8HeÇ©¡Éí‹+žsI;‡Á¼Ýh»H/n·yÛ[]AfíO½álr ²<&p^¦B³¢RÍR¨ªUè-¢aP9Ìæù#cGn=šÎ£”…¢Ç†SW¹ñÍ–nBЮáúËw¡Õ92qUŽÃ#e§Ñ™4CëõÞ„D%ºŪW·…áåòj]Í¿U¦fëÉ<¿’‹‰ä6fŒ$<6ºénä–É^ÔœŸzʯ•ð à[ sÔPK…T®sñÊè8ä›{€¬›D*ALå^ d˜hPÊ+Hu4É׸ýÄ‚=Eç º|B†EŽaa (­ÐDoŸ †ÉOÚ,sbxP¼è €dDSÎ\åZ²ˆ»ò j%´dZ$A™,tˆ.ñÖSÍj,¨èèYF}Å}IQ!t\öisë©€%¾'éÚ¸ùÁ_“ôö}1¹U¥e^d׺ðUÜžç,Ñv5w‘ÙüÈ]—Z,\œ3‹°æEU[o%3_ û­Z•KV6Èà%Ñr³ò¨‡Ž=¶m-ï® ¦K]¹I{HŽË±ÛÌ.z™KH ~4UîàvŽÊa(+%⡔߸çtIJE—Ú’^. ˆØÞ€Ö¡lÃêäîOzÆr4cîÒNÐœ¥¦$¤kôta®>á¹¹ƒüöup;ÓP£‹h/íÿkúê]zþÙЪ<ØÓ"gcBµO.Qº÷ö‚„XboÜšãmé1¾ÛN&8/.Géß{£ôCÿs©óO …·‰ºÆBÒN …„ûvhð1ZÃOŽÅàɤ.ć£–¨Ž§a ~†L¸7TgÆlzðèǬÊÖ Oévøäz OÅ#ò¥Š<¿ôDI&‚¨(dd{s`ú­ÐXÜ òq º}Nþ~Ñ=ïÏ.»'ý‹ÓPÏÖ‘ û¢™pEÄIí²u Ñrær›*·Po;Y 1ϘÃÎÙ0¿”Ìâ}6ÿ’‚˯&F¡©_æ¥ "X‡Ü´ïíH'"æŸåÞ\zÊ¡Cª=|iV"CŠê®œëoèáÈ‹!šmn#Ѿ¿ðdÎwÓC§üËïå”7§ÚR´B•·Î•š8WIÄ:ž×mL¤E`î33Üôi \37þïK*‡´x.V¾™ òݹódâ†Rqá$³¶z`ð‚ *Ï‹U¿–eBǧY›ú—˜%Že‰=ÿÑa€+ŠfÜÜU—}Id¢ ©ÝÐTð& WÂw›¢´Lãt%µÈãRø¿/†%u¹]Õ‰¯vQ­é0§1 4 z%&Q¢âmÒÑ£d¶ÕH•b±&üh’jÖ7Ta¿£74-p¹ÊÓ Œ  Y¤#ÐÖ/Ô‘öÙXÂ|´q1ý ?YÞDòýnÔ¶Bó ia™bôúö>§ž'œWYw²¸€}Ví\[ v¿-Kr£XY[…hÅy-Sæ@Ÿ±ˆÝ«ö¼oOò¸Ùu¿n뎲Û‘töA uÔ0ΰ ]Z’ajÈh˜åB kï`@ne»A žt™–¤´# çTq¹g8äÑ]‡É|Š%²ÞìÎY„¹“`GXÒs$l^IjëÞË™®æÛ ÿOËÒ,ü%æ…5ý“n$¾ÐâN;Ðɸ?ï±Z6Wé÷´VÓV®Öù,™¯ÓUËSÜ|^ùº”Õ±u ü¤ipdRŠ&¤9¹X䞊 Q–ÂŽ!TîË™çöä ¡M”µü0\îŽå2O¤´ìvýfžû 2Ò¸Û,î°Ýäá¿ÅFU§Ó-ÄX…¦€ÛA Œañ-£³3>ª¾×£êûÃWZ?&ˆÕW7vc%O¤AˆWÔd9;$Ô·›ûÃSU>ï"½™³*Ü ‰÷\y¶Ë œ‘\xÙÁÞ$•eØ®·KÊÞ°Jठ? ¤3Mv GÎœXÕàwG¯x,„7ƒcÚÓ7Go¸àãL–›aAMM‡Ü Aý¥kääì,h꘿7Æg^t ¹(õ¸Ï”•/hj¹£Ø aIz^•¹YóÇýÌEúÌS%¨4«"˦ÚðJ@IŒÝÂRb µõüd>?G>\ •ï0ÓM~oxú†ÜŠAZDȃ„H†îKð÷“ŒYA²º+œ“ÅLÎl¶’ü4nØ]|ÁI/o¡¥ÝéSï­ãŒå: Å`¨ùVQT’ŽBaêô§àÓ÷·º? ‰ ˆ<……­iK:î aR•ÔÅf±ÿ©\ù`x‰ ÃY'Œ¦ÙÆÐ N²yÆò¶n7Ðc ºU!_æm¨¥Œ.”5šØ¨Ï–ʱÎ÷‘Z<ðÃpi>ÆéŒQ¢" ±;»Èpbrñ<¶©•Â'?ÄIoò03J~’Äûì”õÎ$Á¦R¦—-}à&«Gc¡ŒL ÇÀn”ÅÏš"é [þZ€bÁ½Ç} ¹rŒX¦´¿õ¸Ï¹(KMÃÐí^îS_ .P°=Õ¸¸þ¤Pk+•“/—¹³nC7òstˆ 9;™lèß ¸+Ðì2Ÿ¢ÓAÖÈ-„Þ8O°Hßÿ"‰ZIŒy£®4p[DV©àK\Ô|t{Äïâ†2”§fû`ÞõïnØÒ“­öŒÊ’ÁZA®2A§ž`eü1ÞC> ü}g——WãË‹q÷ýå`ÔÚßÉV÷&ÐŽ™¬Q²F¶-ƒí¸óLùÂñž€”-svIÝXnå;¯ã£vè«EGVe» A8'ÛËõŒ‘£}-~—õxžêí$ ¹þ2Ž4%Ic“„‘kGïår™!ßK¡ ¨ÊX6„ѧÇzûïg7¬ªUËŽ¦A™Ÿ9[ÓI÷뽆H<¬ Øxæ:âgð\²ŠIu…xDùBóÍø† C¥â°KçâŠÖ1=SîaÀ äÜ]wÅ‚+%<šŠt­ëj”⌬L¥D çÝÏžá¡…ÇÛ÷e3°'îøXæõàžïý:¯ZuÓnBp Šº=š(h¼ò=B»Ñ/` ¨+Qd7ø¶ÏãÁgk'w»å\ÿQ²_cAbVhˆAãÛ-í ¬À –I¿†« ”€‹•›$tj¬IBðúèçL9Hc!rÉ ß­è4¬«¼ñrh8ß°ËBý_U„-L÷#Î"OàÀêÞWƒËãñ‡Ë(œÝA¿7ôý(&”P>YnoaÁS¼eÃMûƒÀlÚU’á‚IUÊŹUI4÷Ÿî/$ºM £xxÿ5¡À2%pI àšGGÜmh€†÷»­JX«R½Iu‡çBâæ¡»5“\¹ýýK3Î`¢(Tºð|Q¥Ú«Éý,©˜Yp;=ôA½Õÿ>ŸÔ¸…MŶ ˜¦ÂB“<‰Ž¼•&¦¯@"䵶Ãm5§ƒ¤ËÛ7W3Ñ4í¸”Tî@CjÌýìóg{2I(I?Âên²©snzV <5­¤‘À* J_yUŸ“§9ŒœOA:h<—Äú ÈFî}¯§’ >ΚÁ’•"OZz”áÇŽYLdç3©§šÇ«¶S`*ªç&½~½Ò ›á»Šþ“S¿@@ÑA(o'÷¨ƒÞi8ê @pÑ=ëÿ»û/ {gXn¨M­V|ÍõǘVxk® Ë|˜J= k¶[Ž0Î B¢#_˜ëfRûá^¾ ä4,S¦Ý7ù·| y#f¡ó¨@yÖïØ!亷BÐXxRú¬ãû½6ZÄþ÷´rš*/¥Rè_YKò{¹.Ò¡3”‹rS>ÂîÒô?Åmœ¼“[ap?ÄŸ¿¯óPSÿÈzâÌ››ç±^k´øä;’9¥„ƒwy†§ýij>@×|i³}b&v¹"Th‰w‚«2óΔ2ÕtlУ!mÉ{ M)C]ÖA¾„þÀOîl0Rt¾†'ÝeêÛ“{æsHÞ³°¹Ó`3̾ Ý’f‰®2QÁãö€D;ð|:„ÆÎ/,J¬g÷8¡(¨æ8“Šn± QþôKÂbB51SˆIŸ¸ÇXî±ÿò€=¡”ÅþÁz…Ä¡tñ5.•t™Kˉ„ û(-ðêgøbIF+ÙŸd3¡׈È7ÎÙRUM‘2wΧ»ÙÎQýÏ”@Ìœ&ík2² ËÕ=Ì&÷"eª¨,½ö4¹±"v¼'<ÍöÉÉø¸{vÖ0ƒûbEMÛ_ JÕVߺ¡¬ïúWÁʼVäSâf#˜ŒQ<¹>¿‚™¼>ëÎþŽ§Z•>R²÷‡âl® 8齿>=í_œîµ©x2T†Ö<½Œý¶½Ä#ŽØcf:1ÉBøQ$ &m=UAîæi¨ÐyD²hý·Ê£17»†/.zŸGŒ¯ˆ¨!$1e*Å…-K|eµ¸ÁÐÐù ‚JNá⌱8÷$í÷6-1õÞôù¬¬BÊ|7%NËü6#ÆWÎíÕù.èÌ® ‘NrS» ~&¯6µkÉÞÂV~ˆ˜†S{mæï&›R·±?®`½|ÕÃPY”œ+h1FÈšì癶µUÆ=Ð*ª'é–/9V™É… ÕFÁ\ÐÝVdY˜Ú²õ$»õ  ©jt8üåÈa§D *upálNv°Ùê¿LÂÃÚHˆ±VèU¹Ã [¨¾âŸÙ«\¹2·[šdM¥f0ë©a¿çò8K䶃ŸM(…9°lg’Pf87ÏÒ᛿¼äÖ(£± ÖüAbrI,q`¸uåHsC=ŸK–ÇÍ÷ÿuÞ9þ¿IEsÜû|uÖ?ý}<úû‘·&m_è‡opm13*®ÒpN’Oï–Ü¥à{Õo¨e€ÎVtåêæ‹XE²O6¡À;IŸÔtóâ®\i¼NE‘e© ¿5˳vî¿:À$ºCSÁ).vH÷Ž#öZMÈÑI÷_xTŸ?c •áe ãˆDX؇ÜsÀîI¥Á< ˆì¥º‰—Ó´]à}J|5Rø«×8õ”Íâ €aŸY‘%zÚCd’–ËC¸¾{T¬Ç2Ôz^íÊ•vJ¼°‚Öþ«Bȵ­òˆ£T¸ÀáÕAöØéG*Z`æ•X¹y³2œ ùˆÚ]C’(¢›¡9\ïÔ18ÖáL±?syÒÄSŠu¨!·â DiµÄr1zñùJZÉÉ–P‹¥dÓîU_Œ!´Œy?úlÃ_>[¿·®VÅ8h÷°Å²UPÌ5)DF[®Á-ð½ë Èúǯh½2Vþ[Öb0|î1ÒÙF ‰u*(Žg…óˆÊuMOB)©Púd@f˜ýýÏ×Wã«Ëþ…‹;©üÇxø±ÿaþyÞþõcî‘)ОH3áuZùß4ß0<…Ýv&âƒ$˜aRÇ`%ßN÷á•q„0À—"/Ôý¬¤[ã'5×Pž hˆËÒ …T9JEò AA ÌRRÑ9QEÆÌmA_вf†q‰OÖDt°Ü(."$A=wþþO?•|PÞ¸SµÈæ¤'‰ê9yr‚Ug”qRZ+ Cô­ßð›:×½,W]ÔÎyØN ß™ौ7ö«Ç¡„)ùwƒ ÅÍ[vÀŠA5£ö®M/˜%X1ŠÚæc|åãÕÝlM‹E’$Š‡¤”PPùÚZ•¼ž$æQ0D_%[sß M”Èxæ󾧇£Ô(æv86Iu¶í»GŽñ¥B CØkê¾í>"¤ä“FÇ‘Ý®ÚÈ„Èæ•f2¼U8ï~îŸ_Ÿ?öºWcR»n«+[Ó«F®vÿj(B§ÆyÖñÖßRž=£Ž÷êÎvá ‡'.j:í Q=ÉEÞíºÊ—îLúL¼ÝVÄfÄkò ,œŽÇ£à#ô‰)ƒ6*LIó™YZÉ @uW¤?gî·wÅ‚{ÙÜÉ[οC‹C­ÃSf¬]G6ô°-c1.Qq—bÃa¯;8þHušðE®Ç¨/r·eøÀ n¡ 0X„Ð ?±V:–X‰X ôwŠ²G–AmZd`2ÿr8w+žø(Ctl5Ū×X;¯˜¬œ8p`t8¥„P‰' B}&©uÁÈ·ÅlóæÐäîv)=QÍEr„½ ö2 H¤êõ½2 uyبòx½ÿ’ò˜ƒì;Âä‹ MI©™Jw žç·Ùô7«sGùxê(i E‹›D¤Üب{nWXúüKt ‘rÀ(%-@ÖXÈ ÒŽwˆj èã`dFM’SÛªKÊñèüÁ/²MCâÞ´´õ{Hšò/¯zƒîÈ­à‹Þ§qw0èþ])Å(ûé®Öò à>˜ÞDllGÒðxKÙ×ÓHdêÀKÃìk1—ú„gügÎì.SO \4?ÏÝkå þ–H$¸-q$cüâÔ¨³o,”( jÝ3<¤Iá¾WÝ]7ÈŽ-Iû&õTk•ò.PD+—Ô¥õŽFý5#s’4cÀÑ.fËÁƒû㹋‘²‡¤6ŽH„™RÍåùåê§Þàê85YòîàüÍë¤h=вàN¢uAîán­.²`/$ÿÀÙG´šp¬GÉ8z_³ñ´\=h,%W#ûý7¾™ìßðY}Òº­)]jvöãøêºj¯zĽS 4*‰‘\f‚!Ô:5[—+¢;òågU]qÞ§ΊԴØ5œ"©p–dЬEi/®GjÄÇŠð¨¢:U> …U®vp‰‡¢µDù¤œTùú«'lã~5ÛÌÊ•Ú|Lõ¬¨¿Á8}$Œ˜P)n×$ò¤‹Œ Óý ïÌrvÈr&|›²†¤u_¶lÒXÃ~qpûÖ·ïb¨žµnáLÍ9½iò©´Ê%‹LcÔÃB©=Ò¾çB”/RIµæOTÅ—©§=Îlšä ®øž:D»µ=Y:³ùÆsºz¥¹Ì‹«Á©óŠÛèY§Îó{eÏäÁÉ"A¼-…Ç:®. ~î †í%o¤…<RqñþTbƒ ðçWŠöL-9ŒA! †+šÄÞH"bAðƒõ>mì° ÖŽúç½ñõIùõN‚kC™@´WLþ*(žµ~„äcšÝÜ DpVDÛ«r1 Ô¿)æ!wàî°¿$Bðƒåj£ª¬sè´”-bAož£‚NQ’ŠÀÑá‚7„eÎÍÒ“¿DÚíÎù¤mçùZ=¶âF­k ±iBw ðÔËÅ£ñÇ¥ ß)‚\F\ê²Ny£ÁyWs& Šé踌-µ)â` ÂZê"RÕÝÑ eîèýë_Yôè>_¯¦ê±>¤A™mL€±è±™F>5'½h8/nDß&ÉÑ8$©iaÔþMëíŒC¢v뽪ܮ§ùž;¹` )'̃Ï[âo$;IuÃ}“™góël{y+A€€-á€IÅ%³¹»Ž¨¬"áõ Ex-bh ªIËH”\9©f`F›JJÚ:Àí UÂéoÊåLU>lB8XÑÖŽšÅºâ’P{¹n´ào&Q䬖<·…4“o•Ôõ’%¿M 4¬:°©»·.¹KCÃéèfž Z«_yã3K]€ëb/ ™cVâ3“MŠÇ™A›=°„fÈ’‹XA§y¼„N#Ÿ,`â{zX ?–¿åëRéA»£Î&Ï‹¶:Ü”‡„ì)ãöPâåLÏòbí¼vJ—ÔíšbaOé¤hØðØ:ñ¹Ýœ5½¨×‹üXÀ=¨êN)#|Ðð¹oúêèíÑk:0}“2Ijå@5àþ±-7BS éÃ=¬=+ÿæU 6Äm¢PÞ °#GÕ]ÊÉ“#zàMêA±êœÚ|¤À‚΢RZ56ÒÇ6£ðf³ eœ®‹ò¬6¿êÌeέctpþºÐ¬•1Åkrz Ä‹òŠboy¾Ä‡œf«èGàQûH5íž]}ìrŒƒ!äf  ²iE•0Á?ÐÆQî1ÁLïþÓŸ£¦1ÂDF¦'º à9Åk^ö]|ûDïNŠìµd”ðß™Qõ-4€R¹sîƒÛätª\.Ó+-0ò–PÞeˆÉ 03ÎYSžW¦òLX<8gÐb$("͈“%àªcäEÌš°}ŠîéoH nGsðDíížb&Í |ʾ|RÔ ìß*©’NGTÚ7¢ÉáÉÇîÅÉYÕß[ú´*Æ Á´PÍŽyÛéj„ÛIJPÖzçöÎä!}="ÃŽGÚ²bô’Õ–kl'¡ò¾ úÂm¡.\©_*½BŽÑó®µ”ø/L“„Ž}›*ýêfûÒˆ(³€ ‡n©LT” /hæ½|gFʤü­ÑJRÔ´GGi-Y-8JmN2‚B+ÀŽDh²'ïäõ‰ŠäÍe¿ÿRP‚9Áw–Êâ²Ìðd1œÛ)Ñ@¨ôÖÁÅ‘™ŠÓ!ÆÐ; f4ês‘“w †¶¸¹Ämº°õ)¿sÚ玜ƒP¯u1\ÀÄ:ûöö´ÕN©kS#ÍrDíüÀ}ÿ÷触NâÖ‡‹ÖÀ[»€ê+›álv¢ÚLÿô'E$µ~Iú3k¡¯`„ÐÓÈ0!Û°¨ÍŒš€Â/Y"!P:¹¬Ÿ~WÐrºT¶bè¥3ÎÍÉa ª:BË‚5‚1)v&áè¿¡‹Nt±X$ûÔÔ@Ÿ½9} %ŸHõ¢µÒMé»·ä ¼Äó?…þ=¬jõžï€H‘¤©º ¥’ØŒ“ï̲\S “ªLµ® ­„V…s» ¬’A ˜)ê™%¹Çt¢sÃ÷þD©1(~-U1½kkV…(£:k$}õ¾ß2ÕI¾I˜õDyr&š PTRöeÅìQ#À¿…«.ÖÇÙ¡rÿdË,D%JQÚ9BîBqNl-­á^šö’ „ž4ǹ¢CZ„ þ(ûâæªÊÖå­sü—Ù—r垬¬¾K5ßzrŠåþ²ø–þðNsÀî¹uvò‰F 5x¼d4s«¸YéÝ£ÐbË1ŽR`Æ»l½8BQŠˆO6¢ðN«ÂF¥ÜÀIß;L˜ƒcÑV2çn—¹f“~˜ƒ@bß‹ SäÏB\Øïžjž?¤'GéY6p!^þcšÏ ÁÌP¸ökzì>™/‹/)g”4?šfÜ…F5îþRÞæóU(}­+³¸êþ.xIˆ±ôg”Øê¢7šcuÿ÷gɱr®^I ¤{̺֒@£ä:¢¾#ÿ#°0£¦H†ôßüðNÚëLØ=í£³Uk艙›£Ê_þ’îs†ö ¥¯Þ¬Ø(„ Éă…pô¤G5Sw­/y¾JȳcÕâ ÄnœàéHŠæÃî/=jy_^_ ‹…h4)†gYͨ[^Ìÿè¢;8ønçr¾ã»Ê;dŽ Ÿù+Š˜ÂSz,µì³XæÌ6ƒ£8h´=¥îÀYÉl“PÜáüòyÖÈ‘.ˆêÖÙ2ïÛM`Ö+T­i|ˆ’HZá…¦¥áP?n”ÑðL@ÖGŒ±E+ã8ž0ꦮõçJR¶#½|7.ˆ]‹´|`O•<ñ!e—4æIç!ç<%ì¸/˜gËßÝ•ÆÒÛ?ˆI²;}cYÈîIZo© òþŽiÈ`Ø ¼wc‘Y²ŸòHÄš§°9UÛòß»è¾wPÿâxÐ;ï]Œºg;ûf´{ O<U,YÖbÃ.vZ¢:ÄÍ1£d×Å „Ùm>®~ëÀóz4BLî ãÌëÑiqSOåãš°y- ¶J4Ð)\ȵÞo˜t–…yÉ•_ø8E &>› Ê„˜¶ÕV}}#±:¥o”Gr‹ZÂÄejŽ'kuj `a)›Q‚—Z$­è‘¸6`tθdK_©q‹9Ö—:É¢©ïhgI]€:yJRex(·õD-OÕa8L–îS'ÎäþD§rŽ›%7źÚháBš ¯£I-rªIê Ã˳® ·”h),u#èÔV¹ *dνv›àÃeø©í…Aß›Òü›ý «»‚›6*&µž!/2Åb”‡£6™1wè .ôøOb÷$º @ ¹„œô:ú’)ª•\Ü€ñ4>BoîŒèE½ÞÜ=k½K´j!Uû±×?ý¸ƒ 3ÖlK˜1n¡¾¬JA2lkÄy«;ª5ÑmVN_ˆiÑLFÓЎg—ï»gc~óOæ[|ÉQMO„s²uý:DF½è‹ÞqÚû4|ûÃË—é>Zì™d÷©4õŠ ÷„éö¡Do ¶O]ô% ©¤ADBW -|ˆíÆ|¢å¶AùÃ9ï”yÂt¨zDH2|,5n·_ d›åÎûÐoáqðž]æš.œ›Ót·pç‹ö›¬" ð["TM&mÜËˆË ŒÃï´‡¶dE ÌkKƒR.¸Ö4T²ö,^SÇ7†ucÿJŒýË¿¾~íýòíBç_Üç.“ù„#(c-2ç–Àsùåá7ÚnŠ6îÙ홪1©”ÊVfò-ÌØu´‘Œ@ø_ôÎ>DK‘”ž>–ίšs}s©ËL9B+JmQ›ù0ì¬F¸ö'7îéÏÙ¯Ù`Í-†jòï–U­ïå(!Xk†úZšØ¡…Îà‹;âþð¼›rKªÅó’xæ•MbhtUF—,DÑ/f'Ï*äÖ·º !À(ëu“ãØÖ HÚž´(…–(–eC¢`ÔÛI j”õ˜E«×ЬEöå¾m<¦8©‡Óž@"H>9÷(±/õp5*µ£û’ È‘ +Ýìç^ϫÑ`HÇËÉûÓñÇ“ÁŽ 5qÖ•jä&‹·^ <öOûgg’&IœÃL©õ|VÃRf"Þ8iÆ$5RS«¯Òewhÿ¯r—}unLnË—äküEÙ+2›MX´o§î“/iRC`r®Ÿè÷Åò·bõó åPƒE8bjz˜÷6Ì°PïF£›‹^ï„áW´mÖF¶ì8‰Ê;È&aÄh€¶ úc¤Z²‘Ú@`ˆoñœØ²õQsfÍí}ÑR KäÄ-f„¨ç)à(ϱ '›æ•× ! ]5X2ʤ0๥ÁŽùÄšˆ)gZˆ­ ÝüH À~¨òs P´¸»ÈÅeÛu̹qœ;;íÍÐ _¦ï³µ[) Âdæ4θR2a!²Ai½î>ycM?~y¹ÄC'´0A‹3îbzÚMÎ-D§Ô´² |0½C‹F{û\ôÁBÄÁZxÜ`•åb|³ô »õvIp2ðq9Æ"猙f æTïÀöïÓYDÖ’³ÓQ‡±c:Kú.ô]±¬týUõMþƒÚ¼w‡¯TnЬ›¾ÉÚœ¬^‹™Mªƒ¯¹;̾æ¡·`JU*«o†d‚U)ÖœR-XƶAÎ\‡É‰|5“ù¯³el]p)#åÿyt·YÌ;ÌôÄbhâ]©²ªï« ÙjáéžRGýœ1>nùÓ¿Ó#ØëbãÛèOcÞð Ǹ¸@ϪØ=øÇœ9ÃuÖŽ|¾Ü-Ϲ[pIg´Õ&ÓŽ̼Ѥ‹9Œ¹Éÿ71σ>Ñhj¶q¼k'©Û‘-?È™` ¾…èk’ › ?^FLÝJ02vzî)˜­½‹@Ä ¨ƒtâÖëØ÷ùÑÑÑžö_8c‚³!›¹1fPVÂ"lµÜܘ|ª§=È˨ lw›)h3xÓOq.I2Ò€ÆÈÇà¯}[!è+çOà‡7`Lµ‚¦ÕÂ-¹O*mõc fÃd:-†` äò¸ùwóyB— :à“Î)ÜÎX°,IÏü\§áóâT _v·ÝuS­3Uì±Ê§ÛJdÃ<0`‘qvNDáñ€í±6ì^@hüºX'ÛÛÐ-ø8¾$ê¾N£ôγQ¿¡ANG Nœ¨¨+í¢‚yXY´–Òé,{“­µÏŒÎ¨„8w|«EôR,|ùÈ~T×4ÐQ™fug­s8£î#Ca‰B–¯ËÚSx‘Λ°ßçÏyo≶Ó³ŸW¢&v_Ò2f,©ù¹;ÿ]Ûç1U/ŸÀ0¬˜wn V¼ Gl—Rˆ²~O4ñÂKX¾ô @ŸzT]lˆ|J d77¸²Ö`掊8" Lã!0 ePj6ðŒš†'H†¿+t+wªÅ>€AÉx'þ&ƒL™ÖEgÇ(‰É«=6%èWê@Éݘ~‰rQK t’@å‡`zêÜWs®¤·™°p´ê­ëðMKnpÍ[øVRþ€€üŒúŸêQ_ySo’X‘µ¯Ên¼])þOlf…˜¸<Ç’$ITVI¹™ƒuöêä 0nÜB^€2ûàÜYyuR„µ¶úZï¼F¾nð r®¼~žI¸Ô{Í3nÐ[=>/* ê½H›ˆ„®•&‚ÛŠ›ÐÞ’2N©îì»ðpƒ<+Ô´éHli{'<ËaJðÃè…¤Ðc@¨L0ÄÄ°¦Ö9ÙX‚*Ç͘ÂøLUý©È­û†J« ¯Kº!Dä¡1ÜS‡|ƒ'ä Þí»£o5li€<-ËÄ·‚ žÐôdKk&'p— {ŒU,Jgˆæ®X—DšX<Òº©JÉiǹJÊÙD ”¨ ]uñ®(K¯È?1we0UëBZºn€Â˜2ÿ›æ-VUŒ¡ß{m¤ÖùL[/¬öKØ«¨8¼s}•#”-O²¥;ŠÒù4¢2N…u7§d| Ftp4^tppXe_íÝ` Ìó·—á”Yê=õg¸$ ȶˆ§ómiã áQ¤6‚³ â Å$‹š’ŠZ]¤=íàE&#ø0å!Ÿ‡ˆ#Ã?kdøöQ®)bü-h*}ÙGÿ:.—nÙ,˜‘ŒDtµ0›øS@܈IN³Âþ˜d.›N HýÍCæ8 ûµáã ßUDì.`g¯¯-åvíûG­Ñ>.‹dû cxI0«’hR"ŸÑŽýþvj~Èк%¯ø@úÍnbË¡áEnìáÝU$Ù»$º¢ëá€Úé•øNúöñ©&¶Vâ@hrʲ]÷¯< ÓwèÙȼp"SåqTÊ\š"ª'Áh–R¦ËLêOÅáß9¾Û.o¿«dk6œ˜Zþô'λ ÆDÞ­Ð(¡®äšU±qŸäžDeÍj£”³ž¿WÑ1~÷m&òí݉­PuŸ†Ë?ðœfd1JA§hrÒƒöÏû§ŸÜ[J6Óþq ¡ô4CícÞÜÿ È.~›&Ÿ³ßÒŸË_]ˆwXI#ß¾¦…¹Šê ºS|±õª;Ö¥M¿ î oµ Lm… q>é*Cs€ÿ«"ŸæÑçOJ.Â`lÿ±EF¤Úï6ñuSY4 ˜ÅŽdŠJ¥ Á@An†mFB9QäàXA{Ï%I¢õ—@É€šðl·§óƒj4´1I!ø¿Á.ýñõçfì‚çJ@y]ÎÉË¢0Ë_ˆ´z5†°Îdî‰K›ŒZÁýÕ„zû “¥qb³¼\Í™¶Ît˜¹Fý½Lœ³У¨‹ aÔ…ÛŠóLýñj|Õ­±Jß>ázÀb²Ï÷OaEûo-¨`º´õ7á±`R~_Œg°‹¥[ «‰„¦6T“mª4ÍŽ%6’ ÿ RÅ›ÞÇäV/£ ŽŒ°ûRJ7ö÷ùòW¬¨ô,G’æÀï¬:Ljp1¹Ã+d-hèJ‚[_¦µ‘|ÁyƸöƱ§YÕ d¬L3ç´MÆGÚ¸¢• ú(¶.Y¸”‘6˜fbP£¸#ò&Š¸¸lÈNPóÑõû÷—ƒ xÙÄ_à]Ö¼]Fo@ÄÚéóã¦Ç{èÔlG£GSÉߎzŒ.ȇ¡àŠ> ÁPÂ…ñ›¶ûmÖˆbé/QÚhŽ`Lý¸³Õ«î0ŒŠ,TßB.µBý"ÏÐ%EIéYç`·!u&OÍnrv¦ÊCã>mÇ%ò€Ë /Å–º&Ú¢ÅT÷s ²ÛÉÆ Ê þ%;1(ƒ7*…kبah<î!_6“W"‰Sx‘ƒ„ÄÙE~GöÁÇF$÷A(]£çˆ;¦Es&JÄSnpIJ÷ýj4r¼¨î¯ : l m…ÙÄ“”U¹'y@«u]9·öÜ!ÓÛ«^w:¥ƒiÔQþ/¡*]½÷(èCiœÇeE›&@:žïå&9/±ì(0¸§(U>›C zíÏð¤õðåÝÖªY’ç0ÚAˆ$4Á—M$Àܘþ©¥8¢þW½:Ôî=Á'7¡ QÄ%ΦD‹“\°x&aòü¢h"Ì™–¦. â—«„éËY›€7Ë n™¼”±„VSpIadù¼Âš98¢’6ì$y¤¾™™±³¤;;ip.ñ,W‡[Næ^\GJþ”ÛÒ˜6…{‘rÁê5ÁÓZ™Èkˆ$R+¸rß ž×h8ó¶—u 誤J>Áýè#—2º'Péh¢Í¥O¶çY¬XéZø쉴ì*1H„¿:ãåSZ80>dãËwh¥çeÓ×Ý”c6Ô_€Ñ“š–:âÒ1Ÿa¶b û12”B\ÜÉa¹¢b—X2ð¹ #±á–ûI T¨SìK)lžÚ6š+}ÓWU‰»$éI\Í…ÏÛ Ð/ólV,œ£?ª@ñüµúR$¸hd(”΋¬úÔM÷=«…ÔÛêw&]ãPYŽgs´@”ÂLoIؘÏFb_(òÑIÒúÿük¦ªs`õ¶‹±táȼ{4¢½ÞûáIMßÊÚ‹Ï?¼{áyÅ;ß’æs2âÙ×䌅rU[MŸ*8í0ƒµ‘$ÓY¬ óQݬ!ž8?ï^ùˆ3 ÙD0¿‹oé»-9™xçì)qú´5+»u”!9?^mÖéŸè¿ªßܹ¾ä4?cq«$t² {‡—q‚$ý³LÃ5Tóê¾Ïùò”ŠhÄ‚·¤ƒ°¢€D¹vѸ­„‰œ9Á%Ë´çlá£d£šhÓæM}ÌŽ£ºQ­¡_Àu+;S ³v¼xZè,ÁÉ`Õ„!šé™&R¢4tûÜ#| g—ù|•Oqo\— °.6“bþšý¢J–` *òŠJ• pÖÝüœ}ÔæîATœ7¦p’©`ª@_ý¤lèé!Qß“-ά쥩Hô¾º9~õòåÿòܟăo ¯DœÔ9ׂú™\ñ¶$½ÃÁ æjm5$(Î…¢K ›k<Ýõ@ øD6ÜÄ-¤e®]c?;úr”¥è]%͹þå@eé†GKjmëÈÎvlÁÑ$m% Éž,Y"çQ|-P’¤íìvÛ— iÙ÷ÚÐ ½´°.ê ~¾‡Dßý¼y+(€ 5*£¬^xáé±uXö § °½HRz ¹š„Þ·L|B+‰JÛ’ëŒT!<†1O5Žš—ŠÄ&׈\v…-¡r?è™àêÐBݶ+P®ÈekÇLoíú{t•8`HIy N¤ªƒ.øbœ X#¿ éÄn¯kˆH"dû'ýáqwp2þt98ˆ:ɧ ³š«ý÷èÂóõ½ö¨™Üßbç)£,„q‚Õ¸ˆUˆ‹6TÏç |‡[å2½'ŠÚ­É, öH!qäðýÓ‘uxnùLª» rÀº%VÂ-C­£Z¨ð„ziÁ££¥:;³ÎPšÖ_L+(U ¸*%~¤Œu~—}EœK‘ åˆ6œ JÞšÁü¦®ŸÈ%ö:¬83)W%ÆÔcVs4ÑãQkgP2ò™„Í})¿žF~¸—X'®OVÆÌùĀ€ÈgƒÄ‡ãà`ù=¡õø¬ËPèrïL'š­6n„‡q£êa³s†æ3ZmWbÁñÆçب5š»î‰ïÍÑ#?R” v~݆ã$—]N*ž© sUîC+»ÉOrg‰Û&7›Cj^óÀÙçxïóË¡ò8§gmÖ¶¯®ûrU-hqÆ„O(%&z)ØR—Ï¥‰Í CÏ©edøá•.ÝÀ’‘9>ÁŸêâBôÊQµýÉìhÊ©®Só(E䡆áoÉÆR·ÛV:ÚYÀ…¶ùò®¼é˜¶*I¡&ÕNòš¤R –ÄÈNS5aáçëŽoˆ2G°?}-¨ñÂçAqî[Ý„ø^ âwÜòÁ›IS[¨#?Á4_ƒÒÄÛ4Îà{z&i™Â3çý§Á§S®ðC»“[?É^¡Ñ¯€˜imyiMD:ë¨ac«\ú­ò„G*Ðì5Ë4€]Û™:ÿg®mcH’m7Ч$ßW –†”SR\¬R ô óÞôûbî(ÀW9e–³‰w7w"ϘŸ´,H¯ÌGÒÚœ¨¡Èê96?^ÑäŒ% .=HAfì‚¿‹Ñ {1Ry£‘$ÓDÜ ¡ú‘ÞëdÌ—Ù€4Y{̦ܢð}ÿðþ¤›“P|`¾ÕóœÞI AÈË…Û^‰ÍX$䥚ÀΣ~1]uÔ]·òH½©8OH¹gËD¯Pf,‚шtä#DÚX`ôxq«–‡s×öÔìÊ1SFDûŒ°¸2æ|uÞhÅy –ÞÎã·dKõ½è «ZBÜœüÓÚ ˆ ‚iþ( êŒ[¡™3êf ÔÎ$¤’¹æŠó£ò¤ßŠ¢p4zÂÏ=Š[˜¹Œz~?öæý®5g‚t‰$q¨ï;ÑÄ%‰Ñéz>F˜å-gÄÎ4F1'¬lPyépâ-Q9âàóÃî@òˆ½î)D´?õzWÊK L­øY)È£}DîšpÃ'ÖÙà(:ÁàâE'.wLA ËCb‰k”¬¥•ŒÓôˆC凖žŒQÂwãpƒmõ"[EEGs6?&vü<@fe™õ&,^ÅÌúŒèïÞ”`’!¾1«,Zs]¨Œ»x«-;^ÀªS/$'[ÈD«©L,Ç›%Xkîß ÈGž¶ª·Y%¢0ï›;©ýÁŠtð¸3Ê9œª›•œÚf\6ƒ“·¤ô¯iÚà ãŠ{à±CêšHâ†`l> ½Ô¨èòb¨LöiæÛé—Î# xRÀ«œKµxÖº…fÚ¯—DP“VpOK¹üx¾´R’ò]_"(£‰X8¼N‚@6³¬©Û»–hRk ñž±"¨Z_?yclï~¨Ãqøo,…<>»uîÂæiœ(ç] ‡ÿ ŸöªNšP"nò·×!',Ì•\öXƒGÄJò%›c14 —fB½/Š¨®Ã¬c@Z—`Z Aˆq[lR)I­k#›n:)¥£¤?Ø­ýEWˆå:lÊïE n#Õ£˜Ð Œ)düΉPUM&HÖ‡G6*e qɈ9Á´ÍÒ.Ž„ü„kžã[Ž¼CÀ ‚)›=±¸"‡"w(Ð(QC¨Š!UÙ‚)‰2ÔðѲÞ7c3 t2Ê+pz›£þ²dc!jr¸Ø´\Ñ”±L ¤;RnwG¬6v0 n^Û¢Ú¢‚õG÷M£µ® _”R\5‘˜±P#ŒQè‡*1ç‰Ûn]º1¦ÛÖs2Ò8^〣¹ƒ`íÂܯ¼)¶°ß½.Õ Xtw„Í`›ï‹eC%8b$§ÐÂmœH™°r†Q ¦–jËœ¨áû ¨§ä7]„°O4ç‰xQà~¡¤&a ×¹Ýó7/|C%£ÈØ­¡@¡ÄÛ¡‰ËØýAÿóø§“Ÿ•~Iß-ª÷£¤ ß‹cʆsy]ÂArÃÂú6´j4[ÒA¾9¹æÞs—zÐVá“_ºïë,ây`FJBVIR•^ólrK>_=,çm²¯zë€rîp>½°„j8ð@€] ò ä #§ðP±ìA¦o HmÛWe²•áð&ç-F¦Š u¸zèuà2ã/3®)S¸¢2îÌÄ·­Íp†›Ó÷qÑÍš¸õ5ç­AOĸøIu]‰é< :—‹ªDm"*þbšÃ}ÝI?†2Š²:szÉÝþEý(ýŸ› gî@¿ÿûˆ%…×Ô+)t‚ƒ%Béu~è&밺ψåÓ_¢ ñr6“(Ú\™Ï-"W6‰• ƒ€„~+dXbl%¢Q:0Íj⹟‹±œÜï.Æ™2¥AÞ…Ë(x—ª ÜŒÀÀ(­¿2EV$÷ñhqÖ})¤PæÆFÃHÔûí·¿Ä”5Ÿ*1¡ÅcÎ2Ÿ–ˆs«x ›¤†ëITÙÃÅ_ª~=ÏÈ(™QZëë‰ó‰•l;7ÉPƒè49•®x %gg|P Ÿ?VkzYÝÄÙ?Pç}ÀÍrùlI*#£Y–û §ŒÄ”½˜›“—¯L:ƾ ß¼X=‡! %•»•dV‡ï§Eš*ÐTSW«{ëÕ–moÂe 2¹ÁÔð„X$G‘oœ™^Í3÷°¿åëF·Å«x[¼zqÕ¥$BŽ¡ÉÝ*ó\Þ9<‘FhùCÍLKÁóIq‡áÅäºóH¢"!9ʵç°DÌb§/ fDñaÞ·søYm yœÜ’;ížD¹o¹õv5áÞ~s"ô»ÂäE”ÙÂ0ÛhÈ›ä쯻K¶2õ[ËÊ«õG¼åræáXÎÌ¡XŸ¯ïsªÚï£2• ­Âܦ‹úè*wFàL:0:wŠù§âNcuˆ¢÷’ÃçREˆ‡T~y(©5Ô *ß– ï.ÚBÝ$‚´jß½}ÈøÐÍÉ‹ š4bÌ7žr­=¨3‰K É6E„™”' %7$·ß‹§‡Õb­8ÁJ6)ÐR•$_Ç¥—ÀÁWÕ°EQ¾å‘î‚Ö†‘ªrU[2Pã›oQwK$ Ç‚~µR°Š8…Ú»«7•¸•ÌVmììµò@Ø7ù´©‹ªr¦÷‹ßƒMILNDº Q4—o 2°š3ûòä+c•ÏzÝÁøäòú=Ä£²¨'èVpLZÂT{TÆÒ|P;‘Êx¡wYâ*éˆ ‚öw¬­)“|^Ùݤq[Ãp'ÿKæì^¦}[lO|Ú‡ãÁÎ •Ú­çÙWPÄÄûÊ™á6%:Y ðaw9pžST‹M~EšYNª’fÑBBpif×]“b/¹õÆÌ<6LœžP4Í*^¾XŸ‚îNh0ÑÖWÇV;?ÆÅr~$2Œ()>mz¥-ÍÛ>\Bs6‰!rŽ^öÞ!Äúδù›i bìy†ðKºÃý—‹Wx²õÍÉË5¢Â5 À!/ƧCHDzГç à‚Ù°‡­=RRÖ¡`>’ ¹ê>j¾ÊÞ›ôË]!5SïñüÑWTÙäîh®hVî’'¦™Î# ¯›! C4¡8ýrÃäžîm|"Uk袖Ó;×x”d;ÝÝüÒÅa¾Ú¬¹ŠäÜÿ[½‘ï|-'Ò9çü2k­J¿’æîĢ¿zsrqùi|5è}èŽ?Æ­ÊÙý2ý”Ý.2àÛ?râûq}©‡‹J,Ù#åàPL+Tëki¹Ñ!³oS…’8.ðÕÃr“}ó CÑ)·“!H}›zŸÞHÛÇ‹M$iÛMçþO|îœÈ-w¶à8Üî/¦y˜›Ã}Mi‹XÊ_gøÿ´vë³ï”£WîW¡w®åì;‚/I&5íìSòÞ`r¢¼ºÏWÛÆ°]R÷Ç,ô|`[‡öaLׯ©ù%wšù 4+ûýÑKSɼ8°°“SþåvzT•¡Í8lC,}¾é}+6Çî …¬•å”œƒIP˜r5fm÷ñþBpð]’±ó_¾ÇÕÀ„ùÁÝë" m Q?z6-'éEöµÈÂœú`>Xå*<Èt Œ§T€ÅŽU I­S;<éØ£Ú8òÌ(ú X ݽ±f ¥‚U#éà/À`}ÊÑv™cKUmZÂ:—êÃú‹íÓ‘e@ù²—.ZÝr&ÓÎç‰umR|-JázqŽåm´¡x©ô ²²a³}@zŠ¸Y¤v» ÇdžÎ¯/€0öXŸÜTJíóÑ™j¶û{h•l™7 õv”m¹ùÒ+û/¿ á} ²ð)™óÜï¹ Ê@QIþ²ñÝl ¢y°†ÌJܘ” H$Ûëٽ˔°Î£_‚¯êŸP"…Ž±âÌPuGPçíj'‡›;|û\|Í–‘ÔíY·§­Œ™hû&Šbw°ÞÇåE^]I'8§]€¨F©SKA«eâ›.kCÝÞ1@Œ´Õ]AïÜ̆ª+šuÖ¹MΖ‰âp Øprp…«B¢^#ÆoéÁÞÐ@­«dz¨¹|^b]5à U7¢øOÈxoL¥TU Oz%TæžÞ§¦`Õ÷Ã;Ÿ·ë´fó:‘•&eÏî»·‰¯P¢®-…X€w¤Ð9 ¡aŸEÿ‰h±i-‹’¿ÛeÉ嚦0šÁ£…ܶy—Êc^*ä­Ê»i5¼p§CÌa쇢œf¢èXòÇ´¢ŽC²P4ª´ûߟbï´†Í!õÖÀéœèMQ2»/=*…Gl»ôä<3¥Ã×>W‹’&г­§R K*¥J\†7Ó`нZazGƘI2L œoЦ¢‹åÄpA¤%ÉÐô:’­Zö‰ÐÚZæª/IS½çŽCΓ\ðìkæLâ­G@@»Ès¡ÓI¨7 w[ä¨Ô~wås ~@¤ß*̪ºê<”ßôÝvÁ]㔜IÖR øW:!^iôßÁŠþ&<ójÅb;xæŒV b‘‘°36ñ\8vñØxc¨|UÔVàIkï#Òº¸»±¼wÏú¨ï#ç4ç¶1PIY@¾RM…óIz,( BÿýÞˆl=þÈŸä:LiúÍ*Ñ»ÈNb^õ`+/Ï«ð.[E Ëm>O‡9ZçÊ„Ä|Å¥,ž>”0â>?B*x<}äwÀRÌ3i ”ÿÖΆš[þö?ÓWùË__½<|ó2‚‰åT‰k}®14Ü )Z$\½HBõÆ`PBYú£{Ð/up)§»Hüù´?^^Ž{Ú äÃÚÓ©(²½Hð£¯dO×]-Ve±ãöX¾ ‹Gèg8’¡¢ ×ùûÇÞõ ?õ_Õ„&Š¤Ì« R¥ë&Œ®K\fýsLWkª·*sü…WõæE8šq€5Ç\â¼™g_LŽŒ!­0¼Aþ§¬»tûyùžºÀí•WÅ´$±ýëÃi¹Ù¸9[˜áëà Üñîàü…ô뙟ˆ¾›-$=µI¶–Hð‡¢ Y¼Éb§¶ÊE`"Yæ\G{+šS7ÏŽ$ÒQ²Žhè¸[0ìÏ|£lcÞH0ùÊ»<¸=’¹7¨yÌdUÙCr–؃<¨9WG|ºde|-¯W¥‚¹ü¥€ø„„´$Gdžg`ç €”&Æ(nz^;êîg¾Ê(ñëÇ4bþÁ- ¢ ÃÜICIλ|»&7n¢^ªœpzŒ¾3Bv©ŽQ¡°rAý]%)ÔÄ<™îsµµâ=«¯Çèm¾6L‹ä{€Ï éŒLÚsÚþË1Oj.ÁìÛÖ‚+>˜]q™ìÛAÝx¾ãùò/*p³OýN G$Ò¿·G¯¾çoÒYZÿ`£ èßðs² ò›_Aöåm”+] ñ™3Ÿ± €òç,Hkg÷ð„Å­zÝŸá‚ÿÔý¥ ¹«îYÿß»£þåEGP~òYo|y1>éw/NDÆÎm s&D÷möå1¬¢C2¯†Í”Šn>¨ê• °^%p–UªÔ"ñ² X/MŸ93¨D™$Ýáúk¤eµÚ2õ¼ñVGéè—¯ÒÄ&5„Ü :…é¿H+ubÞ’낶è»ð„?Ò”Õ:ŽÓêD!~ :p»sw´ž¸¿Sãrü6¯ômÞéѾku¾¢Õ9È™è/zç¹yz'}Ó+UÝwÎ( ê‡Âè./€äë‹þg&@iˆÜš ÷íÝ.Vc†(žüÆ>i¨Ú1Qu[›µÅ {f‹Ä¿muï^t£˜à>›ièL{ØwŹkÏ€rËNzþ¶aïôÓƳN^£¦í×~Šk'þÚÔ¨¥f‘‚ÇÁ#}„Þ¹£©2„oJ0ôNÙ¨‰î LÍ&iMvbá2b +áz²xTà&V‰š,ìm4\WˆÚ·¢Äª¬áhWÛõªt– QXçl-Ò7FóŠ÷í®²´…T¯Öi¤=$‡‰€Ó§Ÿ!} ¹-škÃM¹ÌbœB]¨âvq,÷ÿšþž¿g6¬L5»`”«B2òÔ2%°?RÑÀ^b¶‹líLjá ÿ@&0lwÌMkBÂc5;Ïr΄9Øf`eV—eˆÃ¡sŒîÍG¾qÍ%?0ÊÜ8׺•ë/ªbœ”‹b‰²˜êï²(»ð|À¸sCÃF8hÓ¯žÊ†0Å*:½ºŠÄ{³ù×lV5Ç‘[=yÀ.áúñyü&´×j†*âC+\º…E¾‡‡|ÿ_Ó·?¨#?ȧS¯I°àZÐçQ}½ftP$ÈqÉAÃ;Ýײ ÉúIÜd¸ßRëÅù V3*ñûä2‹àH”±mÛÛÜÄ'î-)¡K¯©n’ØÌ„(?¬pÌùL„D9hrp­×9Qõ©_«C&†‘ÁÐvÚ»è úÇc*ˆ8Ë4L|1Ĺ)83©T –@öIV‡¾æ¦)’a¯ð©¡ß¨Œ¶ˆÇê¤ –M0º¸ÕY”¢ÓA¹òΑ_[¯ÂÚzõ2òõPªr‹ÁÅR$¡D¸8I’1ù2#%Š„x#I±»µ1Kÿ~ú©ÁMüøÓô¯ k4ØSC¤Ň84»0 rkàâ©"lK“ Y«PîÈ·IvÀ%‚×mY ÁXÕ.SòD¨áxÁhqÐÏ r•}Ñ3náážzM‰9 œ¹žŒ'ß DŽJbdy¶$½g: gÈ%@èž}Ín· eá4ÅLD‚å(ø*{óê.·ñ^dÝw"ƒÀJftP”CæPŸjÂkR:çÀ¹"ézÊ‘B–®OÂ;¾êÐBƒuAóáh‰¾™‚ªíÆ{{:îLÎ<`ÊÚLâ•! Ž‘ÌE]å’0| 6uÁŸ™°À‹BFCzù8]GëÒ }ýj¨éû$–#©~%'fM.Û¦–œâLˆ¯@íðà‰‹Ãï^¾|©Í˜úÔÐX¦4½9†F¥;nÒ¥{"!Î$«•=îˆUœ˜J ¹)ŸÍñàSäö1W‹ÇÔÐC')§hT@v»äº4nÕÜЯT0§q¡¶N#Õõ¸ç­ªôÑëä1hÁWu¤rT%ö–ÜÐê t¥©›P!ݤÀt$çê²/ôÀ÷°râÖÜt'㘠 {A«æ*q´ajâ4CÇ69EJ =ZÄòl5ÊžѶ.û_9uŸ})¿ò£ òÐøïÔ­ó¿ûE*†èZÞD’uå'AƒÍgXu± 5¦šðWÅ*…2!,l¬’ËÈmÔÓLf¿WEÐ#l´ólz9L÷ OÎmþÕ^¤iÑÖxP|›F|fQÔô!^¸¨Ø¯î²~}¦Ú›±Ý–7‡FrF€;ÀkWÖsìâêiUž0­´m=½Im”еM²kda)ƒ´ŸÙê&Ï. ƒçÑìåë£?[m ‚Zæ¾to?øXËÌ*þ~8Œ8£iéƒú¹òJÏŠü¹Æ[>’lÅAj‡aFTˆé{w3X^· b3HÕ3ËJjBð±G.T^¤ÿ;}·3•Ô:Ž$¼‹È˜Ó8)šFM2_WyjaSm_RÆ“̶Ë$¥;¡nÕ3H]`f£tйc ÊÅü4{ÔË}ÄtkÌ0$©¤á˜} Ä’ÂrFg-:·ÅW–êólÅâü´ñž¾½V¤ŠI²Û[ܸøš{úô¸’h(‚Òc$¤`<ÿÃv:%RÄlà 2dß…©§ªƒKêç®›;Ö=@¢iàö,¦èï$8E¤°rÃíF9 7ñ¶Á§F _{ÿ¾˜#+ñÕ“¡]ëöü³;c-Nr ƒ«ß–ìèýŽ^j³7¿ùdA”ÅÒ´ýúHÛ¥[·´Þj¨›ö£$tY=rŠ)ÜXñ¶™ÌÐp<†"»ÏÁIßÒyº3äv÷ÍiÌÆåq1wQ?ÊŠuz¼†ô0Eƒ{Øúè>ÛÓ¨¾UÎõáñÛ£—wu.ÅÄðí=$ Ü‘ÃÏÙžñ`eYR‹eb¹‹ë¦¦õ¨X¸cð!½8J/òûê.[04H€W¤(G*.Bàssܲ‡µå÷Äê9ÕkV1Ù Â#ê]] ž±øA£%)nØN|sH…ŠÖK£Ob´çC§ r6ŒR£CMFz¯Ð°1C姧2ÇÒž/´/Ì'‰2CKO,ÇäÇwÛÉ„cð"»]–UÄÍpµ£¦Ób=Ý.*J³U…'øŠ%-÷œÓŽ“ñ 9c¼ “ÝÃüœ/…¸ý(Ûr§T"¼º2uõ(*™Ž2…;LŒâ¦¤ä¸Þ¥…”Àœ±Çà®î–ý"‰Öh£FÖ€%áaxÏK÷F”°¢`Û Ü"¡=ÃÀ$)ÔocÛ•9œMÚóªbú¸òÅæ>/@RZÞ²:(Pä¹'¦ÇÕ"ø|Fë‘5ð˜Ò]¬×Xo8‘à;Bês³b2G'Çã± ;,wŸÒáõG–Ÿ½s~èyt¤„a 9l¹fÂ\Ýû¿ðo=KÝÆ”è,¤D¬¿‰ vk‘¤ný¸GÍ7¦k–Ÿ:·¬1©>x'Y1g‡zDr˜èßÿö’æ§7LïGŽz•<)ïTO\ÉÞ ã›/…-N[%fi³ O!B”Úš›d}j}9¨ço9§"54T‹•[ÕUÄ»ÌÁyÛ“Fçœ-7H®)Oÿm›C6uJË p‹fÆ* ù­%ƒÍ™ÿM³Ã?ñHß+çÜj)C©'µgjxyÖô‡~0žî´›7ñÂá*1IGG%ßI>µÂ¾ÙÜ슽à‹ã7–OF× ¨ruêŽ&áÓüõÑ«£ÏOx!ñéÄË–ú)„õª§R]$v”ÿ@H‚dß™ Ÿ ï妗þ#‡Hï‡öbö‰¨ûº¢J‚óÁ1|cƒ–‹WAR6ý„áXÏÝ\Ðÿâ˯^…¾WjWŠó?\N-— -z÷öÎ?vmôU=!xDRe‰˜[¸Ì„¬òŸBy’«¾qJAß×oKƒ)Î'«%÷ÿeï_Û8²,Qx~ÇSd±ºÛ„ €]|)ËÓII,S$IYrwÕ ’@’L D¢€(ºÝçÙ¿Xkï™%UuOÏ|ÖL»$™×}Y{-oÏв¾)çg8 ®¦t?’™%ÏžNÓ ÖéÇž›U£_l™2Óéñ!¢ç‹\]+ÍBÞ °É&%ÎÁ`ÔŒ†ûRŽé¥¥úœÌ–•à7y‡ƒzáÍ›‡iýHêj.&ÔݱcL)‰“㳇ZÏU ¦žƒ‚Ì a¼Ñ¤@R߬øNÊPéÌ1ˆ8.®$ˆõ#Ë ¬P!öÖ¨dÅpR;?y-3YT‰b°x±8P_YŠ/~ ‡1†0ÎÃ6»;ö[ÀÙ”ùWV±Õ$ômÚh ¬Z#ë;o:÷z7Šä6”Ò@÷®dw†lÊÙÜÏÄÆæ¾ÂMy£j¶‹EM¶Ù„D ©ŠÑ)OVÊ)@S£ ÑHº'L¡>æI*‹_:ú³ 2$û}µP8…16{ ̪ hu0ä:5Åx)Ô·\yuyI7@µê (ÐÒZ‰P¹D„‰q6òÚv¹ø¶¸‰…ðp}1{Kèv¸òÅ0•%Vô<Ï“ÕÀEHãøë‰û ­ÜY0½M\"Pƒ+D$ºø†w. c ‘‚„¼ ñ):T?]M§Ü›.ƒý–Æ¥> ܈Ki¾ˆ`7ÑGç^Öéb>o1Òhù Ë³½ÃCÝe‚_Ðñ‡¾Å“l Bïâuß|õ8¹Ä_qR.nòÙ<·LÇFDì¦dÂMˆ“’EE¤“©RŠWŽóô:)rô]îžÎ`"<]Ìæ ‰éϱ-ÍXŠ f¬ü¾ø×Läqa'O5~p61dŒ‰åŠ·ýÛ›ƒŽFÂ>×Oë gáÿìÀ³|vóY°oð„ Dh-’4ÿ ‘§ž”Ž}}W÷ÂMµ}”†k%Pû˜d«[8UÑÓÖCú¢³w#AáÕ:dnITÌœ(uˆÌò†¾ü#–ápñÞ9ŸèQ¨nf8Ç‘Üc‘†÷æÊ ÿ’ŒcÂyÀj©A5ó‡)RÒ•©ÒoUéÆ{9²Œ®xM˜Ž+¢ÒÜ”ºš÷Š:) íh,:²>¤›x¿<9=>Ó{OW L§éJ·Cœ~(koR¤©nÀIr1¨&Ù«ñ|–KÑ›€D Å\À£K2æELñ¹@›:H)!OƒŠÇ‚B¬é  ”tÛ‘•ô>ên„9mT$põ™è–eÿt5õKh~ ‡Xd8?ÆgÉw0 -nÇZšÜtT,586±6*Ö¤ 4Ž’&ÑÉãÃÞ&ÖÇ“‘+„23D£(²üˆ¦ Gë(Ö| :öóaX;CØ_ö‘t€e-‘°”PÉ°~ŒVˆ9ÔðL6X,¬PæÑmKiŒÊz¸¨ë¨Z—`gÌŸ®.ýû~i3Á­xþE#€ÊY¸¡ ¢¶/×(Šˆª®Š½ÐêÜ€ëUÆÙ`;ª›¢Ô}Þûל ©²GR"TYN,âà¦n$·™f5#G°¡1$Þ•HÂÁÙfÜ¡ îÑ'Á†Jníß®KN­ÝkÂh[\äÍ-Yì]Uò»„_™[¢ÏN(<Áæ9NÌ©–‚`½ž šÔ “q’àÌ…-Á-K󥂔mQX¼†Ô¨Ôx] §´p‰Ò ³£ãÁþ›ýÝWçûƒ“ýÓ—ggÇG©Ô*þ.)‹rÕRámÒ1‘ŸQvqý5,[ù\L?á dZ'æVˆÙ“\çªÎe©®â¤õ=4\uÑ›ð ‰ Wn)-¦±âVéÞ4‡`>Ò¸ðÄ{Eç~ýÏκUá=’H¼›¹}mÑìQô¸¶Llxor¬K.ýÒˆ/ÓäYü*8½ó6Bjè0 B…ÊÁûÝ¢lz„ŒÉó¾&M>k¼(s3v‚ÈѲs3ʯÇîÁ—›=|‚Î^–÷ŒÓbÞ6!j–«(ù€GÈÜ qeFk3[ÌWF™”Ä]ž­¦×KX¼|~ÆÞù§Ÿÿ ‘ÿEƒIÆ's«áÔé4Ä$–d®bhT¼+ÆÕ´ Î_%“öŒX¤Ñ Êè{õüŽçÎ$ªÚ‡3¦Á4SÅ[3~–¤Sx@TLÕÈ_ÅêùÖBž@N¾Üú9œ^’qF_mJÂV©å5Ò¤d-‹qvÚÏžã£çºŸ¤%º-¤) 6CÉî•ä…i­Û(Éîå.š ÷¡Ë: vƒ@Ãrû•uIþÁ4÷á™ÔiÔ”ëAjO{É­qU&ÏûÝ¿YéA4œåõµ1g³¥$×'ÜBsœ¾Ÿo–”Üb'Û¸jlhdª’§ƒ½cqy‡‚ tIŒ››ÎgoÌC¦ŽµhË’kHg¥¤Á¢IXÓå¢ðÃ4Q¤E ½‡“âM™Woæ/š â›o÷7·b¯xÓF—äÙùa’c ©ùÈCÒùÀæزåúî%rV=yLaSAèµÓõÜ°çŽ|È’Án¥ ‚0SC¢„õТšXî£ÂgýáIè>”…k¥ˆ:mÄ2ÿéÄY 5r}í­«ep>õ¶sqæCÒ`çU·tk¦*&e: I%¨i’^BËê&ÿ3‰’7Y“£½9`~ôVoK€´ÄWÚžÄÎ[‡ÚŠ¶±ª~ƒ8´@ò>T•ºc5x¸ZhN‚Ì:å—£oãR K/ÝZ¥oÚÿ»}qt›s8ø:yÖí ³= ï¸C†À]<æóщ„“Lò3°U¬®fÔÀ=ßu¨¿ó¿UR¥bQ:LϺ˜_Zx~[ÑB†‹Åí§á|>.lKdpÁ¨)B‡˜£|fÒ´IhV‰új¶ãæRégãŠî˜T:ÔÍ»nn¿Œ®ØÖ©_%æéÉîiÇÔƒ ¾lµ»@}Çji¼Èžf#&Nž’i0¥‘è®8<Ñp¢.ì‚`wZŠmÏ[z«aTª¦ÆÚ)ôúÓ†rŽ…þ£›È¨ ÷于…ô’ÏM¸AÃs«ƒ¿•³!%±ŠÌAâr™dq4`khEל–¿w•ßZõsí$/̯½ “Br½(%ÃlUòZo7wˆ1PdÕ)(Ñ‚°Š°zù&‹{zÉà™È· †_|¤O$ŒIAVšP%&ÅXŒìªŠÛÆW\‰°ólo¶ –y¶&æÞ|MlfÔj$pÏm¦[ £ªd¤ÇjË•…Gø2>ÂV³Šà~MeE'ì¾ØßýþìÕËÝ‚ÄgHè‰ òJBÒÂnáù¥"k.áÝD¸ÖÀy{#»÷2_-<–Z…jÒCСgù͈ÄüØNy/n¢•&0a-vm>¾¼»ælÉ”.»J B8%nÇãl~Ýàb[>ƒÓLòlV^¡ˆ¾\Œ.ÍP¥=LËQJ´ŒvÀÑIˆÈnE M6{Uê" myIù†Po©™G!9 YÀ¤r[§Kní´)¡qnîþ ˜,«Å[Áý«VÍÜrzð8Uo 5²vþT[psz:€°/õ¾þº(…h.'dÛX´¬Äà ëQÎeɽÔ¸.G‚Ž¯åV¦/oî;ß$ñÚl_ b¨x¿”Dz‘ ýcu=ÉöÇ~/_œ¢µ|›·¾ÙI ŒÕX(‹ý¡)Vê–4*B™&V;åaÙê?háG(2SŽ¯s¸nEÊ\“B'“J»RrÑbK ‡†sÓPtFK{—n¢9O°ð±"TóTìhËÄöäÉgu##-‰:X¢·ô-<‹ÊÉj JVšLkÒ‚ÈÕ\$X&D€éæU!„˜TXV‘2½~®¬`\!» æ‚^/&okmyz88&Þ;ÆýÎ:pü"zÙÑñéËC­¬ŽÒzìú½=*[vÎûG{Δ3¢\foçðàùÑËý£snàöú±èa¯÷¶’˜œkÚ#) o¶Ìc…ú‹À¯Ÿ)”¥E&‚ÀO *"Äf7‰ó#©l%n ©˜1 PnÓ’žÖQ8ÇŸfâ iýeð¢YË‚Cf»òF®Ð.ˆ0£œm8‹^‰‰¤"*I±[=¡¬Vü{ƒ:Ø^byÍÂ;%Ó@é½È̱ž¬ ý µ‰£µ­µè»ù'&&£š]å=ýƒÁ ëâr\M§wkÑ*~¤6ÙæãÞVS¡|ÉYw‹ZN&UdWÊÀÆ‘èÿæwf –ñ¹–€s˜;‡'/v6ŽÏžmlÝ›ËH#—ÞWæ„z •”\S¨Òe÷h§‰ëN¤õÍÖ%#Ž$:Bè²W?-&•ßs`’¶Ç¢,ªiêV¥º";ÀN9IªUöÎï$®‘ù@@]Økïy‡@$aÄ(ç IÔPâCDm=?ö@ÙÑrlÔ‚RXwRõª©“m™m×–(¶Ý=ÜÇ#:Ï~x™Ð8&i¹ÃÓçûIEP ê÷ûmHU8& ïx¶{{+™Ðàú‹ó”›U(?ˆ0.órb6 ámUàÜKÅb‘c—îz:4Bæ± Y"ûb:ùœ„Nˆ„Ìve÷ysvÙ¹hì0‘§Âî|J9³e¤¤mÉݬ¾;:ãˆrÅcó "áµÈŠêÁ(eì U1ÎB( [™ä;DÌj)0ªå´“D†Wý¢Yѳi½4hUPh‘0´ÆEk³²TÇ€˜ªšG1J‚I,Ã*D&¶BÏZÉc’ï=?8znzÃ`sì7Š`¨Ž»L–`Ñ´#Ù_¸–4Y¼™0Do„rüåz‘³¢¸°]¬í÷[F”³ž!o/š*),¶nÅÌÜ­aÁ˜$˜F\5Ø<1›aÕ‘êÒˆj#0iÒ±ŠĬ#Êêv’øûílÙŽ—³—ÑÕÞ=ÞUíTÞËlI_»“0øme²à§±6)öŸ·&·“²ê*S9ž<+d›·ÑŸVHÎ:*:ÖŒÔfŽˆø:;ïN<ˆ¡Öùõ¨´ì¸e(y‚q™òÔ{nQ3Ã+%Ä$ΕL$#DÒÇ ¢¢ ÅWƒÐÛ¼Ú5€Ä·7¾(â~‚“¬gÖ‹p*¡¼4„ ÅüŒîJñ. ´PÖFr–€=“®'EÕn, LZ©Ì^â X-¶=W-€Pï„uIA”Y+MI³ ¨þC9CéÿYÀp ›¨”˺T¢†[é™n0þ ;ÿÅÝ<)Œ¥2É&ãO_ÍZ;«¡[Pð½.æ,`„Ó9hk‡´ÕT#gŠ©ÖW,{Åù¤á<‰ÿ«s&RJ†Y(¶‡IŽ` ï›àV’æB¤½–p?+©›E*ê2a3`´ÌÿecžTN«3‰Î–$¹RÈ1 -•ke¦4m0C?-#¢•=$«áe–˜4\ÿc¤n1/fåD†h =õawÎÅ€V`OàÖ7p=UWr±°±ÁÇzå Uš+?öœYrSø‰f5ANΠ6‹·âø»BkŒKxG,ìÒx¦Aucñf3uü3DÕ5¡—nüî¥_Û9êìü) Œ6¬¢‚Õ0;Ó¾ Ï~Õ³•ÌJ"B²–ä õÀu¥î8ßGÍÊ·˜hÎ×Rvû\êááÂÐB.ÝÛe"'e§WZ͹#1lô„ ÂTœ›À€DÀ8 •ìߢ?Æ*˜`¸R»;Mè¦8™$Ëš¼’`&®hum§¡#ŠTk´ö¸ŽzqS7s~J[œ0ÕhpÎR¦âlxíÝÐùÏŒt+T ‹ðõÎé‘î FèFܘ™Ì¾“ßFyì´ÀœKžØUÿ. áB­„!𘿑þ_š™îJtDíþÆàS÷Íú35evñæš÷¼v^žOKRÊásSs]‹œèî ží4?%|:”olÂðÙ%è€]½ RW &SÝTò /¨ü€ %âäçΊ¼=‚a(Û„»“H„w Š$t«UV—ƒ/¡È­AÇÑKŠé´–•½òá#¨·IlËyH­+ÙÕ›»5àoË 6‹Päo ˆ{£G LNʗݤŒ1œ‚TõÇð¥žA8D\J|š«„zž¸h7ê ÈÆŸóˆÀϹpÞË@4PõÜBFt»”åD%”kdN¡f*ÝÄ[}a‘]Ð3#ÓR‚aÓD€« þQL°_M iMæàä,ó>ÉnуG[ÎÊg’¹zT],îoËìEùÖOÛaª³êr~ ËïÔ?ùÌo™;u]Q^£îúE;ìw½3m¨’¿8€Hli R‰p–´ifÏ1M~˜Í¦Õ4WF5 ÿ5Ì¿ÓX§[Š0î]]pKk*ª²xˆ¦ªÏs ¯sr~:ØÙÛëÚßÏÎO÷»Y1÷Ç:,àYŽ ‡ù¿› _?áOëðH³’ -<8È”„’¨¾©ẼoVÁàü¡DÂóÖQKABš(Ýï!ZU{}…-”Ì-šÖ}ý ªØVf¡Ÿ=µC¢–ɃòϾÛÍY©lÝõ C×¢‰ÔÆLÏŸ×3‚U}äñ _É1áF}WÙò!‘%ȼ ‹ÇÆhÍM€Ìñ¦EúÒ}öŠL]ºóÃ-°s7óF«þ¿I?.Ô`àU Õkpÿ{có&{š—³QïìÆ÷IŠìÕj¶ƒÝÃlO‹D êèÿ½qô†Ì—¿n䔽Eø”„ç›lqdpÕñèªÍÌ*#ËtJû±bc¡¬ñ–eÜšæyut|öH]ÒR*&u—E•ò†ÆùU n†!öüTçPÚ*Š1-3b¶B}¥ÔW…­¾Nw³íþU–ÑDŸÓPlZ~O-!jSš!è®Óˆ¨ÄÔ'¡#JíIÑ ÄÆÎÿ$c­“ðBúô•eÇ<,¼¯ÑˆTÞ#–iCH_èqj„ ÐãÎ;|Ó$4—TrÐ&®€A(Ñß¹ÉgBfºe-«ÜvÞ´vp.´ã.ºÈ“zZó¯wN7ë={‹!ù»Á”GNݽˆ:ÑZH~.AˆÔI—,H°¶ -` ¡ìÑ."O ‚‰æK"!å0Š™ñu‚’?êšÉ¼ÉØßHµ˜ÝOè"\µ¾ùQFÐo#Žf1±ÔEFmn70¬gIÉüÞsp-´Ð§ÞƒÝég/‹Q¾Y²34¬y™³–|¸Ä‘‹¥YF{Ü QŽ(óŒj`ÚÅ‚C§q–ü处E¼›¨¬†PT¢RDyÀ ›ü„ðP)™5ENvWZàp¯vf“jáü÷?/]ãí.DZ˜!ºë„aꮈzÐÍvL (©g ðÙ[E½½ã“ýÓoóŽö_vNOw~ (B ýÎB¥¶©¡”øÑ(¡‹¨ÞÖFªf+$¥$´¬Ì¬µ.ŽšŽ›[.ŠW[àÆïR½Ä ÔB²Öè¯BGµ’!vñÂ;1óƒ÷J©_1öMìúúQ¤aDê, %‘1Aí¥ÜÏý°Ïµz6ô†ÑZÏì•`ô&„Xk 4|•oq’y ¦6VÜ»RŠjí©‡ª¢“ŠÜ‘™çì'õâB݃P A4 dÅŒü†0h\'åVX;×ÍD×,þj¢g“=¼0FÝ™*.¦MN»wþI_ç3Õ¾²àîg%¯'jŽwÐÓã€a÷lçÜ%±Ý´qÿ@3\ú ÇíMÞä‚J’ëifÃ: j'¨wñ–cð Ø$¯ÛL¿1&²­1°›[L䥣ÁèÝH ^;[A@¼±~0o–Ä\’‚çi€¬”#rÍYm/Üð:†êQý[/üªšŒR'.©£ÆM)ˆÖIb”?ðÍí-0y\™‚.¦õ¤ò•Ä|®Yÿê'â¢õQ9‰\ªqݬ[òDº=9¿^=—Ô£`U5Å©F­‰@L‚žÅîÉ+w j®Â@†OY¡^5YÓäÖ=á÷¥í ï„‘i—ê¹@b %l.ëmDÚFSѪfÌE¼$óU.dû»úâ ÙªAC¥ŸñÀh%ý嶡ñ†5؈<~Èao–ǯ$W~ºˆ–ÃÚu Ý!]a,$/—a¬(“Úø9 $W¥Â/­4)HM«š;haÕRü Ø«³È(¡‰èœ®›ïŸÕÖ|§•žÞ@µE¶Œs/³Þ5]˜VzÞósçS£Ïô Q]bT4!˜šùuŸ¶…çÝzü=M’a±”h Ê5’=›Õs÷øá÷Œ‘½KªgÖ%ÕâW‘ùV*›8=~³F%O>É¥¢¾ û™ËÈ€®:Ù=í…½“…¨ÓaÅ͉ÿ*jN†5ÛN-Wš4ghSpž,] µ5~ÍÈÝHÈžf…•XA@“/ ñ"d]»æ/Èyi NM§#·Ú.¦¤BÜ­ï^îü˜==…Îþȱ=ÏvöÎÏdö&ëâ&˜â0ä4‡?“õâŽJ7Ä$œ™†d`á?5ãýºiÔqDªÖ¬­ò7´F<#™ê¤ðË…RÚ{Ãbôka’¯pÑ%½-ìó«r‹ÉŽ¿VLãžZÕÈ(WbpÕ,»²\;ç——€³ÀY{"ÞÿHâ‚Kç׊H}cÕ™%C±E8,x釳èÕÂî7«W ŽÓÓê"{‘çªAJk¬93E¸PC>ÄvI°œ¡x¶PrêÜ›:7f-ZC—z¸Uß{yIÔ+b€7–jâaJ¡¤Aê̂ץ"f¨ˆkˆMëé´ê”Zc¨—›Óce•ížsoÁü°Õßtà¹ÁÑCÛ:yÜp^[é¢ø<Ùš7ìù¦ÕþÿÙ¨Lƒm/G' µ.•7ʱ\èÓ1ì<H(lÉ^?y[muD&Á³h g-Ø"ÎK1?ZÁP>.9½ßy÷ Xq>ßΨD/›/@ÞþÕ¡g×yeALH`ÀÂLmô®)m¡ìÞØÐÂÎ¥. Œ™”œ08BB5!ß#Z´µ2ʦ™$[ZÖ©ÉþÛì-ÀI-šVàf6˜o}Ø|Ã&",dÏyû˜“æ–dG³2áʼn¨ü yåŸþôª±mŪñsÉUk´xdÁl¦q$ÿ¦"ëÄ{@Â2—LÔ.þí»öµa $‰Ô¤ ‰iâ­–ŽnÔî$Ò aƒaC-qbOŒ˜<(§¿Óõ „¿üËM¶SÉôëùÅ—ÏT/T°5ŠMÃKI ;åíÄó¼ðþTOƒX´ñY'qd)>ÝÁÁß²‘•9‘ÂI5 ;Œ!ÊåORId¹óò&{ê¥Í¾'ööwÑTo’Þ0Ã×S=,ü¿IóI“ŤT6hB©&®X÷[K ]S‹.¦ “Ò`îšXï¤âDz_ÈÞ\ƒaG#|0³‚†¨7o˜™¶izH€ä(öºUnN5[Šö]>A…KJŠhnEX…›åÃy™P‹N¦Æp°'”#ÏËËYq—½¨A é’U<¤zû£†i´T¤Ký$†ƒß´Æ&§’ …n0„¥È¨ßÝiü©½*üûÃBµÞìÁÛƒmÅzÁËek89jÕOgP¢Íg½<Ì“}f¹/— RÈ¿VK%B# ¥ð‹zÁqv|k{ÌG¶H:Ãs=-®zL4ˆŠ0íÇŠ¹j–xäsìA¡Ê™kŸja")iɪV¿6 fŠ™$ò¿Ù‚‡\ò˜“~ò½“‘/ó®ˆtZäæ¨6æ–° ìÒ˜ä\îø¦à‹“:aœž¿VÚ¨ †,´ N_íNX/NÖ;•µ¥ÓȉÞàå—Ò¢&ýäÉ}÷¡ÛÑ6PA?Ì`½ Q%C£ £*ö¢iŒT<ú”ô7R…œ»(MÄ7üV¥î×|ŦdƒË=¥|+:º)1ð¤ÒTÑü/ž~vðoûÙïž4ÂS½:Ù£)í‚Â0M+E€µ‘ JšÁíýx´óò`wpx¼³wpôv« —v|Åï:Ò±Eª¥Éˆkî8QXà:ûy?ʧóZf®dbMY¯¿z/jìjËÂ=ÉýˆÔÁ÷Ãyè‘hœÄÏR š L¬ý7lLV}AÑÛ€˜‘ÕáH”#_°ö{5tw¾D%e/©¢ïç‘ØÊ ±(ˉóN›œY,§ ¨ÿ¯¯¾—o$K¤m¥~n‰r8f¦x¦k… •ä¬‰Ýèä­`ÚŽÀš9êa‚ˆ (£ì”3&]DNTlÈ÷ÚìãkaåkæFÖÿÇl„Èsüh5È© ùsJ`4/ö÷²òcá}ðì+TD6Àwßàlá)më§Å$U|€ŠÂ&ãÜŠR^R¦@ºÑ21<@üíMŽåƒ¯Û]7m®eþÙNªw í0éÅÄ SCú€Å„¹Ë€¹ÕfêºF¬Y¿Iiy Õ’N½7 6{›Æj‡,IÀ9´+ó PzW'$·_j.Ç¢…ŠWõ6J—¢•“ŒÝg;g篎w¿ohsêùâ⢚Mdl[–'K, æËÈ‘¿Á`Œ]~]â]Rôuq·üX»>­ïn.ªqZo òä*!ó&Î]¿4PmJpº}N¾nü<{º„Ëm"üT‡¡XL¤öj”Æ„°?)¡ñGðªÌ¤žD±ë†xI/:*Þœ'ל_{# Îž-&oaÞ7Øâ„‚¿ÜzlË[ÉDš¶aö{~Jæ³±·C+¡"bdÝ&/þôU{¡ 4Å=Iu7™—3ÐAQ€^ìAw/{vK>‡9Ãô…¤ae ÜbD0ûhA´†ŠãìF‚=㫉ä1LÈ£%ûñàþÙ'“•dz–†¨IÈT³pëª-Ûtv–LïäÔ’–Xìê’Ú®4œHÆ)*±ÅwIÜ™ûKaKÁ­Ä±­®3²X}ðvÓÚ(_CX†Û^ğܺ†®á=8{Å|\\ÖíEÃíWRžÍ4nªY#{Üe"¹Aig„l­ä‡k­ÓƒÕ6K+fESJ{ÇUb§·ØÚ¦Õ¸dÀêñO-ÞA‘[„YføO¶y%ú‡£“^n”™ú•“Éy®DÜ&\Üüâ2£˜èê–‘h`X ;iÒó}Ò#šÁªJ>s‹r5‘ x¿UxêD¼^ƒùÝ’’ n&ºš¡ú?“ÝXEs-®ÚŒ7]u¯‹ Ü*cp+ISµ«øþáæ×=Œ-=;8Úîï|—ù¦,s9¾eC°àÆ=NWŠ½|(@’æ¶ÕQ~€äÆö—Ÿ¢s³ÖP ÓTM·x_Î×·"êg˜ÐOc0 ¡™ÙL?é*,Î\åïgÊ^Ã9Mp jgÒÎKÊø)T°ËBådO±&•¹¹e·ñ.ýq­ú<Ò !ºœm+X¦CØ,'µÑ\œ…pˆ`g1ž­ÉUí¸Å eìUÞLý $°(c?´AÚ2Á颌=׬?LÞ•0S ”™‹ðvR]tårÍðÚ†ä{Æ@üwA6æ2CõŒ¦oHq_-gLÚ˜ìA§Ë<Ä]¶µýû°=%³I’Î¥D¢ð†  ›iâtö‡ æ 9KªÛ£¹×q1¹ Ìy²IÕn\ÓF¼\¥·Æ—N£ È&r‡q!{l~”L»­ “Rç+§À‰~Œ£¯šP&í)¿& . %÷dâ ¿zèÇ~½½(ü¸=!0]¬âFÕÐï`Áƒ4˜Y—?*짡ØNÝNôÎÔʹô°¿Õßzµ%ÑDJ»¿£ânwÉÛlé’ì¡÷TÎÏdJ?øs#\x/tÃ|€ä¥f!F_Ð-VûyîX"çFØQWÞvëÀ!Áð”xšRTžº…_òÃ9á•…ÕT*m!0åËL Áö(ÈàV4MY­Wúóp 5%“Žn^‹0®}ˆ%\J«“’õ¥ ˜€¼Y4]Å. bU¥pX˜^ãÕ¾!yøLÊÂŒ²?ˆµÉmÒE&ç’‘Ò9±ÎšDúM=2@4P‡å²¨R¥¼'3Sçc-¶ $ù™ÚTwÎT-¶¢b•¾¬š±rÚ†™=yK$ŒÁwüœ»CÁJO…ï™I1¢Ç¢æ¦9ö Ê42Ô‰æ¶MÜdd‡‘˜G’O í„üï2!HJ©Ï…&IŒ=CBŒŠÐ›¸*¢¾y8Dc¡Ée$Du:àÅûb6,•Õܾ¯(…³B¢°ôš–UÙkFw%jxK ¤YeGÛ2Á1C³ÌP'Ö"d”£B QÓ$²Õ*c#3¡LájPJJÆ{·7~ÅcÀá?ƒVdé• )%Ím°KL‘‡–[ÅÉ,¹Æ(bÃÚ+Âé|ZY+½MuÅmÛ{b'…Y*lɵY‘^ðÿŸàÉà(ד=·J·uÂû竘ԈÙÈتYX¦B¡iIQlÅé1k8Ĭ÷ ȳ¨C!,ÁÆC1R]ygõk²¦U„“*S­P)-f¥•Ùò__mÖäÎÊ6´Fc¯%£.: <—®®¹Å³˜¢|îÂ!W%¥.‰©]GV=•º£s˜ïÙ#¨eé=C’"‹®ÉæÛöèë:j jCbKc±Ë4ÓõtÁøŒ JŸ~–]-(ö©Ï™õ|y28;Á6b<¢ñ¶²Ov7NÏ•7†¢h^d³ÀY(¥àj•ÄâgQîºæj&JÇE¤L ”)ºm…Zb ›çvÛ÷6bS‡ðb¢ºî£GÙëƒóǯÎù ½c}¬ÓרÛöŸ4ʳ+ó³ ÓÀŠ§Š8³àfñuS]§hyÝáfEË2&)‚˜l ”5pÑ’ˆ~N½.JÆÑÄ>²…TÇÝäﳆZ­ìöiÚFª¿/&“;¹ž{l(÷À <})Š±¤Uá­¼‘èÔüP̼g"+’Úy¢h1kú‘å!Aß„±"ˆìÅIÖ|aÑ‘«ª5t”£Øº¨DÄ¿\ï_Qï5YU²Wç[ßLßx?î ÕdŸ™ØxG­ÄløÃ|¼H-Ôxô¾û¿ýù¿åÏÕ°÷eÿa{CþŸW»ßÿƒï±éÿ<~üÿ»õå£Íôñ×Í͇þÇÖöƒ‡¶?ØÚÜúþ£Gÿìÿ¨Ž”—Ù ÿûÈŸÝjz'R [_õUÿý:{á­üÞûÙÓª¸¾éŠ)öGxÝ ¸,^²>ìÀŽÜêÜÛÞ›bV½:“ÄiJ¡äÝþ¼J ýå6£¯ÑÆ™·Áýö©©·/êOnâëÞ¶ŸMhâEqëýˆyïQ™wV6àÎ_œe/wÛ9ÌüßON8ØÛßËvÎü?»<)³§gLJ¯Î÷ÌŽŽÁ—xºstþc¶ÿæätÿìlÏŸf/Oö÷ð¨G?f¯ÎöÑÚÎyöãñ«Óìøõ(Ù`8­"‚×(óÇ”Ú+‚ìyÒ³.p&\ÁsÅ~äwïó¦îÂwmí¡hôÒr¸5Yš$<+h"fš,a%Oî›–UÒC F•• YÈA›™£OÛuŸø];éø]Z¤ §~ÌrùeiûÀ+( ÃXK3¾+wX³(ÅŒŠZU²ýòºÈI&¿ÔsX.iw§=N¾½£W*Žy±(Ç£Xå K¨ˆ|ú¬ÏOýA9,¨“ÖÆK¢jʾѦõw£î38pF¹æ—UmÏ©™YôÒ;r™¹ õS1sR$DÙV„À¤À;¡f—÷¯â»¤âL€Ž0niΆÔÅH jÿªaVAH¦.Š¤^·ã§Å¨ÚYò¹ß:^y[óôLR2¸$Ž0Ô·ÐsÉÛŠ¸ øí„+Æ­ê.ñ³ÔSˆ6Ü0‘iT/”Ëû™zÓ[K:Ó&§oÜNBiG8u`¶ï|ÚÜ€‹¾&®8T\£ï2ýshL~…Ú9êËÁåõÚÖ ïý%p?žï6 {êÐÉ•F»6Þ½wà´}-B–ªfárn;K¿ª"—¡2¬½ä•·å•Qa_94¹Öß0T¶†TÍË÷O¾õm÷–UÉ¥LOÿŽ÷÷[ÖÚ==Ë7¼#ˆÿC7aÛÖU¼õ ɬÌýÜÅ3)_3g»ÓŠÝìk¾ô;íÑywðgËæ7Nwæ"K8jùÔ†S6áÄ®7”ª–.#1‰¡ïÖ·Ô‚jÃü…\ÏËr8«êêRùˆ伯ª1Â}ì)Ûdµhì.HÍ2§|J/ò:ˆ'Dc^;äÍ›7¡tQÈø”ö¥¼¤Ö Kµ¸$%‡†*q—_ÜRÿMó’à”Ð…N;Ã[ôBÍÇQCz<묌밻…c¡q#ÒËãAä@2¤þÍ|'ñ:-ºð^OX–¬ï‰ÿö=èZkª›.LV¬u5âŽù¥å!kvÕšiìéÎNîZI—Gêü,ûQ¿³ðO'}¸»kÞƒo­À'P U¢S¢˜b6šÎ&Hn¥Ñ‹"ÑrdH¸Se'l»!6ì4õd±É„2ßù@7ÛnodBÍ>ûâ‹5Žvc‡Óñ¢ÆÿÅAXØL·Ôöˆ8U»e~4Ê.3wr0 ßGnæ‘âÞ–x’ú.l×ÆsÚ0'êºËE®ß07+Šûb“"Q þ£•É¹DÖ9˜¬?žìzcÕ›˜ß€–—Ï°†u-ƇW>[kÅȤ{XÄ@cùšpÐuXÂ4R„˜Ô]Ü5P'Bò¬)Oû<ˆ—4ë—®0B4rwé\“ZÅL‡TA—³$Üm°s~üò`×%%Eá;ßa{a!o´¡è¥‹°ÒÄ‘L¯rš…¢q=qRM¶Àj²ÄjõYC!®½uÇIÛ.ºÆ„ÙõüfÜmØDÒoU2ïVíÊþ™ÀÃ~pôüìÿzŠžWjñ$il;´žž,VOJ¢2¥înR4Ú‘{¨@$͵› Æ7ücñ§+Q’ÐJðl4ô¤_ý&Í,ø‡°É5¨uëÁbš§&4JXAqƒké׆O˜]*ÆAC=¼Ã˜‰ÍJ€6j{"…¤\‚æšLå*ŒÙqºÞé´o+ýž²Çe¢R-~‚±°ªAæ lœu5–Šm>i‚µHô-gÆQ×^_ñãB1­üNæ­>Égµ&,î>ZDè‡ÿw9ó[Â%É™‹÷ýÿCüïõînPýþuã[·¶ã<ø-þ÷küù}Ö Ôzχ0¸6Pw¼µÙ÷~ÿïcÿß­þ&vxC`ÁQµw|öðùë¾CÊ…ÍÍQñnúcà÷Ä(Kæüù1(|‚!È •H¯{“èdzóý—OT¸Íý^ÿ-w ÿôƒ{4÷]=‡å¸Úq¦®x50ÈïP‡~iÿã~§Î×?­Ëï:ÎKŸÂüìpç¹qù ë]ÌŸŒªºqs{ øcý„¿žÌ?Æ£Åb‘âGUmü;Á¶Á²—þ#Zc:×ÌKÿ&yv{9}ª¸œÿ?¹á14þÃóý³óAøÆ>m¼X\8¡‰æe͇ޗ5œ\†§O$©[Ö× C±»ûäv8|ðÕc·ûæÍ“ÛéõÓ¹·ç½¨Áóý#?åv³è_²ß¹]<ƒŸ•ÿ´îWFÇÿWÖfÇ÷ gp'ëý<}èÿ3”^ÂÏñ¥>}§Õ¸ÿÂOò@öŸÈ-:òÖïýÒ.ë„ÛH“ɽ’{ø‰xüôþSAõ@eàoyÿûO‡×ã·ü©ñ—Ñ`BH”áǪÈÇg6¯ù”˜ ðn_4Z€2õM.Wš?ü#0™á“âvžÂ.U^-m7<½^ð~‡H{zaà=ÇÓùl0¼¾Mšy/0ÿl¿rP`û&_ÿ?Dùï‹H4íÿáV­%þåµ£ñØãѦÅ#?¿E£=ÿÿ‡Yo’õ¦Ommgÿô¯ÙzÍÉEN>ÃbÄ°u²þΫóã½ýèx[‹ÿúÏ*mùOŸ÷Ç“·­&þŠø‘þ ^—ÃíwÛƒ•Û·®œÌ—.Ãô©7ãÒ¼ïÇÈ9ø¿Çïa!üs Og]û¡:Çöu4c>ûçò3ô@ñ×LWQfòöï‹÷<³ D^+[ÁÇ9ÎT¶“çoºàñ_p¿<…nŠŸü6ƒ¿ýuóû þ /4hO,í¿ÚLæûÚš²5°bQ5–ÀÅÖß6u.¶²/8mV¼¿‹7üìãËø_õÂäâò `¿‘— ÍýÝKØÛ ¯þŽåû·/Ý-ÛjJj}ϘÓíG¿ÿôÅ¿j‘[/Þû+³ßµ—WìÔŸ¶E”7K‹Ê·ùÁu¸â’\“Zˆ÷Løô€ù&7¿M˜À„Y±iüoŸ4ííáo¸ˆì§\óI£OŸ®KgÁßó´ƒÿÚã~úRqqWþÆŽ„áp¥ä ê7o‚½l–±7ªKË•ø6‡CgÛŠ¬¼úOZÝuO“»–iÍV\:ÕÒ†þè\(í~è™ã¯øð%rãxO½éÑ2ÕÙ/Ÿìòš-/%!œ}.w1–¿-} åJùÖÿmé[LùC¹ô­?uõ[=ËÓoë»ýÖÿmé[ï0ê·þoKßÎoì©üß–ï[Ïí¾õ|¹å÷…µü¾X¾¶º²k««åo½­ ßêž~ «_¾…uüÿIüù©ÿ¡Ñ/¿|tOüWÂ¥Œÿ>|ðèуÇþó/ûŸg~‹ÿþºã¯éÊÑO¿füsóáæ—­øÿÖæ£G¿Åÿ?î°ªÞj d>Op?i5¥ái”¤·©N` ;})ÒÃ?0„P¹Èˆ¾4»I¼wYÀ*±cÂ$~r7!DÕJ(Ô:“Zç<_ñ>REðFˆòªo\8Ì–‘n?ñübm¬Toþ4¶X!3—,Ñú-ÿ‡õïÿ¯ŸßüoYXÿÛ_>z°”ÿûò·ü߯“ÿC¾èƒƒÿ}öéHxÜöïÃÿ>û‡ÁáOñ_Äÿ>ûGAâŸý øßû÷¤™ô]_Á®/æ• OIãIª°M–æiÃÝ<ùÁÂû¦o¯Pç=€¢Tö$ûSØv ä?‰ðêøYb`ì=õæÁWW ™Ä•_ £µò as\ýÕì¦/©åÕ_xå·CvØê¯Èݽò«Q>»-'÷|÷ÓêϪ{~p[?üjssõ—×ÓÕŸK%ßʯ1»ú»YMåð•ßÕWå=_WÛ=#"GP®ür1¿çAD2㾯?l}8Áˆ­k}™*2¬úþjèûd²ô!Ç«ß„òµ¾EƪÏQzñ®,nW}§l «¾ãÍÊû½ü@Í¢U¿˜Ï ùÜ}²ýïù×<ÿ<|¼Ù¶ÿ·>üíüÿ5þœ$¬A‘n¥§Aj®t†üƒPÊ¡äz{Gǃý7û»Þ>œìŸ¾<8;;8>`¹Ë±zþ…I¢ù£XïÚ{°ÝÍz¦‘Óó«{çéhÜ,’žWNA¬d>˸‰µ±íŠ]Ëk4"0qþÃ7½ýäÌÚ;Ýß;8Ýß=W¼ð“¨0"Ú몘Ò˜ªÐ¦È+àhpÔÐFÊ$Zü|ÚRLF‘LЩkYbq ~ÔKkR.ãéý (ò€¦Í•ê68 ~« Ya™ªý}+ñ&BŒðÀ:wb :2F5‘€ró¹w¸¶:,7H¶„»]GÔ¸£­~#ò.U#8·-íIÝÑKBhé«æÃkÕP'5öv ¸·…ÒÇ›=…߀Þužó~FªpYmØ­¸­çZ‘b”î”'[ £Ç *Iƒ€Ñš:#àŠj_Ë·A¾tòá Ç’,‡Ê#â;vRQ”RöÌ{°þŠ›By €¿BŃN¶O6@Y¸‰ôDúâ6wu5FGËý&.Ï“¼å9àñVJR+‹¸¬XëÔ„Œ,¯3µ,H â?ÖÉ´j–¤$-eÄ~ûÑ}Ø k°ns°OLFÍOOÖï"þg:+¦¹Rº)h§H½{ëûc1U™§ ¿N¶ÐãhÕ TØÕ¬L”À_Üî‡uV¾WV—_&ääòŒÏT‚§Pæ4©=Äq)º‘‘®ÒhÕæÄlOm©c€ut&AˆâÄáW¹ 2î©$ÞÇ™n.¤•‘Zп.¨Lˆº1ÿCÒçyã=QùQÁ&xVdSIûä‚~]R¾w8,¦¬÷q)kpRv‰ ×I›ÅØHÆJÅb<Åë=îd+O Üõ"°‘ŒloiíÛAHJ˜Huš6¸b„«C—g·fÙ“2½9t±Â@&-!Aú¿:þÓtÏ~5ûoëA›ÿaëá—[¿Ù¿Æ¸ Ïu7Ú «oÝo 8gÇY©ÆDGøhÞ{¯}ï9HdNE†3;õ“góå«Í/Æa?Ç,ú<Ûg)±H_óc,#EmÖnïA³ÿŒqÙ:›ï$â>•ÖÐ 0ÜiDYeõg×¢ÎJkmtµxïgðZ›ÿ2.x˜lÅäÕú‘Fj¿Ïøýo­§;Åš2àa˜ƒd¢Ò…¶ñÜŸyCsì1ÿ_Û”¹c¯†ÃPR/åNüéPŸâ™ò݆ò(¨éÈ”=)ÒB³—':‘ØPú#vÔª&‰”7‹²µ|Ò†œws1 žüU‘ÚÌSÁÚ†³&_®%5Âu~h;î´{ºsúãàdçü…Ó‚sSp1µµÐÜ UJ‡]碅*º”xKI)ºo&f„€1Ê}ú«û•Ï´'÷ÕKÃ<¬ŒL »]Ÿ,Œ‡´Ÿ°•ß€" ÌßjÍaPøcoQïŒäm×ÂsùÍ™—®e—ãüÊ®›2gr¹7 ÷Gå<®:Æ~¬î¹?T ÔS±M+0lFl|žý^­BBëƒY¸•}¾7ïõzßéoïù¡½4r;W0OXª»“ÕƒÖ+)}ÇC”7ÔÙúÍ]†ÂOý®#åŒRN`ät*‚a.›ß3‚µ}óìéÁóÀzÇ©«®Ê|2ÉßVSomTµsGPµ\ñ´óMxNŠãJuH`ŽE‘Xj‹+ƒe?^‰¾Í‰±ÜÇý­r2á‹4±*0¾‡)Ç_<Ôˆq7‘2Zvuî¸yc‰ÚÒ@”˜`¡çün,\~ºðhó™a„B¿Ç£Ã„Us.SMXÌç oí××*g&¼ôZsl¡fßCÛþôîm~ÕÛÞþóouƒÿ‡Ùý•ó[ÛoÃþ{ðåÃÇÞòÛDþïËÍíßì¿_ãOÿüE¬—϶³µíìØÛ ¤Þ|°æúg/²£—û.Ǻ‰T>¯nJùDT£"g7ÿ.ûó ‰)v|×Vö1Kõn°·,Õåå`J‘”öýVþÂÛƒÛ|60Lö§^°kM©ç¯Ö”)Ä÷;ûñèøäìàÌý¾lp*¸þÅÌ‘ øóø ëð^Â&ÞùCü‰vÁºü~:Ÿ¥_¦dæñÝl¹­~=u@ öû$pýÃ>ãÞþÙîéÁ xˆ\ÿ >ØnõÜÞåT¶Y\õÊIúžµ‰ì¤þ¬ªí(˜QÝ‚o¡ëÛŠC-*ÈMßLçÂæÀZ!IA<ËEÐFRŒsU¸ö'J9yW‰""É°‹Ù;¡ Z¶M…@+Q°Â½^ª¦WÁß‚¬»KœÓÉó\ܥǮ•Ë~ŒÀßi³LVÀ¯×.Û•óVÄ-„Z›òPé+'d×”v(¬k$ªM0ÆÐQ R¡ÎAV[q è•dw1ÎhÕˆ$©Zs È•BÙä>§ÌÁD8£(ö§-O)³a\¥§–þ@È.!ðð}vº¿ßÍŠ¹7g“¶¶&R܉^³TŒƒä~q[Gó×BÜA*$ŸK—€Õy^ÎõUpFr·”½Ã5Ù;ä}Ï”Š¬ÉÕ¡¡f[ÕB«a|*&/¯ZÍú×]Ð AS=Swr)ÏG;Lj9®®rôEê—.óm)²„(…Ì ˆÓ‘ˆªûå€KƒôkàˆpQíÁ…ÍŸPÀ ÆY¢ëÞÂdtù]™ÃCî:ÛÉý3Ÿf¡ É)Ñc%š ùMóIC»ñH©Ì,çu1¾\þ%ïò$T1_%d…|Åy3ìÖ ÐÕ17ÒÚ¦(ã””Dé0ú ô ¼ šÊàu³ OV·ÂÖ!i©õti*ûUJY“²u(E—„5™‘¡÷¬Îû%¾¸ýóɹ»kŽzK¤¿¶5FraQÚ6R\Ò «<@¤ñ“wè=ó4ûz=ŸœÅRÂ0‡O !Ò¹r’ûYÈ4k{Ëž±çt›lôNw…¨l}«ËÅD½’^á!Bi‘b’l„8êÆ9$µ:¾>§\ø*bc±™g¦žawWNA¡vÔU„ŠFVŸeÙúµyTÃ'ûË_lø?ûŒocD:"[D,2¤ Àßü'Që¥h‚N@iòÛx:ô;ºÍb­ sÞ<*Û´`VHngÊdþxš¤gú¨Bü­3³ )â\m©ýá>f£9YP÷­§†` Q ƒ×)‹)¥5špDZz»)ÔºÈ÷j@èVTç±L¥£”|Tq6ãࢸ«ìC]còü+Ödèö·r²RÐ)7i”®Á\$äYíAêK†I`f¤Ú=é/[óëXu$G^¡Ü ù«¶67¿J¯˜‹›b iꈱ $šÈÖÇÄJ:6û•“°©R †-çÔÔ›ÏIŒ Q¹`Z£Û”Dû£šàO»:ÃCŽªU¤y« ìŸÔœ‚L‡xàI´|yŸÔÅPµð“‡ŒÄ~X`çú»NsåÄÅ]Ÿ›Ïw§Q¨`f!Ø”þy¼w( ‚ αŠ£G­ŽDÚÓœ;Ís½B°3uOQÐNêå¨Gß…£ç®ß=g%ò=³rΑF÷PÒ0°þ!Q®ë+R,g©éFh "7×ìò2‚X,ð+ J¿ˆ#Nî«S†w’®òAÑA*•Ú†â‚Ôw*k$¾Ô¨l ñ×ó*‘ºWz7UI«MÏÿ‡—‘R–ó¿Z²¸ÍáÕâÔcrœß¡±´Gîó³ºÊt-Ç©ÒÖ_þrëg«·Õ¢ÕÞüÚ¯.ÙÎüoZíòA5ESŽTÐG=h‹á¬íïg;‡gÇk<tLÅ 5ÎéUÎ%å¶9w1j•àˆ•lg!^Xa¹pÇ@rf"ˆÉ ÊæƒÜ€c!‘Ñ 'ÙmqáÏC؆ÞʜϧßllÜÞÞö¯/ ÐG¿o\ 72yYUxÑ—Ýàe_Õ[ºÙZ+Û¬^ºß4A¦ü;(¼HôZ×­U—ó[<þ ÁY~“ø—lßÛ@ˆ< ‹µ®_'þØ&NP„ ¼ƒŸ}µùeï«íÍxkï2DQ c#(v×Ð>ÈÖùvÿšoúÕìªÓwg *רú›'TÝ•cÉ÷$ù˜EËŠê ÿÝ$«ðÌþzñÿÍG¿lÅÿ·?ø­þïWùsÉð™jä>Gf{ìÕ”\sÂ]•`^Kôå ª9ÍÇÌã5Hì<Øö{ˉà)ªØž_/õ}×ì<~Ø!¨nöòàä¬+ÒîÜ-NpRŸìªûo¹Npž‹t]õ®ö'‘w€ÆÞ¾.Þ™½JkŠ[ø˜Ü«éÉä-ÉpÜÀ-¬ÅÌÐÕF¥=yC•X m½8æÑ¡‘ÖoC€~?Mæ#”I„¯¡`ÐT.ÕäkðçúÝ?|¦'<ÏŠJ(ÞÃ…`ô¢¨hâÔ*%0ö½w{þ\©ïnºƒ½v^ì>Ù\[Âp›Ò…I½IË]Ž­6:HÌЋ·ƒ„9&ð•5‰!_.ôV÷€#ÏžŸ¼>aªƒçovO^Åùˆy]ãþÁÉn¢ ç•wØ“ãQ"êuà!ÌóÕ—H-ùEq„1É  Q¦ ">Ú.Bk|°sË⣓óCÄe¡ —G³ŠèhtÊãŽÀšŸÀ–qµhÛM»Cϧô–hJAPQ{Th'‡Ò@Èü±â—ÚØõ’p ?Å~ÍQ‹&ò羑Ï#(Zxyp–ò¾AdëcÈñãWœ¼.xÆÄøµ~!‚½½ÁéþþÑ9ê?ˆ2ÿ(饇Á>á&¹§a§³OÆN§|?|:û|­Ü ~pÑñ»àpy"×ágã:úA¨¥#^,YßQ«‘ž6WçOpî ^Ÿîœt­F’¸8 ·Á b¤xP\½ÎÈÖ¨“õz·3pƒŒ+7õ_Ö-¤F±† Z¿ùÉçíÏ0õ}}𺺼ºÉë·í‹÷¾ãÚ@ó8>·ß(ýƒc‡”ßá¯öÍO?ø"÷ýXÞhõw+ß쾇W\ý5_õÓZJzà@2p»é¼_¢ÜŒµ„ÆPþ=vÕzÇ”ÂëÔ'4Ÿ‰QMZê<`,ªê‹‰#ZpÑVËXóÕÌõœ×pYJ™Ã­¬±ä1ä6ù0 '…|¥…­i0•s@ÑÒ¢¦¬¥ß Ó¸—"Þ™×Ü!±ÖGúâˆÕ‹ÞËb€¾DOLý ˆxçb¼Ì_ͪÛ9 Pþæ¥IioRݬ…ïš „ÙrÿèÕQÈÇÁ%cwz´¡’¨œS*¶.€)S@v¡L*%ÝÜW@?÷·&)½7~Ò R¢[Ö[’FMS1×36yÎy*B2µI2Ðq1ã̤œ²L… Ð«!¨Ú•9­]€¥&‚Ò Ï —@C:÷ s—\ÄX&ø¶ˆêc¸µz r’Ü—XÁõp•°˜yBÅU& Í8F®«[‹ËŠð3ÍXp-tô D8¾¶ú¥K­34!”؉œû³/¤ÀЧŒÍa‹ ÀÔ¢X2M[κoÜú3¼ô©?³‰ÿ7h4ßÞ‰Úë…ï¾ DDK=iŒt8Ëëk(ÏÑ ´êÍã¯ÞfoýQå]ª|=þjóáf×Õ•f½,Ô8/4R! ì(¹Í 8Wd?;r²›"ŸøÓ¥*Š¿$ÓÈlf%Š‘Äæý|Ï×B:|í;ÐrI¨j¸»bžin7ää¡ý´ÁYÍÔ×CC˜[õŠ‘,Ö|<å%ä5éêôyúܘlèu[Ô; ®sUÌʨ%lxfLs»bäÓFOÐL¾¤i¸>+üÆ7É~·Ù‘lÑeÔܲãŠÂìǹÏ]ö¹¼Î¥êƒ € ¥öµ¯izú 6\„T}ëÛÚ€†Uÿú»ôSæXšŸ-&e=µ~7•ÕÒGÞTÆgÎaêeŸ£TÔ?À §–?On~ý8ù躼œ?ÙÚ–OÞæÞœ<Ùüƒã¿ýã踯ë?;î?°¬£Öõ]k¾{rz|=›½_ø·×§çû?àk|ëî?Crc]Zƒpw6þWé€uïÔœí?ÿ¡@Ú?Yǯ;¾ç¦ëG¯WܸûrçdprzðÃÎù~öK†íu{[ÝM¶â—ñúøÉ“ÞVGÿÿ0`Ê©¾¾†Ö7$<¶&÷ņ;×íßÿéÿG_þÉ:úûóÎX¾úœøyÇúæ <^u)Þy‚âžG¿üêk{”ÿ>ûÝ“,\’ÉÛ_Š`պ侺k d_PÈD"£¿ûÓ$¾ìõ-ýçêͧ£òá†%’@Ý@l’¸à#m·[xwÃÕrüÖ®âÿtÿ=ã+à×Äÿn?Üþr©þßÿý·ø߯ñçÛç/¿sß¾ð»ÈwœÊßžœîçÍ‹ÛªwèÏçqvîçEvfF3÷ÿg€s( b‹é·r¥´"áôïÚZÂmußl¥?G^œt¾ÝÈÞÐœùÇÙçùöéñÞxº­ïþö§¹ÞòWž|G#äéÞkø²F¡2Ì”gÛ½1ïƒÕàšþ#@%c —¸eÀn2 kôšëk]Z¶ô ½‰ìHLëdb/ÒÕpßcT¾Ë~È‘K3=­†aȱ™D””i_8˜§1»‹XhB7Ú0°taçFADȼójIx¨ö«öT`¢ˆ2›xë·Dþ¿…ÉWÞxku ž^³n£!å;o&löj¢õð~JTãïÜÌ”Q9 (á‚éüQ)™rÿAE“ÝßMSrÌ gß|wíÏÕo7ÊïºÎÿã¦ù–ÿ¤™ë?W·ø7FÅ ÇÌ!³qZÕÅü¶ÜY-:ZàèSŽ ®“A6qKõJBÒ.Á¹4K¸l–â…/'M lLkóÛÐgwäšk™™N/§É½óNQ~$×)4€nú8Ù|]me Õ´õoÏÏ¿“áÌ Çp=ò&Ö·óùwÔ\õ_ÆO:NÁM"ÍÈ"î« %}Ú ñ©.[úáj¾Ö¸œáŸg䤵^{“vT[NW;ÈEKi£óêJ,káq×0â.żÝ{??ý„k¿0ÒíÄïe¼L;Éñ.£²XúL¬^\Ö:ÕPEcü,YhóÖÙ¼µü÷¸ÈßÙƒIOÉŒ8˜ØÐHä%t]òÄÙŠ!Òá K*Gú0â#í—*U|9¤èQ¾,‹ñ¨#œík´Q¢ FÅûOGîCCëÍmÅJ{qb†) œ_½Ô×Õ‡€~]wÿ4Â5Ö``{}ÿð ë‚á?KêÇÊà,ïjŒP7¹Å4 |¬¸“}dZ·ÈEåu m€Ïüí‹íïðê8Áüù´ϧ(˜ÊÝŒ€ ¼Ëe5䩤[ÉüÖß›‡Ss§u¶A€ty~ßNb=ÙžõÍý§¹éäµönñÞvW™&Ïwój:à72YÖ%váô[”/ßÕýÖ¯:?÷+mQMz©÷àTåÕÕ|^ݤm7_×â@Éáêûn­íkN“Xº¹%Ÿ:i²5k›KÖ­ž¸²¥¶’ÖÃôû‹ÓR~f3Ⱥ{Q'Ö1m–¸-#) !n>˜]Ä@].E©ê®¹UnF]¡Sô›Ä„8o V¯îãä<Åãø®ñOTNÜÊÑ¯3ÎœêÞE»¨ý ‹¬~æ0ZÏ“Œfrc™ùz.a©$7œ€ˆ¿KwñôÙ\:ù$Z׉P#Æ·~ÍΘg-¹k?¸]Âãý ÛÞê'vä¾’ÚKzŽT³‘à¦ÕÖ’­.}[ì«W4Vg)ˆ¤K?¥](6É¿ß<ûȨ(ÈpR…Cƒé UÒÖC/çOÙ #úÝ•ìþ™îÎ?ˆí5ãñ`RŽkšˆ¾M®ÆÅÇÏÖJ“XÕïoŠKö…‹¯ž~àCñGÄØÀ¥ùåì˜Ì\}Ÿ¸Ëäõp€¼Zr‡t·¦Üœ ߇†þF=,¤³e6À(ºÔ¢ÄFÑp`ò<äNz:Þ Ô¦¼W_!ä†Öo°•–,Co‹»ôUÄŒJ6NçAs~$ÏÒ{öå`}üU°hâ{ ‚Í€~úiÿP“/Ó2øiD¿•Z>¤Ãè,çŸÕþKÔ,å|Lk¸>3ñ¹ 쨆 6•‘m²…!5”bµ&çü\`ò¯ –úX§z³Ø÷êÅËÓ:o7‡ã!Ú¹dsbAŸ j;–¥po:,™žþº¥9(Ãñ±=9k¼»ÁdÖîÇÈŸÓÀeãoO‚Ñ`Œ}w3] ®Žxr®ÚgV¸î¤¢·¥ðÑ2î%NJ1çÞûBZf+‘D„ÆNª›Ms-?¤^sçl÷àÀïŠ9Ãü+Ýt]\€ âþÂ&Lëc³ä©ïÿbŽÌ×;øðÙýõüªB'žîçšI[ÿgÍÇ0÷ßšŸ8 ±â¯†ú_~³taóÏöVog:ë}ýÐ9eðyü`ùW‡ÇÏçÇ'ƒ³û÷­­?Ë¿ŸŸŸ¿äG›Öß¼xzøýÙÁ¿íÿûÖƒ?£±/zK¾øè«?rÙô›_–Ÿ ^윽X¿.;òÁŠßàÉöÎNק|ô:ÿçO½Õpï“óSç_n,_z]Þû»å?ðO6Ð?öIülÕGž?|Úg?|¸•_>í³_ÒVÒìßÿü·µâ{IþÞ¡/þ¶gù_«¿þåokå—D+~Í­~£oå­>­¿FÙÄ·úµô+~ýù§ŽÛ/nÝ{7uç—U½ë7ØÍì[¿q›Ùðá~ùeE¿ÐÈk”¾}¬wWµÂ0Emì‡ågþÀ¼·•w÷µ‚·°:Ta¬ê—²1ëVöËÇzwì½d¼Ë>õOl%÷Š?á;ÒÊEù$ûåùþùàéßoþ£ðÿìÁþzòäºü´Õø÷<Ër+øn=5üîû§¬ΗÒûÏFŸÖŠ¦xÇÌ·²ãK³ëï _ô¾ûÛÇèw†_»9}W·r?Á x±w:ØÙÛ;剷²¿1è²^±¿¬ú“ô×ÉÑ÷‹ü›ûËGvî{Öò/Ù§®@¨ˆð7Ù»äê÷&]dá:ó÷ùBÏð/ìÿ+ØÓ áãÁaÒ~›mþ’ý¢_ÿþŸbr}-¼Ç@¼Ú?­~°°ì¹Ì)üp¯jëåÎ( þ[Òà§õ¹ÿÕwúj?5^ô‹-×>ÖüóÁùüË=×|ÑO{®Okë—, ›à‡Ÿkõ`¾ûÇ=—̲O\éƒùõèGopüìÙÙþ9Øø~ù»ÚÑcGêàÝ î ¿:È/Û(w‹üá'9z°ö‰Oò§dê/Ÿ˜¥°ñúøt¯1)³õëѬ“­7ó¿t…`ÀÿÃo÷òË­Í퇈ú±|DÑ-œ¯_|t‹·ûjc뱄Š|xÝqº{²sHàãgÐÅ þY캳´?¸å}ñ#÷uM£%¼hö¹¿Ó¤x?ÿ߃ídÆb‚Gÿñ~aɦáãïV¸J¾G£ÑE}êß(öý· ø´'u­Sñb0Îëù ð4}ÐgH[ù_>¡}+/wN¿÷×ù™ýD;¹VSÛ[ÚÞFF¶åB$Jã„â ,sêþm©T6fK:‘áõÂogéé¸h´ÝßZ0>ž—GG»§Ÿ£ƒßPÀÔé~Bïd‚ ¸-뢞‹(ª'ò¤I9Ós£ÖVí5C>”T 3`Ž(¼á¾1FЙ¢áÝô ü¤k½CŽúô Ku®†ƒ†½©Õ!;è¨[ûŽ £ŸIþk½è_õã¶ÓéK$á³Z‹¼òYBvÔoGi£óñÛÓÏ÷Ï>¥ãSW+üº¹¿Ç™+­ø)wQîÒVÖ“ ¸~m ÊiõËG§”¹ ­_IsÿëÓšXõOÙs?èN¤ Û¯W5!T*Þqý¨9þËÇœú•M”Ù/æßÙºL›ø"ë­ú_hßëþ¼;ãO{Šÿµú¡þ×ßð"?ÅÎ[Ý4»s+ùaêA¾k*€]úaß÷$­‰ß|}DgÝõ©ó£õ`Ñ´ú”ºç..½öðïvÆãÁÁd÷ŽO'ç§gó Õ€÷ÿ$ŒÔÈç|tÙè Å&¸ˆêòMöãüÑ#âšñ‘­$òwŸ²™é,ï¯êRnCîÛ †Á¿ÝÀöÝoÔÂÿ{ø›d‡¿ þ÷Áö–ðÿ&øßí/Óÿú•ð¿¿Û;Þ=ÿñd?#»åÉ«§‡»ÙZocãõƒÝ½ó½ áìas+;Ÿå“Z‹p66öÖ²µ„ äö826ÎO7ÐÔÃqUÕE4­ùeËÖÇùäêÉZ1é-êµ€9þö¦ðæ Úé¡xõÝ“µÝj‚‚ûÞùÝ´`®ÿz²6÷N›þÜ ¿O=yuÖcæm-C^žàãe-‹›ÒŸ¼]¼›þ Àa0K‘¾ÑX "ª@Yõ½¹³ !Žš3„ã ¾vœ’Ƭß1fÞe"â¾[Êr\æx‘Zý>YoïàùÑñé>yZ% Þ ¬]*GDøˆ·òoó;㊠do–fq¹œXŤk"ÝŽ 'áhalÄuî#¦Ùg!!q˜‹`&A“y×ãÎ*åÓ9ˆThŇþö¨[!^M¥sz=ò¦4bÆO©U#WÍs¹l—Å™À[D #á7a]#w ©×âè;õ>aDK-N1¶‚ ,¾‹³`ˆ4+*ÿ‘wëê?Á°œX60o‹‰s÷“xd‘O¨|Π[°Ýže°ñ–&qá„B¸º¹á'ôˆ"ÙE9Ê`®÷~€ç˜)%H‚Þ“M¼«vIñ©ÉÒ¬ñe†¼äë´òîÛlîw]ø~(ÊÉZöâtÿÙ“µ~C‹À6ÈÓ>¾þv#],ÿÄ2›’Ì )l·¹ŠÊÒ«û«ð#7€­ÆM€óÖ5ok6­ƒ…Ä©ªm#°ÈOëñ|Tί2ÞáÛƒïÞø?¬ãc«û•»“CÀo'¨{}Üß qðí°PÚO‰„_Y[n4¢¯P/./¡-,µœÉ#·ºÙ–—½¯fŒtVDg`¥*˜Ù¯¶ÀêX'ì±~»ý‹ ÛVhN(›T$ºchº½oÛÚb/*;ëvínN^)…ô´®ví 1 ²©ˆ±-ˆ;2SJmð;”i°´‘"C6ÐH .ÀOk5…XÝÝ×^ëqã5Ž•Wãê‚E¨R`@+Š‹cÅ5ë‹…ž%¯]5Ñ÷§¾Ü°(°Ïù­Pä²|Ðê&­6ô›`õ–øÅ=àL÷ο˾}ú]$»—sÁÈòý„Ð5”íx+—ø3xG뢊£4ÎcÉçS¢\Ïo —û3r*+ëðbË»ñ†¼•Y`c™\dóQy÷Œ~4áÿE!q¿‚bvDBº0¥+¯Žvý™»óôp_¡Ž×ÂÚßw´býNƒRå#'ö Ô£s‚"ç!ϪÅDc1Øé…£>W-V1!„²¹¶§OÍauÏý0øM ëÊKû™å”\f¢líè)%ežˆ+Yõ»À Qí§¶­²×aX'쇬|­» òåþ½y°s~üòào˜Ïÿ­'ñyƒ÷覬ÝßLm.Í)Ú±’åNemlÑ ñ¬ZÆRÃyråãr\I™Ž`¥ˆ ë.Ê9ÐÒJ§H.DßØ°¬›ÈZ¡>Ž zãóŽ¼Â7‹‰;Ø–ÿÙòIl’O7CøÕHŒû;L’{,û¦Yc‘l¶¤ì¯ËK³ëÚ|hKCkfb:y\2y"ÑrÜÐz™Ö8—›{èwíSÀúe,®©MÞ2G¤m*b^åŒØ·ÍÉ®gsJ§¿É"û9ÇRâò7$ÖsN–‰ ©—wâNª,Ž•·“x¸É'~t¼#Å„É€·ü‹C–-ï•bä̀Ć;FvC¸˜¦w~§àâñçpuIe4—)¤XÔˆí)†<ýlð ð"!yy‰3È÷5öAê7ø­mõçííy èΨ3®ù¤â^È_õ!YŠ³o>ËUæE*÷qâ*6˜R¬ä+–4oÔø±˜Ôóf'¬ƒÎDõàæñ8âTo´Š ÄAö¿µGs_ihÔ)À8ÜMuOVúòP‹«Ç-¿_Ý_5å´¯Õë?~ölp²óüž "y¾û[’Qû›Üñ3£ºvzå–#Õ´÷Oö†$‡k£¹óšN…(Vm[âIv“"ªfýjn¼­Ê©îTHg…@³®&0 i“)Å•7á¡ù®³•䋘„ZD›0¨’‚\ñFùÂý¸® Áòį:k%Ý“í2ªµ« MÞ–˜ûŽR³Gƒ‚†)s¯ü—«ùm7ý\0bp…½Î H¸µãËú­Á,BN7†7òáU¿¹°EIÏ»[]žwÊ1Ä¡Äk“®‡]¼°‚‡Em¬P(¥-¯&¬¢ŸÄçXµ,ÁÏe™NL£ñN"vJÚj²|ˆm*%~Ž7‰ç#g¦¢ð­·04œw]))"Ù´I ϶‡“+‡;ª\éA>åÓuª˜^ÞƒÏܠ˼[±Œ,•ú)Q·0͵,Ú'U¯š‚¹‡<‚ 7$[*ì@%+<Û—ýÍ®í»AÀ¾¼t 74ªOÐ9$¯yàVŒG>‰»añ'&¿ ʦ@lÉïV 󕶿4Ôɦë_Äl+ȸW4¸L˾ÔônnAÅ2•ÑÀ#|C¥¥ïñô&š°YA= Î…ÚŠŸZ¥ …`u¦9v Ô¤I™9K_+c˜bX$2q—¢µŽ½ o³…”·)È…[‚ÊèwÕ)ê…lË&‹Ì- Ö\çÞ’[”2%#·û=´.쫬;f uR¾š_]óɃíP]Ô6B)TÙ ¢v¨Qq™­ÕóÅÅE5›¬¹æ<hF]W°Ó_ï·yó§U53šÁ”>ß-Óç/«c ¡~˜~~à£.a[jc½ñ­ß’¦í÷TÎ0å’ç?öÛcR÷³BL”ꊨ~à°ãäN|å.Êšqß‹BX cúá6—Ap$2©Ëù"è­I à^¹ ´4îl(ti¡¼hü=ÛÔ YZþ§ûÏÎÎ÷OÏŽvþmÿt½ßï7»ZÔª ¢aî ¶6ª U3 £ŸÝò!ʼo ¿¯Tk¬Áre~QV ¿§ÕnÝO xÜ ÇŘj'³#ÖÄ|{õ`oìÉ\óÉ’¼À„‚‰SYÙú@é—êpYp7ˆ`È°c[Áœ××Üoÿöœš°f¥•â$×¾Cá_h&OuÀH¸œ•å034¡ôö☊-2$½rªø¨±¨T§ªŒ™SšÉ ňqÊ# l)k'ýÄ< êÝdx=«&‰ Œí@n½¾¦[i%Œû*K°áBéáåÍÿùÙþäñæí[}üÏ£±‹˜iµE‡éØÿ_ß¿ôƼðTàõÆöææöÆ‹“ÃþÒ{ðàQ«Ç]s½mŒ¬âü’œÙ‚ó=0 õÀÌpóªkdBå$W…¬”_fùEÉÌ’C¦¤¡R1@LÕÇ6 Cg"–•<É,ìóNÏ0èv ±·Yø+˜ùĦ,NÕq®SiAÈqz{';§þPß?ªAYMB­V'ŒðxKiDóÑyø Œ¸³¶£[. €a@ˆ” ”;5•É{}ç‡ÉØ\Ë›æµð&8=Î>£Ç ¶Dec¨+Épú¯†?5’hMó4&™ ÝXvüô;‰c96h5—A×íòÑ;ï"à0i«)Û«m&Ÿn! «cwò¿œÜ øâ‹64o‚™Ë@“nùªÏó»bfœ»é¦ö ƒ6_L˜6ÕI.ivѪ¬ b/¤¢ü] ÃV̧iò´w’ö±±Q”ó¨ƒ8K¬ I!¹o¾a<…›ù”+œ 2ò‰˜²êÀ/íYjaì¾û1]mÂö |jÒgù¬¢FlQ9yßuÕd»AžUˆMÔm¹k µvŒ«ix Ž(ŠQ‰›!$Αیä—é›}\÷Š¾*Ù›õjïOTþ«þ€j1‰.+…‹Ë÷²¿Ñ:CøÑ/žWõªÉ.þ)_ÅûRâ‚%¾VÈ3JÓwÍn-£ÐbC°X>§–ÆÍôä,qq–Øç Æ ÙgMiÙvûÎrŽ¸ʱä–o'Øáp.®‰„ìšÑC/«2yðLrxSúL4”•ËÍž7yVÉy¨:k!â>í­æùr Û-³H‹ < A²Ç3¨¢7ïÅØg²y7‚7±r!M./kÆòh™Ç¬ Ù‡¡>d._©´P¸ºÿ}ʶA³âm„Ã}ûÊx‡N”÷8ä²åãV·£À¤Å¯_MâHPËãúµøÃ…·5ÖΗ¾ ´Öõ)ÓôûR_uS೨ÀÛÎS¬ŒÏž[pË̵ƜúxÖ6O .Nû$ Éš÷ˆ‡nÄÅ$°¦õ%õÃv"ÆÈÖÙFzmè…rÒ»$·‰‹T·©8iSÀcÝ2¬~` ˜Ý‘(º”!)£Ë.‰WèÞFéÛëª&çµßOp&åå,ˆXÄ}1@ Ô ØjD¶¥sxÅx™š¢¿Å8]™®lîz\¨«Æ[=<—DHp*§q‰«*Œ_B “P…„ñìj…Œ¬1ëô<&Çw{}ñE€»)pØ•5Nžà¹¸ùò£!2…­W“µ¢oóÓÂ=æe3£“ž°!&—`;ÚÛy’e8ï Ϭ-ñžž»‚°ÊýpN Q°WíÓ¢^A{¡%oã·˜öcš‰©ø5 ­$~vÖËÅ_,½·n/20›¦Y®–¯éܯ:3%ø’t° £@åG@°4C_zZh%°¸÷©`º.!^5†rszÕÕÒvj?×å‚>ÏÆ{‡€Ïr}µ@0‹tLW¹õUüÇzî½Ä³ç"…`·Ÿ:æ€ÂövU)<¼TÂÄeG¿¨¯üÍmu¨²è(2*MœÂõiµ14ˆzë¡i‡¹›À×R‚!š æ©!‹.)uæßɼwãD!¤=ß’ÐwøL€Ã‰ Výžÿƒ¶~ÄIzRZ ³ñ¾©ä,ÇNMIÈCJ_§—/gåeò-=“ôvXôvúR~ùR˜nM¢Bb)þ€tM0\ B2›rÏ„Ù³xŸcè"ò2|»:|ÑÔ ´nïwûó÷ó°H‚‚»cïøú¡÷_•s „@0zu CîÉçqŽÛž, ™¡¦ü$¾KÔ„’Èé ¥)¹€†¸±p#7tA@ØÔJb$ª$@ã)M¬?1­§/ iG¾ÓÕ°ïZNð'‡åäé aáß´Óüh–‘aVà4AÌþ7 U¨4Gˆˆ‡\áV³ÒÛ/ê]²Þðª¨,K÷Ï°O‡Wös¢1ÃÜUEèrd¾y¨ßc®EBÇFva‡ Ó!ø_óa]ôô"ÜäïÊF„Ó„Y‰˜Ó‡“GbîØõì@/Œé»€…K”QyT§š@tæ”GŠºë¹@úp[—–(Xs©G,š ƒŒ1/®õi-ÙC;¸Œuº6¥Ú±Y v{i€…¹·ž ƒûHâí8ãùGÉÆfÍòq™HÇm}¥œ”£HKE -­¬`aÆ8q˜mxìÏêXULQ€*¹åìlÊNֺ崡KÕ“ Zq ô΋“tØýñ§·dªæ§tb8±Š3»mÁáä¤i¬ˆ¬˜àMN£D1KŸ0„µbï[ÖîüV¹÷ß_ÿwV?þ‡V°}¸þosóË/µõ>Øü­þï×øóºTl í…™‰èóï7qƒ†2ØÝ”“ÂJ’ü~ ãÈòŠ ï”hKã‚”7~,,`P›§î¨(–!Tä‚hcŽÈµŒ!æù./ ÙîJ$\¹UÖ|Ü…E{³ƒ7ÙÃþ–…u¡æÛ«•>è¿Ãþ«Óƒ³óƒÝí¦ þˆ-yÄÊ1~'žùâBýºq#w5-üŽËj¨ÉH"‡x²¨µVÖ0(´¨F™ï:^Á¬ÖÙIe¹,M1QÑŸõ↱¿¶{÷U(®3¡ÕÿéèrűUÛ¡¿óc‘øvíõ ôÿX Ôÿ~¹¹õ°]ÿûpûñoëÿ·úß¿½þw/Tƒ,WŸczZ'jayÃÅo?M¿vÁ[;’$u9Ý7e´f÷šÚÞŽ…*¥_Ò(ì2]pï bG¥DRo¯@¤¾÷º(k©·ø€dw^Ób÷ÛëµlÓ­û€‚'A-¨lߤ¼,¤ö¦.°¿¹¼NcÇeMyõ¦°JüÆ–[‘=¢óÓŒ»ßÂðvs²\ Ê†Ð¬ç³ŠÁ—äèäš"òQ_ECH°3™AXK×úän~º¨³}ÖøˆhxqC‰?”•èÓ¦4á°•ê¤!ÃtËû7³û´—S!ùŸ§É®f›ÂªHbõÛšÞŒBxZeÿ œ¿èhV¨E \ä³C^ n=¿ðçÕû»A.$mo…Qˆ¦0)kÿÆL|F‹`·ßJ?WÂŒ=YðDÿÌL5¶ÀÛþ‚àh´=ø¥ÄxA—ýé«3“h‡š¡[_q¼™}h¿›Tõ¼šúÿ!TnÄà £‹®ãu±ÝäºøC† Óqtñ¾Ã¬1 Œ\2¬’›ÐØ1 5¶}Þ{ø÷ÓyA㥒nAœÑÍ(¤-h{HrZIÇsIRV ™ÕPßm~ñ,j ·?&Käu'z²¦¬Âòžyå(@xݺ¹r\ùi<šuë‚%«ûn¯Ñú}M‹Á£ðL×Ïjƒá©KÀï4£ë„7·Ô•Ç¤ŠÓ·fb86n¾{¹µçck.ú›üÎÉ캈Ùà‹¹’ãGä‹e©r|||28>ì<=>=×jý|rç)0«¿,oéÏ%‰Z…¡24³&Ôyh/Ë3׫ø›T)ý‚H"ÖrD•4„’«IG&H\…™ÖCñó94½C a)EF}ÎæÅ´V(ffŠ Á‚™œINBãVò?Äê‘2l(˜ÌCH6"l¾†;i0ÞÉÔ¢¹‡ÕsüòÏ!}/Ù’p;—Tç¦w’ÊM:~áÉV„Ѓ­·Ô:DÆ%b˜~•:HVT@™kV©i‰Xu7Nn“&ôÎÒ˜Úa“÷sÄÀ 6Ï5ŽñüÀ3æv!Uœ]Á¯;~ªySk]`¥…Œ¸o Õ\2\}Œ\á/s„„%HsÄù/âEö£Ê5jXÚ0w«ñhýÊßæ¦\ýcµïMºÍ'á4ÌݲãÛÓM(–È ýE×ÅxÊ0=FAñ±ûî%ìʈ–ˆÅsZ.':ê×®’ŸŠ•x2ùš5wÖß؆Ç~u±»¤DíÃL+'§G烧‡;»ßÎεöY2º‰kRÎc¡[Äœ[¥¥çʈúïÛl”pËU1—]1ÌŒú)e‡sKÁçï8«F‹¡„.@ù‚Ì(ʨ^Á´Ú¢ÈÐ&r¾(üìI¥tŽöFÖ´7&b>ÙrùÑV¿'=X:øXž^^âÙp°é¼lÖ™–Z(•S¸1[¯Û†‹ìÞ°î+vÁ…Ÿa RšÁë÷uLR1¨¸¦Á@ ”gOýÙ³£¢nñ¼N*]Åê—xá<\cyNê—Ó¨ ™ÏîÔŸð§é²MšÀ–Y¢9Ú£1÷œÔÈ_Iãø#ê –f×óä¸M¸ üõÇ@³ üë¯ÿYç“Ôîp’ÝÎpšNóÚ\ú‘ɱ¶Zõ£Ìú†ù5—ŸS#¡5”Òv×æR¸W“âý”0?F‡Ü¿^GæÆo¥êæjVÝÒDä<-8ŸWASuÖ½¶hºîs9ùƒ†Khn$FVf¯/$‚vZ¨ÉAå^=º¯Ñ˜ÒækÄ*/hx(xK¹{éäc‰Þ- Sq0uÕ^ÞüÖ½T í\öo­ÚÖŸ¬sÙ©éªÕ¸©„ø yÜ9«åím÷]‹>äš‹hÝ‹—Ôw7S¤Ë:d"G‹›ézf•wDoHj¨bzÃqî‰ç¬o‡÷Ë$ä¡ëL¼/µAJ„Àl•!,q/¤ãX4NUrÌ()ÙJ‰Íò[U²½5ô† µD5š ¸£ÎE%SpéùÅ•ÒÛ{u¶?xùêèåÎI7[:¢–¢g‹‰?¤­*`I¤sÊ…¢ŠÞZ@A³h+Ö­'8 ”þÆ÷r0Ih}jRI‘0øhvÖ*6¶ÄÚÓRA1è— ì‚¦w4¿ÃáÞ òèü^N/)¨¡*È~ö°©õ|ý‚Jr¹“zGÙGõ𥈠£š\–W‹Y!”Ø*a¦ÐÚ½coFììíQ`°s>Ø?ÚKË›­’§­†drã5ê*qܼu0W̱9’ iÎû#»Ö*„ÛÃï‘»~°MõTÍ#û>ûê{PN¨¨ª}ÜY]—~oV´GD*¬ÔR@øÒðDÛßg_d[ŒÀú¿– Õm ϱBÕèai„3Î=Ïés;Äp„‘.öCˆ:Û>% ½i6' ù nê'i<˜ˆœ²Ø™²sM6,Ú B; ;ÇÓÕ7Æ£–'…ø´rRçj»˜•ÅeÐe7¬D æ«k("7‡™5lq=ú–ÆAUËz¯12ˆV?ýþ’Ä~–›ã,Ð×g¿5¨4ül{®@ûhA¯&èÃF¿&ÇÜÇ ¿ßß?<…Ñ 2|5šµ(DÄ ‰¡dK\oš&¤‚·!²Û® »@‹ §9›ÄVO­ö†…¾Ë©‘r´r(´ô‹‰Öÿˆ±Ês 9ŸLœ¸bÉ®÷ú` £α°…LO|Lc} )fþgÕÍlDÝêtè">Îgýk—“ÉD}°þs{}''4W—íQ,;žÄg¦î9×j0]uòs£CáÀ¤üë¢h.SÓº.ZHypNvð ìÃëBWe‘h´S¹–¥©3ô;Ga@¬œHÌœb”ð îÀ¸•ÈdúBý¹¯ÄÜ}ÀiÌîñ¥B?uï„Ç0c$@Œ#å¯ Ì;nnðâ€$Bãâ K¤_q¨lkˆÐu;ö.OqçD©Ë›Ò› ê/× ®äÑ‘Vc|܉@ºf¨è6âh°¨/ ^’GBî°TYzºNíêWu‘­Š¾ê\¯fa¶j4MMª­¥˜"‘ÜàÊø¦æ›’T¦­`R\|Äݲë¦u±U=™[ꜷ©Gàê„ÓGÙzžï¦ÁÂ.eTÝm‡;§Ï÷»ÇGÏž0C)õÕ·õ²Íþ¶(¦²tŒ45:9)}Dk~„ ÝRд+¢ã‚GßUy•Ó.#•Ôƒíž7ƒ HóÎã¦z§ŽCÂ?Å}ýñC4±b-6öªÊ¶ ©gKw?…£Æûò'IÑôiHÈ)ahÌÅr ®#7­[õó3Á1ÃÎ yŒ=,àÏ/'°UÁDVŽ¦óØeQŸÈÿÁ’¸i2µMAHUúo®ŽDŠ”=‰„zE2#ÝÛÔân°—”ŒÑò¿¼öèËxÓ3ÿz ›¥Ù×4¶d¸3¢_8{¨:à 5M– _VYgæ–ý;܇~|5«I+Rù¬&*³` yÇX¼îb拆q €QBJˆ+ÀÒ—%Q‹z-íì”b4Z„xÝ, Jc¤˜tƒÀ’ÿ ÊÐÚè:Å>àÌmšÝí]¤ÄÇ;>#îb“ÒOy¨ÉPBSµeE?Ò¥ì4ß:ÜŠQY_-J:Çñ¿soŽOµ@K‹MÅA²Ü¾%Rt‚óIòVÖØÆZ'Š6²3!ÞEÚÑpXÈu˜wÉL‰Œ×L°ËJ­„¯5P–CU-B}½ñŠzŸD¿]ß¿™–3=•™„æ•g«ÃåߑÕ2g¨¸¡££s»28»ÑJsP¬›J,¤„Ò\0#+­²‰·cª[7B©’rIw’¥“AÈ–@e•Z EPY ;VÁÞwÖÔ׈=FYš.[kõ¡à:ˆŸÐàØøPÈÔu) ÀÞG;`·=<ÞÙ;8zž%œòÕ¤I eóc¦çÉ”y¢‘uWc!Äêxf²*UÑCŠfr°¨¸qÈj#Þè««Pu¾mº´ÄÃÍ’ç’ê:¡…¹ ÐÚöŠH©w—×ÜB°š†3ÞUgÜT—•^Ú@ÛhžÅh"¹•ý^z;«èø÷’l‰Yãï±sv¶z~p|t–>ÍAÛà—ÒµöHfëÌyz øjH¨°€gøcH `¢i„­#Óê©<÷7‰&,§xº%SŒ´èKD4Â&캢$öSŒ‰*Çš¹cÛ ­b[ž³D…ú=<Ê%!L—ñ.Z^gÅÒÅ â…˜ë%u7þ…(fÞ)w‘ÏÙ^¶†ÇžG°Ës"…gqcµ 0Ïx ZÙS)K‡~,YAÁ>º„-£Éî’4âàˆ÷§µ³’lž…zÃ@DÓ5š}—×.omãYöÔp2U _iM75¦@²ZQXu ‡«î„¶„+“h‰lhDt¥¢S³ŸøšÎ6*$ Ôðúº–Ê*k m4<àòe‚`çY­ÅûœE„tÖ!ŠV_b°1½i £.,Ò¾ F_Ci91Øî`pp$Øê_»ËN͵_ºõÂÀÂéÞ ¬¬[LŠ¶µ´¼a:a]á@I&•šÈÑÔIsªP“‡¨”3„ü™‘–Å´0ç¡}uÍ´AððÉé'Ñ\ò¤m^5 }ì jˆÑ–VóI²¦ÚÐÝpÌžav Â@Cê'£A¹´ðù’ô»ú½óÆ(ð}"Ä’’¶nà·TŠáP‘ ‰D>Üh1“åb » ÀI`Ã0ˆõ­÷KtBÈÇÌ[&Ħñï¹ì‰5[2[Pˆ«JŒøµ1/ëLÔðòËÛ J¾›a&ÿµbÿ^‰ËD¤EÝÕàî¹÷$­\šÁ4ƒnrxä›ðÌÆt’ bv,â20ˆ´10 ±}Uù ÞÓ?¥FSk§#µÄÞ›Ïa1 :6ÝZûpWJ!áD»™qï†/‘2‚gƒÿ¼»òùþÚ‰±½DƒœÝüW+S¯ô¸Çv\…ÑP>d:Ñl¨s‰ÏZ¶Iü,+Ûš^ŠÌNp­YI‰`bÀ߸t|Ƹõêt•4¨à4IŠtu#"Ç=2ið;êæwÓ™m2)× ï…ÛLj€Í…jâ…{5’Ì”æùYa«Œ6µ™šæÂgµý¦émI*Ô?’|ûïV‡Ðû¸È¹£×Ü\Ò‰Ü4ñ­Z¤ÌÌ(#ä·ø´!L"7£n¼½…né«Œó;,ý4—w©Ô¨uìP€ÂL0o››hP¼SVºtÆ··ìº ¿¶³+Í1ïíWÖ¥"ôø"ÌóiFZ÷rþ4ݵ0Q¡wò20iÙjlI[ˆ›ú£Ë¥ÙíMÃñúnsUݪJ$ÓÊ’ø¹˜U xÎHy”br57ĆmÁ*Œ#ûlì0Ú*4±¥é%–Iä?r.¦)¿T±L‡m¥O•w?n¨YTŽ«„Ê 4ɧ¹4(äÒ)Â4r0¿†)A°_š˜LPx‘Ǥm …Z„]°T‚©Ú1r*§Þ*ìI‹‹Ð-c`>á¾CÉq3/WFþl ¸‡hÁ¾1?ó0¿,hìÈõi’c³Á˜’=@WièÃÐÏwµÆSÒ8}1md3“á}™˜žïÆhQ;ÞŒÜ žÝ2ùÎ÷ïßÓ{Ž:˜úÄPß©š^»´}Ù±ÕH§´Ë™k"œ›Ë"8-&þ3Ëoü/)ÿµÿÑìçx°µ¤ÿ¾õè7þ‡_‡ÿì‹åJ¤°›øïDæF¶ÇZc©œÿ€žú'\m\êãEÔ\< cm6&© äœu É$¤Å³ºXQd]hi§rx™Ò…ÖÔ¢ÖÑ$C†#Ù.åüXgÈ0‚hç‘þ,UmÚÕ@0 ;(þhG.…Í%ÛlJˆF!®ÕœIÕžºx¼ÃƒílÍjŠöa(]å™· ç <~ÊÀ•j^R@ËáÉã‡Ùù\¥ºÕž¤mhùiŸmFªíq<'fë¾OÐò¯ùøaÇŠó–‹éµ;„9²¯ðfLÅn=n¼dÄIBötøs¦^t§kÀ;f‚ZCò]äQ¢æ è’¤ª¤Z4ÊÖ•ÄœE*JI•$S›R[™dJ8%5*hÅX2,R‚I .ÕJ§i'Y­á¢,;Ì©bg,UCÑru¾›jäJmªÚ Ubm‚Íh×—P0hsõµ ¨¡ìýŽwwi’¯¼ô¦ _ªú¢.)¡¯«Ëù­Ö¨ÐdTð‰Š úL«–Çw‰’é6Œ®‚:ÉÁ†(«&V5‚i>ZDÊüb~[h™¿Äº¢¯Ü 0 Þæ&Ÿø©*Œ[ˆ·E “‹b\ú+0(%ïTkë¥?zŠ%r²ÔqµŒ¾*-5.ÞONŒ,RdSVÏwµ¢ -\’z¡Q`ؼ 5çï´À6 Õ]£0o:„KìŒ8÷O¢DV¥yùƼàñ†jX@LrOõ[jzbAG k§ 4G^`n:GÂk…WH„P[B½þ¸ÔW<¤HÖwRÏk9ae¤Ù‘ûTæ•ažïö‚ÕOû\µÀ¡Î|æ÷•À9‘š"<ÍÁÎ㇠wòàÁW%9Fšˆ%^‡xéáÁÑ«7k_ž½>8z°m¹µ6^ÞØ4±ÓŠ“V˜#! ·ñ.3¬¬CJ)_ù2U¢‹)Þ¤j’Žpöû³Ò´Ââl¾Õ,ôu1*-š`,(ø © ÎL«±„)ä¿M 5b U:1f4 {uiy«õ~wUA]©ŠÂ¹¢þñTX‚木ԕG›GâKjm todÀ›  Òµ³“ÎÚħ¨î%È©1âµ²6Œ9y!¡ZÍéä%2ÃòéU`>¿m´3csÎúÞD+ʸ;ù6”/>q5W`ç:‚ÉEdíÏ,ܘƒ!qüæ«Ç¨q^±¤D-lS2¢ñhRðóJÕo(,h!p~¤TzUƒ–wž¤Ó@Ð ˜§g»a(””Æ¿Ûó£WÊÕ¬ô7]¾8Š{£—̉»ì‘ž¥á äv9ÄÌá-¯‹tèQe·b9’?).ü:Xs 0¨ûó;žž“`ì0³©ÉŸ²D@½sTÀß³ ™ðd¬ï´ˆK/Љɣj*•Ò‰¿UÐŠÒ F+^„Fc7œ©‚R4:ƒ rú§û¶oàuS¥òŽÜRÍ Á½é‹…"f!VÔOCð¾µ—Nˆ?Ž¨IÙw+~ü7­'Ÿ™ß½­äg£æÉ„0ŸÍ4Ζ`p™A £›!qövÎwÎÎwNÏ[sy‰„‡‰\É< })Ü¥UîJodåºæß.ß,˜€øتLb^U) ež'’…ŒÒ-#,6 ×`"³¼ èH@ ‡P‹­Ç¡FýÊú-+£BéH "@ y1=t±)ÝÝ\TãÄ[ W¬rŠ‰11ÔÍŠ• ÛìÅ&éˆÀ÷Cæêfº˜[A’³¨ÍóÝÁÙ]ýÃóbŽ:þ3ÐWkçi”H*ëy©…2NÂIïçº'F|jWµ¯ƒ›\Ñé—„q8)µpȵeÝÑ\´Ç°’Á,˜D'°× hX{€wk©©ˆSôlçÔlÏŽO˜)ƒöt=ˆÕ6VL6Ën7f‹¾ OŒÐ×2êß@L‰¦.¨[4‹Åš<ï†/;ðë+NîÛ|Ìüêúà4Bmi^ŽSLã«Q5õƒRi ¿wTuù¾Çª‹Ôf:˜kÄ«„¡Ä´¶±æº&ö¼6È ògd\Ó¸B`’ÿp«ŠO4R5-¬¹„I鉺¹±Ø¢–qúOí&åå¸o_Ù3»T£?Ö©ˆ³àp{sl¦>îDjâ –ýf… ¬ÅÖ÷wÉÒ6 eZÉXâ+6Éín¦ïµ¾X“AÌÕÛJÌ~À¯Þ]~Q°ù=Ä e ¯”°nÊ OÒOp•€\j)Ôr ÅS:™Üò’7å< ´Tsi¹ÃãJ;G!èóÓã×gƒW'é.Ý¡Lð7Ä÷¤h›ºC ÿ2ëAÒï÷ò…Æ „L6‘œÏtÃtßéÁç–×6ªäŒ£(ÊM¥:kJäQ¦!ØÐòÌÇøè.ÝΖÌ|ï+³EÌmz§Ñ"ikæYÀ³!…€@Ú‡OÏÏ_~ШVþIÖӦ³´XþeÑõ<,“&øÉÔÒnZð͆Y©±Ï£Gšh”êdy¾K°¬ÙÜU±ÍiQ/~´´o¼81TÖ´QÿÏl=äjÔ/á¶ê~º½ ÂEíÜ JÊViJ”U×FzÈ¥„ä|“$ðåí{hâW¦hE9"L]*Þíòƒ£ƒs;×8Iîô½R0†1—ŵǘë`õìy)xÚ莇péªÇ. /=O8„GK.9G9rѵ¸-mxCÓüÚ€ç=ˆZlýž9ÝvŽ4J&ÛŽ8éëÔ\@14£À®½â5H· ¥&Ÿ$‹ õ¡;!VìÒŸ›… ¨KŽé«NAà‰Qesé+Æ—ižK†rÙ5€Q½ sZh¦‡Ý­²«ÝV}Á(¶;LRQÉ)°ù~K°qgqaQ>N¶®(Nò_ÇÄ´ú¿ÁëÚõ1À§D'…´zÝÛòSÓ²Zq¨)&y&¹­hv;*"ò þ_LðUE°CÊnVÏ]ƒçÿñücùC€ä^4¦I>M”¼Õ¸?Ui¢×‹ð]K©‰ÄiÕEՄƘ dÇt© N°Všuh;Æq‰·ƒ0ç-<Ê)Ó“Æ(UñîÏ°Á…«D|À—'§Çç¨oúaïi7óÿØÅß>0çŒP)%~Z{WÎH1òÿ{‡pËš[Ön­êwzûC9Qs)^•ó$‘T'§™²'•…fW+j4¥´õ6º ¦&ÊHù:HRuqç„ïmŠÐa€gIjz‹,whô°„ã"îÂYBrÀRÂ|{$1ÇON÷ŸíŸï¾@ËßèP½>=8ßo¹þÑ£ç­Ò«ùKâØ&É3G¡C?'é}n?ê1Ó`ÒçþàîUÓ$¢vè]¼ÁÞñ+S«ŽÝÊož+Î7·ògëï;¦ '±}ª®”#ߜԘÝR‚iT ÌR!·=Û€mkzR˜ô‚œûæäuôóSËI㙞;'K^ëŠ/¬n&†ò´Öµ”Œ•> Ä]„Zÿ&ŸJöÉ5j”ÓàÚr¯ÞkË7bHAÜyT-üªéñuÙ'ä#nWN[ ¹q18ò•ÙÂUZ/è4@†a–½D‚Gƒa&„¾Lùø,\¶1GI×Â.y¾û%×’½³ ¨À]ÈÚ]0±ã±ú½kJ" šn£Á¨C äh 5I5@̆ÁÄt&M´w²@Pã÷°Q.”bâæÆ¥Á߻豙 ŠÆõ`º¨¯­ø üý&û\šGMk“C¡K(QZ…œaÌ<'x(¦Ô§et(Íã8ù™F æ¸ÂÒî„~°ZEˆ®´1…¢ìÍó3£‚q(§Ío 1'‰•nÒT~Í£l¯únV^¶ê%õøQú—bÎ÷?W]Íã€Kˆ ü²&ƒÃƒï÷cd’ŸEYðâí—Z‡°K0óP´Ó”ß"‘¤ì»ï‚œ½½MR¨îï' 檈ýñ1XLnQ—=Âèf̤'˦À %îKîY»ùÇB¬ÁÄ=ƒ…¢RÑš—)éB™Ž¼ãôSZ «‘y;ªS·Ù2çv&¡|Bï  ®Q˜Á(ñ±B ²õ¬k¯¦ÂO†oBu•ôMbj±¶ð ˆ¼&¥)òŒÌ-ýž*1ÄèµäËZç8ãtZLVdX¨ÀŠzªç»ûï練T|Ñ[‹qVN¹‘#¶±t>Â5`Þrt›4T¾é½l°}âÍÍTJÂ¥˜a¡Î•Vr à%±;¹‰Óhl¢g1Ídì.áTY±û$Õ)¢‰‰ Ú¡Ú mL+>ˆøƒ"«VԲʮðò@`aŠ#—Áœš!u] ËX O»_Cƒg±j˜G¤W‰™ž=͈Is%ax,)³˜@ç]6­4 µdŸ%á$ÊÆ)‚§ËOÒºJŠcÂÃfR&|=¯¦¿”Ç£ätñ»D]Ë(´ú#»5“Ó ¬XS¶U‰Aâ?–µoC,®ªòÖššÈjF®œ±Ža@+¿áÑŸÞ×w抟ü¦vªWâ°…à°Ä„êÆÕ'þ;Âz¤*uf#~ÅبàÁÞ£ÛZ¤(p3AËGÚF&Z,„¡Ÿ†~®çÄ󨟔°Òà‚„»$ª!J¨¿AÛƒLŸ±á•¯r öQè²h_Ò¦îˆ,^+FƒjºPì´‡Wé¨{À–-΃Oàl#ç&7)°%B7*åÆHGÐ þ(QÓnÍË$3—Ï6ðÏå‚èF,¯H™/-FŽºˆá ù¹{Ï á†½÷°IÒí åÇD– óp¹×Ùu’Å7¸ñ4ŽŠ„ÿ(Ÿ${& c·l †¶œÿÕbÎÕã-¶+ëpcõÉ•Å:¦–!·ŽªIo:+X·B›ìukvÙ0^.f¼åUS÷ꢠ¤Ø&•Øo{­ð]Ó«L=é“QèÊ%d[[ù.ŒhhÚQÍû¯ˆßc y„›a^)Êq)à¸M¨Ï’ÚÂ+Ò0­ØŽšÀî>¢`q6ÄLªp­ëRµjš‘y#¿Úb}&'Qv‹ÓG q3!~Ûš ‚UŽcñn…4¶šsµað[Y¥PãpCcý(ŸÎƒâ†&$?»·ÿlçÕaL uÄXcÍu5¦²ø.(ÖÑ^¢0nŽ{|ÛëÄ~ 5}¨Ò‘°Ì øNÆÈ>mă/*)` •)u&˜‘Ë}-Fsj”þ,!Ò°rÓåK»¶#ü@Ih{V7- 8Þàj~«•K|Iµ]ÊZ¸šfƧ¬æá$¤N¦~2e"auáGxÌb] §2Ìzhõ0[AÄ!¿±WüƒùTìn1ÌŠ_‡ÿaóá£Ûü6üÆÿðkü93-|`½{ÜßT=UqtQVWÏïÆ…°¥Ö™ÔØÁUbøÄ{uÎfŒ„wË‹yU_®q Ôg–z™dçþžçþÆÅÝg‚Æ‘ÑÕð§¾sç&™Aì  ä~G¦)¶HçЈ¼•ÿÚƒXùè72¢p¶Ä±Êô;ã7Îmu²¿Id›GÈŽ«ÓöSuÁb+`¤Oóv²Ò?I̘œåÁ< Ÿ)yŠ&,Ö¿ö6'd9š·¾IoZ‰¢Usø¡ƒÛzSÐBEW#6"ùf0ºKY`(I=¬‰ùHÖä„ðÐð¤ø¤n¥rí,Ž¡2~k¿æÌòöl²¡ð­=dk6ÇP cVžÚÃó¦7ÆÁ³Vrå0ª¬à]„yLŽBj¾Y*Ç_ïE&© ×µ"KTëÛY\ƒ}¦ô žïóÜÄ¥ýdþ¬ø,‰—šJ+TØ|3ž{·7Œvø¡e®˜¯«(•˜½š|ÞÆšgwż5§>ûNƒV“ …v’~€‰~WÌC1^KžÛ^#H>$쇫4ž²¾+VŒ±&ÃCá·Å‚1ýŽS”‘yã(ñ ƒ!ë_Uò/“ f®×µ0 ×عkXâk]—0hG,pãâ zµ>pV¾K<pÐP/\ºV)î{û4œ[xð&¹Eãðnu¨[ƒ¸6š_‹Ða{J %¯bjÚšð˜*8´Ö—šÝ¤Q°Þ(61ê¢[¶*Þ”³ž¯*ÖH-rÝXÙß@ß¹×½'À¼ÉìmºjY°Z4È4°ƒÉ….»÷Ï¿o,êÙ£mæ ²Ûî‡û®¼ãŠûíü†4KÝ©¿‡Þ”¢ÛªaQ?A½£ÿé𺢲ɵ5¦˜^b!Á3?!BˆC brF-U?Á#E´&iÈ\ºÃ„@,¯*ŒY˜c¿ìov>ð†FpËÃif³Ô¥gÙlœBŠ¥T#°7bOdÆcBΈèÝ¥‹zˆP½Î£N×¥§­ÿÆsújØÏÍ ð‡6Ñ$‹Ó`㢠þ¨Dˆc¥q̲ޭÝ5«óƒ[ü[5èKÃì?êfòÑë|îŸ2Û5@¹κð({þIƒy‰*'³Ò'{Ê:X»u£XîbV½-&!’Y€¾„ˆ¥@…+‰Ð{!h¿5=[IïÔξ0GiùŽ5Q¯X“§B¶C ³Ï_4D—x¢ S®‚&Rƒ·24|±Z…L£ˆ«Uy•‘åÊé û~“WWkVÈx'™ûœ›[àDgHø¯4(]ˆw5ÎëÚùó¡fÙî„G·„«f"™ðD/ÝåŸ7rpLŠ(§Ê_apÂ]1cˆê€±sPã ὘3pI¦©¶«Eœ¬‰oíØ‘‹u䥖nš:Ó£( Gø²RýNF¦²GðêZ…õtÀ'¿…Fg]û^SÏeocÜ$–zl·s®ÂãPG7{Ã¥îÄb½¿–í©©1"ÒÁ÷-„b²h§È­ô/g2‹@©åñ¡@OTuY`hÛHCKLØŠ)ŠS>¡ºCzäóp¹öà gäºPì›p×b¸—~G›{·Ñ’6pp#Oš·Âý©}âÆßgl·Ï“ê4–ˆçh '¨8 ¸â°´€XµÜ[—fý¬»¡w4óaPÀ\u%·L2 4uàÔø;) Ø–çâBk‡"oÌ<¯çôæG”T×Óbá²=`ïȽwo&µjIî†Y˜I„ÈÒ³\ˆ Ií¦ÊdÂë²”± ÓÞÖGÜ’”©ÚÒTq¯ñ«çó;¢Ó®Væç Û< ŽÎ9‡íŸÛþhæ¢"†!žb_Õ1ì}¬çÁÆ€µx”»¤ñÚ;xZÎoòi*öHPÉQŒÔX¨Kî;Åõç‡ÇOwì椆z?¨šÝL}'"³³¤Ô.ó<‡,´®?V“œìX»cx'—J¸÷6ÐeCÓKæ6ãoºÎƒfÎ&o÷ (ìq+O¯ó‡V¦~‹xÁmÔçKËy«È›ïz] k‚™õïçšÕ”Þ’J}^Y`¥„ º‚xû«˜Ö?{û>Øç0\¯ù‡‡lüͨxç/œÞˆOL“Á÷)¼Á#Ìëï½ãx¸nû;:óeS7Ï°{ò*•òŒb1±äE åÊ_=âç`¢döŠÉ¦;> §Óþ5­œtì’–#-‚ ™rqêì²ÿ>&Äo–ÃËA™¶Ä_¦Sí˜[ý£ýs‹·²¯+|›½€FíÓª¸¾a¶ŸŒ+NMú‰Äž€Pá‘3\x•ãV‘_ÔÕx1Í”š¡`ª6ÃXÜ0 Iü¢ÙI,0Ñ ˆ%óDæåšMÙÙ‚%åäùk‹³¯Ç·Æ©ñžñcÞù™Ê»½+ó ›kÝKJ~”0#½gÖë]WõüIùø«Ç½é°ç×ÒÕíƒíÆ£$iæþÅ>õÃÑ•ñZͨ d¯‡(??`ǯq¸Ã­×ç¡Ö¥ÔÀ›ÞV=;B1ðþ.èú“åW¨Î+úYn<â{¯­­õÝK1 4 s诿á/ý…Î|ׇ™û÷S©Wžì?s÷· ô4ÃÑòtwwœ_QRJûYtqõž[Y«Dp¾ÞË·:JíâG$qЃËRNþ¯_µ›[ßø·éW©KX¼ Ô=4`Ã'Ûàþ›oyže;çîpçì<{˜=ýñ|? Äd<4îz|z¸s´—)ª#{ùêìÜ=ÝÏŽØ?==ØÛÛ?bˆßïÖ¨®/'œ±Q\ÐN„ *G{oÀ{6*º%€ï‡”æ&ÿ Õ¨¿îÿ>ÉÇp)x6¸‡_=Æ>~‚ìæâÆ@š6€e§Èö¨à+º:LEìÔd¨çzÖ€¿E`_àŸbÂBøÎÒP ~IÈAH«å?G Bÿ“âJ¸øÓWzCÏ x2Ë9X\XÄõþ“Æ\ŒDG”‘ÑEwÇöaB¯ŠhØÍ«i³x×$™ÔHã¾ZR%!š ÞymÒ.áënv£µ.ˆ–â7jiïíŸx#Û­Œµ­I]ˆîLó/ÏÒe€sRÐFú¬®··s<8>Üœÿx¸?88:ß?EÕÅþÞ`÷øåÉÎéþ`ÿÍî‹£çûÆËó5Ù–(LÓÚtñO­q­ûž×ïü ù¡Ÿí~Ç«Þù¥/Ü€×pæ|ÓvÂÇ"|`Z¶µÙÌÃ{k«¿ý9èêwåj9ã)$ßÞÔ£Jÿ—‡WЮ{Þ‡%0ªŸµ«&váñÙÆ6@³ÌÀ*‰GݳWñæٲ➔ó`sù ÇÛrÆ4Oí~šÝ£ Q<àjÑg!íRÐÓ7æ÷#n΋‰$¡Å.×0›=èomq@¼GºîÛtªpÊeŽ¼Q9¦Ç¿B‚3œ÷Áj/J «„ßÁ1¾¤Ÿ‡Ÿ*KNxF«¦6ëá¤ìur¶d*r)à@9Ñ vTˆ³uKÕKlÄ÷p§k\<ØåßI¹¢L— \[2Ið¶*Z¦Ád”°™ Zð¯Ôâÿ†‰²[ù½ËÆ+8*q$Š× ÔL§þÃV©¼ ³!ÿ§ñ>ŒÌ㯀…/;ÐÜdu³›]Á„r¤³²›ð¢®‰i²¶m-&ª‹ÆÚlÔ5QÕ‡jâH3Y‹‚ºƒõöYM¦v¦ƒµZÕÍŠNnôo,:]L8<H->Æ­cê.Aº¹oÄiÎÖ%`$ÿúâ‹N|uåÀBX…êÌ´.½¹S°þKfðLZ@&Èæ;á?F¡¼«qu‘“Ê‘f+bÿQÌ®n5ÌÜ£h&|¤Ó²™iæp=Ų t¦ë-¹Ê;ÔºƒËñØùƒd({?OÃ7¬1D«n:˯nòŽJHü¯NL% $âIë?L ö’Ä¿ùLë‰ ™Õ³uÌ7P­G¦cì»– ï·(×í¹ëù|úÍƆ¿òg?Žy®ý-«_Í®6À¸9@™ÒðªüŸåèÉc*¶ø=ØdYnóYœš;ÎnØqVš½H3+Â'IRzuü§e 4.ÉË׶ÔB¤BÆc´-F}ý¼˜¿Ÿ æäµRqÁKˆ…5°TÝeÆܘºUžèÙM!dA°·$Šå§^@“‚×d·O ƒdȨòIxXe“‘§|AÜ2 *¥œ|æ4ÑBÂPÂ~f‰xû™±?@›Ž “#j˜C,%îJe…Aç$–Å Kž·eꪩð­ïÜK,7`÷\Ô¨O¢½t?”±YUæ9…fRiÐ&š‡PŒ/±¢PG‡€.ÌNý1øŒš¢Uz! d° ‚Ô«ü̼iˆiyÏBÎ “L[ƒðLÝ4¸ä`‹Ó;è&”vÄì-áÂ"à+ûÒ1flb‡Ê{OnõkG¶Ÿ!öîmÇ£gÏ9DuÁÜc¬X-í%>ºÛÜ+™+u(.©cñ›Ñ¡¤ì¥Ì‘íe™Þ㨀xÖ¢X3T¿–àgóÞ8vDÞRJ4 Ÿ Ùçz+¤¯h²± Í°/ô$ üB0zøÔÏ„­döØlˆ~é{ êPªQÉ;'Ðá<`Ù¯1Wƒbøq~®›H,J¯_ —@²ÒÀèî,M³)!ô$º†ÚcÍ¡ø9µµ¹ùÏ8yŒùUÃXè{S&[Ïûoû9âÖZ0ŒšNÊþ–ĵ‘Ôl˜#’Ó¶Ê_B+qLÔIDʶÈ~3<³äÁÓפ Ü¡Üm^‰ÍÐÛx–­õÿ$ï³–í>{þDƒÆY¶±·àOÅXÓ™½ÌKQ/.‡x‹\ü'½H&š„p<‹Ì£1Bæ ²³-Ã. mö[k*&aB§Ý³zy´ÈYÜÇ@\“»H6~уñ7>ãÜxÜÀ| ½žø3-#$¨6⌄Ú3=J0O1Âh‘7Çj&>ÎÎwÎvWÌ#’#FâùÑ+Çë–Jq¬6QÖ©-Om.Ò>®ß+Ù”eyÜX²“ú_1˜ÙuÍxâJ$W´‘nÂ6ûL]‰¾rçîyëZå`Zs<$2M¾¶ëÂ]U챕ԟR«°@.q¹²x/Жï…0ýÑñXΉ‘ýR¯Þ÷?•æò/à´xÌ…³•ÝË1htf4Ѭ?q¢РcÛüרwúݬýéSŠM2ˆÂKáÞ V•ŠµxØ‘Ñ@Ñvß®ê]Ãò"_¿.ߪª–D I’ƒ#­ÝÝ–ÌlæL'UŠ‡­.]z‘¦ BÌAIp9…œS²ØtÈAv¸V³­r9Gý9ÃB¸¦ˆbpùèÜ+jÃ@Q>Ð㜳p ôŠ?º$š±srÀ†º.Ö0ÆÕ¹´p0i½• ý•ß|s7œåõµÍ”ç»Éa˜Ê©Ý%&ŸŒÒ¢@—ˆ¾Ï„¼XOÂûBù—LÇ2öŸè¯eZ· Í<ЛĿiÊ›Ž ‰ –wrþÚ¬›ËáÁÓ𴲆Eb;¿Uwý}øOP®—ùäWÂnnmm-Õmmý†ÿüUþD”ºÔ–žÉàã¶úƒ¬ý7ãξìo¹í~öëþ.jwßÜL݃~vT‰Žùnõ½gHè´áEH~:ÿ5ÚÁF;+ TËmn®û¯ðWç’:²dÌ7Ù™˜?Âk«µ,.Ñ0.2liëóÓWÃ&[Ýlº˜Q»® ~EÎÃz¾¸ n.ýÝâT¨1ÖáºÓw9Ö轆‡º›a®":i„ã›ÁºÂð©(ñzv/y™‹»6•øÙM¦C´XÑóñº´Ö¡&‹„gUtÖˆtK°QLªnw= T´Lþrœ_ÁyûøÔ“p.þ¶ßþ¿ÿ‹øßÀ„þQ2ðÁÿûÿ·ÙÚÿ<ô?ÿmÿÿ5ôß·w¼Ë:(ŒvvòêéáÁn¶ÖÛØxý`wccï|/ƒB< ù[Ùù,ŸÔêÏnlì­ekh¾½½íß>`lùü”ù7ƈÞöGóÑÚwî[¶>Î'WOÖŠIoQ¯ÍùooŠyž¡÷'k»Bâ×;¿›kFé÷d èW6ý€h½­øäÕYoçl÷à`-‡3Åè_û¹ËWõ ”}EÞRgø·sowäð‡SCÁþolÈÄì£ôE*6 >üÞÅ]ÿð)áÈ¥ ­d.ú©•ÿºøŒ¥ŽÌÃçþ”,ÞC ©¼1u‡²&+C_ë: ­;‘;ÕÖcå}äL`Õ Áã Øî_|l°‚´¡ƒl©+´#nß0拉0ÁZ —D»7•ð2;#=v>›¯â`o¦ÌÙÄÚ•j†¹JÊ»Æå(y’ÚqG¸Ð ¿¤’©ŒFÍ~NÇ‹ÿÔÅ”EZgb@'ÅÎÜþ03X4ß$æJ³Ãr= oÝ& ›^–ÞOÅ] ’fÄ=o©4ÊOŮˆ¸ cCy»¤„ËD=ýÊL T½ÖÐ~ŸH‡âž zo_e?³Š‘f®€a¼ì*® r P£»AæÅ Ü(j♈{‘w6æ²A²b„Ocû”m]ð¢°ù(AH8ÑrìºáRw vÎ_쯩ǜ@¸=°ZêÏN÷÷­/e† Ä[j‚AÁÌQqxE"KÙÙºz^hÚ²IbküÊš,/¢`Ù)h¥ÔÊ P–4wMÿ+@­ª.ìñõ©½¹çEx%2’CP —™¸ÛW˜0çâÌlÊc¥:‰0¬’î²Q îlxó:4£<ÿbrÿ`òZïˆ`D„¸³zKé€iêŠ}sϪ ÿ†-ððlÞ¿¦1ßø¦žÊJ¿€ºÆõŽû"üfþ¦iÁ?øÀ…[/³'Ùæ²’d*ôæ?øâ‹’ÿᔳcž}þùÔÿx]þÚÉÂÔ[qqù¢Ã¦íŠ¿† ’ßëTM. Éû­ãFþ±ìÓä¾lFgÂú_»Ùvöy¶¢?rþÍþYßG3FÒ^®¯½`) ˆPždÿ<úÓd9?ð °øf]üOÿ ©ú¾rÿÚ•ÔB­DìDÝ ˜·Ýê#ÆFƒEô~ Zo,o të†.n‘œÙ1ÛpéÝĬ©dÕKP[oHÚa×Ú¿îÉ`PUVN\÷?Pë´ÿ ‡tò7xHB‚Ðòú¥â*ÀµBVx…Þf3qªK¥%Jb$Uc¡Ã>@-μÍõ«U³Cò°ãl»^Ìb¡Ù•"Ñ´&eÚ”ó)uCþkÖ,õãÛù {Sé@ºA³+ͧÓñÝ7Ñ’0:è•-—cCÀŠ]§Bj íüíÁw,›|kF=o)qÊ0! òd×ð„ ДWŠPŽ„¼œ¬Õ¶9âW²•Úä_’‚Ïb V@à!3õñT•ÌýòÉõ¶(¦šjŽ%d §³öß=]w^1~yÿÐÊ¥øD«)ßýd hÍêÙßì:ƒ˜ÇƒH 0Dœ…ðp+÷7Ÿà©ü>Ö †zûóãߊwçÖ€:à£&–㪗=/ižpH4¶ud ßÙËÞÀЉ›ô‡£t –s\¡ßÎ!Tƒaµ8}ê7zw¼Vâ7á÷ÍR <µ{¤{KŠÞÍ´N ¸»&Ûà@crY=ˆ¡^&ô?¹¿ÿ~ïçÀ4ljÎ ÅÒ&Ÿ„8Wí÷Á^uÝïs–Ûä [!wü|¶ßªßÑ颈ëow2¿ŒŸc5Š3_û.ûO(tgßøÝ!ÿ§Û%WAùÑ rÏ€ÀëÅDëOÎC Â0jáÊ{šô›íH{ûO_)3þRDcÑïcQœfk{Z§+øºhk¸†FÔ&°Þø.2¶™£  ™¬Z°Ù.Ø:ÒÙ…yÊÇrñµÃ}›ïðt‡× ó€ÈÐwègˆò¾Áè+KinîìDúŸŸâï+ ÛÔ¿î%±ht‡ßüë%‰SÉ• Rs¸7ð;"ôäWR+ î…EcR(Lqzèwå`Ÿˆ'šÐr-«HnÐÒÊs ‡Ù‘0ÕÎò†Áƒm`Ç”x® k p5]\ø+ù`Å^µ¸!‡‹,²³Ð ð¿ôó²n ïöw»¡,K‘´o¹ÀY&Û ÄaSΕ¶CÔ€ÀZÝh¨8ÒFU‡É©£4f½ƒ4_°a'´ÜÈHløaØ0n¿^şرäL·¯w ŠëR#sÃØæ#9nTQÒÆTÈ’6Ô­²*F¸—Yz‘‡’[‰ü‡–Z€8´R¨i½R¥Øntäo™IÑ­AÍBSU®<ÐÇspÃiÐ\Ä6·ÊÏùç§;§?NvÎ_¨©þ_3:½Ùe Ð$ab„é\ÌjE›L*^#©¡±6!ÖžK"ÌFærg'-Ôæ16®ÑwnØ ]&5·dFµV>‹œáYd¶ŒGcÕô˜é³¹öÔaUIᎢ™7ä™p釾+Ô5ãF­TŒãŒ)/…ä_ÅzšoÞàÛm­ÆSM/Ž&ø"ÉrL° „ú„ŽW~JÃÇ©!‰wK«'ÈS-×uฺ¼«CÑ [µ“ÖmeÂdVB€ìô@Úª6µJwì®À*«çPAÔu>ªÀj‚=MhÎ*¹sC­Ak+²aÃûµÿ¿=þ³ûYToÿ#¡1À~ùxs«ÿÜÞÞú ÿóëó6‹„î£ìšŒB• ÓóîL&L¶­U#+.L ß rXK!§¨Õ$ˆ—†8ÒÜúòe ´±e 2½­¸¹õÔ¡xyrz|7û‡½§iá”ÿxW?K7:Æßu£ƒbËÙÊ@ÀEüQ4®8 À›8•R}t‡Ó”©4z«´œ‹È›6“jG­]­B™#JȆ \Ê/¸ÄkP.ÐÓÊÕ¤oo–ë ƒ“¬M`B™w‘t ž”—…‚+’—ëã‡0¥ãžJœeÍ&èlÁ³€LfC¨¨QP[Ï­b¨vöß1¹ 朣9•ê9dl¥€º»<kNŸõŽŒ%ÿ*hYêo…”ê [+ªÞY(Á~Z4¼ìŠÇè¯é1Ó‚¾u "ÁŠIÍQ½ …L›¹À¼u¡¢7‰A‚ÎJ³¬áu1ñçŠÈ{'Röã±>zr‰("SŽHP4ºL·Ûð¼wÈç8)‚C»¹É§II)9u,„Xgä#|¹sÒ\>ýNð$-aÍÜc­dƒ#? ´t(¢=–¨'ŸôûZRôÑVà·THø¤š1ø›4J[†wÔ=tZÍï¼–p‘ûA\ëÄ2bÎ;ŠÃÑra¡2§ƒ.ÐpPû³²¿…ðƒW8þÉRÛ9¬ØêÿŽwNÎ2¾~ê}SÅèPXx—´¸¶ð`D}ö#‹^=ßÝ †z·±Æ('·ª&épw,ľ¨‹raKÔ¯eEëÕÌÉ'ú–öM'² ãö$ÌQÖ³ÚÁ¦±™(ogÙ1¸õ¨%báÛ$†¦{nJ‹r~_¸æ*h¾=x[B ÖCÎj¬ë%ýœ/ûlç_bƒ%lÕÞ~ÇcbÊ…ŸŸ¢õ´F‚0º6ešüc oŠ¤¹¸ÿF%pÎcV^ˆKG/cfû…õ¬À$»ÎþýS…ZDûì÷á5÷ñÑd¾sغ¤lCÂl2TÕØÃàH\xÁfÿV¦…#Wšµ=œÈƈ;íÀÀ-Ì.ÔGâù^¢AEmÄ6ý®d™’“òx-3š¬[îQ‘¶P÷õÈ‚"²Ê¢ÒpKÅfZÉû¨¿™±”÷QW{ÊF¼n¨û añsÕ§J'€Ý”ɳãSݽö϶Q‰Šð¨¤¼„ÀH0Ýalj&ÉbB9ìÀŒ2_ͪÛùu´›äÀQhI¶;7Fð±Û§•$fv[]³1ÚÄ2å…éAM²7_=Î"¨‰½%Rf1B}ö{‚™÷¥­"3AhrÆÿç­i.INk ieAáhMZ}ìa•ZQ ˜¯g,j‰,ñ-åjßwc–DT+LÓ)7Ê_vº’ )çkÉ#à'Y0þÒÚ«hNŸ-&ŸÕ„TùóM9åw¦~ÅK]+Ñ”¾c†Úë)0¶¨«rârr”U ÛõP:h6ªÑÃᘠ9„Ë:× Õ5\8M¬­{fgûÏPÎà“B­.ß ËNس¢ö3“·„¸8y±Õ¥¯2”9¹‡O’”)…ÎAOqÏò3Ž0̵¥6{¡ÍÏ |:%?Aøè:„³¨so¨s.£À] d±‚„ƒ5í­´wJQiF½QA̯HUâ_d 5˜Õ8ûVÙžûÆï†þˆœ·/§Õ¤§äEk¢Q«%û5Y¹‰´ŠÄ[Ç£&§*ÈG^ÜÛülTÁÔ~ʃ“0@a%Ì°^°ëª&²íz®I×hKåû´™‹Â<­ÜÊ%Œ´ ‚å$p#âuuáô„üÝÝ`¶šÁ}WQÃvX¯ Ó¡3L0åƒÏn„ J-4Gå×›‚’“Âɱð΄³½?ö…sÖ­Ç|(’¸!B«Ö¤9&ƒ"©©Ô=<Z|8ì½Ó€S®×øÿŽú7åUþ«é¿<Ø|ø僶þË£‡¿Õý*RA©ï*æå8;ëg/‘%;Ž%0¾ÕÙúöW½­­ôýâTUa­iÖ-¦#e>³¢ŠÏóp ‘û2(9ŠØ¸Ð^¿Ø9?ËŽö_C_°DÛK ÓðfÔŸ½¸¼¤+EZlòÒÒ'‹ÿg/(°Ë!ªŒÅÈÊiÏûà}à W·Œ,E| ‚„ùNÇgýaÊ­2 ú=Pˆëòð‚ñt‡ÉÊ¥ÆY`á¯&Ý”Oü“ÊéH Zhÿºõ“ä{Q_T³Iú™?±¼ù1ð‡Ù`*k†Pi6Úú]?£N½˜’æí(Ãwv4d—‘täÃ[9ŒH†{Û_œ­šã´~Ù鈈Ï`¼ :J}®[ü_…–°Íd‡L•BN•VXöül«Þ6‚KÎhî›[’¹1D;/žï žíœ«˜®zî\Òè²ËYî’&Òå º÷Š!–I±À\|H! £ËÖKU•&¹5†“D&i&eUò—E#ãr>ÇùŒýV&àʱý`¹-{»¢OMT³eÑÍÌêÒŸ 2­±[ËF½Ü%Ê®óê™ï¡Žf^üygò)f‰){fkRɵyÅYÀï'Wa»4{Õ{@˜v¢]QŸÓz̵˜!ºñ «›²ÕÎI]ia' ¬S”†Á­û+#“ð&ŸÀ5$ýIøk–Ñ—?¼]ÝGáíʶ˜K0Jý2$N°7ö¥Ð8lá³b8ÐìU§ÙëÄ|òá»þ¹Ý„¦7B=F•7x‹bQòûuhÞ]Ï¢JimðeŽ^={Fa{¿°m`På ¼d19¤–ýÞ`Ñz]ÚR[¯;X´ãV½³nùKÛ«Ü$îêÚ,²g5{&qùºèqÚd±¸Øq7]6Æž«e V“xxëWñ –G¨vF˜–o bn>0—‡Þƒ ý›ÐÎOCøºk¶uû¾U©A‹›Ù6$­ãÏ0¦±Úþrçûƒ£ç `C¨ÁVÌu8uCíÑÄ f´Zì:g‘9ƒi‰™Ok¦a§ÌšÕ¥Y/’—ØÌÍ7v“ÄŒ˜?›`þA8°¨/ÔIÂÿ£Šé±J·bp+Ã9ThGT/è ÷i~&/¬§2¼¶Œ”Ù<÷ØFئ硾44sÅÐëÂü?½ZÖ‘ÝI\¡,ã^šó'Ø`^ùXççëŸãçþ“¸ä3|ô™˜Ëa¾ >HÅÌu ’Z7HoU] fD¬]6‘ï®”ÚôåþËgÜ~ðkþcçèGo$úÛU™¨#»Ä>Z  8ÐîˆjÞMÔR)f±7Œ ¹Î¬æ$FÙÄ H‰`Ì^iŒN(óL–öW¤ñ0ÜF)@Þ:±mŸ#‘ÍbÒŒkÙgg»Ç'çÇGgŸiR<Ì]Ša〠jkÊ*½pwo=-./ƒ&45ó–ŸÌ®‹ßÅXB¼!&S¾±­‚ÚôLÎì²~}ó¶+éqˆ.–f× uþÛæäd0*îìüàð0{ypvæm?Chˆ•“r¾6„чÅùþÜøDð;ÒCb€¸²{pç¹?$ü~6‘0±rEÙ`PË‚ÂÁ 톜¶"«€ørjÆL†…øa¼TK²«œÄ0¸ jˆÇ¿ïµßû7?+Fk²7P×2E7È·€Öêy«n;{HW{.N5q"¦×l’&“ÂädPibœ;t1ù¼a®k ÙEU?›üjò/ø¾')¤¯Þ­ýÓÔÈœ{ºÿzçtÿwÎõÎEI\²n(ª¡-0É›nK‘6Äkj©õì»^󩾑I(ç›0KgÚ"Ô9ÅDµùŸÓ|vódVpOæß1ûü¸)ëZ²fW9I æB£ä4sË} é_ᥱþ×îsÕ¡â|‹9<ðo²Ó|T.ü©ž°Íùe7êûwê/ʪ?©6þß·õ»3þx£ÑÔu>IS/wµùxÓ¹ûý„õ1»³0»C$ý³¾ÕÛ™Îz_ímØל™~”»šNÕ{z•ý°Ýÿ²¿ ÈØ·—|ÿß>ò~9ߘ..6x2l\ÅÛ«|tUÌkýäæñWo7êI>õ‡ÿðë/·¶¶Éw½‹r²ñ{YÊKɹþÅ2q»»O†ÃìŸÖwž žî<ï¸y…¯ZŸºóýÝG»;‡ˆÌíŸùy—ýE ù9Ó`ƒ]ïü¥Ëý|@¶Ö[ùÙÁ7þk]¤\úèRš ¯c/üAúèµm}ÜëT·@±‡Ï¾?8œí?—ù(ü"ìÉ}®Aí·±‰±„c œ?=Üyæ}m®ç!ÓÙ]ºUñ׳+šVf…"f¢$z€"õ³Ã=…ϹL(5üU°zø̯Y^ö´¯}ƒþððËþuÊ|[ÏwƒK9Îý’¸¶MV%óì[ßüº1XÈðýëí/ååAîìå㯾—¾Ñ}à/ ™)¡Ô7ì–1BÃ!<,½]©£ ´  bë¡ß»MBªÝÄá´øÞçÃÙ|ósE¸ð/>â_x,û\Ôõ_Ø‹'ÈoìfšLØÜ›Šf½l¯QÈ… „Ç€Åô‡¥ ü”>;ßßË^œ¿ÈÎŽŸcCuî/Ç¢òäGâø¢ðgO¶íþ%[¯ªmßÈ·ºÇ ««I>ìXú[,ÓÞÛqTlÀ ÇM7¼ýZ¼ïK%Kóv/vN÷ävÜp|lÃñ¦l1ÎÎÎøÙv$³½ßä‹s­Rí-ö,Ž!œöXÌ:”s"pà­7ï¸ì¥pâÔc˜B?+.Ç‚úŽy6«¶ aGàRò“ ¡Ù«fô|Uá½](†Ýãþ{±bvû€3‚Æ”ð­)·†Sk-á#š ÌzøØ¥ê 8B–ö±ƒI0<)–β>îZœ®£GÀ%¿û“îÌžÜÎL#ä!¹f³´¤™!©¤Ð¢Þº_1μO(|¬Ûa×?H7¼…S×ýìdV¼c2× þ. šDÉÐÆÛ7nÝé(s†—‘CµdÆ/hà8[Å.Eû€–ŒaöᶥÚeð mR|Y|"Á»EŒ ¶„øu£¯D!aaù(kJ´•ºâçrÿoÑqe,;­ß¢¯`´Ì‡rúEë·ÂÔÔóåNÈ°%*Êq(™ í°c°ÖHçË$y™‹U=SlA™TJKqKËÑ䧳ä¡ÃPÝŠ‹­´p•- ÉM.%‰xæÜÛrš6$#iéâ,I8³ÎÃSVëŒÎ¾}{‹¤‹ùKÑÔæ| ߤ9Œ„¹ ±$SeÍ*.J£äe|^Y¦1šù ¾ Çmc/Zgý†DjBÔUB©—†Š»¦KE¶ž0WuØHƒÎ¥dÔ²ÛʸqQdŠ’ ,JÝ0Fy²!ÛÓ‘Â'Ý…¢šŠB¸i ©ïíƒçwëÔøÎÞÞb veÏŽOÕŒ;9>•3if8Jï̜̥7tÆ¥7ræªÿ"{½U5QhæÅ~3B3Þè8?ÎÎ_ìKÓb)øî .Öíõÿ)sÙAÍl`o †Z¹©³+‰>³ ìŒ[ÄúçÀ®hUöŠ¦ÚÉL}’í†_a‚ø‘ê¹ÀÍVZÅͶú›J;+›Ÿ.òu°Dªïž—ï e¸ñ‹á¦(W@‚)¾ù|·“Y)‹îo7~yÝäcßaxg¤L‰äÖþÿëóˆ:‘ôñ&ýZ¾ñöK}å}lTà¼<€ÍñÑ™ª†Éñ«%+Q³ VÃb*s¬Q< ¤ f1;=ei¸ŽKû•˜K6ç±ï+‹¯ëH ðÚñÆÓp>^X?ò!룑$1êzè‚e=\óæ¢ 9\¨vÅkÏöTCCl@9ƒlµFÆX¿vú*!d踖"ï § [áiZòê>§uŠ;ìSõTÈŒ`ªà•Uñf{º0±|×KgËr %™Ì/›GQ½!æÖj%ô žµ³@ÏÜÏv›ú»<ï×Îvõ_kD_H~˜C¾Výwþ sȲ§?–» 3ÂO‹@ ¬S¾ ·gTéùÝ{\M¹×I)&Å£3-ĉñ ¼$)¯ËqUWS¿Qø™3fV)µnÜ1\‚R£ D†îdwJ @#ï;ïÇŠÏ µB@ é´<„Oë­ÚÒ›ýÉ^ã”1 ¹¸ðf˜ŠäbÜ„xô`2_ˆ9¯$šÜÄ'wâ®:ØVRU "oJ«Jœ£7{Qب%8…H‹]‹–J@À(ÞÜÎÑÙÁÆÉñÙÁ›LmÅ\Ïû"Ÿõä›ç}&ûÿœùƒü­0CÊÊ]JÙ¥?i“ ®¡}³JÜ즀_VÖ!¸$µ¶ûâà„tßk¢à°f >AÇ®s`ª4n®«’‰\æ'MœÉvL1v5.oòŸüý~jÜæ`åö3¨.Y]7Í0Îõ!?,Îÿ A›®KJ`˜7/$}{]Á&NQ©0ŠL´R‡DœAi~"E.Ûªoâ@$)ú Ø<Ë+ÑÓ$¸€õrrZúÇõ[?!^ÕÖ`HúSƒ–46ø%ž’åƒu’â ´)ù Gát,6õnk ¥@=7+½…}ªþÓÃí‡Pÿóàˇ·¶n²þçËíßê~ý'¨;E-&Qz¾Tl‰™‘_P¸âÛ ù‘ûvC/Š¢I¹"IòYý|å+v7 îz{…ß„êÞë¢DçŠ:SA°%$e¢(¯g¤úºáKÁn¯&ͪQ•w±R†(îŽ)±‰Ä„ÆðÛƒïÞ¼y–]~˜’覀x|¢QÇ Æ*\–gó[ƒcCÒçXIåUíÂrù«ŒN%Š¦F)é%˜¯ú•nXÚvîMp!/ß®q¼Î„Ä¥ÔÌ*ªA7»bEÞØeçÜËïJ°<|»Q¿Ó‚yӬʴà\jhiŸ‚VŒÖØšQ±ÃjbüÂ6ô‰] •>€°È!AS/ŠÀô„íh~×í3«Å/’ ‚_‡Š÷ZØë'Go …ÚâØ¿öÖ”S©8¢®ö~š|+iÔ÷SÿìÂípá ‡^uyéßáP.ns`Ëfä<6†©}WA_lkr,^ ˜çéIXšf"‰ch/@O3U•Šš™¸Å"ô•Nj¾dÈþзFqØD3ñ@ª½“Ó?YfÆ{>ÜG\Ûz$ŸZ·Ñˆ1 Àk ñ&ñH~`ËJUï}W9$5ë‚Ñ•iäŠòÊ‘ìÊ¡Eä—¯»­Þúz#Ð@ÙúÀµ&$<€÷¯ƒ²4¿3ÌD¬Ôy[çœßÒH!“ýuQ, U/¿YÐ+Þ½kÂ1²ÑÍC\ê” ""ôG³¨n ¸V¢¶v<ºsÅä³|ÔÚ¤·¿s?h–‹q§6¡wìjîZ—ù×(–][K¶è¤ÙUK…¾u2flu >œJ—:‘P¥/2]•ÐL`—9Øyü0òM°Io%$fPÊ¡yùBB³A˜:¡/Úßõ|–#1ê?Gf„Åëwš”2/¤ „!óêŠñå~Âéþôlj';§;‡‡û‡ƒ—;§ßË!1½en„ß]Õúë\Fà À¾ 1 ËÈb±Uñ[×èýóf‹ §”¹‚“B£™ðR• ÇÏqälp)•‰ÐUœã^öW ¨ÏG™•‡˜?¥@%†Mô‡>ñuD$äq éÈÍ¢켺"¥BÒ«bjè¨)+êÁwG8Å{[Þ4IîυΔ@ªýÆ"јˆýšµ´qwh¼ÉÀ¡)ðŠ'â¼ µ`«Š‹–hWÕ*àÂiïßgxÝaÓ(’kn¸Zù@‹0ä"K=@³LC 2ÁÔ°~X{×JüÙžd|×ÿø:éí‰9%Ìøå³%ÜXR‹ƒ¶]›ÒÉÎ%µj>bÇÁÄR¶Ÿ á+«ÛT ¸ÚMŒçzŸ—Ò!Ž5¨Ïª+0UÔ*âÜ"nÆH“Ïck:¥B•\lKÎǘ©ãoeóÓy¦ ž»é¨¼4%¸äWØBS Eh,Mc…«h/3Ê1ù8ê@°P…çÍ· ³‡Ë®½”“”$]BxÚay0К5Æù­Ø.çáqÛ73eëË’ÐhèÝ=3]×Õ$©DÔó ,A‰šC󨽌žX´glÉÏIÚÇ#>“#¾¹,•Íï6úΩIÊý'” µ&BZß@JH[°ªK0Z¾k¶h&Ð}ÄhBí°w «ŠçJs¤åÓ©#·lϹ¥¡$¹=$Lï‰Ò5E ’} •Ô‰a' D«Õ©ªjÑÓ´YïKo½$[ ñ‰‡µwÊ’&GB’M½ÍT¯¡Cà "\PßµhOã†*®Iø¶z[BB¤74*SÎIªœû ®Ü±…"Y§e©·îýzf|… eÙö¿x¾ûÇôJóË`&b<ùÝK=kwÆW0®UíNH¿ª_„x:ÚhòÐîݸ_Öýº¿èÍ«·wU?öš‚V~í;Ñø”´•kîO «tžû9%ÓîG”üœßæ$ÔW£ÿÕ¤äp‹irÎV]@/p‰2·SH„Ð4ÏA‘tOœË@ûUëŒÑËÅ},H+0«†œYìà@w]ˆŒêC T!UøsPã¦&7¤(!¹¼§¥âQav*j;È+¹ÔSü~ sË9¹[ÖêhÝB5˱ïX˹Ä1r€nmÝ)iMAMœÔB,ªf¯Ííwô‘¸{õÝ«IЋã£lý > $ª¾ž•“·Q&±7Åâ¿Í€LHê…̆n•AsW Cx&=õ“G'Œãd6…>õ¨н„4 bØ ‚RJ7¥‡h»ƒºï’sô§øÔùØ‘òu¢ñtßB}7^Ϫ‰qf" t.çÐd°•¯÷7µöGä2Á]»QƒÄØ9|ÎÑ"J}·Ç6ŽiØEj|ô]Tœ)ð]“Kí–zÛtm”vmRè©:C­ ýwµä¶«lÖxŒàh>“»Wúuáf‰ÈêE ±A(G ·žI:× f£™„ÎÝ=TáÆk¼©ãò§7Ax\pë.T™h¶˜Î µ C®š¶óªrNOzéù𧞰Àr8âB¯ƒRf¸tÿBD×ÛÞåDl³jš>¢ß¾ê½Äø¼kÔFÅ”Ç4Ô'Ë4$vÕ3aÖE ª±kžP{A DºØÂ.‚¥ÿs½ â*~WZ„´´ŽðF%>íVéFt$((܇šqº2:¸]7]ÁŽkô¶ò†±®ÛòÊáð[ÆN;Ír °$ Á-…¥Ë6•Â°È§íQ#õÍÅ¢¾cŒ«L*£T`&ê{å­ø”¸%f “©…Q¼•ãÿšOŠjQ ÑDA/˜C<ÓÁèК/v·C˜…{L|ÒR‹—óýümm…ŠZƒŽÄîNR7@-0Œ7•-³RÑ\’5à:¤«óÌ?èeÃ2»¾@Ö…å°Ç®†–æxà ˜ Ðø⟢. Í0Qk­cA¨*ÐxUˆHE§ß:3LñI<Ûh‘¾ÛOÌg;š* #ñ÷\sr–XxÆÖMÞE—+ƒ>w±ð3ã¬+lÚ›Jt±0ôXÑAÃëãMÙÁÏwCóÓÛþ<–ª8N'8[7ÙÁÁÈ>ŒºÊ¥‘Ím”†mËÒ1ù>uz&³’M\E¤í¼Ù†~ýÚIœnÿëÀ®#“#͊ņ\[mïðàèÕ›–,d“„atn‘¹ž[›ý¢ªyœo?è?Êü‘;Åô Ý‚o+ax’^S¢Öæܶ´¼6J|ÄWm>Ën{5./†í+ÈîèÑV¶<å #6µYˆ=Yš®ÛÞì½é÷гJ~~„aûaÿÑ£ðB3ŠˆY!©8"@0ÌÑY ÚñÈtˆY½ ~ã-úJÈ"7Å£º5±ãZd×ÒCK{uTñXvú5¼æDônÏïÙ¹µ‚×+uœ&¯ ­¿u‰j„x¯Z`jgåmÕ:ÅP Ñ%?kn$ý”@¤q“Âh–åtO“”šO‘“5²2ÞØ ” „ŠÉg‹bº`^\)⾌¬Ú ’Ãîr&¦kŸq¦ƒ±"šS%è¢ç‡ ۮ߬j ´‰Âª×Ph¥Y“Ž¤-‚FÃäé Qp>T3U6 .I±óê$Ú`Œð7‹yñ¥oe±¶&IZè£Û¦èš>8‰ ¬ôåÞZïÄ… L˜íÅLÝ}µWY]~A=ÑH–·ï/‹9Ž+gêeÌ&ž½¶üåÜ£Ð<2ú´5žC]KÛ¶ ¶-°ä‹x›oÏwžîgOO÷öO³ÃƒçGOÖv÷Î÷O×ðíéwßž¿øî(ôÔÜÄîæ×üf«åˆ®û›Öý¿wøÁvÛ@Náÿ3³»ìù¶dðŸŽðAûqü™ððÑ}_~ÙÿJ¾ ÍmÛ1uo{_÷¿¾·=ž?Ðö6¸{#àiÏÆúM¸±˜¨ebkµ½Óƒ=†ÆC¬xgll3â‹ô›`7S®iÚ65Ð,TÃ1îHÿÞ—‹G~–ˆù.»^Ro\Kîw«ÿPO¸yÓM_q‡¼Ùy¬BrÍ÷H¼žÐ?'ö éHÓ³DÏ%£¡AïÃŽ+Õ»pÑp߶0»T½Süõv€‘b8ƒ úŠVŽ°ñ‘dÕ¼[)TÊõ‚aJÍ,Ñæ'Àb" =³kZ- M…œTJ[ó¨çT¸pp AÄ&ÎKp ×ÏÃK÷3ïãSO3Ÿã_Œ¼7º^ö‹~›Z [†Ël’ä3ìö°¨2Ö_G¶ã´Â30§c›)ÞÑðQBY&ŽàÉ­ƒŒ£ BÉZ¥UÚs€PR&à'\.™n¦À˜Ìê\6ß\Ãá¬C–….GœŠz¤Äì /ͯ®fÅ‚ùöÿõm9òo-f]C²4”kÄ’¸Uï×ON;¾EÁ„‚!u£¿-*ü°Jh2øœÇgNô? „3+šK¼ì\NôÌ6çdVÙ鬷ð#¿‡O¼Ê85ÊŠiQû`–#j }ÔßD"ÿ?Áÿ^‹¶xõ?üüïö£íÇ-þÿ[ãÿÿuð¿¿Û;Þ=ÿñd?[~–L3/WÁsãiõ!tpÚš€©ã·´±Ö¦Á,ñ0°&‡ ŠÃ䮣Âý$2Rš1U7Z *õ‘ “²NÑq^’qÉéà·K-HeyÖ¤·$‚A~«–ù<‘„Ò\ßísdð’1רHŠ%ø†Rµ‚j{þ y!+U#Â-²õÂÏ`™R+´Ÿ•çŸ?P0ïʉbJÞ/%>×Óü!i6’X¹ÓÑýv‡õ=OÖ¼¿2ß`Qùšæqû}Sß ÙØõÚwd“RZÄ;Š]¤SBSAçÉ€ 9‡W…) ¥j>uK*f¦/ì>í ‘“_ÓÌ|þCQ(½¹.”Zö“dï0±&‹©8²ŠþÄ[ˆÊÓÚwö7ÜJz àé–jþw*"™Æ@|È)å|wqàÚ3¡IÖ3ú»Dž¬˜)iB„ïy÷žÇ;˜ø‘‚ù¸³gÙz ¨_Œš’g,¶šÁd4ð±Ip) ýM>ɯ‚bYpl>Q^ÜH݃‰&«Æ-’•«…Ÿc ÇÅ<—|]Œ¾IÀ”;Êk)Úœª'›<¹÷¹kª´k¡û'Zw:yjEpÆÛ(=%r`övª^šÔ`1™Ò#@ >Ót y>M3• j¤Uá_ ¾C“âXâÏ»AWµaë^mÊ—~¾ <½$5¦bJ¸‰Ý$w6ÌñÅÒ._ÝÆ.U@€0_‘“ð–tI†ìU]$]¨9!2Þùï]€F9ªÀBóÚŠàocOÏFÂOîª컯–gnniö˜œéüí¶0¢NQõ)è¡i÷4¶<Šñá7ÜûäqêŽu õü0­b€ßZ*fÍDFàˆy±£T=¨°GrxV'0põ¼ìaâë*žÂ‡^ÜOÍÆŒkïßLrÌk='jË¥¨˜né¦ö¸.;]™=Ú{~ž EåóhbHs>xŒT+z›·ê;<ç¾>g·ÁÊ#s5èäY>„Ì×òÏÊ ¸ŸÞ’¸å^9®®t‹‹/Òw;E:²à „džaþÑGiushªË™Õ¿pgŸÞEî ª†ÂÞw [H~Hׂòêòß&QÈWMºÒ°düÊ}Œ;üp~ÛŒálvµäâø6fõÁ¬|ÿ/¿ßúòá:‚Ï®“Ñ ¥?ÕŒÀšEŸÀM„^3GTv xtÐÝžˆìcsJ8ßü¬qÜ€í$àF‚ÀBø¦2ê(˜ÑçT³à…}œ­›H&—l>V;^]‚òçÉ+ð`P_¶²²»_,@ eQjÿIûÉÑl±b4mgŽ¼2´ –i i Y)[†y€4bv°0ù](È1ëF0Qá)táâdGæØΓÄ6¸c] ±3·xWßÜv¸O*ŠË(™AÍš¹TŸ¤CœbuŒ`#2vq$g»Uûd⇩–a­VG¦AÅ}z—༚VqÏFŒm-; °( Q®weqKFèÄ·ÿN*g–œ ‚M×ÞïïÄp·,"·Òž÷ÛžLð4Wg?S.¾Ž«ð2bøõºÃÅÊ£ŸÔôT6H¬D_³,÷–sÞ5=¾«…q?“4°Ú6Þßø@ÊËÉi±©pµÎìÆ Ã ÒˆÎiÍP­¾˜Äõ½-”hyS™SÊÏ›Z(ø»¤()‡‹1â—šë,¥Š‹žyíÅ\š 3¼@ ¦iRSØY"qÛÐM Æ|Âòó6jGv<³I˜Ó4¬“Ýù£¸"MZ•õdsú˜*¸Ɋ„R$+S!o†« Û[%ÖÈ©z#º¢•ãg¾1mÝ,沞qp´Z–Žß½Ž‹ZcÕ¬r”Ä(a„«º‚ŠÈÄc†¡ìsõ¹××wéœÍ8g}“ÿÓi±nàùd¼ežÞ¨8*-N¯*lÖ˜PÖž»¡¨á'mžø¸ªo¼:l-ÇÁ"(ß‘-R9áýü.ê:Y!ØÄÙ'—ª $%‘ò.‘ŸÇájÙ‡•Pì¿“»nVDöw՟ʆÃ~ 7Ö@ïl~y)‘Ö4ЧµZ]Ç$l,V³gvÁ3oPæ‚8cçŠý¡ÁrjÞE˜;\Ž6_Õ9³¬Í+êà¼GëM”RÔd|£§aŽÐÂòkJ^Â%þ°“dRݶΦƻˆ;–dùëÝb”ÏÚIFÙIÛð’Ó®p©kØ ÿÙÜŠ϶// ª¨VÃB½uÁ*­ôõGæBɃƒPR#T`•+ž %‘¡À1ܺ6_ϸIuÀ"ôÆð¤üëB·¯dÂ"ÔLèO3¹MX,1.'å8=4ÛŒB˜Ùw¯Üµd£ã꯫žêt­USÖm!–.ñܵ`Z0 ‹½Ï&dB¶ÙHí"-Fúèo-=–Ä(CA®*,¬ž3~le,tø9 Öˆ@ ÍV †´ž;-×Æý,^ ^Qν¯ÏªÍqÅhN¨¨h¤ç’8·VÁ½ûI|‹£)p¯7i“KºZ”˜á'ÉÑ›¬Ñ¶ ÕÇöÀ¥‰ Mòµ|ÑØAâÍçYÚ§<^îœÅW:* ¥êNð\룔]ë¾} Ì-Ùâʳ}>Èø&ˆÝV¬·tY»«b²ðGÙvxÔÐ ÈD7×$†½‹th ½¬“l_=¹“’­ŸÖœ{.‘{c¬bû‰9@;âú‚Vøžšƒ–ÇÜZ³ Œ ðAÌ6tæ%¡Ðþ 89.s §X®µ?ŒN0`•Ü:YQ£K~ãH©Y QGÜIbvEd?=|¸BïµHº'ÊþÕà3.ÆVüåϬi’ wIb¸ËUH#nõ6¥•É7e SS6”wº%33ïpÉ`GVTˆl°TäU¼]BŽÓåfþìý{ÛF–- Ïßøhå×1™”d;NâÛZ¢mvt;"'Ó§DBÚÁ&HËê™<ŸýÝk_ª (ËéLÎÌó¶g:’H P¨Ë®}Y{mÛ+TÂœz¾HÙ`þÔý±;zÝ?êôÿ)Øͣ˶l±®‘T£<‘1¤/Þ³þ€×ÆXìã@®ñE^Ìÿ,–ðH©8ìu“ñïÈÿùhçñþo÷Ÿø¿ßéŸèK,Þ Ovƒ¸ý­¥Ga|J(Â4êõ<ε.uPƒSI.€0ª~70èøŠlÐ%à Q{«”ÕŒ„µDËpy(OÍÐh®ÏèNйúÛGWH-%R·Ÿ†×=½wæ‹¿Ê[jO;é0«ÂkVmé~aKRµWª"x!Z{ÊûºNýÅ~¨UL |Ö$óå°¹×Ð$üTF3<åõ8*ÙÊ €_âu²¸~P}ŠvÖ1¿ñ"1xÝž··éÿ¹›q›I7P:~€r¯é|þã#[CŠwa:ÄýÞQL™jÉjµ¢Šò2/®‚´è‰î   ±,„~4¬îsš½Vá"¯Ë…R>ªeY ¤ÜÃóeê'˜Cãa李DÝßZ,{4ªÈÈ€D¬ÜƒÙÁ!#ÕÖyŸË"|ÊEw°ç“‡üvÐì þnï Î.…òÁOƒR=»ßÅZ!«èûï¿’r)¾OÔ'us"ÒÇv ’o2±¤¼ye#Doö¶ùqôª:¶Ü¯µÞÌAK èrE*æÔcž·WŽ.r9lô* ~.\SúçÇ,D[­//Êž?Ž¨³ËuòbÅô鮨FïˆÒ¯“®Æy\d…ȩ׬\ ¦ˆàkKaKÉèïåñ ÒDå°¸‘{{vÎy ƒèÈeóp)M&ºn†™•+‹´V@K–¿}§º)( ÈüFJ¨ÄÝ;gí&Js U€|QºX0h}¨]îÖ+©&…2ÀÊ·(CöÝ34Ë+¥¼Ôß±EÆ·ýkô件µúå¿ê7fZýkÌ\‘Å‚ ØçV13á,(„k“Hx:½Oµ±bˆ,>F¹Sªéë(-u ‹÷!ڰ˶¹£'{Ûv¹óŽ&±>¦|gTÉ·glW#Õ"¥œ‹Ÿì5ÅÍ^[±‡ŽÐ«píd‰FYÁieZÚ‚ ¨Ñ0·hi•KŒMÒ¦ñgrLWŸÂž;V+½ÿ\©""qO Îk;RQY¸T[£Õøàƒò’ýÙâcWÁ¬Ö¼ykݘ²Àp£~}!öc¡TZŠå)” @ŃÝãß>?eÑÔa¶éìã•ub)dOu¸··QL:î“n¸ÕA¥VZsÁU\Î× 3…aO>ÞÛB•2tÂñd8Šò§Ñn3fâOiFë¤F›ñAiÕÙJ‰?`cü =ª^]2ïãŠÍ·¯¬µ _Q3Ñ‹ñ®ˆÉ‡iñ"Š´lÉT "±äå+xƒÄHÿ¾FºÄ*8GšøØIkÁŒ(tX%Î.ú(ÄNB¿e(³Y*%k’.'ÑŽl‡µ'wÞi°† àv/W„{½ïò šýh`k„Ùgܦ¼Ü§T£(§ƒý^¤«_Ñå1©8gÈÏ‘¿ãØfù‚5Xþ~ ae½â?¬VÖ/OÓåÒ¦i`2D&äöiM¾ðNŘOß2cñY÷Ð_î¶<¦cV’U´“×ÊfSö÷>5ø)>L)—€?>| Ì øc›·ÈSŸA§ÊépاZ: -èiª‰ ´gôjâ¨I_ÙÍÑæ¹Ê•6§ÒïY¢(Y…øH^kVjcÓ­øc诰›l_V‡„/BDöQ-ÆBaÎçœ`NËRu2Cæžuĸ;Õ¢6Oí<ão?-TâvÛ¾ÿÀÜ—³Bj¼xÒ-H8àÎZ²â™«Ì*æ_7?þA;«Ã¾¼æœî[7˜qcð󡼫ȴ7ÇnY=öW¦œ0ÇMäœ{¨Öh>[4öé°\÷i±¤Y†"pŸ)þìéE»nzñÇӋϺß8dG²圗N¾…Ø€±OŸM·X†+!ñ+?yºG½`'ÅÛ¯ì4úü%¡'šF:õíâ¡;wJŸh0ß¼¹a²I÷Oc« ¾(ÝeŸÆƒ9£\‚¿éìÓ^²F§¹ÚÃÏ"GG¸èP.øuPªÎÃɬ_œG¨³ÍLx4ûÅ«­Âë•{Ó}¿^Ð2ÐåË‹—Vgº¸ Ê6^‚DŽñzV^³]Ê¥¼Ëª•ýŒ>ËéžyÐ>?$ÓTXãB6O6KƒÐD{ÿ¨{Ø{ñ“²6Óþdá¶%q„¬N1M¥Ê¸÷$«e~íp_hªßÄB~" Å ”T2é†ßê銈ñ“ ý®ó'ñ%|&èÏH•†ÎOí¶×óIÉà ë ÊhÙ­aë\mÉÀ„^ÄgƒÞhØ;<9>ížþ<:ìŸþ,ß‹ÎXÁ§ûIïæU?··?ÑÏ{tÔžf­YQô˜õëñiýµáâ Å_Ýêv&ÝȯÞa¹ïZÏð*ð}º°™zÊֵ÷!¸_|ttR€G¥ÌJ›÷¤ˆ¢/H©øÃhtø®wúÃ`4¢aÿ‚Zñ"hxf±3§©ö%ú"M² iáÚ–ÎÊ£Ã2p•I ²DäKÌQÐÃîÁÁ¨öþñéèä˜à&É--Ä<à©t¸Éím»{ÿøh8êîï^ý<ìºÃQïhŸ©Ô–bJÍAí —×E¬¼°hµG{ÇG¯ûo¼âImÕ™;ÛqK =aðLÛ=:;Ú;>8èí »Z¨V/¡Â{ѹFS‡X›1†5NgçÓ9s®RÍô„ÏÖQuIÉòŒÎ8è’ãEÎpß“àÅ7^Sî¦<Æ®z=-È/,0Êvu±ZXV·»nµ…‚—QY@suÖþà—:ÐZ¸ÂùÖ8J%ú€fs–Nƒ×è¿9:>í^Ÿöz:ž´~Ãò¶X¦EpC¤Ò)Ç<;,ˆ9¯j Ô–VÍÛ.Çè ÿŠ[yuÖ?Ø×FÄí»Þ¡ÍÔXÓñ £ð T¾•Þ*—oz—Í=Œµt.Ë)`ŸÜqz•Ì‹|r YÞwK«ü듭ʵ¤Š¥ÓêÕò!?µ%šÝB¿Ä.ÌÊFð%ûÔŠâß9¡Ã#mÓž;ÐÃ=zØ>Ï–¸ª`ŽS6¾vŸà;¡ ¯x·Ø>oÆ´7Ä?-¢ÅÄÓªÊ.–#<‹TµÑ0µˆ?þ™ëžæ ú¢ùòÅãø_ãÝøi¼ÿåYüË3‘Ž£Ñ† ïþSDtcIËÚsS;‘»L¦M¶!j±2LAT¦Ihب^‚Z‘N=þaø$üŒÄEÜ pïðxÏå!åìLƒƒ ñ¯Mø<¦úcÓ©™²±öð¬‰98NWõÈût…_‹DÂøê|úžåK{YCí¢,êÎþ“Ábu]èß“óËÑõÔ.¾p¸ þSÊ/Ø¥X—£I:×?Å`èpÅEÂ7/òT«~úô<™Œ¤,/P…+ÐdýN÷4u·òDØ»áh{ع¿‡pÌ‹;Huñ†„!,ÂI™ßÞc¸F>eŠùN|艳©Iµ_•ž¨84.P^á‘_ªÒ ùµtñ¾CŸü›OÝ‘bçúÅçLÞ* Íø×ö•êŠjœØº—ÙP,é~o6$ÌÒv^¨.~?…íNuMõ£ýÞ«³7Qt·‚EÒê+>¢èЇt¥Ž}µ½á=x<êü®Ûßr}ļ>¢Ï^Ú—ß‘u¶:üe¡F¯…¾Nh¡nW.YZ2óµµÜé¥çù’,Îxíò@fXï VÈ Ì¸fùÒ²jéC÷GÿéÀú@£ôÃØ¥ÐÑhä^a4jÅòçˆz9)éÐ"¸‚yÁ£Uè´‹{në7‘5@ó)à‘&/‚•-«ÿ ›–%e6»53éÍž h…Ýéüˆ–…¿Öœ6¡0[qelÖhÆÓ<k½¤L<÷e½l£|-ÿFyÜbkä+üþáÏ¡³ó?¼^/F‡óÐÄwý#3‚•LU©­Éµù"þ-{­ÖÖîÎÖ/ÏÜM±'DM§[^ð}Ï>õ4ÖÆ™€ÈîÓ“Ô¤â&šÛá_ÞùKó™»3]ºîã{üÛÞŽt 3$D¦qÌž¡ ’Z¬ËŒFoŽÎöØ#&vG<î(Ö Ìì(:+Ü4ÓEˆÌ^½dƒ¯¿?ŒÜ̘9€,N‡Ù”Gø÷“†Ñžï!HÞ|'UýÍÃÂsíüYoõ*£¾m 2‹Süª6 mÊE2~Ÿ.•þL›)™A*š¿ÛqBÎÞ°àHÌ~PDÕ†aÛ›y6KËôœÕ Q+ c$u$ñ¶l&É«×XAj5uüÙBB—ÿ?"¯Ëÿ¡Ó»3^äEñ»äÿì<úæÑãJþÏÃGß>úgþÏïñïõ"¿~Š ¿—tÊ,ã×´{ßGÑ[2:H ó=€¸é2A 4òoÍÔAå¨FÖl„¡bµb™ôC²T¡¢qa‰óÔê#Yšø$weF!ÙÅÊîHð.3ë^$ž¾ódr™>9`ˆòÙewqÝÞÝÝ݉«õûJ_¬]ÀPYÏMTψRJ„€~4ÛµÕÄݾ¢^oÓv!)÷¤³ÓŠŸ‹ñÝXaŽKžºªÒ9®küÔ{˜áRäG¯1×%IÛ¬ô“U¡veÌ÷Au¯CŠ‡Ö¼. .Û/f~‚:‰1*1é¨`·¤’–P™ÁÕ·Zhmô}Iæ³ P+ØB¶‹÷ÙÅÅ6_Cý|“Ç룢ª#bq¼³Eââ£AØ{QßýζWiÛmqN’åyÝæ£#XÔÖ•GEÑñL Ó£9`ó>µŸl:ÀÁ)ˆé}ÖçÝ4Gßp#åIiUÊ£pTátì@]‡ºmM¡7ñLò v^î®ë¡šø³£(:;«m ²´pÓxwÌŸÜÙž.ÛÚF´/ÉZ‹ZÛÒ.úr+nø2Έ0Òf´Ú¼Ku¯ŸRÓoé*åap"Í“ ~[‡|ÊÜ+Š^/ôTˆuŽ´XÇâm‰ã· ‰SâÙøBx„¸g…äKÞ=»ÕúDÔ¸ ²ªsr‰|:1ú"—å…¸Öea’”< ÷ö^aÑ…GÒ9›ÇgÛÑ"º,Ü+ÛçÙlÛ­ç6ZØûé§O]BZÛAÛP }¦g½>è¾¼Øj?ŒÛ³¼í±Ç[xÌ_ŸœÜõõÁ¾~»…ί ÏqöFÝÓ»Þ"YD§Ý£ƒþ«».Z$3Z¼ÑÑá]Í®£d<Á/?ºçµ(90"Óv~¹˜‰öâ6-¢#U"‹r#®ÇøÿÓî.]í”ÔM—C4àÒÿqúß嘱¼¿aé—{èß>yød·ªÿíîþ3ÿû÷©ÿR*ûª–~aV5G«üf/îa‰šce`öå^øÎîÙðíñéK’Ô³¢ý§Ž”ŠiÅoOâƒä¼‰°´|®´ ]cð¦ß|¾¬H|/j«Ç€»ÌÑy°e,EºVZ§tLu'§Â.D)ÜÀ=߈¯7‚cNí3òö |¢§ÏŠÍhk­ŒŽ÷èn~jpË„µ#¦p1e+ÝBÉ/5À䌃[Šnz-ÕîV‹)ŸÕÈ¢r}j1¢¨^%EJÖ«•?¢çÇ$⥜ Ñ“…d‡3­IHN4Vz"åfÊ[qP ïI‹öYÑâjUãD³f5¬<,FÍ ‚9:`V` ç0ïí~_` ¸kƒ"ܽgÊ 5$?® HÚTšÀ|Õ`…i|íR]æ³ËŠ1NdÞÒ¨K}¹^és<û±‹M ®fž u™KMÕy¢ñáèÆ‘Zz^V¾*å"ã‹¥ÒH¡ìÙ-édÁl•ŠÊøI;ó­+f¤j=1`TKÍ®ÅSjˆÛi¥V²(Sª™O!õ8¦ÙmˆÇ]¶Ç°dl0Öݯ©Â!BbʸõyUä:'Y($m™Žðåk4ãü6¢îNµ%Œë¤‰èš!b6[?:ĺ®·þ u31™çá•ò;²0ô%·˜B€‘Ë‘^ÈB7` g Þ|š,±XÛƪrø%¬uvÔÿ  ¡_7®âáð¥Dm”Šç cæÌõ’ëDŠõ‰Å…¡Ø Ùþ\§AE/èDŨ‚‘äÂRµõÃ=d{¶eÄÅ GoöFÉbA&‡°º… äƒšž_ß*“sp-%/,MOFT5-ƒêô¢†’üœÇ<œîÝyIV”ñÙ[µÊZGO9¹%¥WËS„rh7';òÕÙü•óFRê‚q‡~ûˆ°5²iÆÃ*^u*E?Iæ‘œÃòáŒdß[¯Bû…é<}˜ W’ƒ  ttiÓ‰öÝçü!¿½ÕĦ»!ª ;½ñlBá*¢MËjž^蛶ãë"H<£3Gr€¹FK±ÌF²CcÒÛ·õ´EIÊRÉ7ÅÆB›:=ÅF¶º2AåA.›¦Çù‚pžÏœ«É{ãÿFÐ+Ëvée\:WÆÚ(.¸¤Å`xöêÕñé‘”L’ê1(is®9Èд° ô˜‚B®\ùZ±.D'׳ÈUDÛóåÃ%_2¨—nð¬ˆÁŸz‚âÜû§¼TŽO»²@¹n}v2eæ­ÍLw² T ü˜]C¥;gp B˜‰)h³™Uu‹¥tdhûiõ e™ õlT©z¥/¶Öa.@€âEð`°xbâ©lìÈT‘IÕÆÓ9Q•K¹G x_8Ö§µz×\¨MŠÝ•å?âºW«Ù{!‘ÁÚw"¶ù2è½4CÚ–+<áŽû–›À”`ÔIoh^¢X8•¹<‚’nPj‡ jåån¥*3_Íi]œÓL…î”w/ˆåŽbcxM\‚+þÌïIG†CßüE+óàNñ4¡¬Ü"Hi–±Ò[¼(éÏ”ÜmC.0’¨·éGîA¦%A(=g+§„̱ÙjšVkòE`"¿^]Ûp²Ä]1݈ß}ßAƒÚ}Âìºè‚†¥S¤Ó²ã"¦ š8œº6߀ã-›ÉðêÜòºB¯‘ñ†;MY¥×Éx‘[]è—­Áœ¹­–í̱Lì®Gg…“/òExƋȤqèѱa ßl!%h[Ò‰±U$Ë—]3öE|¡ò'UýOíÚÀŒÂò–ÕbYçÈMõ¡•£»Ž±€y.¨Ã ï×ñ2Ü4´:«@V°¹JMùÒ¶´íŽTÌ…Éš.é‘‹º¤´'“Ø>^“¶ÃôÙêB2qé“ÒQ~Y˜ÁÊ’²¶²¹µ ;HÑIàE•„Ìœæ)M•+λb¥š¹àÿG³‘ùJo³/DÚð„1"Àüæà9³Õ˜­$­ËìùŽf‰ +.ògZ}©/Zƒ+™£œ¦Ñ iîÝÎbFJxyZ2“_ò¯rªxË„ýÌ!=“,wÖ¬—È”ö1ýŽŸÒeDœœ¿óc"u2Òò°€ý& ^Aeö¾Q §;+à(ˆ®óìKZ„×…ž£ÚA•ƒ'+ÜÚo‰ã{)EÕ´B<ú«‹Ö÷Öú(µ!ÔÕ "+OëËO……yy\¸e©y®ýãšíÙØø2²]¬ª¬uFk/X™DIávâ°>,p“ ò%ñ%EÅ0fT̬Ȫ–W†CœSž·Q*ÛÒÖ±º (œÙ;(º§a¢¡W 㯂'ëÚjg±W'ð逈Bd9¯#ïƒIÆÀm®ý$#‹™àˆáË"_˜öœ*4ÅG ­ÌÌ jÑã}ø2b¦†^/g~H©‹VD>OͽT]e9@xæÞkÀ]^šC¬à0&Ð;ü±,ˆX$ã¥E¹D«Eéë Ó°ò°ðËì-¦w½ë"»¼”¢ W)I-:ÇN½™ *EZÂE0Õ' \4ºâØ(™Ú¨»H.-•Ÿ|tìiôü ïƒþËXëïhÖ¡i&ƤàÍ¥h ÁåWPÇoÑÊ\±¨¸“èßMF°V±ýo±A<£Ûñ¦ ~Óù¸9 RðGZçÕ³ÿd3„Úª[JÙP5ñŠ¶ù“!. Ѭ…©&ï¡ÊI¾¡\œx™iy¡bcÌåí¤z¹.>©Ì™8E9Ú&d]r;* Ô„¤Ä..2TýX͵®WS*˜S>°`ÅOk3µTh#J5¦×p¹ã'4Æã«<SŽ•&¸^‚’&Çå­Ö@(1YäƒÀ.c³~ò;’ìšIuCSæ Do£±~P8 ÙDÂÔt ÐY­…-LZÔ‡ »‘ë±<¬(Ú…µÓövŠ…í˜k?StݤÑ%Ö5ïD^ \/é×7©C(ä›ËÙ-¨¥AÂè;åýõ’2„r42éN]ãÒÀêl¹wª6΀…éK¡ >/!I<–šðuz~áꟼ,åÿ*Q¼ÏIÏÂ4^‘CìÔ\S*ȪwâÌjfÊI+Ò §³Ù_d|ö‚5ýê¶àÂ>ÆÔŸ‰ê?–x¯úJ„…–Õ9Ž©é\«`ÊÀq‚¡8ÑU©:ÍÔ0"d©MræI(È5OIPÄXµmÀ„y¹_¨„‹Ç )âŸÕþrH! Û"¤u—bú¥Õª¬üëúÐ.4¸¹±ŒWj·¬Å^á µBâ§$©YQa'5*iÆôzЖÕwY©¼ú !tpZ„¦Tø³¬a?qÉ_,Òh. Í&4ÌÇ÷|…‚Är²4ETÌó~èúœ¥;Ô h’‡$„8þ‘.ÿz-jb›ñÛ“"'dAú įrUújªè"øÜq]æ?ESŽEž Ä|“2ñmˆõ*K°RZã(à1ѸN¡Ë®p…JœžVtªQò›‰ZÐ 5±ˆ;ææÍœ²P”ñ…$Ÿ›§®¼QŸ´‘luÝÒ=§¯ÏWG.T¬~¤é-*ú²/·¾QúÁ®g§j$ˆ„]-”å¼äØg“µ tàq)e³T±IÌ*Ÿl/U)Ûknl($Ÿu|;À¹(8³ÇD$gv¥m,Œp@*ˆõYÏg—¿³–ß©ò¬ å5ƒï6ÒቯÛÁP°bæ—0 ×…ÔvaUÕtäY[) dvoµTW:qãd¾Ôøv\ÌÈä¼B Irôy©ði‹#žø âÅóYi¥³b ‡+µP»­š([®˜¡ýî°;vO‡å0>îí«Êžxg9­˜ú‰}›ßÀLiIÈW_´24d³(sk/VT‚ Í…ôúZeÒ”‹Ç I£ xlíB楠K’MódÒ[p•ÏÉ¡Ns8h%—ONuAG å:mÒ]¢Qµl¦²E@–ߦK=Œ%º91̽xŽ¨Š”Gà'‹íìè´tQ •¿.D[l¢—¶O+ âÂI`+Ý#%‘Úº†yòëa/–ØËwµ< h—÷\ÅX»ÙåòŠôDH4ÅÒóY˜M¹n­ 9e]˜L—•mí*5¸ˆ^«oîN縥S-j”X›ÙŒk ÀlU\‰Û“<ºÞnÅ·#6\œ>õp¦g¼‡M¤mÂmyÍd;Ñ€&IäêL:ý ×dT…ÙÜK”ú³JíÔÅ2-Õðtàè?ë6Õ)‘¦øe\1 ‹K.Q=Dr‘Erpš»HŒ4ß+°(™Ø@½¯!•5Ž͆>âTcñ“(T©ÒŽTáÂ쥰¯ôàJ§:ó\÷,#4f>1?ÖMx$ïbÁõ i¯™ë’[ÃæõQo°77"e°¾I“ÂsatÖ<¡ðX:›‰Ëù€—<”*³:ñÆaFgØÃÉÚæ5oQtÝOY:–ÌnªÅÂ0Ò‚–~·ð¤´bmüÖÛ}üZ¦O‹è€ÆY$|¬”ÙḚ…Fž¡åË¢¤‚—-{“ž f“M< Æá€Vö݃þ¾®é ìréR,Ë•‰ ÛÖ W´ ´~;¢ý9’ÔÕËå*2˜É,ÍW…`.è¼J[b ¥Á›ÉÉÿ!á=¼ÌKÝ?9¼-ÓÙÖ¿ –„ÔÇS´æ£ØÀ‡…x÷¶|—;±Iv¬ØZ ’ü£ùráäƒïtìbãMj2a—:Q* ,RS:²¡%ƒ% ‚ÑíˆàN4þØŠ]<ûî͇o‹¨^Ûhî%F¹ lŒßOª©óU™£Óãã¡ÌTO×™°£ºÉqÎ ¿cpú±u­Í€/xë8æ`¦+P·#ÒØb‘†‹Å}]Ò/Å„Ñ»Mk3ë^$º4¦ jQ}±£ã£ ËíÎþ6P ú9B-KàmÂ)Â$«Œrœ(d’ÍQ u"È! þÛYfRC]•Qe†wbÑj.“iå^•»!x‚êpµ³(c°»A*ã*°G})ɶ ó,á«Èç„åëŒc=ÎÅdb>YF©-ç#ÑÀm-á4ÒZ°? —I²kÿÏY®øè.Ìô7&œÒœ,a¾[æSÉ–· YìµsAOIv\[gý›ò‹¯qÞIÎûï)À/3ç˜eZ,mÑØÐ:´ œéTÏg“È4€,‘Žã¼0 Þ›J³¼­ÄÅÁ :=ÉàJWÚ;‡kêŠï þv‹œH'žZ"ŽÿЦªZÁ2Ž8Kô­W/¢dX”¦¼ì"wM«æ¼}ir°røu¢93µ\V2ÅÈÜê¶ ´GÓXly­Þt­ìÑì3°IRh?!ì}.étjÿj€bvëŽÙ ˜ìtÙóµ~yD{Iß.Ï,iW¥GD¶ºžHe%ß½Dá@vIe*T¹ctš×¥ƒIH| 1S¬?bn`® Œ.øxœVU)ÄͧÎ!3óÙ2¯Š7Ï4é&g,,¬0ØÐ!ÕrˆysU¹Á¨[O4x=<ð—öNaøÓƒ¨Ë3#RÇ)è« Í–,$Ö >;afN:W&Œñ×Uéê[ˆÇÄ×ÈñÇŠQéÝ–˜â­ý5øŸ³(á·p¸µ`ÔäfA¬µÛm@íüm•Ðº!áßø®ô…¸ž¡´Ê:Bž! ÑÄ4q¯a Ê Þ‹Ôå3•&€0óñ«+¤_{sw¢úr˜ÖYˆ¯Mv‘8‘ùîPzÐj¸sfñÊ3"7~ÅØ”¸…§uƒeb'Óñ,½’¡-ƒx†äCÆþŸþNÆz“nZÊZw6ÔoŸVY™ð£ó C®ï‰iŠŽ` ÓYIÄÈ–÷˜’»Û3 æ«3\+šTÝàåµíxzUœH¡eÎ¥Jnc§#q¤¼”šj¡ò;:àñ FP:!ÎÌâe­¼Av­€V ‘ÄêQË% K€”hJ‰´·ÕĤ°©¡;ü`º1c]‘·L½Í~ÖîÛAµE R%²ê°á9Ÿ\¤=â”V®Ã©hð›PS-\NlhªC½Ð©HÕ“Ì"í%}éfبÆ S·4µ64óc -ãÎq(­WÃôâ‘ …@|)kóXòŠ5\èIô"ü¶0”¢ÌNàj¨Õ­#4ó³Šì@ÿHñf7Q±>œÆvƒ‚õ¼1ka¨[p—„yÇ•liñ%Ö&…œðsL¶©“¡’ñ!p|çù’©£v‰ŠÁD„üh—gÀÞ„tmˆ˜˜bÊÁ×¢ŒÒsÂV2G²Yõà‘Có\)€UVDü¢w¦O¸­í‘0nÊ#O­¦½’µãð]Ì€ƒÄrœŸ¯–å3È%Œ<Ã’³yñ1-­âî ‹<,tJJ1gÇý!«‹3QŠ" sàOèØpf¦0—ƒ¬¶º ö0ßý7´ÔÈ ƒòã©vÍœ6Z,ŸD^Ç á)³,‡ÛÈÖ×[¹ÈÒé¤ì¦s¨ZËï|Eæšsý„9âV“ û‰[v«Fޙɾ ~!ÖpBòVjx¡ñÁ (8GÁ|ŽP\²2ª¸nYx!ìE¦j’FVÙ, ©2ýá…b)<•¦Z²ã óu“é-³`{Â#‹mÕ ¦–Ç]T@ÔªYOSÌRp„e%MÔ›{ eNw’8=Ë×é­pâð|hµ&7ɧS]Ë3‘ø=ɼ›»HáX‚„¾ªóôNÙÁ=²Z¾ÈÁŒØ>O ]w²âã5g“Â%÷+óŸTÀÇ+fÅòš»dN°ž+}Ͷœ".+’3–!ý¨Þ×$ –u¶¦À–4ó×ÎUŽ¦ÖÖ†–„dH'Ó Ž(:—kç:šŸ —Çdž‚AfÅ’m)"Éxhi–ÞÑ‚<àÁéÄ{¹Ùœ´òdYèÀo qC +GåLÕP#Mñ#8wZ8™‚¼ü‚d½Y™IÎ ˆ"Ø~Õ<„‚Äóu!q´(¿¸¢–„2Vb Ê:V2w ÏÓ=C¢ Q>9áF•mÆPÚ”¡`¨té OQõR+¹§ÁS£·ä1Ö‚}z9ƒ`“â*âÑwÆêÄP‚I7ÐÂrÞ!j mQÉ*6=Ò>uâ8›@ž;{$/í9¡XâÑÞW*•T·ˆ#ÕÜ™ðñíxšÖ%]s¸ÀÌEdE0·`ˆ ÒQ×^£hE!4Æc:/Öb uþõŽ–¢²6‚LMmI5iILl«/Þ—œ*AìÌ,_jàxm8yKøT0 ÎB •>ƦjôÄÕp\( R¹ÄŸùÅ0ó„.îÔ¹p*™J‚ˆ¤œ³f³ó´•ûm*€™¿7š*„@ÿf˜IdjU +è&|*E^u“,f®¥_œe+7Ž÷Á¿Yä8G´šÁKåx²;R>Y|±.¦G½õÁÒV"ç¿®¥´ø dX.³qáY÷ºNý*B·ò’Šýê=3ÛšLÿ‘ˆaæS´ëFæ…›sŠ\¬fU µÏ»/i­ðî„@Í?fmZÍÌÊYHš¥À»¨rìt ÖmI¹U¨9O‚va¡5Ê]fbN>ø1–¤óAç¿‹ÎèõPÝŽl/¯b±çâv6&›a¦ÓÓ²• U+˜ú/™°¡Ø±¶\®Âu\SþA€ 30dSãâz_y\Ð¥Êd8>à¯p…»’JBYjÓdl›Çk5šÇyO!Ðcj-Ul3Qdhs{i_spJ3 êOɇ¤],oõÄØ4ÁBWÍ67®jÚ˜lv’¼Ïû/qô³‡š}ž´Ì²Âíg®RYâhà»?d Že3Z|¤¢L¢Âox:4â¸çèÎ>Ýu¿ÊâÁñüôö…†õ|U™é \=$l/äý ÂŒaP_YKnnn:Wç díÀñ¶}9Þf Ïb{NÖë÷»yÑù·­—[‡‚>1œÂøžoAR´"2@”áuŸÆb¡¦Ãà*½÷Îõˆ‘2$º4d?T’Þ„ÄUQ0ÆC^Ö eIÁõh%ø$òtk5|Kr9Tð Äàš‹t¦ã¤#ù‹\›Ô®-JtŸ79Ò¼VsÚý‹ Y¸*}¼JQ ‡@ä8Iä<$õ®ãæÌÆ#¨¼j€Z")L©árõp3dÓ– ÀZG-…þß oE«W2SÚµwÉÄ…AÇAãjbIPïGWµ°å!yopáíˆ=t€R´@Š’éSС'+5càáæš‹XÈÏÅô±Z;$¶¯ð ^Y±&R‹äÐSš0vž¸¶Ú¼uô¦>L«‹Xb´µÃg†\:›~”ŒôÕ!ÙÛh…rGLìv`9áX³féäw‰Ð7©®£JÒªK¦Å£gœxÎÊûöÃø«Oä$G’Â_Î%ûÉg<š¶iM­¦S´÷7±ÈÄãĺÎ'W½ —¯îuÓì€0 oñü³8àW3v)-Vsˆá0sñNªnŽÆ7;ñu‘Ž ¸Mô`n²ã†¦'[08±¯ºŒXY¡DbØXî¬Yuo#áF#ƒBí¡îJˤ+³«•Ä^æД2·¡ÓŠ³—I$í‘ü$q£»…oj¿¬nY¾î ÇF×Aùó ÚXŒcs]ÀÇ~ó`– äqŽ‡J­d/Ÿ‚õòªÐ*¿¯¸$ Ð"v©c¹â5Á"£%¬QÈ5fo*P)Þ»k–v^³fƒévyþ¶õ¶žÛêz—JñÙåÂWÊâÔ> \éû#P¿JT!\÷Ú³YöQR]©º™|}ƒŠ”²Ê¨cŸ‘ÍéMé_‚Þa¯üº:н ëKp±„ÁC^‘ÛÐ-IK÷CÌÞîÁ ´åƒ| %Î4FI^ä÷S7«Å'ôÄ.=¸Fgðñ릂J•p%A)#,¸kc ½’ƃ ´ÍðÕöN«o6½Us‡3ªŒ—Ñ¿eIÑlvZ°¢l Lê§t‘Œ©ýp$÷{¯»g•ÕÀÙ-†[ÓPÈu;´_²  x9ØïǾÄjº(¯.AÍ÷0Tþ©ò_&ß߯æy^YT¨S/‚üïÿΕu®3°Q£Y'í˜R\í!(>ÚüÿþïzðK†ÃQ!;¯êíí*()gÐHD6V3ï=Ô0žkEyS$ è³ ‘]yÜ„äÁ#tê©|CD—9–î}è½dQ* 1Š…™ÙŒ D¾ˆ&É5kt‰aâ¹A»c÷¼ua¼ÀW:ã¾EE[±Õ²@ºÛ&T‹ÒbRäàtç bä“^Ïj¦š÷Ñ‘1 ‘êòÊ|ï÷ pÍÂ/™@+B8 ¼«˜ŒµÒº'q™ßÚ¡^k:1Î/g™$®—ÍùÔ½4<(Êzȱ8²æF6­žo1]Ï 4ôæ»[@½¢ Pž‚EÜ¢º1]e*~Û1¸žô•µj…zOJëhT÷ÞÚõó©`ßhã¬HÒÊË®l¨Òí–¸ƒì÷õôñŠ¡јLsœ3E€™ðap…`Un󫶖ôÒ…bá§cÁ_†Õ ,¡`o~>á·”)ÀÞô¬þ»Ö)V˜,òy7D’9faÕq š¥é5ê: x…C­§ÂˆxuQHš;S-‹`€‘ )Å°O^]Ž‹yÖ+ñnsðÌŸ‘9ÅsÀDhÂ=|— ás(f¸êNÎQeÞ7¯!›4»#{(½Q0ëwè#=Qü^`íËg¬xq66‹©d1á ±:´‡Wâò<ž% 2Ê##ó¹0#ú®²;F’Å $¼ˆ5¨GŠN8…\°Ž©‹“[Ÿ:[&…e»#©¢ǯ ÷Š>WŒ… +nB’K‘ëêÛ$$º"¬ýÐ&cBðñ2ÔÔã°‰$Þá÷YÈåÎyÝ¥øy…g$P=õ2;Èb¡ ‹uHVˆ7¢d b­Þ1b¦ÂWøq¡`ä )„8&“½ q×0Îpâ·…ô¸~ùø…}ˆûž4ðtZ¾>jlMoæ[ES{rÀeÞÞžœý´}crÐñJM6÷0{,Äd.VÇLئģ-|L¨<±2jÐ\ðn¤+oÎè&«3O§øt²þ¤xnýrli [2ºÜN·SÂ3ŠâMÐù¦MÇÇ«E|™Ã7_H¤ÁäÇeIÄÕÔQÀà705c.œ1ê¶tæ =€îd“Fd›Lµ€i"Æ݈ yÒ›M*€€ «ÝapÌ©©ª=^Í2_W̵Ú êû:ׄmûR¤Rä”gZò7¯§16ß®ºQ‘>bÙÌ-}ò˜ÍP‚ˆC@ KIsô %X±NøF)­ÃNó÷›(,ÚcóÉù‘ë"ªF@a9¡d.¼Žž«GY7¢†uQB]6#P¦-øÀ¼2­tó¥iç·êTšN¨YGà$ ”E"¢ÇÇͤ¾ï:YyŸ¢&_;‹5ñ(„U:»bçE*Ïm$x&L4r« /³ÀÛ±öKšâ¸«„”E/ BÑqm6©·,âZdé¤9ÑÊ]\0É g,x!Hâ¸V*sáÚ Ô”µD_é_lnT™ü)ªÀqlkGRç£D Ð’»àÒ†~Dá )bBgM`ö² ½V¢ìðŽÚ ?Ðóœëì1eÞL}ƒ|ʳßöÖ¤Bf?öñâ‰çð!Íê EeX3]£€è|¡«µ…à‡mHGDä_ÕòÚ¶ÄÀØGu­º¹F¢V ýo]ŽÿºÔ·ò¡9}ˆã•¦Àr¦2*·X])_ÄY(Q*bLÞ;ɉ.år¯8ÇñÛ.ntBÄçm/ã0¸!9³ý=m…ÌØH$”Lq ƒ”:€íð!™®Øhž)ë_38aÓ™8…¢—%«< ꔓYa,rÈ=Zˆu%1 †ÓX¡Ê¤¡¬‘Ír©­Ê ­ >Nys,ý4[FA"¯MokG„#.–¶`_9†¦ÈEøÂ2jÁý>kJ“î}¿´ Ieb6· *p0ì÷0âÂÃ2N¥Ð>¿•Ì-HŒ=íЯÌ÷;^Z#ƒ/Âå¥ÍGÜ<{•8ºü:§ j¨¸¾šÈéâL'$±Ñí—«Ù<Ÿv¡$ݺŠ  @8’xK)Ob„²­Š3áç5Vz’ÛÈÞ×K€Hç„>‰9œ` 6auM¢¢©V¯Ì ŸŽÀ ÙPºy’×B÷l܃3_¡8ÉXœ7!’úÄéÏa= Õö-ƒÍål{-€gÒJW^¸£†WkÛƪ{À-#© ¢‘¬×u3ûaF溥JœéòÎËa!Âv$uÝà ¶ÔêVÚwyþwob³qdrîö}µáó÷Eè¶@gíJZ‘ÀêêŽÂs¬ði[,R‰aØ#|ÇA´pnôµ0J¬¸Òc¡s,®„ÇÆôxöRª&z Þòîƒ ìÔÁYAf6‹ÜD¼_uËÄÒ} Ó–ÝÍT|áð3k'G+z³çuS=k¼û‚0çnÍýByª±¦N9b¤µ˜T)îR õñôX6ÇQðÚÜ ×!J©qžê{$‘.1ãXdžƒ~YB\†«ù”þ×!ëb7Ê-ÅöÃí·'müÒÞ}ò>.ÚzÖ!g¥;ÃíPˆ»ÁÙ ¦ôz ¿åó·§òË^~-«D|[‹T4E„B¦\N $ßL™%É^,ó§ç“›Ëñÿ’å˜C»&3D¯¶^>§¹ØøµTÉAo´Ð[;taq›µÇ ªõ¿40¶ÅeuJùæžoŸç“[üÄ€½ŒþåŸÿ~Ë—ãö·Ç‡Û“|¼}Úëîö:\²§øížA+~çÉ“Çø¹ûí7;áOú÷íÎ7¿ý—݇?zøäÑîÎî¿ììÒ×Oþ%þ5ò2;îçÿµUâªù0chI ’T!'v-¨^)fÁÆVøslü´ðKgùT5ToC z`œ³*f~vÜÍÄÁ×âÊ—€šøÀ¬xð~@|õ‘wVq~þì6`®6’$ƒÏÉÊñ]w¢¨Ëúù力)§ªqüX™t™¤V"ÚâqÑAéCI\C9yE»Íø $O“쥟tÜ©‘•i¹-èóT MÄÞp°>ET„F˜dÐö\î–âÖWAãËZo@Lo}±åL•­ìbË¡Œ´¦É®8ôã=iJ¾7[›®¨ 5éòoÒHÂZP%$”fY‘ÒQ¸æ-=²p„k(|®Ž¨`Ñ›£3¬: 8%‘Pº.7IZ͈%úV&ô*²Ë„ö6Îç¤@IXôA¡œüg"­—-4- ’p©qÙºDN™”ˆf9›!¿Ž‡óÄ¿=lzª3ÎcXŠjñv£T€˜ è£cOŒnÞ½Z¥jC!š—+?¥»õfâ4Ì=ÅÐZC®ŒáU*ùfMs·—‡ ²ñ0‘Üͺ;Omh¬ºÑ °Äøªds¾½šóÒádÑ› šai,AÎÙú©SY^¦eì!"T×{‚ ˆ¢–œ[RåjæÞî~ݡנ“3P…¢Ï鯼ÏðaLdW¬UöZkæ¼Ä½”4þK¤úp Á—¬çè£:õëš‘)IVÃΛÈRâE,Ê·Ö†/]•™Á` armB2Ý­ë ˜w’aŒßìíÅ­’Êq«ÙŒW̤£·>SE¸{YH]e“4Üü MS†^Rœ‰EkW0uÁ~‚x_ð܉TdæÏÇxº•©]2êkù]wç¡Á¯sÚûßg¤¶Þí öÏN´× ’ætÅ\W9dÎ͸˜¬æ¤?6Л³YÆ.ÕÆÖe¤XÑ=ÍgžHE©>tMó¾}‘Í´’z¥ˆ a4—+ñÿf³‹é*õ¡¶ÚTî§Qôº´?:èuОxMá‘*u|žà %/4QÏ€þíƒBñ݆vgKìèdx»wžÅo… —!ÏÒ!Àãï5,ÃÅêÉã`LøH¦'¼ìzú_ÓáA–‡”Ó:Äg“Ù³ød·ÌôÖ£)XÒ’d*ko¸öÔÚÇ¥ËòSùOzG÷êôñ<­ß¾ß=¥s‡&ãøxÿT¹¿®éÚÅüê0¦‹âòSßœýôè»'Ÿîôþ+¬^’}º<†;X ÚXVNì“ÂZÛQMçcšQ™•û òâk÷rËýÒ$™šXL¨`jÁXOæÂW ê÷n/o2õ]–…Ô]ÃMË…ž:ËÚ¯Ò#@ô †¸r°±Ù5ªHAIÖRYÞG„9Ÿ"61'ÃwÔ¹Á°;ìck¿ªQ´V¨_T(£³7®¯‘3q‚ E¡7xmdlì¯ÑI÷´{Ø=ý!x¶¶mT•a.@Å›Åa]¤T+„¯=Óh™†–Ι>:á{=¬’rÇcþuÀF.‡)ƒ,6—`âRC…Ýúš-ùwy V0 ý‹ìCçÊgým¨e&ˇnÄŽ¼Ú|QW]jÎÒq£©ýd–Š*WH½:zÝçÍp¡ }Ô¼ª(r>[O*‹\‰Ž¸rX‰`ú¤ðqSWfv 'ÙråRcúžÁÆÛoè."U8‹I9Lqbµ€KË?(ÌŠ2¦¼ Ùvú:ŒÞŽ3¤..Tƒ ˜+=}U7X=’M72º”•" Xè5 •ýþ€½Öý£½SŽîtäqü´ •Æ˜öNv7µrt\¾;Ø_—cöÚ¹\C´euãçÙJµ m ”ÓÀ¯òwyWK+¶Úwë–kÈžŸ“-43—3Ì ìÄŲ̈ôÂ4‹«‡zÍ-¾ü›=l"R©ÞôÂõ¶š¥EÍ:Cž©¬*ƒ`ű¨?r$³œå„KAx1ÈÇo²W± oH…¡&4Å+‰B¬6Q?Ö¦¦¾ÙÙ!‘öJš¼kƒ» x¯ÏSvw+ Il©S=‰KÛŽ‡Ê¦Evg8’ ß8·´BY‡w­¥V¸¼ÍÊY_w,{¬äýã£á¨»¿?zõó°7êG½£}ÌÎaš÷ÉHn¶ëÑ÷z9Èc±Q$½ˆwyÕ€©m+Ø…‚Ëâ’d¼ qÔ­D»ÌÞ0çz)Ž’ÚñÄ›Fð [;;ñ…cî••.OBL<.ÂóÖµT›ù¹V]@%«ká+œ!4 ÿ.­ô8®T—#ºôÏ!Ðû©·wFžôNûƒAÿø(O¼P“É.dlB} ô8vb¥ÓñjÉpäò ä ŽÐÒ@ñ!â1äXzL|¹P㯨 Ο7Å];ïìˆô<·á“ƒ\"’ŠHèj>¤ìr¾¼ÇCAL·š°Îïïf‹eÌYÂ%BÉNý)IሠSFò¶l¬ëük)K«ÈpçY)ÑfR±O»CZ·G½w­ôa(Ž%%³JQIË‚Äa/ÀЋ,“ñV9H¹UbÅ×½ÌAKþƒÓ±Lýµh¤JfÆó–3G›Ê÷½rQ(ŸZ?3·ÂuÈMZC›š¹%xDâ±ÀÂ¥†>P´Ã‹ç?½ UK2”1\}š%Gþ Ý=“Úåm Ç•ÜVD„+_j¸îªàôñ„1F=+‚ëô*|'ïI{,Y—‹?Ïþ2Y͵.D€§‚CÒåJb’å½hÔ~òñˆ 9Ø9v¹Ï=q……ÖÈÄlù¡&Ʀ‰æåBWX‰P,Ê'«ëë[#ùðìAÁ?4¯æ9†E?°¶?”ÀC%Bœ€|(jFòÔ"K‰9ÅI²= }~ƒØ_V –'16™AW–¬ÃÿmHšª'ÐeŸ°/þàBã äÝm¾B™¿K&Ä 78i™>ir]´Ø „jË—‚ŠÒCßs×O¬úÅR5$ìsì²cûq©.›p—ýÔÑù¥‰È%ï¡i^k×u°ñÔâ})Qo~åªÌ¹ëõÊ Ç ,ôÃm… cÎqük/´CN¦&%›ë Y9Mv¢ÞŠ)P‹kUžÊmi94Y†ÛyŠØb³@öL”,ÐÃØu«⑃_+ÇC³Ckf¥!ØšbÏ(‡Êq Ñ¿ÒÄ{‹+ð+²Zd†*èZšjÍ¥í~ÈàM—eí „ù)¢m^¾i$óëOÝ»6vúÿÆØM}ƒCv`eb$áRDT™½}BJ`?-Zç·V"SªÈÌ  ˆ¾Ìô.$n.o‹Â[¦íwÆ×W°¯©QàhÉ„–“'-$ð%-wÙFng˜H'ü""AIhBú‹u0MHÇcNÕÊÓ^‘RßLýKò¶Ódv¹r5wlÒ ‰Çpº“Q™X™o:;-Õ)<çŽååò|G”ÿkò!•ÆÑŽžc&{”î÷»bµyÑáIÙU€¬”%àšÈ‡Ò#Eiðµ6ŠFÓïÎþ o Ú9h“¯SÃIÐÖ‚9æè“!x] ¡ïªojÏ峑ðC9{}Åö> æ²\K@wrÃyªÌŽÆƒ ox|Ø2S·3|7h­/N•9%ŒÔñ묢‡…Ú²a$.L‘c¦HŽÚ™°Î×2ÏóEKBtcE”úÜíŽÏÑ«þVáèÍi÷èL:|jt ‚oð¥_ìl„#µ)¦ÏåwtëÔÌ&™ÓF¤í E¸×•–ÕtãҸЯ­èĤ¼Âé…ŲŸ·%bÊ6ÛEž/Y‡e‹Ó.ÓTg&´ØµÌSfþ.û·'!cƒ)WÕq;~õ'“ÔÇ­v”0AVÌÖGÎê’̹O*±næ¨c–þâùd2yY‚ÿJ5P³ë…‰Ï†Æ SÐ ‚ηҿô”‡.Ëæ›Ý‡¼évŸ<úî1$)U šâáü«ò¢°¢»lrjŒóɧºÃçÚ&&n)î!=K4W©YY,]!cx—$#Ž=–EP_‚©ÇèXX$—ó,4lŸØ¡¬C!WŒT_ \…Œ8<ìN ø¯˜ÿ&³8_0¾¤l¢9ÝúÓ¨ÙŽiY˜¯¥œ– û–=òìÈ=Ô Z9oL‰+W£<hdˆ3ÐqÂc«d‹ñêºà:>Üãœ1΋ôã¡Aê]ƒPëì’x}|º×É»ZðF:ÿ[ܤ=‡Ÿ'|lNØ‚ÌÅ($u–$/ÒŽ¿p@A©ÏÀ~4ÒÚì0« ½(UÊ¿̲ØyWF†å³ÀÕA|65c‡€åiÿh8zuÐÝûatÐ ]¶„åÅ%¬Âq±}áYV/©å<ª [/á!08aÑ\ø³FDžH*x h3,ÙÉQ%GòÓSÄ×é±²nA©Yášù]¢Ø«JÆÖÚ>Ï/WEÛÊýBÚ”Š_»ì7$ÍHZ&Te‘Q†z¢a&öÏÎá>.3 ›·Æø‡^ïdô #|2Dð³;™ˆÎÄTO@Qb€{> m­7«r¶s§®3ˆü-!ãLÿ¢T,vì@.kJ%›å›9ÿ_PV!@I‰èðey¯ò›Ië"¦Ó}’_#° šÿY èì}×çm©£È™’«´)c¼0:óå)Ž-4û„÷–ȱ,»ca1ôN¡T@$´á ¹$OQ¤ Á]H@†Î•ÏC®!iãMà9»²56Ç}&,Çl.Æ|—Õ7·µ¹¾k¤ä™l ðˆt:°×O”¢qá*4…‘ pH¦Ÿ.%‹ s½ÙØ lfÆ*×`Óñûï;ßÓ¿?b¶wwvþÉÕ¡®\MÉW¹(/< ‡4Rå]¡Ñ)/ýfÇŒæ2z5H“6œbá_Eñyeö·IΑvYÌ5kû®ò€¼Ï ®FfAýœõ5£Š¶jœ,¶ŠÔùÉEŠjØ­R¡^Ö®[5¬R±1וÇ?24<ì`«¢g°­å¸gÄ–³µ[Z; ¸r%v+*pu>kÌ­ £â|dŽ±Pª5OAf)©hÙ'¡²¯¶Üù­Ošä`„ù9ïòØCIc-]…I+-R:¸´p%Ðsàkѧ¡‡þï*tm‡㌥ÁBqÂå*zóùm²å^X’Ý{£= cŸ ?ÌÔ$¯õ°»‹ôyL  õ^’û3 nßm',1¿AôÑqDT@Ùâ@Ë'tßš'óš£#Eh42ðÐV¤ÖÕ¡#|üž.w®àÀñÛ Ôq‰t4êø2æG“ƒÐ•¨‡äð8«ºËµä™Ä+ >Æ mRû¢ˆÿž.rᢠæ[þì·†(GÇCVÂ$Ò¨Ã۾ȯ³e›ÇÝ) á´uOß î˜6·‚´MÃ$Z Ik Ûwêzßçšwœj4´uáJÀ8tÙÛn%x‚giÀ2°ê÷Þöö~œœ5/Ny¨­ ’,i¾*´rÊÂW1Qàj‰6æªí¼æ–´²BAjPÍžÃö’ª©‘ dž˜Žh7Š×OÀZ{Y$˜$Z¥/îÍ!%d䛽?g'€ˆNª&¯†0ZªFèJŒÂÒÍsÿ—¹&“xy;Oµ‚È|)>ãÐ;ä„ …¯¬Î¼cáw! Ú+JÜáPñbèõŸ|÷dtrÚ{Ýî½]–²R˜)>>Ú¹ºŽûý~Ì0þ‹Å–; Z)|Ì·ÕÒÌy—¨ÀËý±˨ ?ÖoâBõÌ LJÔõ9¿ è70“´Ë7¨!Ð2°±KêKæ5·PO•¼î¤Äø®qÕÕÌjw ËZ…–«ðl'X7³¼´2ÏID]p‰ÜCVŠ¯×¥k`\|[ÿÊŽ\å§sÜzαWj»e÷›?Æ|&è¼>Ú?:~W™Ø»çµ{¸Ó]´ß?5«!@¡Ï2“?âS(-&ÙC‘Ñ売'›@¸hmÍFÆæþÀ´øâk UðÓöÃíovvô}NNöªËôSëN¸“½_µFí^AP‡Ëô$x…í¤’_NH¨³û£w§p1õ±p®Ï¡3”2Uày¸˜&—EìKg„øy´ªÐ8c=ÌûÆK.¡AVÅŽ?²•ä$ºHŠ+­Š¢,àœÓÎÚ’z§ŒX¹„û=:‹§’X‡þ¸Ãt^Ži{Ü™RÛ(ìì®#q×|(#ˆÐ†é)©OŽ´‘ÌËN9FtàÆò 2:çL‹Ûkyè…'ôÍÙ%â!†'ÈA[®>™à•9RO£I3M«ò฻¯9«üa¨ÚÒG£HY0ÈîŒÄ’ã Ñh4[ká xyXè :RÜ•äM ÚFk.ràsjkÙ=Ée.R;;, Ç„XZ¹6dâÈ'©”±W–XáŠRÒu¤æu‰®°D-†±úGý¡F®ZêzZ[‡x'f9t(«úË줵ih•eÇc³–>æV‰¬K9`Úžz{Ë’Ö¶Êh.ÿº\Õ U¯f’ÎãA*¨[&PŸÙI§5šN­~*Ñ.¼k#Ë·œ¦“·4_߉æœW €ñà‹Ï?8茣ßõ~-óîR`tâ\fžÌœ›[õ'Tg×2%»ý#Ç[7ÄKl~cUÅôŠ$JhÇ6•ÊÙâãÓº2g5›dú×3ï~f1ìù-w­˜Z e¡n\ž„‘Å’2ê„æÏ{³çýÒ>­€ªU•Pè-,åûM0¤wØ;$YÐÿ±;ì­½¼àXêhy”ðêÓm©©?L™ì~‘çá3PVšu‰žÜÃøIgçk’Ή ‘K²nK5Á¹*Î×­}4Ý%…z¹E«©(˜omš_^ŠORÚ,ûYfE>M§T3Hkϧã+&ÔÆ `“7½aïèG|ÇZTÁ’Ã-»T–¡"Øb‘ÑÆcy7áÌÊ–E•‹ü¹¶axBC‡å™±¹å¸au«eSÝ3GCŒ=ÀÃcˆTÚA…À®"Bö’)”Ùïëú¡Ÿ¾œ¼Ò;<þ¬#F‹jpv0øÓÁ6·*±èñ|éô_›¾›tI£‡É—ßM­ ÏCáKI/b³»ˆÍÑÙÁ`U¸À¾eï{Ó–8[èÖk­Õµ}ÊTÄu“æ±Ê4[tɃIhpœ;+ eOàCR¶°H;—ãnð%aš5›»\‹î5D°wm–ÇöþM+Ç–òƒ[öq]d"wƒñ¬áS¸ô„A¢ÄwÁáêßsôõ¥ÅŸ¶èñÊÉõ‚­±n,‚s) a&XD)ƒÈì®°R‚ÁÑÇá𰀉™eÓõhš€M©pòìQqãÁèÕâñE鉆o¸­ö®žoŽ_9í£2“0šßðÁÞUÝ"X"a´¯¡Q=G¯àÑî¢ÊŽ$·l-,y4dÊcQÕë…¬·»Ë9µ\;¶¢šà‡ž¸~߶ù¶’J y­±'\ò¶×óvX»f+©Šá%eÔvï#â™xèÏ$h§ÞwääX€ˆ‘Ñv=é „/©!ê):O×]Ÿâ.ö>6I¿[{¡˜­Ò+4@ui´ISÆ!â@v×±mbz¡ØMpÁ¾ —|Ýh9Ç„ÝÞ† .u¿ê,ù¸É`xöêÕñé‘©Å>c/¨Ù³uÄtŽen!Þ«‚!(¬°×çá€(•ò»ÄÅ•C,¥Âé@e¥Ö×Pn±/þ– º$ÑÛ.AÌý!n úν¨DË¡n dø«1(üðÕ)¥cBï— ¿,´žÞ7š¬°v"ú—ªú’]™*V‡VéjÊÎ3N oK #€§Ù0r LÎ8 Kt¥$Pµ’Ø I¯¾ ~& çÐòŠ^­9p¡<`ܺMA|@‹¸Zè2w®4,¢¡§ „/u ထ>ysIÏHí•Â°Œ4XÀúŽ¨‘*õe.´ÍIRâU~Ã@b¥aaZ_Çã³’õ|í3)#QIÄÁ !.¹T4–ƒ^<ßùØétB𵇄™ª4g´Ú„!X©Óõ^¼7: !ñ°b V³Þ޲ŠšV²1$Â颱¨¶jeÙ)7ñ±×+°u¤®¾U°8O½Z”Nœ3BŽy`«ì´GúîsÞœØ\ö]YmÛ¨YfY¡ñQÈšžAV ×'õX5r—ùrE±-`Yç}M.YÎÿtÒ;íKæg0{ƒ·ý×Ã`¼É³1M/èqWÙŲff% GÜÑÂ_6±€‰±(/nµß1_HIŸ]XM¸Æ ox¿®:ån‹0gˆ»¨[dpNÜäÓ[)±ãðTYW-Á]Ãnüù   J§@a»&Í&T“¿æçì†$ê½Au¸z:lg‹"aKŽúPm¤Äœ²Gí”t’Ä5¾Àýd,ù[¬Ñs…!OÊñ!Z]«YPÎÊ''Ž`´Üâss‚•™L߈’Ø™Ên?ð „`e‘ 0.À§Ëh Rv°.M±RlÕJBv~5»"© Çê Ï{Ç?öNŽ:.Õäk0­ù£ÉºûÓ)ìbñB) ×P=­)G+É=o õâi¾YÇüdOó2èï÷˜çmÝ+ *Z©¾Î›/áÇ!(lŸ|Ø3sR*ݤ.´Æc4¤áÒ>14{⪔™‰½ô ï<êSÃÄ-”_³<Òëï¾±EF/·”e_Ï•pÅ€°>ç«*‡ù¤ð†ˆ‘6Œ•æÙ&¹%­_ OšBkî›ø˜›æŽ?=f x'N»§ýÞ ´Å™U…\Ò‡Q ÊÑ“X‘fdÂ%…Få NgÜÄ^aGˆ7v-˜zÈ)W÷:á‹Éþ2`* Å ÿ. ˜A`¨?xE$,Àiò’V1©²U¡FXLH²vyyj‘ŸJÖ‡îf>1KÈ+$çˆp¦—PUã‚åkÜpÆ~¹D`PãVVé“!ë`{ò˜œŒÏ×bÌu®+ h@¾'!åMù:Ç>#iÿç£.ðùpxsÑ>‹(ußW¿56/ùµÄ›ç&þ’Íê–úÔËG¨ä@šºj¥•rÇp—x—YSœO¼DÁŽr×-©ËPô¢~ á—-^~Û€EmcÒ·œGkŽ ÞOÃ;Å–K60 Éë“ÆÉõ‘?.i¿¹rŸ(ó…ÇkÁZvZC_aÝÌ –¦‚ȉšVüvµ˜°¬{zˆ‡ý“A ëé†$óüZQ¼æ[D„*¤kWp5Ûj œy¡;Á‚Õµ#™#eÇÜŠÙ1Í/ñ&5Nï‰ñ!øTbù«Âë:wúE\J` 7Í0/­Œ’ø‰ì³N5BÖE¥\àäoÖa`…qN|/M#ä ©ÿ^˜&ŠísÍ¥îß+Ä‹Øù¤7±à…Ö ‡˜¾E2ím=·ÁÔæ–4RE*ä«íè?›ªr¼ÐøÉCr|öŒ=С| ƒ¢ ¼L±.£<°MçkrÐÅ|–­]e“I: 3¦ ô¿ÓG7œú&9 }oÁKúèáVÌg8“U$³v{(þêWùGSì¡|VJµ³åDÇ•»½ÑÈ1)Ç$†-ý¸ÿŠîUž#ã üð:™I ÌT ¬ÄW¼`º³ÆC§´Q~0Ñ£‡È:™-­“rÞ?z¨±àY-çä|‘ƒe{5'«…ˆc†OA½OýYèAö>f–×ñЋÔGU§E™ëb!T`YZJg½HoX=õˆ#t™xbà5O“xeîñíPÝÎå]†xÄC¬9È‘úïúÝž½‘¤²ù<™jŽŒUK¾§#‡.rºÅWf!£êÇþàø4h—[•Ù¥ÔO`F!ƒ ÞòAg‡ýÇýá‹ç×4}Y‘¢œXá:[Û*ÖÌ`Ü¥KÆm8Ä•HTkü숛ïíËò€Sj¦<ÕìË6±œI…:ð?0I«øú¬Ð™w+‹'ÙÒ{Î0Xÿ»:ìëoâ•Îk(µZˆ©ƒðê–ò+Î o9ª>¼×=ÚëŒÝ×½¸q’ÙÇJÅ3guç´”s•dìúØ+=pRr‘D½ðxSÅ2<+ý¥vi×`£Tf´z)£8"7T»XHL­‰ßeÁ';Ò]qÑ[®ÈýÞ-  îY8%(YŒQÂR}ttì½>è¾<"ùåÅV—Äóù8–ß2ð˯¿{2zòx+îl»jØq»­ýhû~´­UŸ ]¼ëlÚ`Ô˜à#ƒgèðl0 8ðL¦¿äun½wÖå‚tX…Œø¼2"ΰʌ‹¼9¯c6[/˜¢­0t.¬_n.= ¹ÔD5¬(4ÿšº+‚‰œÜN5 UªÅ•<ÛX¬v‰ÎäË$­ŠôŽÄEE~iº>=';Œ Ý)ý²uTu¹q×Óæ:p¸@¨Wìd6’MÓtqR\—ËÏ1½ÂL¨ˆåÈñz\Ëå~Ñjû²@ž_Ž·Ásÿ2Š¬è­½­˜]•×·#mÁ^ç?|Ïâ_¢È/2¥KQª¨Ê­\ v9q%º ƒñ(vb›¹B*Ñ-äÊÇ9ß.!Hx§F•ÇÄ ®Öƒª m]ôuÜ΃þt¸á8éЮ§ÿ;y´ÖY}Xµùf'¬3­xË;;§fºêÎV‚ÿxóýÝšvîSØ‘.4±’ÈceÝ…¥cäHæRl¤*­H7{ÖʨXÎëD·ßX."o÷Z´ò©uéùfò‹1õÙr>ëz'~%|¬üò+!' öÍì#VF7aGÙÅ4yÏNjQ:0«Ô1öE2ƒ-™À£ õíqγE²ÌP¡Ù#KY„Ò)J–˜}O&dœYÃØøEêªDRÏ8ÈŒü_¦oÃ¥ á@áŒ5 *“ÐCÜãK6–Kï‡$³4уMÂîmM<œ¸êWl'ª,w4xõKxÔÚMŒ°•êV“ß ÈÕ`˜†È¥‚•„±„üQ0wš…JýÀi…#­¬FXD›Ï(6Z¬É^'¼D—€ïÚNü¤ógnlw§óÐyªáp²RQŽ9ä+.-ÅéVSDü´!áZÛ¥A”J¹Þ\%ãºLg‘¦•©§ír쨌W3ƒj•K¦¹Å¾^è19IAÌ««eT¬ h,žô#¸©®SeýRŒ¥ªj *v„2BÚ+˜wxvBiêT1)¸úÐ÷CdjÄ'‹£ÎÔñ|ð\u0ttÉu²‚˜j08,¾¢v¦ÌdY™É‰®ñ÷1ìKvýq„M„Ÿ#p¥å)ŽÏl›û½S]þ‘+T.ûÑ/ÝH-ßgŠQ7æ¶;¥»WIéB³dx@~@Lê½ …nêCLç{:ÊÓ©MøŸt:ã€ÌØôF •¹×•&Ó.d»ç9H±û¼³Ð1>Ëz¡»]ƒ)Õ:Ù"²¤éDÌÜ6°-Ì(`ÑIÀßøuƒ—幃¼Dì‘£7{pZpè¨ålت†Ã*HDS;IÏŽJɯÒŸêZλé:ÉŸéñ¿´¶#kï´É¹§kÁZq ð.ã/4Õ¯ÙðMë99ÙãÁl·»¯ú±‡SÊûpÒƒ‚F¥üWœÇîÀ×u©h á­¤êøI(íöÚ.E|¯í}ýuKùé­Ú{¢¯0yõDˆá¬Ü…2-Dê`n:ê;+KrZ'©!T‹×ÊÀÁ”&·L'¹¨ÌaX8xš „!U9ËÃÓ°µ¢¥ÄK Í©¾öñ")®êµ+Õ+\V^½‚aBt…Ãf¹šqiàjaŠÈgXUd>k JüÊPº|æ iÅvúP¶QäOÿZËTŽ–Œ¨m宫GÁþáÈ0XÿñËR OyT2ôåè¢èpÅg—Ž¿Ì%$ )Hƒ%ÙØ­x?K—×É">™&´ÿŽ~ê¯ÒËtÚŠþ”^\Ðūŵ¬ª?Á/Ÿ‚F‡D’Y%"¹³…K,ÃÚÖÃ\rcäÕ~·$$==—Çv¾bëJÀi »€I=(öË6IêPF²…Qc¬jØ„ÆÝ4«~#Øz5|Ù5.Q†¢wíLê5e‰º`îÈ}¨Ð㊲Õ¶vS4Iý¿~ÅI–¦ÑÕr9º½Í¤FS²“:íä‹Ëmù  c…×1õºSÚÞÅßѲöÛ»îF¾áS#Úñ[ŒÊ+\7wV¦e%\MQꎡ*•t¹Æ!˜`r¥>ò[‡;uUul]CÀ4yîß]ž1ZIu°5ÅÚ­¥Aºà esÍCE´ô5ÆAˈñÕ•û:QÿÁ+l° R‚€Û°þÙ4óUqEúÓeÃi"îÒå_¯Qõ*a.ÆÈ¿ÓŒ;a=œJœÅ/ÒÙÚ4kp(mK-ÉNn÷"Ÿ®ô6Ѳ8ÅP”dÊœ­w+Q¦ ©Ž7I™a§‰¤¡ñÛj%‡0ØXBÚº³Z—²„úÔ3݉^“Ñz…ák$í@ 5£T°{ßÑV¥¯®Ê†pÇ$¤¹D™ Óü¼¯k·:yêJ!šÑYóÚíÞ=©%3 †Úɤ‹Ñ·(+S)9$ï¨î-Þ¡ú ÁØí·i(pR¤º¹#;{0ׂ.¸iOé<˜ÆìêB,FV¹³PBÔ¡Y=Ûl;¶Šs&Øa“Âß–D;ì­?­ âwáwÝ!Ûª*êÅ#±¾«ŸFÑ1Ñ0Üå¦0_Ž; ë®pô¨­Ä™$æ:*Û1 ÜÐ~wâŸÍk+'“¸}1Ë¡Æ\ `KZ°ÕV‘]ëÈ»ÿÁW* ?z›á–¡«` !u‚Î! ÆZ1d+±~F{+nXª§3jâÜ’ ®n% ö¹ì”àÅ¢æÐ5s#Îëu:«MUN…ÂD¿NÏã‡ÎAîÜú×™êI<駞d“‰Ë]w¨jfÔÛ£±sˆæ },(p¡Ç›Ø¾f:'e%Óh ÝêÍRqÝh6¨’/V//ùl#l ¹‹Ïlø^9¶»ç´Lvk5Ø*CIò%$HMô ¿Tß™¹T¸¶{é Ž‚ÂÝWîl.Kü#Ì:g~èWôÍîŽÎ[¨ÚŒ5ØàrùEš—xB½ˆëG°Ù™ruŠÿö‘ÀºøÈOÿËïÿÛyøðáÄÿ}ûøÉîîãÄÿ?zòÏøßïñOê²¹´]ÝÃý'·û´ƒ§qïðÉã¡åÒIQ‚0É›ûÛÎNÄQ.ž@{,ÕaÉyñ›Iõiö’fHçÊ/–ñsÕÀÔ¥ÝøMd p¨Ã7í›'YèD‡Á¦Òò™L2&xcÐnÐy_ýpôÓ“ÇV4Órf˜Ê@çãP¦ÍˆU‹r:ë^>×b[œkMÄnwd°3ÁTnÍ€’ÙŠX*/‚ƒF#/ðb`h=©LP¶Ó” —òÍ-„ÙôÉ¡ß"¦éŠô„Nø(á¢ðEP9ŸS-öHg'ý˜:Y)’U\a‘~OZ@”BŸ!îxk±N#i©ÎfР$t°áô’GÃMƒ™WèÑC^sª´SÛ]—…ì‹SˆM§Ó¹6þ4\)Cùá­n­.ÍÖ!A<ÉäL"`Ü(Þüc¸µ¤3úFõ&}°HC I|C‹Fx˜%¼jôn‹ÁëTeF°g`§¹àöi%ÿ q& ϸL™†›d1ã{†EŸxÜâ•”°3‡ÎÏ#j‰M¾¼¦*nQô#ÖñŒ_PÉi×3¾Åu]{´wJÓÝÛ;;íºrÚÛë9B±í¶^ò;ã®vݥや¸Ë´C6ñv2CêêHPOÛ;;íÝíó,/ð|ZÔ×¼Üöùç¦&ÛÅjÚµJ#3áFoÒŒ&‰Žwü O5zHªr ïš­=Nf‘ÙmLtR-4»ŒB‚\KÓòPpÏ ¾ég'ê/­J "#!㔕z"ëQýÅr#bŸP+2t\`çNÒ ~wX|§á”|ã¹w-׺[¤œTèʉ ‡/®IÃRõÞ7~ž†œ–c!Nêˆßl¬z(’íŠÆTKî ÔÝGâ`¼òhÎ_ÚÚ+á4Áv~[ò±gWÜ#*£¬Ü†°L¡_¼ üá:d\•A*öGDJY|!„lr±¸FMöžÍqQí¿rLRY›…˜n>-á?Þk¡²ÌçDGÇUç«è-øY¢;Šõ1,—±ßjÛ Qâw<ÈÑ´m.!e«T€ËŽÐ`ž>G.ïצ¤–I¹ŸÛø2GœÙͱã)S ¨­=¹—U”ëDgÊü”™fVe¤üAògé$ö–É¢sù÷­—ØÂ5_8‰H›Ò8ÜnM§Ù’I”š¥Þ#h/Ù¿ÑA2ha‘aö‘{\V´?†àsûLÝ)*¿‡èÑ»¶ÝðbÒ fàˆ/Ò„ñC-Ï}¢ÎòœÚHõ¾È>¦…r:— #µPŒ—‘Í»•è«/ó˜UÚÚ¤ 0ßrDJ3XT# Õ8Jª£/ûålÅà”­— †7ªl^²P?!.ƘRvaÊ@EAÉ3e}ƒÐ±å'º$Öq4ÜõàñeÖ>ÏfÛãÅMzÞ¡?ñµðmš¯MÂΗ,aTœ —à+æxÞƳL׉SSyRÎI ]LoñÂãU¡Q‚{,%&:-tËHgÑÉóô2›‰÷”9‰5£¥õ’â}:isʾîPz}–ÑQ?65¸Vxçó[.wÉçBôImjZûOØi--’’´“é#Q;Zµmx•iëåOø=ÞË´/ø,fên3íŽôt:Mhã7‹dN’¤{0®íò\o{›Þ€ ¦}Bš0è'‘7“Ìne„”¯Ý oæšœg¾~žÜ’ Nx%ä•Š]´ÝÃòÈØTŃ*#uª‡;Gù£ÏµÇ¦Þ†vòÑߟ¿ìãþ!?ö÷{ûqw@¶"p{ÆÝWƒãƒ³aïàçøè8~×==í ƒàio0 ‹OãþáÉA¿·°ÝÑÏ æEkÝaüóñÙi|üî(>í~x¾},­ ²J«b¤(j\ÂxÀ“­fš8K“àÏ»ˆOø[)Ùu‘¥CEMäFð¡ËÆ’ÏKÔŠÜ|Í"Ýpgé ¹UÑÖ×92ÿ#°l¼yÉ”x‹“÷­ÉûäUnµ&mË@D-©“à*ö¶¢ábõäq‹«öŠ¼æ8—d;ª¢ˆ(‘yÒþ‚©.ï€)¹¦5“WB^ªUv° 6 UM(¬h®ûS²éÝŸŽ£GólóMB+â®Ç»»A‹Üûào±˜çews¨Î¢åQæPʾ`¯,…G/JH.„~¯K«àÑKÖw¥ýï·÷¦IAFäV+>I „ÞǯRšÍ…iFò ŽàE~½&v®hTa¨w®“±Ø´ãs4´ÍGmhrßue )5ÎB¨v‹U‚¢Œp1Ö˜}@r^ký®‡¥•GJY\@Ðòû2¶êÅ}UV±¨õ±²·EKÉÁ.¥ dÀ°]sø^\–³Ï¥û8ÊÙäÅrÂì‚É Ñ*U èGé’V;O¬Ø:·Â,]žVhà$˜¿¿,ãméÚŸ€ ½f£¡·MyØ™¤çY2S…mŸÿ¥ÎÇ„ßù$#q^Ò*Üø~5réWùÛDhýÎþš-òx˜¬ í–å‰â Ù*Ý÷YYüs>KÿžÜ$Ÿ–âòn`“uYK*áí´“¢³j/ó÷·y‡–ã_ç²^±‰èu¦o™CD ÈL‹Åg‹ØˆIœɲ`¡+¤`AÉ®H8†@àíáÙLz¼X Nߨ©ÂO:;Ét~•ìF7ÊÒ;ɵüDXNŒehÛ‹¥&`vS«¦ ÄÆñjá¹D‘¥ç4UÕ]K+0+ÚÿìÛÒÄ—ý£{î}ö½´îl⤆ä>¤_á“~¸M:祛L/iu,é¨iŠš,s¾c…l=Q€Õñ±vˆ(šÙrè\­w&õCv¬q¿©sÇóû7\á^å;¶­5XÍŽ~üÍ_è ;íÿÔŠŽ¯·w[v6eÚ…^ÐFæ¡,)ÍÀíå¥ °ÃšËk³—½ ?}¾ñìÅ‚g#õœÞC‡½’ô,-Tê•3¾âš//ù5ž8Îv—ÈÊ3ñPEáe bh«¨!"‹­Ú+Ø®~ÆŠ ´¹›×TgVëÙï\‰¾Y]ÔjÓ5ªð\K¼»F†œ3¨äÕbPx„Ø}ô™†T©3nU F.%X¢Æs©ðøb T Û¤[e³-}d§³­·Ð†XL:W<ÃøÕf¶«à.*-Ø}ÄÚdav´ø³_ l& )çmcPüÚ©"ð;Ò™D»¶­äë3³XZ¦“li=Âq¨Ü“BûÆL{ìýEc¿+Ä'âÐ Òtü`†%ö¬šz>Û˜dî™p!8ÒeÆ)€"3Y­ßfí½âµ“. ¼3#àöP«QJ¶®KÎ?qž0Ƨ j—ggy‘¼ìü“£–IÇizA}?Gío~â¿å‹Ùƒbíð£xsš.>ÒQ¶ìÌ‹{â±V„Ÿh ï_'yö¶€YìÐÿûèKš‹ô¿Ý/yQÍIFŠ°êúœô½¼ÎfÎóÞ}^ÙMÞ&îÕ¹«..ÉnÅuPݺUaÌV‹1]HžæÝM ›ŸÕÊVÖbD ¦Ü“‚U„cP½R#nFbÂ+AË$ÈÐmW+ÂI 'À¼¨\T‚„•/—VYXÄzÆKʯëwz¼ +™•}åè­ÖøÄoËÐcd[Ï ÁK}VphíBêZOR)´Îž >FÒå¸^ ?æ‹ÔV©€JW3½Ýõe*ß®?ù×Bœ§â|ªg>‚¸ç/ïöeÅìËŠ+¾,‹dFAhe‘ƿʽ¥~ˆ¹ëŒ¯va‡{x:¡õÚËK5-èS4÷Ô˦d5¥C›¦‘vn\£ÜI÷$až¼i9(­o½¬y Ý!äCÄyƒIùœFiŠÕâCzÛÁfGjÿµ~8’=;†«vPE§¡•Hm2ÌY¬†HÅÇ¡û‚¦ü‚Æ™Dsùû l¼wEë¯F¢áY:ÓðrŒ)ß~³×ösG=WH„oò4sÁŸ?ÑöA¹Í‡@ߣ»¤æ¯ÞoÏÓœd<èº/.¶é_ƒPíû=?ö'ô· z´!¾zwãç4œúÞýW̳µ…˜ ¸­1©ó*‘¢SpáñçØK©è—p•ƒ»êr†]Ÿ‰Í–ŒÓs)æT´–®ëCƒÕu=OYšÆš°&Ê‘¡ð™Ö$ú”æÓ,­.‰ÜK=PÞLKñN$ƒõˆž¬¤¹–]¹w*û ÓÔàÉ8‹Isa]™Î{‡¾?ÈìvnÅo;­xk_ÞëÇ—][ [­˜”+x€WFÎru[dã"úêV+~„¼ÔÛm¤Þ¡|ô7­x>ïÄ¿ÿ¶ýhçQPëC˜ˆ¥¶’¹8¬[äsºd)u^¢d5ɘ v5» žN³Äò¤Çá9".B ª¸¥":q“ì⺈TÛѲ*Ãe•GZüHÔœ §‚ûh*–*vâq»†)òÝN4(c¤«ZᶚÁ/É°`;­Î³¿±¸"ådÁ ¯¢ ä‡.±ÃNì±­OºÂ‹y:ºxC‘ÄÚªÙèœEŸÍƹ*½Ò¸ç5ƒ-}PFíÅ ù¤ H‚fçKRSŸi±7zX %ö»ï¿ûNVÂw;߶¿{¸S;"]áÁ€_&½Gxó'œÈ 2&Ù÷»$ç;ÿF¯‰]BÛéÄ|5KZ^ë®.÷ã¼:Ø?ƒþ›“ƒîQüàû]ºg¦2K_!ÿ ùS÷YØ ÷e¦7mì(Ç ñÃ'2NOâ†í—ݦ Óî7߶wŸ<®¦Ï‹G6Vá{¤›1 ç^ÓûõóèþÕ L\70ß­ Ì#’$wžÔ‹3.l€çVÞpŽÄ‡´Ób‹g#®y3®µØŸ)d•ËÁ-|¡¨bTúµsí¬í>'LéD¼–xl¦¢e|q {dòâÑ“‡>ìàÇ£ïè<<æYñ胎€ÅjãrøµLÇWJÞÄU"·ßž´ñKûûïí Ò5|¨(ÍS騚*'«Q±jéw£Ô}ÄI^÷ç²îVá 90å2·7W·œÏ>©x~¥…’xË»ª¶Öc#’¨ªE0è°†€:²”üÔ“¤‹E2Ë1ÿOmE[g.qYj!T6êÁ€ÃuêL9Y5ëáuvAgM¸ÞË‹£´ò£×._,ܲ”1-t4"-6E>Ù-¡I¢§ããoÚ¿y²¾Œ&–Ð7»Ÿ<þíWΓ‡¶rzÉb Б_A§u+¨oþáÓ'ª‡UD!0Ô (² tX@Jêt+ ¨ÆU¥'ü%jËŽ¿å£­×pà–=é÷×f~ý8í>ùÆêí ɹób} èâØ.L#ªJ°“Y÷›K¡ÛÕ+µ--ô ^#ÙfÏGKÔ‹ÂWPO1 "õ…;•Fõ.¡ðĦ@ïñ0ÜmúÙÝ–ÅãÉ‚¶)¼ý¸-ª; Ù JHÍB“²¾ÔÞÝÙùbô›G¿}ØÁïþF›a×&y—6åî½ähÔ÷NËòHBY)«že×ðß²›Â±9rÌÑ6IZ û>Y͸ŸUïDéÎåÕ=¬&é‰$*:CÐH%ßy™—.&™º¤);õá ² õN¼/ïÉ&½šÅé«ý§½ƒ¡1&q_#Évu,ù’(+o„]ËÖ‘m 8)˜Õ…”¼ƒ]u7öðGk@¸_¯E=˜ÞÖ@|¾ºwÚnï´ÖL©ê!Î-õ4.-<ìƒÍäø¿£9òY%éΕ YáŠ<Óm±Úbû•‹ÊÖV$‰ßŸrºûQþSž"Ûa±„¥»î³»¤‘G R²?'éØ!÷¹—Û~wz°s >º¶ÉRú°=d§ÛµXbæsý8þBP½e÷K“jŸ(ç|i2ÝõNÆšTƒ·kºÅkÙÛD5fqÐf3ÆÆð}z›ÎhÖ_‘üZÔ,0à=:ólž‚€ûðÇo{Wç¸z—Cís?‡ŠâóMKþ?ßS“Õ<¤fc_ß.¯ ~¿ª´â;~:[ß׸¯ë2n×õ3ÚŽ£‹¿eÀ=Ô+»adS!êœOȧ.©Ã jk5k¼å]Ö¿ÒaÿçŸDÒìÀØâ[w´Ý÷xtݸ-=î2Â)…IÞÝݤç¶ dß`ý!`Ìý|¼‚þ£ÅãÁà¥n’²‡¹Ö­œÿ=›Nõ&Ê_¶ààÎcæJà#ÀߧÑYÞÖû±ôÐð,/µÁó6OgŠA®ò+êûuŽzØq6ù\2QPŶOw¦OŸXP]Ògœc·ÄÌ(ð‰ô*™ƒ±¹rW² 'a]²©b:®}ü÷O÷”ÞénhÐ’”ÍéµpoÓ õžT[>¶XÛz¥ÅC½.:7àh–\Ò|ÀWN¿alÐÿà@î$Å\pÔ}ó>¶‹ïwPà òYL¿†hòE:½ÉóI&9ѣל#ÏDøº²b®»­å²FT—Zêñ|uÕ.ò9ÉÚç‹ÅöuFr=Ù¾˜o¿Ê.§yN£#¿¨‰ÍÚñš§a‰K²qVç,‹ä:¿Zn“kº‘ÿŒÜËJÖaçì€YÑq¥Ö?¿‚.š^ÄâéU:«„ Ê ‡&Kœ'¶àóñUÀ½{»" òᇫét›•JËF±¯ÖcH‡W÷‚\ðYëU»u“ s[Òåè™­~S²%pµüÖæƒFz¦u@2ÑÛß¹–â=\YÑ#?¹Zw;Ù˜vPiü¿E‚Á®î„A"5†?ïkûëÿ½J´^³dÛýB³”~Ô×+=ò­^•j}óÝ1ÀtNý=×ywƒZ¬H©\$ÛËü<ÁËÑ—  ŽX ¸LIúÖÞçì›ÎåÍí„dr;uhÃ7òQ¼Ï6líºæƒ1ŸA· }µà€õØÅôH̺©Ózò~zfh4®:«l5æa¢OVÓä–ìlû5~h§žâÊqCâ*²5+5.S’6tX_¦¨d¸¸5[ôzµP/ùô0~ »5¡Çéþˆ?¿% 9»|Œ6’¾Ýýª˜u Ç% FB(}ÈæO¨ya£:áÏã'wuëz¾$˽S\¨nѵȦ?µ­ù4%㔣KÍÆpfºú,ªZYÛ|‰Ì+E½µXmÿ4@Ü™øè`L¤u¬\ez’W!ߢ¿F·ZB†*†`sRà~9£Ð—÷sÅázqŽ`06ÌÜ'ØL‰æ:³¸?8<„ãéql—ù:è¤zOl„Ut™›M†plxBçøVFÝÆzÝ6b¸X)rÃ(9‡«¶ÌÚ+ ¯%cÙ¼;vX2¤…ÞÐx9àÝýPÐÜÁ÷á%ŒS/ñË¥6Éäð{ƵŽ’«ù¦‡ÞA^è³{®ÚþìUX"“àH7|A…æõY•ëÃä–`󇼼ûýŸ³ý7w˜Œ…ŸL”Í$ÁÅÜ·œUšH§æ˘ž½Ê+õ*"Õ½¨Ÿk>t±"6½V…s"¬?É K·v>{W‡¯£  ÐCK,¿O¼r ©*56X=Z•ûw«”Õç?œO ~ÛuÜÔRˆ¥T·…Sü¹Èõ۶ל,÷èGåø˜…y÷‰”ÏfŠ¯É J'âàcUb$‚¿à2Ã\UëQ¬}6¾‚/øï÷T0+½Ÿå3ÉVÛÖÓ‹F™Û>³2®Ö]m\Ø÷|ø<ŸOw!ÿ˜±Úg?Ïp\²œÃ"Š_ RÝc"ª/Ÿ½Œ'ÇhzÔ¼»?Ÿ §<Ùy¼ûh·ƒß<ÚŠOüS š…y.ñ$°I ¢ 0¾ÒŽÏ ²<´ ËÃö£G߬YÊ¡FFqw>SŸ§4TPÁXß›l›W|ÝVáË–þìåmǾ5ÊuœÒµùß>ó…Ø[WyÊññÉà ÿ]Ýá†Ï~Ž†¶^žª`‘6œK÷d½±cèå;­;%9|Lº°d¦ðx¯å&t 4žÙŒáAï£l@§ôˆ5V$´·ÌŸžOn.Çmká¡u²P*È ±­—Ÿ¾†×¸A¨/ª]b1Aš/™Â1)G5j±6¤¼K=°Y p'Ó›ä’üš©´^;iò)jW¡;Ρðïx¯{½N0ž-æXнê¨z™eYZ«sAŒ,„Áaž£sdzö2Ÿ“}7ç˜Ç9 ‚ÌŠàRFf[&‹–c—ùR³]"“s> ;“Ù=Ì•æY­DÕ½NÈŸ4Ìc÷5 -&Æ;&».[®cbk†dÃIBŸ¿ãÝP^pù|öMæþúGzð9ç8¤µXû¨»èÉ?mtXn¬”âý~]D,cgW^4 ”ˆïý¾•Æ‚6ªï0”ÂqÊçÀïáêr)9NEY®h²Å?R,f륻¹ša,Æ"+íœuK4Ù\ÆFË/Ja 0qG±E^‹&`RÝ4ÕMKÅ÷s=å¸H8p‚IÅ°äë|2 Èf(ê‘`Îéµùçÿ2,zùåáOf©Çì`^V”f¤àzey ˜¸ÂÐþ/ÕAHD…ò9ïSð/ÇQéP’á„àháø]¶•Ni£ÿËüŸš„|n'¹YJLˆ”qáqÐ-Š E¼†2 Q@QfE'=7»•$çª:F8”H®%ï{’«éÇt¼â@añß’¹nÿ_Íÿå÷Üÿ»ßì>Yßÿÿäÿþ]þY" ðBœ,¯5n´ ¼‘ÿùUÌ\e´à5§;nO'Ó‰(:‰§Ì‹ÅBð%r Íç2FxäþÏGÝÃþÞè฻ß?zÿé é\±üII%_¸QÈG­Z\>X³J‘M$‹™T•çY"¿åÝu‡Pœ¶Tc5£z> ~É`(I"£ÈãñeÑ»0@öðK1•‹!.ãÞžœý4ŸîõÔfY¾°´Ëh­dÞºzÔ¯ 5ël*QsŒ®UÕëç‰Xw¨õ›X@ÔR\ÌÁÓjHÎ0§7 w^.P¥ Žg­¥}y¹7{òzVÄÊPŽ¼.:ñ¦j{¾’WÏfÊ!ñJžg³€B2[ê¬HéRT ˆÖ$µl7ŒŸ_"÷köAËÐ);¬ÑrýtL˜VwÔYÌõ[¥â}Pe>ló"ï}üÕú{Ö"a_æßýæñ?åÿïò/Úƒæµñ/Š„ ›ŒK&6ÎÁ ðè¡DH©¨f¹š“ 5÷Pò[?…:‚ÉÜVøÓ2Ï¥,°êÒ/m$á[›Â•žœU#5Eµé°Ý,\é¦I.(Å^£ê°r’å&}%£GÜ3Ë«´T^K@ºŠôQ$½¾ «ê<"ðG,¦âÔ¾Ñg‡ƒŸå²Ù›w¥OŽ¸¹ð“³Yö±ôAǪE –«I–—h©ð}\ùþIÍgßÖ}&@3.k·þíwRakÓàªyò¸æëïñõw¿p÷½K–4ªñ;¼iE¯Îúûà$Üë ²ÂìnGê&ј³¸‰üÆt_¢Ðä¤.)—¡Œ-?žt‡oÿˆë¹†7¤i²ìwYäùÒ7Ó™VXñ¦%ÀÍZŽ¬ýæ)^/í\vZüžqüR›k¿‰·êFk ×¹X÷¸SLgBûX*Ì$m8MèrŒ¾‚„›HjS—;žè•þÝÝͤÄp Äü^:Ö˜CÎñŸÀŸÌµˆ/n5I‡ÞLß‚+kÞôú==Nžâß~Rý€;ÙéÜ1"¤@œ Mš ¹¤T†ÝùŠC²ÒF¢Ú ï»qí|\zž”Y÷@bå5Ï(ñÖŠ/sk+埅f~Ûóß9~Oûï!ÙßTÏÿÇ;ÿ¬ÿø;×Á¼Ç'g¯ú{ñV{{ûÝ£½ííýá>†‰wvv%FÉk¶·{G[q»yľÙá);3oOó¼H;“ådKËÊ0RìÅ©«Ÿ½%u“~\§Ë$F;mØœ^l!$G6A{x;O·XöÓ_J¡…vž7¤H—/Îíî`¯ßߊ©™axÐ{yæäûz*5)@í;.v©[¹Â5¯Ž÷FÇv?³D ‡÷`ˆ_Ã?Áâ’„N}’\f¡{·"ŽëÞy±­Åy™Õ«% i`Ñ6I¦M Ÿ–¹1‹‘½3YÕ¾\ LRá(„—¼mth5.êxO°†U®97ZºhÊë‡Æ6—Ï« þWžÜö~yziZ›z¡Ueµ°n>W®{nyy—SYf6_{–½çKð€-ç:9 -v’ÖNžÑE’Ì¥ðI¡Q]Ηz¬æd)d¸tl:¢R–ã«tüž yö;QsZ¬,el„ˆÔÐÆ™…§ÊfÏ“{…XöŒñ}Rh¤áð£KÏ9õ"‹ÇÓ7kTxã[æÐÂZúüpÌo_‹ š¾á2çÖ¸DÏÐio¿ÚÛê™ý¢Â‚ŸÏ½|_ÓØA#µGn½·íM´øƒqð?¹D˜ÏiPô!ònEØŒÈ3C”]MF¬n9šW«¥S²%Iè‹–wußfét" "wx}3Gr9(iÌ%L·è9ìð@š/2[Æï±»Jðb@å#¤˜¤)kJÑ\,ò…CpÇ4ý3bvPSB&CƆ=ûÚXhíè-5à µÊhº]PE¹Ê#•{¶õ1´tf¤ †¤jnª;ô‰Ò–ëŽJ³Kkd¿÷êìί ò*v•ã×õ:hb­Q%Óû:“T•G(O|ýqá/ Œ]ì  kµ)ÕÄAÀ{•+wÓþH>¬Õ¨Ññ¦ÉáC°4/üFì@±Rjæ€Y“sÈä›~1ê 7ž÷_¦渡M¹:?Ï3Ïrò,· ·'¸uÌÞM©áCj‡ }'Ï`«hìêR¾Œè‚é­/àHÈ1ç%™ùB¢ÐóürUˆZá–UÝV=OH*ï iÂù8 PSy1æ×RdLˆ0Aå±X)…`íA àü*/fúÞ(Í·,‡ Îqï cÉ63¶VHŽÏ´öƒsÛÆ b×â Ûƒ“îéž”‹àaU>íöþ ûco´G«t´÷¶Û?jE̽½ýÓwOš­šEñ’Q® Þ¹k²‚ o±ˆ“Ð’è ¼H#eÉs‹sP¡´Æ‚49Ø·^ÎB!²¢YÐA¿,n¯Ïs:_¸\¢#ÐV¯ÒõåΆ$›d]Ra8ÑûíCÚ]Qãg÷ÊL\Ú†¼A10˜°‘3D¯Üw<ÎÒñhK?Ø‚yäÝ’ºEC lÒf—há¦1‰K­’cù°WBêVü³X’YÀ€O“k[jÁa}zjv>~·ódrq±7x}`euÆO¿£³ëï/»Õ8ž¹2Q˜†ÃªZ¾Aœc`å^±G©È®3:$À‘ÑaÒ_±NÂ}i5‹p6l<=‚gÜØ6žæ…gPµrA–K¿¶"½t¬>iÄEžð<­.Ó‹ü:[Ž˜•b¤¹€0dr¸ˆQf>˜â>ý»³óxç"Ý4Þ¶zl…Ì+cO£êÎøâ‹“½/¾x!Íî<þ~wÇ&,‘T:_8©¬òÒìܧ³éÅ“‡»ãïîÑYTùÉfŸêp²¸,žÆãÆÎÇÇM&.|òÍüõhçõþNó®|ÜÝßÛÐÞ.Z»iûá“ï?z²³ûŸô^Ó¿ýýÇŸhöÉc´þÌJW²óò&WJxÑÒ¼ªWQ$¸l`¿(.<V냛})|Ehßàä±ê[Á ÁºD 3E]úbŠ´¢õ aE#4=£_:æŠ)NOV=íÚ”Æ+°zà ÁnT. ‹`&ÒÚC‹I}pQ`Í°v>½ ›ÊÍŠ$eÎHZ=¬“vLÛ3?ƒ…šrêñÆ<[}Ü%1ùîhÞæÊ5åiÿ[¦ÆÎð4r”·<-¥=¤f IÅÕ°QÜb[Éä|˵-ãˆÞ¢ØFá'-:…¨w‘¸¯L·ä „Då_"öÝi?§¤Â¶C V\|‰£ÝV5™$Èî4{¦Ü3z ›+Ë´{?CMàŸä1çÈL«}pq‹¹2ó:¿h϶¹ž)Hˆ(ÊÌ„'õ+®ZÁµi-èÐÌ(½'õÒÛ7®ÜØRBù{l’9ÿmÎeÏÌн<˜¨¤PÕ½äÏ#£µ,¤U5ç[Ù.€vPÃ!6Q\™! çŸÃϬ©ZZ®ñ­Zsß~ݬ)_eçf‡s6í¬öÖšxFÍÃPuÚ¯R´Ãmêå£sÛ±%HÏÔÇm°˜±÷BN‰‚kãƦ #H´F+]º½*Ûç*, o÷蓆Å(EÏ í”`ZïŠ;iè\U“–z>nÒ8•Ì)Éó Þ3~Œ}Ù–åFá6®w†é¼bç6¤Ü Ü%'usæ.©Ä~!ÿËâc ÑëCê87hžò¥J9z®À½¤0ðs¢tZ¤æ¡d±+BHnšæBÒ]ýLÒH¶"-®äÛxÿjmq=B1ŠQPE=M:†éõy²Xfhmv G6e¾tZ¢%ÿ_&"#`c>Š|©j"zGò!Ï46׊·µ`r>OÍ2¦#w±lOIÅšt\\…ÞÞ[ìlíÑÀphI™‰¥ö£zvs´Ñ sÌ¢¥Öe´²€2åÂM"þmVÕµÖŒ½ÿ’½ýßKßû/Á§7Åãï~CÓ'ðßwžì¬á¿¿Ýý'þë÷ø÷fK¼÷n€¯‚tw;q—½áö=™·ú+DçÙrûÉãóLô¾ÂˆÅ&þ1…Nû4>êí…òåñài|öÓ67uú}竸Ÿî>¢Ÿ›:?Ƨ´*ÕºÞ;9{Js%‚ÓÇùœ;qã°2hFÑÃŽ²:“䎤cì 8#)Ò=ôÉàó,«Òæ^ü"f}19ÏÆãjãöxLwó ¹»åõ>Õ5ðä±5ÁßuO׿K¨s:qï൸áE3Äõ_}õU¼—ˆ=.ûí¡@z@je×;¸§ô®®YˆD„˜gÙßVö ,Ê×áhj½5—n4¡AçÅh’Î;cÛY¾IZc†LGüu¼óñÑýkÆ_Æÿ¯ûýëØ.ø’.àϤMýc½D2úžVgÍ9ºœsÛßaÃÕ>DÚø¤ºÍÍé¬Ëë Ï€B5|X=æ´“ótyƒó¼<¡r?ÏÚX»è¡^5#%§šÙŒ;d\nñ‹¸´PØ\ö×ðú+¯¤–þ_:Æ'FÔ³4£¤ªãñ §|^Èì•:•a*¢Œ7¿ð•ÖâËdnŠÜ¾©ô©Ã ïršŸ'Su´Ðvv™•ý£úGo¬”f¤aŽß™g¢S’|eYb<‹%QR•£ /î£@xŒ.ø]^üz)2 ¤Èèâ¼(>_€ŒèM´ ½£ýˆÁè-”jT(tè£(z?ëÊÁ‚žÚr¶ê3ÎFÚÒL '™KÄ9άu{ß[ÅUÂIêsM=Üâ"Þ[>*.2X¤…‰eîº U©ÿ¦`3£K1Ħ¨ÈÑJj å9Œ€ÆÛW-®å2¿"-ov 7¥梬Íõ?3&þ?œÿaùŸùbRü~ùŸ¡ìWôÿ'¤AÿSÿÿþí¹Bq“ëÕµé?Гòæ|:Ù¾|9 . ‘„5 ßöñawØ;íwbúýäôøÇþ~o?îèÏVü®?|w_ ŽΆ½ƒŸã£ãø]÷ô´{4ü9îýtrÚ zûÑñiÜ?<9è÷öñ¤£Ÿã³A­u‡ñÏÇg§ññ»£ø´?øžx’.®3!/‚€ÎKêð%Wÿ™ -3±Ío],›ãDB†¼mz-„x\ézñX0CàLËù \âEàPd>g6€ åK»6•wÃy™S¹"ãhèDPWÒÛVtÏ‹|zÁ¨½Ò]ÝB;l¤a_—UšÁP áX‘VH‘¨û¨ÞÑþ“¨ãT{+ø¢Eæµ>½bžT•p’¡Ö¢pµãÕ0„Þ Åî…‹®„¨V?³7º™Ae¾1ÝbÕt‹h‹4ˆt&–V[æ™ç슢piÌÌ‚a³I9O#†©sgøÜ,šxÃKš¬íöTzšqJD’®€‘(fY;$ýÂÊh-°E8Ï ºêEnà°>/V!©»|Ÿ¡€,€“iÍbë4Ÿ§ÅÓ¸;£=éi7è¥<5(ˆ¶^î øb§ñÃoZñ.é³\ÎH«iáÛÝG»ß´w=Ú¡¾w1'“DxbT#fk‘#A«òXp9sð¦ÿ€Õ\jb1‰@Ï‹«ãP!O•—ú³MkÈW›\ƒ–rx0bj3<‰¶VÃÚ'ípvæ*±*¹ìU\_…ÔPå­ÈLRÝŠËÌ‘ƒnËé6F/ÂÙ“1Æl:õx]12ÝëØJçñ+¶`ᩬ%evA7cÍlÃyYlOÒÎXºÊÁ‡Éêú\tje_²ñŸk%å*y­v¢þ’#Ôâ©M3«÷ñcY·ôSNí„{ãw²é¿|»ææìÑž¥ôù”õ^7Ûè%»QçVZv¨í¯§BaCy$»i• Ñ§¡z$®í #ð–í”ü\E3Ðä³ù{v—,Ýît8‚’Ãýÿ9ýŽx‘Ñ/'$–5Ú»¡òQ2å8!Íþ˜$ÙLß.À¹rE:ãerî–&»Úi5ÝD«9¼þ¨Ó=… ¥îmõ·Ð…3EwŸõŠI‚Í©-g 2ƒìaÈš#“LáíÐ ™wêzàË‚¥ E%)2ÁÉq¤½¥Gw’1a.këuíqÝÇ €(ÀASËXV°2J;¨UP;·¬[°7Sí\U÷]æ¹è!X/rœÔ5œ0Î Ký7ƒÞ›PObÄÔc]ý§u2Fcg3äqA9¦á•:Wtß”3o,K¸nY©Fî± Kf¤G ™óQA3>\-Xéz³GO’J+¬"¹£:Ñl“Á!ƒ£^÷ßØây3Q'Z¹ÒT/;#óKKäÄT<к«íW^cÃÓŽ~æGÝS©ïP¡¹°k>ª¶¿¨s‚p%“ÛIµM]Û°]xòý&§/‰Ì'Æ@c…4[Í ành*ŒQ÷U™ž{§¯Ž½µib™•îœ­Íaýûg‡'£ÓÞ›³ƒîéÁÏô¬7.í éYs¼~6š¬` r¶öiœ*'\¬(…•–9ýÎA  ñÅjZÛŽ¢b˜s?a·„c¼à†Ò¤›Eh@ÝÚƦÌd¨|_üB2{ÇÈ­íºôÚç3ßcêâÂ`¾º~ [Z(wÉߺÖ%úøyKJsé¼²~j[·ä|~µWݽ†§Ý½Þ@ßÉMï,^Ð$å×\‰§lYdCBÊò Cbô‚™«›šZZ×!&hzUÚ“¢\ƒ~Šç«’ UÛÂ½Þ wrt2<˜RÒ܆Œ¤.œ;ÆI¾šÙ«v¿M…Å’Îyuׯ_¹¥“<Ì(í™"¶Ïu­%¸+8vWÛTÁù!Ïì4É>dåu¸•!ÃYš¯ Z“lÔ5Cö•¬åW’Âs¦J‰ÜèîïÃ…J+ᄦZ®è%½Ã>¶/*Ž·‘º}ÌéÄb(æ‹…¤ŒË:Ð6›_ Y+#¨74æð¨Œ#pÍÙ‚—Q¸ÙV€¥GÏ!`!ŸEéñ*®¯œµö@çoÅ1#Ö£•Ã`wsÉÇ`–´»Ögm¨~–Ïe÷ˆ¯Ïn…¹ºÚ£õµÁ¹·3žHE,¬)¢,-ÙYwE×°}TjEë „%O­4RÄò5·´¨QIÕ7?Ëú‘ʹ‡4Ë3&Se÷ô‡Þ©MÎ1¶PvQɇ:éž’(ëðÅP"4/Bægí14_({ÝRŠý–u€K%$)Ms´ÁR]ß—ô²äB”ÖdòWH6ÿ ˜ahNºÜ6epƒ@1¨ÉxiÎßšqÖU|éK©Ýþæèø´7z³÷'šÌ×Ç4‰ýËY®dŽì¢4G:™'MñLÿ›”&N¸þ«1-Ä`K¯ÜÉâµÓúÖ|/L—`¶‰ENoy­•Ôíw»ù¤B "²b*´¼8¥r!Ï·µ'"ƒšá€]}[BþPª¼WÀ‰ÍUEÕ×aúKúÅ…6ô‰Aßæó÷%絑L,oƵˆÀ«Åʘ€ÙëýxûS] %;‘5³·½þ›·C·U¯“´jg—Kf2‘ŒLS¨V³tÂ$ a¯f*,1lÙ·ðNí+Ë’î3qÁnhG·QKÓC¨5°EG4M‰í-[?’WTlUÞçÙÇp—Ç×rýfKÑ÷u %ÊD´A!qæ¼ÛëRs’w¼y¯ÁÅæ–Q‹CÒÛbAž¥ÕÀÒ ™Ù©oÇXÖ9Ùº w†Ã` SÂ5­‹3g ¸Ë7´Æ½WA¯qÜÃèRŽ-J PV£Õ¸cä«YÛë&D ŽjY”oN»'o7m{c'{Í2‚c­t8¤i¬‘Ô­W˜Œä€Gá X§úÆhþ÷ÂíºÆ‰³Õ/Ü­o£q¯Š‚»VQp·ýð›] 6e/žö†§?$v»ƒV,ºAéCø4é‹4)Zä8l˜¹N›MC®©DJZÅÈÆH¦l517ËÈt©±¸¿6Il3‹/„ÿxðz×Xþ[ìœÉJLã;Àz¡Úćg芺³7|)µ!ê¬/e»VÀµÑúL¹‚ŸH!=Çp±zòØ[Þ¤>0×ÓXO¬b¦³ -©[Nꟺà”ä¤Ö0dæ ¹Ü´ãfœèȸ-…_L“Kqβ …§£}Mó¸i¼1¸m\øg:Ñ{Ãw§ýaï]w¸÷¶¢¢’–;„§áÇýW¼£ß¼{'¿£š/€ººï6ì¡”‡˜kVÌ/¥ªVúL__Þnœb{±Òcü^“Œt>®óŠ×’ 7ÉBR÷^ìÈ™ñ&]¾¤åW€YkxBµqA’–#|ÂýmŠ/0v–q0—©VÙEs‚¤äú™¼K ÷z"œðµ!1ÔRg[³aÅÙ06tššjÁÛmV¥zûƒî«ƒ©r{§½ÃÞÑ4x§ÑÙúb.»BÐ@ºÆ² f™üõý8«QÖ´V‡ÇÖ/Õ½.æ€dTP$† &‹:~Ù=ÀbiØ£ªðZñŽ°Z¥œ1·eš-#«”ó3’=y&–¶´8ˆÇqëâÙÄ´ï§<˜½£š±4÷mV_å$Y:2ÌÀwÐÚ$oçª;å3a–ºÎ¶d b¬@¼A´Á#€‰) 2C•Ör–2çË…w£mÚ²wfE× L¥ÍÈ£„¡­~ ¬ÓAÿ“/9ÒåҔ˾¸ #ÐTÏ“ãK4'W ÿV_žÝy¿Ag§ÝÂ,µbùò KŠŽªÊ]ÈÎaÿþcª²¹,æDw G¬Ðäb½Ó™{]¤ãâ.]‹¹&ô¨ÃD õ+*Û¨ucëL:š}ÜáÊ<ªŸDÐÃgöLiYdq]4Ù\ç©Á†W,W-ª?“˜Rk©Mòƒu’v#ë+ÚªMÔØ·¾ç[Î WÑNÀ†ñZÍPz¤ô5#Î\ªüÒÐYë[²¨gw ô¥RxÃ4lghÓ¨Wž]BpuÆOßNÙ'f•û6Ø(«™PPˆÿÑœ_­MËJÎÖ zòlê Îy¸Á FZ6Ì볃P´ýï³ÞÑÞÏ5»%pÄja>ß Ÿ¸czƒ«Ü]ÌX%Ûk¹*2\¼É¿Ÿèjº_Ìds£ÁIw¯GgéýÁñ©¾øÌHšØÔÁù_ä.i«q"ËtÃÞG;K…³-5íY&©ÙsbÌÁ¯°ºžûäÊÚ°\É ô$µ¢vOX¼=>د™UgÄQ¦.õâCó¦õ1Ù|ý¾ô“Zð3y^׫~KŒ•Á¨Ì@v÷$›ÀÀ .÷ýPýOkQcø››EEEPìl…ûTÝaÁKêtŸÒLËHÞhÎÎù-¾Ü‘½ì®!Q½—Æ~+Z_ 'L#×Àc±yl®Å k&Û»ÜÚž¼f¨×ÚÊÖ…ŽN¸aØh244×r@{ÿ}6k*¦¢nÔ-jnWÖ"|pVæteñÊl=bé׺ÝÊj–#8f_Y5²4æRÇÚ]#èœ%+Ù}U2/Ž ø×À[Œö{ÝŸY:„/4Ѻ¿¼6Y»¨„,7Ÿп¶Õ¶ãµÒ€Oc{™ãË›Z 1ÎÆXÓ¨Ï1AXß:!6(ds0ªHOÎŽ{²Úƒ¾¸N˜á:¬ƒÀXw}0IWôOG'Çüë ²"耱¶˜å‹‘sȹÕa_ÝK×»Àâ’_Î2¯Íí iS—&ë[G•AÑaý{#š´þþiÑ\*?MvÒ4ˆ#ˆ¾E:bZ$YN¤éæ£ß\ ¿N&-ÅmJv³ôˆƒÿ/^…QgJï[ Ž8ÛYfq|Zª÷y·ÖVë¢S ˆŸ¸â‚õc4eQÖèÐ: /ÇÈÆÐíb$lÌ _ÔDC]‘0\ ñïÊŸð@(W¡5#ÌGrÓzk‰[*p¸¸Ú|Ó5l‡…º`'ˆîŠrb‘¬ñ?tÑÆHœ‡(ή½J?&x_3ñ™ïéï‡vø_­ð92Îçñï”ÿ÷pçÛ'ÃúOÿeg÷áãGÿ¬ÿø»üÛþ*Š¿Š×²?/°®…'haщÙãl\|Nß¡×éâ’$û[¦)>£iÚ\ÕZy›Þr·lŸ /b1aªdv»¹1´÷%5RK÷Ïk”'ÿêäFº÷7Ëo,÷ãLq¤Æ~«,Gjê×%:‚ê9`¬6ªÜwµlŠ åGçÔ˜ÒŽbˆ]4”P‰¹AòYÚhjâãût1K§hEC–’ãn¶”¶2áú4;?q+Ð%ºÌàY/Tí™ýÕèƒi| žUŽÁeY—Òrt2<° óì7‹õ$/²öæeŒK!¾Y.¹¸e“€–VÊ@¯„5rš|~^€JÕiYW3¥|¬±Ì«ÌØA9‚å{¬C¬#ÇÍ,Ý{Ä(Q-ÞÚ«ƒ×»qƒÄß$ðÃÕ[[ §R£R. ªÊʬƒIi‘ãW)ò5ðpÎá²·åou I*¤À‘+œž¢¬ÐÜØ:$V6C3¶.žâ¯ã/Ò)‡‰Yçj kMù‚M/å[ãZ7¢C3rÄ̓fÜ]{]õ<¿‚a^è>Õ+¿°PkÌz&ðÙ{?4šñÿq 5hŠŸÐø²¶©V|8èŽú¯GGÇïºýa3~A] Ûˆÿ5nÔtw·tÍÓx§YÓ)th4ìþÐ;Z{c~¼àÉÕÈe3þòËøÁïúGZ\³I÷9Àñób9¡ÍÚ¹z~¨ ¶òi1&»§ò{ÅÊ‘y8Ë+Ÿ­f$^íÞ‹RßN‡½Ãï:]¼-¶¯iSʈ\”zD_×ô€?¾“ø_ÿp×ÊÇãÙrZ½”C¯ø0øtërLv9Y¼VF¿{Jã< ^dMH“¼ºÉf~ùp ÍJößR—øQàk¨[•NÄÿùŸá·0æ_ öëú(ƒs[Œu(ÜsïõØ£Þ0l·òØã“ÞÑ]…Ï÷ºn®ê»S~˜ÊMN&bȳ)%d¢:(“ðE¸þ`ðNèÝ°ÕÔä´®£Þ©ÉìÑ5i$‹KðzJ;XWìè´¦Ÿ,¬ÿo½ÓgÚ[$zní’u:ì Âg¬ 5ô|·>/HÓw|¶f†Ñûž‰¤ÖƒœNÑtáßïé;QZ oÎ~zôÝ“s1¹ÑŒØšÛb4§Šï¸ÂÝ<‹W™TèسM'—¤À6ĸWÅ%|ϳÊ+÷Ëfõlæj¬0å™çú–œw¶¢Ühˆ ÞžœÝÑ;‚ÏxÉÛìb¦sBÃks8è¿9ì~`ÙS¾z}ïCáS×À^÷h¯wPsÿ8åiév½ÛníýÔGúÃð´ÿŠVRM( 4Pþò¯dܯ}ÌÐøJDm¸ p öë ¶Ãa÷èÍAotÔ=ì F|L1=]p¢”®?îÓ¥£¦,‡SR Jiº&´ªKø„0ŽUHŽú?ud­:ØSeÂâÑhm×.Åê¬]&£\è†)þ䤮wç5ìžMtìf*¾×d¯5Í¥@}Ã:ý¾Ù5á‚Y8ؽ;íž„ï¿G¯ÏŽöMjï†l×Ñ_\„— ŽPp tC¾ÄjÛøï˳Ðt/ã¯ZŸÌÃ!Ø£ÿ{ˆ@ †î“årq߶˜m÷«ÆWìrY¡††|Ülé÷Ígw¼–HðvÏÝ7Ér n£«7®“(ШmPeKoZÂÐÈW‘.y(‚ßõIáÂÚ¼^ïz¤¬Òõw¸ÿ’ æ`½y¬U7›)=SÕŸàÉXÏûPüštÂÉ”69›â «ý¢ü]i™ÓJëœÅÖ;cÏ(¢6¯žrÎâWÀ™ ~ÞÄÅU;Aõ%nª¯€{Ô–Ûáº-¤¦¥“\?áœNä•;âjS΢F¹1cèX¤ÆóÉÝBW;wÖ„â¦^÷:ì=È–®(§';~SÉ)Éd1»ü­v~c95ø .KZAŸ+ ~[i`ò€z·IÄJNY×ûÍ"î™­»OoﻆI79Æ©~›ßë(f Ù’;,â‹ÙÚyú&L(\¤ ì­tåp[ts‹/ÆÆù%ú”Y©¯P3*‹q4 XÔúñ€oïsDø;ò©[™ÅÊ{Ø#ùqÜ<¨±\¹Å/â’ÇiýmØ2ßô>ëÁÜúCb‘G–oZÂ5]Ø€nj_äxø„­ê¥ËOÌQ õ7,XÑÕGn^½|y•G‹;í^â^;¸ñ"ìŠìÖENÝüLË]/]¦Ôt{óóœ› —€ö{¡#'ŒXEVáý>ŽAÒßÃwçy8þˆd œPŽã:~¿î è¤ò—ÛÛâ2Ñéq¿¯_òö“éHhž Ë7õ¸Qó”¦Îæ³À 9’L?êýd”Þ®)ê’ûî™?úÖ¯šLóy:klM³ss¬ygg«%÷tÿíg§? cGgˆ#¸6Â’©Ÿl¸Ü,&FóÛã-z¦×ì¹û‰  jlíI6 <)öÚ*Žhg£" òý:»á“Rm2¥ùi¸>µâ­r[Í»æ ïuGŸ^ÄA)M}ÙŠï È@FvU¡Ž[qY³ 2oO/™Ø2ÀÂ0®®=ÕÖš[÷³ÞË&Åfµ½2œÞ¾øÆS¹Ï¤²æ^éƒÚÿ@Жn‚Ú{å©Î8¸Çñ¸ùÉÒÊÖ]¾œ’a°Q‡¯.s3îeßݱԹ­_é§Ù µWúªvÂ?4Žhc}ýÔKòáéYÏʪ™#€ÂuÍGƒŸQ¼û·÷ÓIooX'©[ÜH“$ã/æ¡ÞðíƒõS¢é·q§Ó¹»f¹iº†Ž÷hü™l#2¿ƒ }ÁGF&’æ²àD+Ø/—ã¿2™‘(í8`øS3k˜/¥I Gó¡æ ÑFX­°†6HêÀµ11y IXYj àŠd¤a@W’C Â'¢sÖ‘oŠVù(ÌStí8_:÷t ™±%ËÍ”" “BH°ÞhÙs.w·¢"UìéF‹§©¦T®ãþÜfjÈ(ÙÁ¿UJºóÕsºÚ5Tü9û˳x'þà j2ÆWó¸ý2ž¥—¡ZƒÝþ‡%é“_ƯiGÞöö›¡`ª³i1¢'7¾lÌÛ/—Ó‹¢éô©_\y5B«ÜGe›^W¤Ï¹`Éh©­âU¨ÍxîΈ8 ï †Ç‡£Iªþëþ^3ôû¶Š ÷»hÐoñWïÓÛ’¨ŒtûpJ¨fŽÒV”—lóKòjkóô1ê(ÈôP¬n°Ñ9^XA"Ÿq[ª¦ŒÛe^ðBËJ¹†\SkcâONŸ_BõËèó—Ò?´œ>gIi‡Ë“^³”B¥Y,$÷œ{¬‡ÀêеK‹¯Q©è^³dJ·8[xÌVÍ5¿°EȺïÖål(…KÄUÅ|ØýÉH Âèaðq¼ûÄG&õ œ³OF¨­FÅüÏáåíx÷/4wÿ±óË3{xEæ²tóù]wo€9Tp0@”ƒV ?¾wücïôç¦ú5K`â|ø#[ƒ›:U©NfÑn4;5²;P²Bž(Oo˜ŸkŒ©]Q'¿«[LÅeº æv飯¿ö»«±î岿À:ò)¹9Lu³­ «*Ã+ñÈ¡Ðxÿª"ÏÕWCÀ ›7 ì¿¾•Kf¹ÂüâþkÕÉÙo¦š6¦.}ÆU¼ðf ÜÛ¤Öè]ä÷ö®™÷ê—¼Ÿz2ù«d>¿•91V}NøŒæf½ ­B?1¶>+Y%÷3kÁ3Iâÿ”^ÆØGA:Eæê³K¦r§F ð›Í^ÿ/"<¹äöGú¢Áò£´ãâp›Uî+H‡$¥ùº÷ˆ ÜKÍòlº¸v…= ¾þ1ìD¤«þοVloû5+Ùþ•7¿Á%àG_îsÂJ§*âõ|9½ Y5A¯µDíg$´/…«s,åÜ9Â+iO€–šRBäØÈQXáÆ[Ñ|3TY¤k1‹¿+Ðý šÂ ³úÜc-X.E íÁŽ}YôÔL Œ0¸- ›&†™d®{ztÇÃÛíõ$©ŸËUŠ‚\zA«…ÀO3GXÓ¹w¬S›b9åeÀóp>ÿó?Cñð2üêëøa¨P‡H͹¯ùŒéØYóF®ÓE;ꢣp³+Ú4UÙªp©  ÿšAS%ÙæŸè°fèï÷^½±í9Uaš_jÁŠÆÖÀØÙBÂr¦Ã)’ø[Ó—ÿ8]ýŸÙV}D¡QÂ#6ƒ½TcÖÛ¥Qºýþʼnyï6/KúÒú—gN!y;zÛE*•ðG2$½c~ 59œ/  ðA,ÆÖ>õSpI#:¨újX:S}ÑŽi#ëÏS­yíÀ®D°ðC5f§Æ5ú’Ô‰ŒvŨ—ŸëCf»¦¶ûÏiÀ°oàÿQ†w{×Bƒ÷Ù­•ˆ¯ê²¨?â-ncåÌè”ã¥ÜlÕ¿ÂG03>”½®^’=?"8[_â×f³ê¶uh.£9ë["ó^||¨K›­¸fÜï »{eƒ¡î¡å¶‚ÇW F¤hTcÃkQo7ôÆɯ‘(óþ¹ŠûSPþ‘dî”?ÇηQf—™éŒ½DL ±â*J¸2t>O¦•bþ‡¤Øû+BÄï¾zûêàüþÞ#¿ãÝ^ÖËi|K!ŸÂ+ý÷401¥Q'ÙÍ#ƒëlþ¾´›k¶UÝÄ…MTV=Ò¤ƒ§üRe{s­wEMïª ¬›V×]ü% -R§}s6ìó0C±P'.*F¹ÛJ›‘¡9OçpFÓÂï}2ÊÜÙŠ-<¯š`3pPñ6¶Õs˜€Ç¨s& ½ß·øz‚NN†§ñÖúÈ—ƒŠÝÇ,îKå%á¤ôZUºæҙΜÖýOqùà nÕ“´X.ò[qÎ)·w n‰ã7ÂkúZ{’½œ”Ž{íÞ¯ü8jê—ÐP2õYæÖY¡ÔܧÜÛò) ú4 |>³¦ââñ†²‹T¯ ¯Ù;oTé´ Âò¨ßr$ ö4½Ã¤h¶âš¿V|´îÛ[w•4½ÞµöÈ/ËNšº¥¾áRÚ Õîðç%¥ë§ UÁrð€ëVtŽ7›Í¸Ô,êOòçºîübX^­¹ï"O…ÓX^Õ»î–Wí—ŸôÜÅôh~•²òÂEð VeeÉuán]¥Q¶\”þÒÅV@~ —e þ `S—YaÔ*ÂZ¨Áyª0ÊrçäC™õÓt.×ë`=“¼¦ òˆm4ó`,5VÁÅñØòL H,ÓŸüºwæ½ n#Á¨Ixasv>ã¤÷p ¿ãgé9q¼Î_Vy¯> ©éì°wÚßÓ±õ÷tQüǵU G±|Z Ä…C6âü '¦î¶ŸÖ,¨=>@”Þ‡úÇ9 R;‡²ÉºÓþîmÃëXƒ˜kÝô!̨ºü"þ²¼J *¯xä$ÖYÓ\£v­}Uñe¹>ìu´ KC¥S]$^ŽO麊Îdæ\XÙgfÙoÈW´_ÆpÑÑÂÉ:9èÉ”9‘UszÜßJ¯C÷HZúˆo½Ãؤ±f£ú«!ÊBèêÃ_* Œ?£‹lùÎu÷¼àŸ%ãéèr:£‚»Ê—ù“ÓßѨ³¥uù‹ÔÃðÁ‡æ?ק2qX:‘ñ}3mB{6 ¸TìÚ,@„XÆ„†ÈŒÆÐX ˜rÒêÎÏf^˜Ë‹O§Y'+Dnj% a«â>A8^+÷ºÉƻũ ÒÀo/lœÜ¢W–MÝ¥‹ôƒœ¦Ÿçµá)*ÉœV¾c|h.Ü­þÂ’€ƒÑ«²ÙUvŽâ¹Õ&Vs ¿:„"BM(Îë„124Ò7i¹ 5Yɹ`Ñ!+/2>Ñ‹Ðkâ!Ô^Íÿ¯©(kŸÕÈ»ŽÝš­¯åÜ)“{ôLÃûáÙlÆ Nq-˜e‰I€ÜjPêñ8?J²f§4d&ƒÁX¶t-.È”¡Pàòo{ÊëÖ°l}|×iûeµE‘™ú2ÀØç¦.D9™BÄÕ4ý2Ò5vµñŠ+jtÖ¶ƒè ùCþ>õ¯D[Ù‚ùê=»ÁtÐBjÊsZ6N â>_I±*¸\DBû Ö»DBÏ/l¿Ú¿äÚËV«SÙì6ñ¬ÜŽòEíKrD¸áëÂömŠy/M¼‹3Ž¯’Eü•ƒ<ý¶KÀ=e&F2Ÿ/j×Æ3…”® 0Êõ•ÍPK‰–8‚맺Sìµ@wüƺ6¬™j¥ê \Nº ‹Û,ÛÎÆPú×_—ß¿ n!¡ýyÜØ=‹Ÿ?/WÓafDßJåºûÕ“øËæÍ×(Í{³<Öñ×ñ.O›>îËúYúe é€8CN“z÷m @–!ÁN`¿9„X£Ùq­—eÒ¼˜Œ>Pï ´D{_k¸\eÐö÷„Ï hOe´hj6ª÷\×q|vÞ¨&QÀK_â©ÁƒÈ(Æ’òAÃä¯~¾~±wI»j°]ÈÜ€,,çÔ!Æîǃi'Zi³‡*·Z›ó úç7d4z×ÐÒ]0ƒ÷—P> ®AÚi\ù&Àö8ퟖVÈsЕ۳ÔåýZÁ\ç"y—†&œ/‚`L§ýD›Ð„MDJÐÜ{hÄ‚ý±Ó•ÖËjQ±Z|—R©ùÎg{ˆý qaÞkƒÙn£ëôó']§5´z‹5—¯±¸; šVmÌâꃷfxiì<»Èݪ=®¢Žë­¼õ꯽rüƒ{2ãóÀfÚñàOÛJÆÆ*ŽÍtßrÔ°0H}[Š=íÐcëÀDÙð›,a凜–Š`íBpnuMœ§PÒEßjÞO¿.SùcjºAŸœUÿr³æ1›]ÌñUCüÉÈa ù ”¸( Іƒ*í()…Hµ?·ìÄÅû¶”ÞÒZÊë†CRí¤ÀÙ[>é}ð¤ü^öpÔ.okgP+ãZQ%G:§‰ä2Éf­x}EýƒëIVN³S³(,“7]š¿§GmÅÁ¹¶Ž·pˆ‹rƆζ dŸËâŒ×|o›£º1kӚP ‰Æ›FlSª‚Þ¢¢·~p*7ü²ñ 7{=7zËД þ";¸á¦ôÊEåd S˜qîô˜Ë˜Œú¯N»§ýÞ`ˆ¾H/±s¥M Ì’\0Í[šfp•Ý3j³«-^•’(ê3_*°üJðÜÃ×=ž;ûKüRµiî¸Ò¦ÉÉëÔ÷¿(-OßðÜóêƒ+Ë«Úó»ú±¡'á:û¥â™û$ꠔϰ)YH< ŸÈ=“c]ÎZ"#êD³fC xëÍéñ»Áèìdm3Ë{³çQñÊøt½¤‰¿Ò›†oÃzœ°sû c¯•u=üì¾øì–Åe´ŒQ›GR¿çC©  eÙãÞ{ ^þìÿ¾à¹cCÞõÒµC^º¤8¸×.˶g÷ÙŒÕîFì5Û{3•‰ ìÞ|â©Q‚¶ª µeÎu˜$¬a¾ëÕÙkÁ?ÞùþIå;´¶úIˆÉì_Ä%,,£å+œšiÌÕ­õF ¶7œª))—÷óõ¯Ã×xX¸uØ;ÙšÖßh:£v¶ºùÔ}ú¾bö’²ÆÙ[Žwû?ù¯Œ¡|Éàø€„å`S oŽÎîlaÍP ¿ÀQfôzæå ^wèè »×Ãw>»hŒ{£#ÈøÞ`p|:•}0zßK2ÀÿÕþxïrA&Å~ÓÅæ )î\’ž§û—š1íŸ÷[¿Àmש—gÁ¤S0,«ÓÄbzÜtêÃ\³Zâ¾°Œ%Ý8 P5\fâ–¾äÝ3¹¥lÊr$‰ÑNVÕ…µn¹ž,Ø#TúD|Ð7ô!‡\hMÁÐ_Ä[ãùêùì% §ÆÛxáþ¿³!Hà²ÑùêâÏ%õïºð¿ŠŒlãNsg¾'ZÂÌ䟻ՊG§û4?àÀ ’ÝAD]PíŽs‰Eo‚Áˆ;μҗu¤ .°Ï|)T{-ëÔA꘮‹–{ÕVYë3ÆÓ¼HpF¥³d·„“gWJ!ŠËÄÕúý ebAýÍsÏè(A¶Öd1œ¥·kóDSšM9ãr=ÔЊÔz‡N^»ø Oeíy‘jÇ»;;5énuHžôƒÿ3{€ýæ?þzW¾?ˆJwpÅC¹b^½ó‘|¾zЬp+ÐðIŽ`²Ì³Æ—þ–øëøñ_*èK½ø¥ákÕ ½èk?™ŸÐÖ…QMâÒ§EM‹ëkJš Ç ÖúyÊu,‘t«ùc÷–G,•W×{óUaa†ª¥ FókþÓOú ¿ú=ŒÑ\Êë>Zh4¸H®ÿªéÛñ¸Žý7£ÁÏ:K^Nåçðç“^«úÍÞÙéiïh8ú±w:èò@Ÿü³‚Èg-ŽëìüÏœz²7<½}×zûntD#òKIŒëÒ‘ô3•^Jùš+’4¨Á– ‘eçÍmýA+þr¢Ö/©Z”®=MÆ’g‹fª×¹ì0¨\§¤4WuÉ]Ëþv^âtR&eüCUi`Ý`™>YSµ´K÷ôðÑÃR\u] ]Û¦Ú± :g­o'‹kwDWùœ³|Ö.¦iÊeuy™f³ªùìO…¸;[þ& †…Ûd¿·Eä…Öu-¯éãÕbÌà À¨_€¢]˜\-”¥! #T7Æ溟%¾iõ‘JŸ4•UXÖ+vŸÔ+µeI? Âܶ¼Þ|[Ÿs—ZQÖÚ¢(€i*W:GIP™úœÛ;5— 4ë•>¸&íßy §μN–Oã­Ò` þ·vÚϯ“#œAÙä%>­hsC뙄;Û¢–9Eíüú:i)Ò’±ê™Þ+lBÁ¡“œ7ˆÙ†ÊIÇNã¯+fÚU•[ñf§„•Àx<B¹ÉÛù Ìú;JŸªÆ ß‘JЬòà åkt"ùì÷Â^ ¾#SÙÄ­g½ µàáZ›ªúmÐù|~áIÿÚ›ºwg‡üÙX~c¼ðÎaTq¤Œë¥ÍF›Zï×U˜‡i²ÂÇ2´6¶¤ô™€Ë2¡3Ȭ"/ÜX:AþÔ 93€"±¸Zw@²3)˜;ÑlsJ„Îé ¤QB Åž;%ôä.· ­™ÓÞA¯;è p9¼bìîXL$¢v“dËÎ'ñ‹¸ „S#¦í ;h±J[M‹—KÁ8£±ƒRÅCÄÔ%ä˜R¶÷xÀÀ¨9^ñx‚vM‰ß“Þû×A37aÜ›^ŽGJ^F½mX¸&TáŸF;ËWÊÚ3RŸýF i5^HHuª‹Çxnlô¥ s!œúotük¢Îô?ïSÀ'” ®¤…Ì)öt©¯Ù0K0¸+Š‹3xù«VŪ1º–…•’f;Y Ñ߃$hMñ ŸõþQ]< \±$ƒ!ñc²¾ì!F8z³×¨„¹;£0…K8Ìj ‰Ñ¤›£d$u=éÖYºhìÞ³M\ºÒÔõ^•Q@ŽšõG·m¿êWÕËñÉ›ÑB'Ùfß38¨ $8–€w´Xçe&Å;y•&VT€ [ÌÇ%šaààxúXQ«Ùxš& e­,´©d‰VJžJSíx”ìâÄ Pÿ_s/ zÞJÀ.•PDâ%b=»•€€§-œDmî°«{ µHHù³žíBmêo«ŒNW Öʹ¾’CðnŒ¶Ø9G}®r|Ý¢[œ_ô Ý—rªÀaZõ„/ $¿»¨“2 •”‰ ÂŠß ý˜2pfŒ,¬›ôÁ:ÎAÚ!$C E©g._G”g4 ènÐê¨Ânö© /ð¯%íAìnÊòÕsq¯¼îìEÖ„HÀq#Ý"õ“äZÊ숋mNš­…Ààé4ýr,<½`U]è-yyãÛ¤ì7 e=ÐCÛ¸âêM$\#¡75ÝÊÕâ×ù,zºÎA˜Í˜Íj¶,X`J-z•åjÆq¹Ö‘,¹Dû"ƾSAS7¦—B«”…+ynS0>§²\¥½JSÌn X o:82IŽbh–²vuî鵃s .yÍѹîŽsÛÎî=åcFëÌÖ‡½ÝLç ƒ =äß÷ºs§,+¬zk ¼YË@ô:G:³Gb=VÆĈõx…3ž©èx2šó†(›Q>ä˜ÊT³î¬#µxšd×MÉw”Nð~öuF—¥p¤pMâJoJiÐÖíÊ0и‘r*Ì…FÉ— d´“À×·:7SÞé_Üã}6¾ £’°ñkÞ%¤ž O?¹VüQ]}}‘•·ß,ÑøòZy¶G}%k$M„×ÄkÖ8}l›dK_,ÝRü/«;!¶ŸŒÔÃÞ†i–_TX¾2vxúýH$C¸“ºDÅC!Ò‡DŽCw´3ï¶D¸„+³…‰öë2Ò52¥Ãf›_»pÄo!¥$¥î’Àx:I…u3nÌòv.„hŽ·‡¯EQ½"ȨrËñ^†‡gà#ª¬‘z.MûöðäôxØÛŽ~ÜUY@“l±_Æn’tRIÖTËiGUu9_ ·Þ’W‘g¬òñÁ¯Çæõ*#¿Î«ˆ­æ&0…v-x;Üš=QQ'ÖŠmFLUï}žH´û>Œ7À¯xV VÖ’(îÀ9ööÎö{%·Æh¿7Ø;¥6FnøÅý8Y]_—A¡Ï6 "ÓÜuHºI?&”L&‹ûW"”{¤ëÜ@”_Ñk1Eºâ"*^—5E´.Ðø¦ ì9³ë õÄõúJ›¾{wÙ;:Q’³’ý„°õzÀÚ¹£¬”ï[ߣÆCcIP_Õؾ(8 ø¬c/õO¬™Ï‡!$l²J¦í1Ü{ÎÝdnä׶x*xÑÙ› ß² –˜žË¹PŸäD¦®Z{\ݲUŽð€ñ–!JîÂ/¾ Åúú 4Ò»ñZ.ßÔDX3pD…ÍÒ=/_„…O*q™Êƒì:ã´|€ Ü Žo½S•ò"Á…®þÌÚÙSnÁ¯¾ÿ‹µ|Q0[I—ò~°üøù"£&³© e¤S, WK’þHg„ë œfR®ç•§¡C7vµç•«ƒîW’Òîž™{¯Ú0ÅÜñô!™®ÒàåÜØoØ&á’ô†°ÛQ=‘o]7GTÚå_lÜOwr½û B@ál_sót* H­ëÅ}U}‰51»5pQ‰(¹C 1yE£éÿ¸ú•¥ôÁñ8Œ^ú¸¥iéjæ(”ÔNå­–Ù5Š aŽy­ û‡½ÑÙÑAÿ°?ìí?‹ÂLus­8@‘T ð[q2^ »(ze æÀ“US `ÍtçåIºX†#'N?L4>%y‘:4µ„¢˜Ï=uµµ;÷&sš¸­}?bX¹õξ€ÎÆâHEŠ""7Tø³CV™}ac*àÌGèm\îEÏà_ãZ§v´ÉÙä¡ÞÌæ\¬;¯ê*=–K&l¨éœ–ñ,Š˜g´®âsùk­Ah™V!mùƒP”:àÚ{fO軯ˆ©/TˆÆêÖ)±ößkœÊ‘÷J&ò§øKª‰ÊÞ [庾³BnÀ*‚ Òõ…r7U§÷wv•Õé§WùÜç«ÉeŠ7\âìÒÊ~=ÛPþÂc~iîUOaíÐH²›èmG¯UôŸÿŸ zCŒBÉœõ] U÷•ë‰vÓzâuS«H&‘ø¸àÝeá/_”ôúj½l|éŸÜ ^œ ¡qe”Bœycsµc)SÏÍóð¯ùPï(R垓Ĥ Žƒhš#¼ïS)Å”º=…­—ŽÙ—ãåé—Ë+¦> 3äWb£JDûŽƒ2F_8AÄÔg °¬-+”Æh¼l¢È/YgƒÞ¾E©ñîšaìWñ$à~®|×äæŸýZ¶ŠØR²Wm#MЫ`òB“zSq±r™ãûÓï¸TõfГJ¥P»ÁÉÂ>¾àqg3YœÕÐÒoÄ%ä÷ÒB*Ræo.çÐòF›¸N¡s¿¯¹0î¾o³ã7iÖËå…ÝX;WP¦T Õ-A ç±V ôf¨QÃ&‚8¬”¯›‡Xü >ÓY~Ó¹ƒZf}M¬ÐÖß=GÂùÐ}ÖØ)ÀêJv—H¤M¨xsš6¸÷k'٭˺•´N®æ»Ï"®&@@ÆÚí €9$üŠÕ|ªœš¨¨ -¬CUÆÄMÐ ‰Š@¡ðg³f£ú¥Þ£÷f&ƒzDô* á&_L'ÌC„£vbÃË—èþÓe\YÍO­& Gðû4üjÅëŠ rª.“u°ŽˆäC¤$á,ÒJÆ0ÑØäqR"Ø>½%Ç–z¤.oùç)„B ¼z¡?$c¡#d ™5µö .“ˆò‡â'8g®§ˆ–Ùjš4Ò·jM%³É6;ÙgÙ|5•¢ ÊFT=åe²8O.S3ò¨/Wi2ïTéW]Ìö«0j[7| š–·ó”Véý@_Îù«Ò¢.½8É8UŽ::ǤgÉVÂïÏþ«xíþÁí´ùsp¾‰C·ˆ``2 ñŽ48ù~¬¸Ž9bO«ÙTƒe>Jej§ã¨ Ås“º!Ð=çîDÖúÙÒ‡›ÐÒň’çz5šéÏ]; (ÁÜaJI$ÒPáíñpåáÛî‘cGt3” ©¶DËü囼€ôæ‹ì—FâŽ%ß3)_8~ž/—´OïÛµÊmwõÌ×ÛûSe••”°ËÊ‚Êg„º&ÚšqÃ…ïAÊ«¸êòr1k¬sÿÀT…¾@K @üN Nâe’MYætÖÜX³<Ÿï6jFª’FÅ Yò\×ó]×müß‚ïÚ§ 1IÈzªÐ'X•ŒŒœt9³„Í9>Í­èz ؈ô6Â2/[š‘ZˆˆIi™,›-ˆÍEÀ´‰Í9áix§=óyÅׅꞣꯛNär®KØ;%*úyz‡ì¡ ©Vö+Þq’\ÛÄUpðwBàƒÍÛ_•”ŠÄQ…;IóÉÐâéí çg(Ãê&™ ô‡ZN–éTfÁAÊZ.VŠ³¢ŸÍ|Ò†>ž¦ “ÝY…½| øŽl¦lj OiYTëÁk—ÉÎf}{“Ü~:ŒjN}–ÿ´ÙN‡!¨ÙijO/‰¿J—Ÿ>è×KTºEXmö3`y6¼Dk¢SrÌã·êºü=ÄÍý6úÝ[ òBŸ¿Ê‚|=ĈÂiÍ ®dD¿¢ô!™†¥~‘”òïN}¼0Ëe¬s5®*v£KE4†DAY.irSÈ®R²¯+ÅVáœ4ÈÙ;\ Ž6ÔíX ÃÌÃZØŸ€W¥ŽR­Çe”mluPsÁõ÷x¿^¤)}Õ_˜FÆaó¨Ë“ÿÿØ{÷†6®«_¸ÿFŸbŒ›DÂBÛq܃A¶i0pŽ“¦9zGÒK3ŠF2¦ 糿붯³Gì¤éyâ66H3ûºöÚëú[£¹I¡ åÔ¯€-é` ®Aeåf“4ŸQûàèìTÄ·~L¦,Z<Ì?Æ _—ÄÊ™5ídˆ.&ñt–NáuÔ¢ã /ãwxâ>2—•|cUo˜ö&=ËŒIGÎAÃÍè€RbÑ;Lר.i<ÐEù$$†L\k“ÓmÉ[2ù©Áiq-õ‘ð)‚Ç"ÕP/Á¯¸¨ ŠGîKö¢Q<í3ŒÅÉqG’ÈQœâðûU qÔÂ(ÆÆ Êφå>ıø­ ×Àº$“)Wg—ÆSŸÓÍè’ea“%ðÊq2a,™A*¦ñÑ!ˆÊÔä˜ MY[Úû†–{×’¸FÄõ‘P3H&|îÆn¼y: M,Ÿ8?KN%¸Lƒj‹ùÛÙÜT=œZß»ç3ˆ·ˆ?/Ëò?Ï—f>j ÎÛ•ûêîêÔÑb”~dYÓ>dÇI©›·ÓA5,´Õ7µU6<“÷iMY‡ÅóŠ… nÍyÜ 0SJX¢⨓ãIJEØšâ—26ñ9’mr×Å)$i‰±i惇¡€|IÝoòR ›¯3ÔÊš+(¾%À8˜Üjšº ’8“Trm CBx Œ¾2Ñän #uhÞLÐQã;ÂÖä±`~6P±—‰îhCš1€‘uoj`˜JWFÜž]àÂöº´¨"¢jŠŠÌ]L8Ù[Dt`Ù~[„¹x#Œu€ÛJ0[Öa5•Ph$Àƒ+l"zƒh_ʉ§ŸaJ(ãÌÛA㼇ò¦Ë&·¡§W³,ÞˆË2ù¹’´‡ÐBÝçm¿¨E¤Ã®ªc +Ù¼ö}Þ²ˆÅ©³H‚ˆmnR;n“™øîŒ38žúÖ'ír¸§:–ÝÄE§ˆ5‚ªòŒRÂÊ®á*íÎéÞË@¹ð¥ÑŒ8¹Èš›V¹ü ØcÎæÑí€ìÞ½jfé—›§©•/EXÖ͉_ãí·3+­†¢+a…¤Lì¸ó Ñÿ”²¢â?¦‹zñ½0ˆj-ãÝ€2-™–=¸÷³„ÿØ4=ÜÄâ©Ê¨Î3¨º´æY3¤V&´ßÕ,ÜŽ–•˜]•@9t$* ŒÐ³± ³dŸÇ"×OX÷Ç…€zß¾±Ù(q¼ò±`ÔJ]©º`A;”v]Æ%¿*’ÀNæb&éN $Þµëç“íuµOÅrñ%™¬CH¬j%ëEÏ؇²y‰s}Z=ün”Œ¨Ñ°÷ÌŽ_ðŸwMþÖ“ÁÄÎg0u+F„Ôe3›Ï¹À1h š*ÍøٜÌ•Æ¡ùK¾bXa–ÐÍØUr\Y[ˆvG6 ®™&Â-ÙÔgÙÛ,¿2FS/tÇÊõ†°][OövÇ‚­X2I—ff¹—KÒ½] ?éÆ?wè’„Óâõßþþäð`¸GçàÅ̸ûúˆâé ûëˆÅK‡0õ¬¡ˆQ‰Šc=ÐÔv÷$ò+ΰds“½¢^pŒ]<ÄwÈ#¾é@¢Õ,£ïPE“·+¥ $$£{—J0ôξòÍúhFTª®P*jÒUÅÌ/ š„qÇwìÜŒe}ÐIªIÇ%' #›ò%´hêfºÁM¨°]ö¥‡=k¿Úbžú±Å•ÚëLMÅiø˜gâvH‚Â>CJÂ؉”„ ÁðË\]xâÊf;ïÒpݬ;sydÑkÚ§0ã5”¹™ Æ&©ccAFyHÌ )/aTÓRD6 mRœRü@­Õô„»K•å¬y ¡å„&?@ œ…ZÆ 8Ò<@檈ˆ’GYðÉ¢Kz®p§«K*B:¤¦ä°_#C ¬ä¥·ÉµÅ¾V’Ï„CóÙNôµ7_…!5h¸gÏ–ãà+pq™²Í­C4Wæà%νT­Ú¹\½\=öG¤ÿ^êÍý׸?š™àn…ïrÎ+•Üà¶XÙ¬3hTwÂPkJ•Öµc”%Äe¢©ÍRéÔ"ômW†ßF÷” ¸ ŸÀôõfÓpÞG„*#'^ƤT]'D«iß%¼–¶m9ÑmQ†æì‰R@澉5!j%€{”0i¼°¿#Nà´ë§( !|…\âc¦ÕêJ!¶pni¹b²DŽºã¼ÀÔS¾+îªxÊ£¤p §ÃëRUæ°kÛ‘´e¢ÓLTÉE´´(­hc}Lmiªh®Ø‚¼ß Z!¿³Jˆ?½õ¨EÛ€(Šd?–T±JøßZÇãú©põ§„Ù8ž à†£P™›ÆE2cÅëfôY( $„,+LØ×–XÑ¿­ ¸  %ØQ3è½Úâ;ïê…6Á†ÚåøsEà¥ñY”«G¥‰JßÏêüaƶfZ‡1:ž9Ͻ&ik9~gñ=V?Ñ{ßNXRA‚ñ.: çÙîÞ·UÌð£žÍíU&h…ûù”“síˆÝu‹»ÉÈåóRìÎĹŠ™=9ꪙÓöþÁ)"{¾r‹…‡RhÈSH¶N5ø>žN'Ý Î¿ KÈ‚¥Ò,ÜkI[®ÞæµÖÏ"TVQuÍ’;­°.:™ec„®³©ßÅrU¹)S_Nèš^FuÓ0ñ£Éçï’É9¨¸ÖáT|fa´fQÖ¼|¤Ï@tEéÛÊ>ª‹ƒw¯5Ö®5 èyÞ^æ]õðŒt:9Ÿ!í[Ù¤þš÷‚ !áöÊa^‹<ûŒãa»ÉÖªâÒµ¬¹{ð÷Yd:g€.ˆâ¿MÌ—Wµa€¿³NÊñjFÀ„ëJ]F›Ûs®ùíÊ’$^¨•)¹BiìFïf†ÒW¸v‡ŠõBrƒÄü4ut8Ê¡ïÒ"H^ËPÝT9'6«À2`m$ŽM§lÄú3 ]í¥—ì”=ÑÐ,áËÛ¸á@à1FAÐ!‡ñyF™=TbÛxši˜¤tÂ/VSY™öRÉJ½ ŽÂr&’Ïê-mÐvÖ>ÍRÎh]—¸òžn¬hÆ?GǧÐj0ì„Rí@¹î—i’Y¬áK;ãÆjFZ!#O‘*Èè³Ïô€ëÕ+PŽL^Θç£îyVo4ª—¤Ñp¬Æ‚äÑ>:~Õ~å ›Œ¦& ¼P"I§¥aO:/wi"4ÛA\{´jÈBUì‹pœËc‹tæA–°´lUµ-ePáò¦h´bßò̦Ñ`ròð¿-èª/(9SxØ4ÛQC Ÿö„¦›N<´‡cb e,A+uâ’èEí6Ê%¾-{ õܜȫ?Y%Žügxoå9W«­z¾jÄþË’½êçÆf›Ç&¨hk³É¼M±*|ÏÕjÄkg¸øEmƒzŽð5QUØ»ÕDÅßuò¸n:×æö!#º²†Åš) £(’ 1ñ>Úò<­mZÖŸXžJƒTT·µI|¸Šh.B¤dÚ{ ,æ«õ—Ï¿ÅúÁë6®¶c•²±J¸¸‡èn|Ñzxw8¾ŒŸè;2ìéãGß6V;ÕëÎW[_?h:˜Þ;_-g­ Nèñ_<|\iRCrÓ†&·ý 瘵+«HÛ{­¹¦ƒ´?²­ŸnOÝâ…TaºÄÌuH×iµWªn4õ;?sA7Êï"´Sæ@–äÉt?>8Âø† ;¢Ï ¬¶ó²>rbqH^gÚl £´_3Ò\ÉGaYÐÓ(Ïù×óJºÿ®*ÉÆæL ’¼˜cš^JÙq%§gÈmV[ê„uKBx­}ÅO•lFä**ˆ;B©ñ`À4î×BiUT%"©˜ªm%YAµÎTÈ •È3\¾Ô bä)t,Î)s0>j0 {0ɳ~¢êºâÖЉ2.¡¼L*ÏJ•?Çè˜pÂðD¤ÚÞ«gØí¾8z½×í:@r]ZØÃîÞñ«“ƒÃö©:ïr¤¯aÂZ§ú .k'j¡šÂ{Ic̸¡€ ²GÎk*y/ vãd’情9ˆÔïT0¿Ì Ñ?õX¬óãÕÓÐƱ¯ àf»{ Âwã4c)UW^ô¥$%™˜:‰€ÛãxÒŽvãŒQIývòId–ÜTiH”Œ JÃ7Mq ¹šb>|ÎpÒ™—u¬®¥Ñlš¼ï³fïøîQ6j'¹/z—L®ýæ^’Á:ö±Ôàûq‘¬Æ¥ÚsDà¨*f–a¡èËôâÒæÈS1"f0®!ááØ£èEònŠ*ˆ’ÑÖ@¡4s^V Žz˜Ÿ‰§ï»>xËÕËDÂsxa•î%‚‘Ýþ *(I{ì`Îu1M]çXïå€(Lm¯)†ØþÔ‘®qJÉVW ‘xLEÉa ’÷c/3*2‚ñ¦IŽõ})ü@(/a)S˜µl ÌÅ*쪡©°ÀxBVS wš¢2ÂTWN ò\¢•:(Êf”Cx‚ˆ"…~ì¦S̈ŽKëK]ÚÆÝQ™üùT Ç­¯^£ˆv»/w¿k;‡ž¿$‹Á¼T³®nx}b@fŒ(£}鎦™ÿÌ,ãPû1uÿy2 ¥Å¦}^g_DT™é-yøÄVSf·Äj5Ê]’]Öu°ôש(HêBCÕ©WÛZX;OylÀÜÏ“iÿ’V´³-*Ôä®D¥Àoc˜ßiiÛÏ7;Zjð¿Á"+µ'lÙOk±ËÓbX< Êë¨ýËú‚ÕrêÑ3ºùÄ1„-\ÉeVÔ¨gf ›ÚüÕuÆÚ^ç‡'¥ç{0É·îãÂŽËÏê"pø9qÔ!¹FÃCp½ÖåÉ­4¤2…»õbK7o¹¬ãZ2g8í%+CfHŽøƒ"M«ÕÒRRXF"vjüQç¡/1¼µŸÅEÚ'v¬s€\áD!”QçìÀÖ¥qj3”ˆn`BÞlÒµÈî‡÷wËH³©eÙÄw ‹Ëaú#•U[)Æ–ähT©VÈ°àgfxÊG¯ÌBüzSvþÑ>ÝÀÓ‚Ûe„åcð8Qù(~=Üdk8.Ò*IlT2Œ-R(J‘†P¦1-i…ÃkŽÐ`0ÚÛiFÌÔXšWsOÝÔŽ3FÇŽ®½oüf†@ ôˆåêµß6ßÏáÞxÕXwœ*ÊL4ïìyÇx?öÛ»§6£*³]kðè¼ræá ×À§Ïsí…ˆÒ{÷ìž%øÁR¬àXY¥£ˆ_ä@Ë$Ÿ¸Ž)iÜôÿÁ2ì\òœ ·YRå”ú(ËÊJ—Ë*×q6 EÝñ?î(íå’=+DwÔ&u4g1¬…Ûdà7DÎâ_gŠJl&ë ;ðlÅP–ôQ½lùí(›¦'è óÊ.¤Be†Þ”µX‹æš;“º›aQšsTݧüÛëÆ"W“¯¡WÊ[¥êe•î°”ªŽ{Õñ&|âÓxIŒø¨ôSžõ]s“ýä°Ý>!Smçåñá~´õ d}MÊcZY\bZ&‰ç n¢ÅS Œ™½Â– é×:'Q¯~™‚<¡Ø²7¬çq¡-»›Ó”*f—ÅYNC©ƒüö`TÜ “ËÌ ½UÝTgø õ¨É:+£?í‚Û…—$ÃtÍ3–°ÿ éfÒ Iéÿ:ºôôu¿K±8Öœ¦–È\]è¼E.çm²O$Då]"OGn-Õd3ÁD„0g4-\gºôù4zð¨!…?x4×е/6AäC„eÖ;9“fë‹Q‘ô Ž›[`â~‚õ´,#Dk¡Ç4‚i´¦ïôµl™ã¯2þn tŸÿòûlZ¸•ðnL"Á]ZÌ€ ªåÊ4ó•6\ð-©€.÷_‚æVl—–´êp•Ñ° ÍÒW3+^³g–—ÆBy~ž€ma¸®]y®Ú"Zµ‘±à¢ÂǨØ©hMM0¤j¡Z²b§}FpP6ØÕ†!õŠ–_¿jŸì©°Ûƒ}?±a÷øúhÉ>Ašÿwàc/ù±4ž. ÛYfÈÛU]Ï]ÚÀK7Ú݆ˠ‹rÏ[^íÍ%VÍ<éZ*q,žíut·º¯^Ÿµ¿ï¾Ü¥‰×å… Ã¦Z‚qÔá½Ù…²éŸ^5Ü«…@áX`1ùyt1L{ý­-àc'AKp*$ñã(¿ÊظêãΉŽ)¥Û‰s±(™5± „âoá7¥¥9(ļQ]Lñ²:eTœ² üA5FOG3ïÈA‘‹U•qÒÈD.Ð+3Ëë]Ý”ÆX8==>Ý{Ù†}å±4ÈîÑIÓ@¸³þ« š¦Do}˜¹V+m¾EŽˆžwkGSø¿7áò ÿ«‰ðè­éààé±››mæ³ËõáµèhÔÊ¢è5C[ ÚÂ,ÅSÙí¿³Cd°`æµ\(ÊœoÇc:ŸçÜYŠ£Ô‚—’™¶<:èN·…€áýUC³ jé®?[,ᔲaÅèzÑsûß(èZíý¡„«Å¦˜j"bIDµalxq0sñ¤äÝÅøú/z锣½ØaB‹ Š˜¼G”]¢jX–'ܨÍ'˜²å–fœ$ç ¾f}2Þ»–Šó[Fš(ˆžq†]¨¦H·žpò}­‹–„h¾áqn×$“zûZ‹òÞÏðtaã}ê¦ð‰ Zà½o„$\íùdɳ]öþš«,²CLÏ‹ÑUè8u6±õhŽZÿ̽f´ ¦ìÑâ“·cݾ+Ÿ t+ØÄþ‰/³éBnt,h4ìêi“Óãi ÐÙjå#Ü`ϯQÞ næâUZ’?•ö¶7ÉãA?.œ ^nOõ«!îfß4ô•y7-1û,[—áý—зE3Å™·Ó2Ï°ÍFÝq”GÛ‘>m¿8è`q%Ù¯7í]ty¼~Ö|K# ®¡îÌ©„šm¯ÓÄŠeäŠ)4t¥ÔNƒ-NW!õ˜´YÙ¥Ùd®¤Û­×»Ý«$~ÛíòñÞ¶@°oõ~ùíß,×Ë¿­Ð¢n þùýþ\ô7¾l=j=¸oÒ:óq—ÊŸµú© —üøþ»õå›ö¿ðçË/¾|øð/[>zøàñíÍÙÜz¸õàÁ_¢¿ü7ýáÉlêÿKþ ÝŽñ5{äêýF´õõ×PŠú>™äïá» V*×.&½â“(wÉäÈ7Ác t˜öz/Ó~±J_aÏ“ÉŬÀ`5WÁ؃ øëklåer5Ysã$î#Dû ›ó1º.áµÑ8ή©‰Š¦ñ«³—èÕ.p9¸Î"øùäôø»ƒýö>ÜUðk3zspö¸lçø4ŸÃ€ûcJÊéîÑÙQûû“Ó6ÜûØÒñitðêä𠽓9ú!zÝicƒ»gÑǯO£ã7GÑéAç[ÕóI2¥EA(°YjaFJ?Ph ÷aúlQOrøz„ïªÚ#ãìa¹‰ðå»t ë\ Ž!:ÙÍø1qg " û8MŠ–742çÀº®%Rpp¢ªæ…°P~"ÅJR‚Á#cnbcKƒ8bùÎ@àR“WqMé~—‹à>&;“ÛîkÚà–pBt <ÈÚx’¾‹§‰á‚ŒÙº\s½æ£vã á‹7G8%SÙ¨t§º®ª¾J £ÒŒç›Y 9h]>µ>+®‹ûäÀ‚O•² ¨^YÜv³ÙÈÀU‹¯Vë*à ûy61@½}ck;Ôæå i±‹Q]v«&—ÙkrLB‹´jÄ›®~b~¢õ¸»‚ÿAõ`kµÀx©ñÁ¯v¿ïâªu_(Ù¸óÓvèy ¨«x-î柴ÅþµµCDæ5álL{Àög1Ýùou`—.¥}àFÞÎ&#àXóÑù˜õÝt±OóQÚïæã‚È•j8}^DE|žèòMºXW'KãŠïcH:óŸÑDêf[ÜUùxGƒ> ¬7|Ú' ØBñÁH¾º·ÕL|;Œü¨â¥®îÃ}®NÏ Å`OækÓ›#ßØxÊšEßGéÔ©c¦%3j‰³¦uX>fŽàâtiY4W¹ªð1úQ§ ýjÛŽÛ/‰ïj “.!t5‰ðAMÑUD½ÞÛžô®]¾[Ö€3ðâ(¿¢%¹^W½5£Ô­„ª“dˆhÕœžHÉ»(µ";(Ê!!yªÊV,y•Ñ¤<—\Y—ââ»h!K‹Âfp2Ž•¼}~…(£^“†Ó[¸N…«Ò_ ‚¦uø¯ÁºñYÞƒ_Êþï×K>¹ûìtÉ'AyU©èéÇKº›ö „˜3„Úønÿ™_pô°«‰TʶrÖØ-;Cœ]€O¼ ˆ5ÒtQ>ñö¾¤@i AÉàÃ1b¼þ§ ÈQœ^k ÜòòtÚ/¾“¥ºë,·Ï^»ÁŠÁ5„‡J-øA‰+¬®›jŒ%š¤( To¡dâ ÛV­ߋʘ»[é”>Èú ÆSÇ0'áBEúŸëÖXµs1{¼^é‘nZt¥øõbDhÌGÆ'IŽ²éú1ˆ·äü¡³í€q´’Ö';™b©07Vê‰3Ž…‘õ¢²k8Ãw~{(Vê˜OJ=ÍÇXnS”‚‹«ÍÕzç7(‹Óh­Â,púãÎó-+uÑ`1«,‚'׊+éÜUåŒYü¼ì™²6°¦÷†ãù5–…ÐEßf§úbOi^p Y°/Ë>òhž [×̨‹é‚»§g¤6¢ Å[ H-E90#EI=ë/RU(z«O±ÚQC¨4hÁóÒüßåmg^ÏôØj(=Îbe45Rh¤%çu$¹}Îɼ²¯@FE5¡uIã2qýº¶ ár*àÌmü’²ÛÙs‰À6Q:•òö¤±¡^p%øzŽr!:ŠŠÉð–¶TÌëå‰ÆÏê8i€¥éd'÷‘£ö™] Ìû4T’¤žhúCDÆ:8r%0o¼æ±è^ô…‘Åæ¾S~EIg¾3¾üâ÷{'¯ui©R.M£Kv䨾±¥KŸ1$ªM°)÷Ë”-€©“dŒv‚ljeH£²šm–2J5Àrà"²:z™šHIÌžŸë 6šN’5»‰Qrv!ëŃdŠZxÆ(HŠ¥3–ŠÓ„ðµQœ±Ã¯ªºpK„°vàg£4”×E<¨n›ÍÈj=àh´õWÙB„&Â÷©ÊŪګWˤŠLlé•Ñzq´r®‰&mÛôæ^op/ÈEPúªûæøôÛÝÓã×Gû5U[ v‘©‚^×^²ŽH†”õRžE‹Rÿ‹ ß°z ân\«ð 6k½°¸¨?qu õÄ+R÷|݃QfÇ„W…[è¿H1­ï§ ³ˆÝ.é»ÏÍ*V|#%.òŒ2 : ‰÷ììöDŠý%Àá7TÆã½ßð…áj¨•!þŸå æp}NAÅØ®¹‚–Xq„¡—'Ý“]ç“W¿ú¶¡+ð"z$1¢¤‹²^ÑÏŠK¢‚Ëߌx »„ƒÜVŽIè%Ã4y'âfÊ–yÖ‡(§šcûfd®çu¢db.¡aK¢¨û’û$%K#Xuuš0»¥áJÈ…©Ð_…fdHÐU{¥÷mÛªb³ ™/‡J¸€øŠ–À­öQ«ƒ&%S‘lÕ>æñ€*õ Bul´d™¤ ²Úœ^ä[X¸ä· ·ÁjmâÁê5*¾TðÈ¢¯u¦c½ E™‘¢\ê°‹!q/¨fºÛ©î‰Úr¨;V)ÜJüãp æŽÒÇÅuÖßàÎ7ЂÑrÌYÏflX¡xSGë!¤*“½ »Hùes¥IBO—“<Ã:»6ìÔe/Lq︖šÂ~)”YY0Ë>Gy ¥©GEÞ¶2 ‚ž$îU˜Gyª­P§ßÆñ!ÿ”ë'c-Ó&^Xs…šÀ:ôé[*r›ÝTy—‚*F"§±±"ÓFŽÆyA°bË” ±‹ª©bXœ´g1Ì—ƒ .:'fˆú€,@\q·s’®øž'צ&ªÃÅîøf67É1(­\k¥qlA8¥‚Tbçb¬-;ÛîFdçd÷to‰Êvx'€h‚!L¨Û2ØuÝ;¶I§Tú+ñ¾ITŒ¶ÓDÜï§Ä3@“™ÖâpéRQxÙ¬HL±£«ÄàÐ}Œi™»ç„¯hO"ÑsÐØ:^΋¦(¼ŽÑg‘øÛ(éõ”#O÷$ì"· ZP!”)JÏÙ§Y>Á–öÓI6B;%(µÍ(@g#/ôªBTkŸäš5¡$ªò€±L§¢³EØur‘}—”éøÙgUrù&ëô€÷R™s…ÆÉà4„sê¡fÁG‰€³›ÍšîàbF‘CáÏ¡k^PHhʬ6Ý*놔2È­¦F³>&ìN¯M¥(GÌ·ˆ,Þ¢µ§õù€=äyÁÕ..ã·’þÄ@·,Úã!™›8ÕAœëh0g¼°ÚRŠ/1Ì¥<ŒšòJ_rŽaI¶¢yl™Éblѵ[V3•Õ¥dcø·kBpÆؘëv±ŒO 6R¶QhIæD‚E/~gIËUõM*tK'´ {ÕÚ—º,íËÎjg<ón=ÏJå_ôð×:;Õžè‚ ö!‰³kÆ{Žy>r©~)2‚³I,r¬t‚¬ç9 ùÕI¬`É2ÎÖ±èù{Ó€áò vô 9§…+’!°è ûÞá@Pà"¿BÑ¥ˆÏ’·o2O½c„%Æü¬¶"‰dj$o¬Gñ¬d#¶}r ˜gîšP·tû¢p9#HjcíÁó.~P߈ދå/ð²ñ±PAXÉ¥ºÔQ‡ÙÐUò>Æ0 “ˆÉ,=7• ÀŽäKTº´ðØ1×"š°ñT=«…’탔èÁ ÿ~nùöÏ‘OwIG´â0¤"BæÄ{ZÁfnÅ´±ª³†f°aÞŒ.S]'þ8£•¦K0{Ñ\>å9Q’|D’¼6Ž¨ÕçÖ{èv¤ž5·–ÓeBU³Hú ëFë¥W( GX¶Ó$7«8ÄG,N±¨ù ì$/ ndɼ|÷ØÆ/Ha‰«ó/‚ž³%ðcú,:y\ð_X'T)öÆ}‡k¨–±†îÝSÔe>+í’ê©bûT§*eú¿Þ=ä¤Ñ€`Hââº3Þx*»­"·½’¾êkAù /ÃòmÓB£s‹,X­”5ÞyvÖyå˜ûKuVè`,`c>J n\¡ªÏïxÔÌ·%•òŽßáøì øxé…§TÑ©k³Èßw[2·”vÆñ´Uw+õ*àwåX-ö šš^ý.Öø#=ýº¦è,.Þ¦lD@cBnjMJ‰pÐâ*•f2ÊÕBú/*Ý­JàžÐé ,Ö±vwï¦Ì=̯vurTò–ØìãJ²ƒ¥Ž:§ÎJ4UÙ¯—O§ùhþ`°6âÁÑ‹.KêÏvá*lT–a©ª PÆÿ׸ºÂ¬¡§?7?7* P8E(6ž"+ãKµ2T;A†{¿|ÿ?Áª£(RÉôŽ±&fÝœ÷p„ÑÉÕgܧa7"¼ð±üZŽ §ð‰U•Ú/Ù¬Ó]rÁÛÅ ¢1Ì…6ÉsÌ·'KIÑ}¬d¨å—k•ŠÒ¸ ¥|‹—´úò·X9#«ßˆîE*›ä´Íô¸û®éƒ´‚Ÿ»TUïP<*¾Ã=oÏ]<‘Š£¥¨½D柳ˆ(·¢ùÕÓÑl²˜ç\Œþµˆ!Âß¿j?a¸—:œjbg‡d.9 ;h–õð>oõýÚEÀô')Z­Lˆ¹*si ³iž¶#ŒªlVÓ‹ÎÖÕgËžÞòµìæÈ:Ë7:ÎU„Åwú†½Ñ*E,óõUé<–± a!¾kŸ>;î´»‡Ç/º'§GgÏY¬…øtàTî,X ’j(Ñ.§% Ôê¨ _×®x‚1‡nPОÖ$Áy–a¬ò—¬Y yÞª"^Ÿz%ì 3ÿ<ðä¹0cƜē¤”r"E4ûå@`Ã1ÚÓ jz½ÑrÆàA±XvSÐÃÄL¬ÒÕ]Ö5'ƒN½!Kµ-A*ö7\ÚBçV™ø‡»gÏO_uwöOÐü‚%&µ0} ̳ïvO³|ÄVE”Bë¹…µ¡2Ì$éIð 8i“á1W5ª#ด¨UG4n#Þ,ÜGjšâ0EMøõ7®(ÃoHšã”Í’ñbÕy•Ùfþâ©„%e>øGQýó§]yŒü  (¥ä•Ej2£D ‚­¢q¸eê]G¡4¤Ê;Ñ®d#Í«|OC;ò¿ÌºhÁêzÖ•¸f’ýÔÍ혬  €mG9P­Ò²a`ëJ±&îŒÄ…w·ðR…ÚÿƒjøTâ•ÔvçO}&ß%9Öï[¯J-Vof©Ÿ¹ÞxÏ+räÑà½{!E»¬ýW‹>ea_< žcnßXŠ¢IPÑ `ñ*ý»tëóµ.%*ˉUN­œÙl¬ˆÄ« ÀÛ—_ ”÷ öE+ºØKx\i´±Loæå9Ý« Düem±(º  mDæ7ºâ=Ʋç®7¹¬â‚ôkH5À±s½©CY ™v{ ZŽt“Á‹[f\áî2 %H‘‡r=·fBçtïå“ZEÛQn£òOÐå|="Ónt"A9«ÊƒsOëÆF8=0PœÁ®7±Â+•54)vwO_lzÄ…BD·Œ¬íÚB|í ÊèûÞ¹¸‚.:7—øœ-ºñ$l‰®¡5/‡ui’bx‚ØPovκG»G †#€VÇËk¯|.ªomn‚‰ÕiN²”õ2<Ý=iŸvùzeóõ¡¼¥_v0ü ˜‘%‚› ë+ÆËÈBO¨E%jp2ypS* -6¢­`­ÏEÈ[0Ýbkû6²F°óÕ„ŸÎ* C¢™Y,A¿°³C@Ùî»TRÊxDèàïad’B?ç&?'Ñ‚$š$î_šx+JCm¬`¨lÜÜ——@µ ‘X웊]®ªÁPÂöH’ú 6TÍ£á^ua8‘`#Q`éÝo*<­ñÆ–®×¥è-eЉ, ìñÓyô_ rË ¼¸,^ÍB¶u]Çj©Ê—§)(Iš;:vÂ7ΤÕjÍ1)UÎ0° æØ»ÜV•PÓUµºT1¦{vðª}ډΓCMËO%”:îŽ{Ã{Zæ›÷ç,¢M@ §GEˆSÉQ³lžC{ËàäìÔ]¦µ¥sõ5´ÉÛfì^•# Eî,­G»—ÆÐ0|«lŽ]·4¸ãVk„n¾S»¬­šÏñÒ¶£zŒ+ñ€»\S–ÈhÙ8î©÷Äqd2Y6¼¢&µBßb<ð„L ½6¢DadàhZ¸Œu€‚6 ƒñDŠÂ‰ÌF³79V°Ø7Vу+'Æ)8ˆUA7UÜŸBÂe@é”;Rƒ:v^ÃâÔʶ¸øa8»(¤o±nUøÐœ³yx¯^ºd ô•\dV®ÈíHó@7\Ê%æñÈ& °Î©ü½¤¹ÿJ&%wŸsrè™ÑÌ);êÆœ>Cž Ç ÛÞ=fÙtõï{6 ðáµÀÏ܃ŠÔè¸|™™ê@Áßc3%¦‚û(™•Ê°··"¸ÞG 5v†å:Xî  ­ÀlÔà@-µŒá[„`âׯ΢‡ ìºß¶ÏNàrÔßí’4¼¹iË9ÛÛŽ<‚6QU¬Í*N‚ao áQ8^(àTêتñfË&±)Õ¸ã-]ÃW‹ðyk%žzÃw%â™ÉÕÖ6¡pòŠmЇ†Ð{m?À)|jŒ”1Å6£Ü R!ñBÓƒ£+ÝrAtw5êo|jÚ0ëï n|÷bì,cÉú'Öíô·;8úMO¿+Q®Ùœ{ÖLÃÒ`äiÀ}?cDS¤Õ¿õò½C³þ´XzW£+EÓ©04ÅwÛµä+ÒlözÍ]pŽ"£ô‡¦no›AÞŸ *|QY^‘!4ïô{*ÏN½Ì†w?ÏNðÛ[ÕåvpÀâ؉Ú@DzgQG9„¸CGÍèBXcÐk…ƒ:¨ê­k)(Ð(µ,¸c:P³d'ó¤¯Ú w¢¹ó‚ðä~žÎBÑç I;J"YJê©T‘7Ý`P+à®[IþýW»u» ×v7‡}œ¶_têvÍîR½™Šêòèæ>ôÞ¯yEbÿpÅç­øüK>?ÊßEŸ~šãfôéæZE=ž'ÑÚÎhÍhÑ.pçÆÓ€aׯÉólïøä‡UhƲøu;À#ÐÀ²±Ë­Ž%.ÆÑ_}Õ ¬¹_KÈ!øô!PüoEîɊ䞬HîI‘®öü ý“?ˆ—X:Œ£ùëÖã&nÏx>%ŠÃ„‹ S€]OˆaÝvÅ{C[Ÿe€¡îq‡°…è*`{*hÅuAA——yîc£¬o>|q‚ÍÅ\¢}K•[v‹!»n®ñ¯<¨ŸL1ò…7˜u—ßS"“zÿ¼‹ôÉ`Îü}Ó³™ÿbg¸WÓpÊy.Ø¢:ËFè–oh¬°“³¿¼Q*µë™ØÐΠä$ŒÕ åø†öpæ"è|É{%l ‘i2õEc€˜>¼^IqÞ| ¾±}£å‰P¢ÆUl0R” ¼)elùŒGBÔÍ2œ€JøxÊ)§©@²‚˹6ÕB Ç­-å–/G›¶[yZ>Îy¹¹ý¹±«í, yZË¿«RªÉÞf®£ƒ–rÑ(& ç®` 'ñ9v±³*uÇÏþÑ>=®¯Æ×k·ãè Ù /_ŽaÕÜç _!ù-`K’è#†Ngµ šº˜Å×o¥ªŽfœ"¤¼|YšZÄ!­8¯ÅWÊDà,k/Õo ÕÌüqo=¬{UôÎ{ŸâÃT5ù95ðL`žÙXu D†ûÊI`Q}®Óo²àrÁG@òYCzµƒ°I“ád(׿ŒŒA½bÁ+½YAŒíyÕVÃKeGŒš ­êmQÉZšÜ3êPES²à·&H;Ø:«Àïóä ‡ŒLþO hTÈióÍNÈ…ÚW¬<@z¯ö™úÏ‚~…KG¤åïÝIÙ.SLji‡‡«Χ›êP\Φƒü*«¤ÿÛPjy÷¬…xj| sŸûfÎW¾H»btwœ^—zEóÆÊB Õ[©¢|n·[wKþÄšÜZ ;1‘h+ñý1¾Š²Ä²W†Mý¦@¤qÑ™<ÝÛÍ\™˜]]öeº1±K¥ªê\Z‹ëÏVªuš ñ–+GáÞµƒçgõ»ŽV',ré eXÄbžÙÅ?³µF ­wœ]e]àÿóÂ{?0œ÷w‹ÀõÐ…n»\ü­àŠ¤?JÆÒz‘­ú-Ë^·:ìt¹ ÓåBN]ÞéÊ«„œÖV`‰‹ÇRŠOý3:uµèT&±œzS™‰wS òYó¯äkÔòÖC¾FÆcŒÆw§Âg/¬n¹Aãô kÔÉ­\àÒÂ’—sQ°_è ]íLþýW*|«Ë•#Æ*ÃeÃÞ,O]8ª‹2>8¨KBWzœÃ“âþÔŠqpïwJh¶5;9U þ‚ÖJ8Ha~'­:ö–‚åô?¿m•ñg˜çMuMâ‘e¶’rU{EÜÁŽ–Ar§mFTÀgö+2>tO:/wOÛûæè]v–g›òn·åB8Þ¹þ8Ã) š]]…ßòiq—…¨û{¯ø›÷àfð—à­½?¿ÚOÜ-1Úm»nØ90{ÂÖ—ž õnNí.y¾T¼ËÙ–Ó³ö«Ž®G©÷ûCÄ¿2¿Õ»ƒÐƒjcn+o,¥æLWã N"+%S…¾ËWŠ‰øbË2K~¾@Pö®m´^vIh𯖃XÜQža@;ñí êQ½ÎyG/WuÁ·pÆ ÂL(8ëÇôÉiBТ…R¤W@¨‰ëñÞÞÛ*\×Ú®rã€k{EâªMT•èÿš'üi‡Vʃ*Û®ž˜E ·™œ]¯§ž¦#¼ÐœÐÊaÚ›ÀiiFýi"X·É ÅRLµÚ«º{'¯w¾ÿêq ÿýk?hÔîèšÈÙô*Í>hA¯X”ÙJµ …V¿¯Š=¼K“+¼kÉ ?;?Oßcq)pxßíÝ»÷è‘àk¡!|%‰'î.5`xá C 8Ç`Ñ$EëƒÞ2Æ'æ\ ¹5ë_·j­ÎëçϾowžX?F­¼÷3Œm<†¿jµãgïì°ñ›¾±`§#ú>í_ö†oé—QZð£¸Ù‚~É ý#E|N¦ýr Û×_ðýŸá6à§{CчŔ~9G¬.Øú%K®ºº×Aï¢;rÇçÙð_ú—‘r1õzù$ã®3d¦_¦×ã~ÞýË>·{Ñï X-½§Ÿ“÷ÓIüÏQñ®ß…žñ£Z ¾~"ÒJÞcI÷ÉàŸƒ„~Æ©!ø¥VkQGOjŸüµÞï7"ø›‘~"¡…~zOà‡EFû»‡‡=p|Ú=9¦;ð9Ý1gÝýÃCø¥»‡eÛ{¯OÛxóì·ONÛ{»gíè¯ë­~tÿyÿÒx[2±ÿÄ8€¨¬‘üµŽÔÕ U*þI ˆãReÍÿ‰E-Aý§®oúærdd¾¹èº?O/Â- …º5&Ú´[ï–?åÓ™(7¡)å²Vƒ‘CyɬkŸÀoÑýW»{/ŽÚO0Ö2ºŸÏ¦Oø9ýØ]°îè,êìQ‚*<öðô ç´rfXØ"Å'ÞÊFÜtíî'ØäyŽ2ʺ͌†øƒ]0*Ìsõia>&Ûý(yÒÏÏA;ý„ï`çe\\Ƙä•%Èz9@ ”¶Á äàpk/^¬aÔüPªq®LŽ€òÌ%ÌžR·°Ös¡Š=ó‹ïlvMfŠ³Ê/ÖZÒÅög/?b¬}¥·Ø UV™Ú<Ï«…çÆ RðÃ'mXs{q1KåXlP`Ò“-¾|màv1«“n­4½k ïèE× ³‘Á«ŠeÀG÷¨Õ„}tap­ ž烤¨}Ò7Å\RM:úê‰î¿>{â5PzŸ{àñ˜¥:ŸÐƒÎ9į-âÆ_1Î>*¿èÖ ¤~oO¯NúË·[6!Ö5Q|jmœçþdƒ½àU¼ŸßP!ˆ˜,ùBú°k6a¶j7—1ã_½¢_˜•Ã¿ðb(¯eõêFþ6 ™¬N‹~õˆIѾy~‡±ZDŽ\G]˜OlÞˆŸ¹ÌY? ÿ=Q÷l¿磟¯Í‘y¬VÓ÷(½dΚz™ß-}ÙïÕˆ•Â†_$Y2‰§RžD+zLêGÄ\í¤ù@êsЂ-3@'i?Š'” d¡ù¹ZÀ¾&ÌåZŠ™Ï¦cÈTÚØ–HÔ]Ó#V\­fËOÌŒp_æ.ôÇ (»o·ë2 |dù_ëZìÿå÷Õÿ<Ú|ø…§ÿmÁÇê¿Ç® ¿皃B·¾þê«&þýuô2Ί¿·¢gyr9jF»CPzà×ýNdá¾U‡Kbë믷6à¯Gh•ý>™äï‘ýó‰.k‡6|©pÅ@U™?{yЉ^í¢Ì»{ÁÏ'§Çßì·÷£Ýüڌޜ½ŒvŸuŽ_ŸµˆŽŽ1Ãót÷è쇨ý=ȾN{[:>^´÷±Ç£¢×66¸{ýpüú4:~st¾U=Ÿ`=m®ÏTUFA¡¯”±ˆ2U§GÆ'|=ÂwQ”‹³ëh<ƒiI3Â/ߥaË%ów¨OS’Ç8®<¦jƒ9×ð„VS)so%*¬¡Æ¶mr›¢„Æ릓ÔÌDª¬ASô=²[s“ŠÊ/7 ¥Åówª‚”tyÓë~¨â±½k½¦í¾¦n‰+××î*•fMäôûZÃXÃÀ/lž 1¥Ž'*ç›JtÐ:^d@%T$WJÊ¿!ü¬Dë’Þ|®§aêQ3f1\¸STˆ ø âìΕ֊3kˆñe´Ö^QY HtDeb³hŒ…c£!–ÕFbsE­qLšA‚-õ8èŽ*°L/óÙÅ%ÆÜ ò„ (ì¬aàtkH\îª&}´#äL‘"L+N숟Ôð)Ì9 ºÓ¼K·Oñ*º\œªòkZùè|”OëëB¾I ëÃd ‡8®.Ô.‡p–¹ò!‡êÙD'9Õl!ݦNÖ #–ˆ@Ù4IÆÐYB”Ç» L$Î8'¤w­Ã9&F°DŠ„ãÑ>s;LO*zAÓEÈS^7˜vÄèü动Éü™h‚U]<Ýo˜Î3½‘‹ G•(ö\•S {‰·ÈàÑ\6ØÈ1&~šF´hR4yµ‰TmgÓXcŸ7ÓÒÃÎÓ.бCÊ.š@hy´HÜ»Fé;Ïï›%]о”—°Ë÷•$^&ÕmRÆ:’.BV Z¹±bWŒ?S5̂ɶheŒÔE NÑlZúï´¿´.P.éXÖJÓ&ú–)ñRÿÈoß°ƒG5F ´âÛ‡6LkÛ+² M†åÉVžƒÒ,ÞåÆpR¡ò2¾ÖUIžf|ú9¥+kÍè $¢|Y²0LÊšjû@PÎ(K U#t`å]H#, D©…ëØ:NOüýÅãq‚ï=}=´”Î%Fæ<¿\O1××o—é*𚪉AHÚÎ’¸Àø!¿#CS¢Rš.g ›Î åÕÒÕ†=‹c ")U%*Ø›åÙ,KÑÆghȉ%\©,q“{Á®4Ü©ó³>ŠÒ\ )Œ†É0b@žê¶†;~›4ÛhjHZ™e‹¸é ÌH./Ÿ96£yR”Í¢Üa7£y3 è*þ,ÆÝ01žÑF¤`:Û‡È@ÇKlA«Âœ7áXck)Ó!7±;t-9Ni’åë‘H(eM'AÕF_©à—v­Ê¨ÔòRËyõvt­gK僫¢KËÜÍÏÏA=.~GŸEJ8Ä7[ ¢CM²–`òûÉ˳îËÝÎË:?7¶íh97´Èx‘L»ãËi Ñ]wQ™ìR+ò¢Ï)*ÙX,¤•<<¯ù­Ú½¸Åí‚æ£Fk܆ AYY/n9 eŽÀš}C2 pðr2¯£ŸgóYºõˆefškà%VÌÙE%·q#öl­¿5ŸçÜÈñÜÍØQFiXxÿ²]YñÏ5Óúà³Àž> v3ÎIX‚¢oAφ۹ä<—˜W!åP+Ñ15P¥TÜnÛ†RÐ…tÀq'tmëK4]R7Ì#&™x†“Áß"ò?9yh'¦ ìì$)tÝ@B¤2¬~‚wò%{«ê“&6Þsp£Ë.qú¢¯Ÿ’À@7N:#a£§=žr_¿I,Œ§<^c[ÔMBE‹Ãrj3n"’ÅÞP™x§Û­ì÷e“Æ(WžýLSM{“¼Ÿßšš"r¼0ã¶e)¬Éò ³gNRGÑ9ôøÕ.EOÅ‘ÕóýK»ª|jýœ±¸f—–¯=jV­“úÊ—…#d/8s¯ú×¾~©ñß% J&Ë0Hß‘0û:.T sh;PÅf ?ÂûoŽO÷á}îA†j^å—ðy«x9ؼ›¡P}ÍIú.Þ3¡eS#ц.8 έYÓY•zšÐòÛ4Õ™­‚J¬~U:µa•Ü¢à)‚ɶ–qãÃ4½5‰WF±©åØ`éJ[yB¢@ƒ‹c&#Ð2Bèë‚¢_†l(#ë\Õ}D%ˆfž@ËM"8·!üðⶖðÝb<Í$¤×;„³—7@;/Ã%4ÞRŒG#ñ¸,ìÒb3ÆC!Ò!¼DôÆv$l Tdþ‰:ØŽ.=ø…,®ö!ÄßQ**thFcR”‡lùÔ¹º “ц¢#¼=[Ìæ—µú««­#6ÿæÞ½uµð,Øç…—Ë€î–)`—R‘˜A¸ÓŸZ—HmW4DÛ§v7ºl€Öä¾±5ÔœJÐÈø3eÑ2%vŒ[±l ¸wùóÏÿëtüo1éßÿ Cc¿üò‹ªüO —¥øßG¿øâу¿àÓ[þ}ñgüïï»ÿÅ8ž`ê•dv~Ÿü߇7Xñß°ÿ[¾„ü3þûwøsç“ÎÉîéžäõF[›dSÆx‡Æc †¨L’›!Q•KŠÚOâb¤Á¾ÏgY_Yœ;9Z–à—À®±<É4‰Z§”ÝùDå‘ ‡³1ÝÄYv܉¾h’âÈ¿·ö aµ!H„=Ø|ôå=z0ßd*:P3m CŸLãO6ß?„KûNÔ9ë>?|Ýy‰iÿûÇo:µOFù;ê›À>†µO²|lʼnø͵‚3pð MÁ'šÕ/n„—´vÇxøøÙ4Ë’I=ž\4A¿¥X|¨J$ÂNÂÆHÓœ¿Fš„FXVÁýEÛ^‡7ßC !ÐÏú{˜g…#mPü5V¥ s¢¾þŠ„Ö(’ÐÙ²i¬4ïZèÕ)ŒêcÐ~?øä t!™ar¨¢© ¤¨‡ð-"Uã{½4.6¾’gò­æ=´õõ¤PxìUN\ºa®âkT{>ù;)r‰›žÄcÜ+*$ŸO0ö[ž8à˜ÿ‚+(Q"7‰Þ…ÝÆgÐ÷ ¯a>£uj˜_µjÃ<íÓ÷ѧ›Íaì?á+ëuªû¶ÞXÓ'ýцÿæ¶Uû¤w1kŽ§Ñ§ïû} &h^`x̧Š¶¨D~eéo¼›ÖmìÀ6ÖÉqчù´!ç‡K žóRÁó§r~‹q«™—äøϯ9¢¥-c^ánîT8ùäÓ‹-|üGX’‹­Ÿx èÜÁÍ÷7ìÞ¢½[´sËïŒIï›Þ¶ÒÞ}bïÝ'´eóöìÚ¬O–Ü,Þ¨O–Ú(âŒU¬±tB™32õþXz¬YùòFüä¿4ŽSæß­â7•ÿ6~ù¥'ÿ=zôåŸù¿ËÅ[(iöØ¢{,Úzl>Áë,†%óƒG+ÉUúÕ^>¸Ö¿‘¬dÑ·éÙðä«xÒêc W¾Ç¿UŒ§o[çÉU41_µÐèQ1¨?õÿ²þ—%Ó^10j`ñ1ŽÆœó¿õxË×ÿ=øòñŸçÿ¦þ÷‘T>“}Š„ Þ‡áRæiXìîuwŸµëAFÑPÏE΃XÓŽlÔ¼ÿ¤~ïÉí´ºà°K²…;ªò×OþIo)’®".)Žþaø1ËòâÑïÈÿ³÷ùÿã?å¿?ùÿÇ7ùuÃb aî6s®u+dVç©æàA­°¶ýɯÿP&„ÿ‡ä…8ÙÿmXc5ÿ¼ùÈÁEþ¿ùøÁÃ?ùÿ'þÏãñÊÍ<Æf¾Æf:é0½†s™ö‹UZùzãÁææ£èer5L¦Óà¢ñdÃgŒXb^{qvÝŒ['Bý…"’hîöUÛ?èìî¼Âðaýšƒ?º¦¢­M»ßÀÅ•æ­Ë§V Çu5ºðtÏ1kcu s•_*l:T¡šØYCi6óaò¤=Á9^/nÈà|’$’/ÉyJW Ät0ÉǺ˜±ã±r÷ð°}Ø}µ{úmÃŽiW+r>ìöfépLº}X–©»,Î2¨ŠvýÙDRz“K4›Á¥ˆY4 åY=ŽûÓdh•ÆÜ:LíÎ'V¢f]µ¨½û¢}Úí¼i·O¨œ‘þÜå2à‰Ù.B²À”pðäıÉnV,…†wxpÔvR?xÈ¿på%Uk®ó aí?{Ñ}¹*µ`$DÆ9ÀWº$¸vé¼HÍ€>VrPK³:¬YUN¿«KïH*†»Z¦Fƒ*6«ÖûkGL<ÙCëÙ{÷pùçíš“EÉPîéôs>¬†Ò%7¶dJKÛí¥S5§m“bˆÇ)Ÿ±Ü„ôÑŒR 8ËAŸ¼U‹Q\\šãgÅ3suq¬þÎ,¾ÚcUuÎá`€±EIä˜î‚™¼ÐN«DÅ*Vc-Q°J`ҬMã/L€l3RÛ°mæ”»¿wØÅrB]$sˆŠص¼½!Ù1´¯ì‡mB3A©.…¹$'c,ÍÙСuà-ó+ì2ݱétÛ1ФڌԿú­p÷»qjL/ÙˆY!ûXi\ð®”sŽ”¡!Öz(Èé¬dìLïé\ø‹ç$Ê|:ó.§'TÆSµamsÛ¸©U”ämóc°”J³ ¬ÈZNSÀEL¾Eî§?³æl N—N4US¹ÌàñIÍÍf1•hœ§Ö¨°^Kº=·>˜™“”Ü9”eœøü^$ù4‚WÁÈ>JsÙ€¡)xSrÙ„•FãË“×5äá5_]&„_K²2[ɱñ+§ 8¥­¤e7³<âKÍ0HÃ2É꧑$ £J¦Áƒ“ÔÆ—×¥„°ÈÛr¤ukÓ{]Iýr0‰Ö/áo“ éNøÍÆÓè²'GWp^‘ oRj3òpUΆÕZ~})1ô],+`?Rü«qÿ+!P\´&’‚?N&—hV‹/  dã¤/Àèt€úH‚b÷ÙgíŽ^aTœÌWgJŒZ SÒBîT¦.¬±F[I‰€š³Bg:ÿRéäü5c‘Š88•x=Îk¼âIYç`?݇¡’οX½“š•±£E@%P‘}ÔKô뛑Þ1ŸÁôÚ-JÝ‘;Øt·u:yNÒ`ð {çç ßõ_à¿ñ0ñçv3YYýó®#".‰[—K·Ôåf€y5J5âaùá—Æügð¡Ï¢:‘L÷$XL‰ÛØj4Ô) É[¨Ju芰1C}sªz$º§sF¢ˆF ê„] m0dÌ–âo-wK©’:±’¢Œ²üý†Je+ñŽÓ”`þuÞmÞ™F¨Ú°3EÉc×K6'7P¶·ðÞ¼„'Ì8L’}§ }»!=Š(aVèÛ¦ˆò”•MO†mÔÌFÍ¢K¦:O~ð.F%Bj)ÅX “%_ŒÛÁ$䊡ý2oõî^`‹ŠË±j•µ¥…Vï0±n5¦Ù¡ú¢ÉÈû‘¤èCXp ñF•eü#û@*¿Çí}Põ­O­B¬¿„ÈNýÙ‘à´»üA:ÇjãÏü®o‚‹(®›»wo©¡ó6c¥˜·ÑyŠHŒ•&ŸÛLnz™·œ£.• ¿q~6{¥s¾ÙºÇÏŸwÚÈ÷~æ+³i|Ø9¦ÛvŠž}Ÿ)À‡)â13þÊ 'TLëàOæÝ?³Œô>Îôqn ÛÞ>ÕWɪwƒ¹°þ7Ã[\ ÿ-ŒÝ=K_h¿á9ª0œóýØ:khŒ?G,†G„Mþ¼`´ã“ùû—¾(ˆÄÀËy_ƒÒ¥¤x^A'Ç)†ûùd’c4¬eÀS@Iº]ð|/ÆšcÊ‚ëŸceÑï‚­õÇ:ÍËžjRŒ©$XZùÅ ß:ZÏß—Xš[}TüˆSrP°2hÙhp@\ßg»{ßFëj¡d…Âç(»ñ4kÖP` oËVäûÅŒ¥’­,Ë*pzBk;Ñv±]+1x =¬5—¸JY3´±(ˆY `« ßh¬~æÿ_ÿCâ«’^mÍjîó Øù-ý)Åþá¤Xs„—¸u—¾qõa²Q¿½KW™îöI†„IuýŠ0Ûd¬µ¾.ßm.Ý,qD]ßuE¯Ì¿éxÁÜÊrªíT@À3}-º'V’‘7Úâ©s‰”. ÛȺu£àåaĘgsþö*[U$õ¼}–™å¿¢7X\/í3ãP­ã¶›œâXÁHáÈ^×·¸úM‘«@ÊA [‹nt·CÜDòQÁ?Ù55ú{ǯ<[œ¶Ã–´¡ R݃µù JÙeQÍjÚ¢ÔïV«PÜCÔ”$–jó›¢P¹2ŒsŽ E„ƒm¿jíÖ¬âó£ü]‚ÒÑ”Á©ë´"[M¶s’ARô'ŒÄg mà&þ Ö\:dNc ÷ÊR·¢8ÛìL5á†y¹Û1>êÔ¯ª’ŠyyÿÕy–WUÓ(sptO¡>®ßg`*ØHÁ[ŸãβGãÚzóÞY—í2«­9ŠžTh(¢ö/‹v.•Ê´X¤„ïFC9¯á;ëBnÖM ¨öfys½ñ°04…íô®ñdäð-¼W%[K¾@ûvlC9ÚWÌ̧—Øî!,Ž.¸Ml?Ã&úŒ(hü„\L±^tÁ8Ö~ÿ ¢y¿Ì¨söÓ”o¤•*D(ö2IÆùdÚMÏùêU|Bs-)„L@)`ÂÄ"ïÒªP¾¢ íË#Ñ¿XÇZ?"à×guxU ÷·ãG6æŸw_œî½>lwðÒùI]˜VÃX«k&v,ÌpØ„É”Hî¢Ow´&V5ÜëÉ•œ3PUyFf¸*¼#¤gJü~‰­Ä–›´®–äd{T(<" ñ¼n>¡%Ê œQàÿû¨Å¼ /wQ«ú0 â¼]né÷ßorâ—ôî†O…fª]Ù‹Ò鮌í.1HÖß,%Û ;Î ÏvŠ2R$o¯EÇ«Íß-.•Ï»ŒûXcÊ'Ù/³dfûÜQæTÑ á>&LÙëE¬WÝ ·@¡#;˜ék½ƒ¨$ŠÀ ËSÌo_¸7®¥)½Ìo;ä.Ž­Ri°çÜû¢â‚P‹Õ?Zñ“CîpØëÞ•PU™·FúÞ™Òz4^jæ]ÇñQIƒãgç(`ß4À-P7T¨§­7ãK• Ȉ!#ûœ"¤ÆX2ôR®VYj µ{7`š ¿î0Ûߟ€¼U×fÎ(Œs >Ä‚ZK}=d/%Ëg£Ê(A¥.©žƒf¿OIœL¸x«:&­*Cˆ YÞÛ°¡ƒ’¦Ò¬;+’Ð7µEv‘²_/Š4Â0Ðe·ó¼ža/b¨7¡uSF9(Ð|t'¨‰ÌÅ]4OòÙX ÎÉÄÃmq æ”ÊìðÄתÔ2.֬ʞ@V‹ÖI`³ ÷ë`“ŒZc”}¹²IßÅTÕÄMGz“`f 'cIm³(bì'Ÿ9ÊURÎhŠ‡˜]%%¦h9(…®ü,á{:&$Rþ%ðÇrƒœ0ù±(Fi\ÒÀ‹¹( Á’­OŽY© Ï ½|àêŠWeå5d's«„ïÌEí8ö “attÜÝo?{ýâÅÁÑ‹Á¦s¶åd]ÄŒ çŠâ¼m}/ÍÎs$ }Ù@‡µ©¯:­ &/>y•îŠê®êm‰™²kШ ê©…œÎB½”çç]%Þ{0È;±‘íÚ©+íùb+Ë œ®7zW´ù“k°I¿e/Ói2¢Àu ïdÂùïR.¼|¬P>z ;ýw“|¨q#(åCIÚE9\Ÿ±ýÕgéRÖ!|’ëX¡ñ~kTúñQÆ#•'Ÿíê¸ðºñ©ù¹ôÖ6—ÏàÎÎ{Îøh²:õâ¦VyÝóƒÔÃOŽ-Û)ÀujNÎ'ÎYí"ãHÀº£F$–cŠèORª¡·Dr£p1pS°vý»•_Ð+˜m7ÈŽ&ù90šÁn~·þEuDOŸêŽÊ‚hðGæ+äà*¶-¿¦Œö}«fÂ^2TT EUi º¶€®ŠÎï5Ìû:jÅ‘’+òè=SŽeKù±ÝاܠæFðÖÉ  =n{>¦ræõ*ô[Ê 2­)$@ÙÚ²·pií•ôGõÓœ(ço¾Á$,ëùu³Œ²ÖbÖ–ŸUyþb:ô*»FçSY6ïøi(Èú=œªÕ…ÝÂ~5¦Å¶^:¤¨ŠX—Jï;'ñUw\T[í\›[æÙÞ­++Zûù‘:m¨tjY›c~FéCY¢KÙzçõµú§³'ŸÎšŸÎîì|:kPâ\ɦdÕ„oÐT攂m跥צî¾Ê?ZJÕ0æôÊÃò»¢¿yñ-U`CxñÙNôëæ+µšãÂ*«âìNƒ÷^¢;Š§–À€Ýˆä ¾õå äÖ@Î!BE‘Þ˲-u?¦LЀ^<\¡úæÎx:Aͦ¹µÃ•¸švfY¿ÕxB¤˜J„O3ºË+…´Ô05¹õ–?fsÈö”õw(Š"Ê9V Ôª]QƦ·|Æ활!5~w'út8kòŠÒÏ2Ä^âŠ,÷–5-¦¿§ñŒ ‹Å} ®YG1Kîf’vK{‰7 -cá :Él˜Þ6Ï7Ç[Æ]aoRÙÛæöaEÔf¶ì•ñmlGÙœC,ßóá99;­Ã r²+æ⧉UV_þtýøéà§'ðC°Œ4ì†õJ˜uÖŒÜndª*¼Ó|yãÝ ¶cy¼8”S¼VÔ†©­™Z‰÷ òÙ¾ôØM¶ ù•’&GÉÖô …C,’1åì» ^ôÞ(¦×CÝt“½N(?b¡ÄÜò ŒŽT Aœ] ±µ5:4éxšOÖôÈÙÿ5åÊÌÉì¨!õȆ¤ÅZA‡£¼ieŠºöçŽò'Ê|_¸"ê&]2ð­EEø”ËÈ¿V×»H/˜MvZ÷bÍN$PÃw®)ÔvUÍ5=á<S]šVÛr[Ú-u ´NØÖAŠht$dôN&1Ü(^ì™Z:ŠÒ1J Â94ÏÁ³,n¥yp5®F³©r3=Ìš’EZ%ª.@ÚȦ$sÍÌ¥„ßòÑx6% ÃdÔrp,J6 k?Kvý–ž6Èd€ ¾Á ®» FDxý$ЈçñG.sRÄ™[Æ*ùÌ ”,ù(9æ»ÌR[žMm»äI`3œ’¼‡záW,·b)›|¼òv22áÁL³Y²í•D§%@*DÅ¿¹nÒ¨~gß“CM?«Ÿ¾!Ø;«L†÷¶~òJ´/°Â•ë¥Z ¸çø^Ç—UÈ3n 49v÷ÑL ÷²ÂĸëöU–¹´ð/VæÖ"ÇÊÇáè뛹.¼×hjX¹ U÷ òvÖ4Cþ*% )4(Î"Âs9ÏÉÁØŽþ«»{Ëî Ø/׬Ô[ãü¦n|³¹¼‘=ftŠ(犆¨ üÜy-ä³\ Gk ?NµTép2%Qú'„ج89 ~RÍ>t˜hqÅáélœ8!“­Ù\¦x„ @éîÕBLsÙ5‚’êA¢š(Ȥ×ùŒ¼xpÄßÑýLŠdxÎ_§:4ºµ:mYóUƒÇêæ=ÍÇ]„·ml6Qƒx>Áóy PìÞ˯°šr“çPHœvßfД`£qˆÎ‰ 1’™µ ä޳УˆŽ9á ß×À¸W(1dÜuéy k1uwqáäe‚n½%ˆ™·XØV¼R¸<ÿ²]òª$*-œt®’dl…G!Éà ¦\2^ä ŠÎÁÃCžÁÓ’”„5ø ›±Ã_­àyŒ€Ïê$§‡'JVá‚QÒñ4'ÇR!ª¨;Çäj»/9©X_€W›‘Ò[Êö@qUé1û¨QId«4åkya¨añ¯Ÿl{5HW‹ <Ù-ΞÉåÛrÈ _·bTN& ²­ìù †nÙ^6×·][ÉÝ«¿{BÃ< «Îò Íü9; Á2ñ«8 §£€ òáTFÂ1»''u<Ù}êÕ0¥zC—ECw´ŠË£5µ¿ˆ<ÂQSW– ÃŠ³óœO†G¬ë)O$E„Ø&íVQ}p(VöÂþtÞ|«#‚ü—Œ½„ÃÁá)VíõÜýÖˆÔÊ~Y‰bì¨ “Æ ¶é4 ÃÇæà6ôOM“Z¢çà¸ÑyJÃÇŠc7®ì³2M:¯€ev÷Žž¼¨©|<Äa;ûá¤Í¥ƒ»ÿÂâ<ùө‚ÍOà*ÖrO2×l5ƒê4µâ8´q…­`p¦¿kŸ>;†Ã`Pû¬{vðª]7qT£ÚmUŽELŒ9Åx>ç2iìë5Gî&7ÜÖ6²e†…³Ä9ü´,F3cÁ†ï•Â¥–aYŽ¬­)õë9–ìÁYÇö¹¯Š¾Ï­ª#ø*¹æ²ÜÓÑ’,®ðë¯óbÉwtì8ùª£ gIpÓUò9°Pª-JxÒZ“BÂ* UÈxà¹Y±Õ÷i²ì˜†ÂÆAQ˜]9¤d…K<Ƽ¨#Š–Û´RÞ>1ÿ Ûá{êk>àšA–íåEÒæÚô¸Ÿh§`œZÅùÙÖ{ò ÇѨHúE…ùÑþóªC݃ ýü¹CÓâ)–öt\á-¤Á)nÞ*¼9ÅàǸË$Õ¡­ËÖË®H Ëä—q¡â ˆâDFoj%åóô¯oGåY5¥$|¾³¥7¬GjÒ3F¶{ ºÁ!x©NÒ¾¤‚‰ÂAæIBOœÇÖárJZ>•ßéV'Ìü¡îÙßôz"¶(ñß¡åµ=Áå{I]nôúWÛÜÆþ×Ü*7 »1ƒ÷Ì­Yi™qºi;w,>l"Æóÿjý?‚üÏ.~«Ò_~ñEEý­/>Üäú|ñÅãM¬ÿñèÑŸõ?~—?wïD÷{iv¿¸„ût/ࢻšÄã±€5ÅVÓ´ãá…P(*N*P€FXcë»ÕÞy°¹õpcksãÁW­­‡ÛÑÝèõÙ^zÐU:ö¤Ö>‘ÿ²“ŸO¯ÐºBÈ„—ÝÄšB-xñØT,¸š¤SFæ=ŸÄY³ŸÃõt_Â}ò͘þý_é$oÍ`.S4÷µúñÓ&u†uù¾”‘ãÍFöžBúÞÖ&DPyM .A~„ëa 9k ·Ö€MHÑ4™Œ´ý‰â1å„‚“Yo˜ö£Ã¤Í‚¢ Çø Áûö°|¡jöÛÊJ¥j•? 3T “(ãS hE ¶ïÊ£Á™š ”çõ2'Ú6z…zO|>6¡ŒÆ‚'ǯϨ„‰ªt²­ñÍQ©d«Ê|O°þÇ5¬4ðª}º÷ÞØ}vpxpöÿùÁÙQ»Ó‰žŸF»˜ý"ÄëÃÝÓèäõé ¤ˆ›ñÞŸ³–ç´”Ë1ÓaASþvO"[IœB1?}G•È¨pÊÂ-ÂŤrSRRÁ¬ ÖŒ8GÿHr0¾o.§Óñ“û÷¯®®ZÙ¬•O.î¹âþSÌ. e ã%ïû í—ÊجCotØa,`hÆ‚%ÔˆŠP„ÉÄz9^A1Çð.ürž^̸OÄ4¢\\2ŽÂùÙMs|ªIT–UÐDQ·P(A%ê±Ð$ˆâµÑ}&¢Œ6¼Ðð¥Z¼Z Ëjà7½m$¿ „ÅÀQÒ¿Ì£­§Ÿ=ˆÖÎ&×ÑçÝŒ66Щþ¹ÙcŒqžŒh&køÊ{àVí<­Õí8úëÚž.’V–Lï×€It•´ì·¥ä õ=ôÈÃÕÙÍb]ÚxÖ„ÿþª8‘2b0Û@¬f:Þ6Šü£)Å>à‹þÛø"y²æ4ñÍ_ýaßW}=uŸ<˜r °&Õ:ËIøÛè­ý ,R{>!-€êf-×-6õtá“£G÷K© Ô_l³Cµú«º¨~5××í“.Á•߸¿Ìj~Ðú-¿*Ähnj5dÚ]‘U„üîFGŸqj2BÏ <"žžL=6èÊs;ÿ÷ú×­µè×Yçç,˜Ýÿ?x7ß¿ÞúÀý~ûüÿÃëŒÍçÑçŸÿ.½F[[ñWàpýÖ"-½'X„»ØYû\ЊûŸ£ ëˆÌ̪†B£ûØš>kå™èÃ'{·îŠ¥I‘Wù\X51ÕÝ›îÞT2¶Ôƒ>‡ø\çó2‰3Aßv  šÑP[—¸|î@ÿê.÷üÑñ0ãC~rÛÑa­3\¨V<úÀáá(üÁ1ƒ½ýÊÉæµF>dp< wlŠcÆ6"Kéñz,”SŒY›T8t"´eßçîà§}®ú0\OE]`„ÑZ¤Ýå$yýWöo¹¤qôyëús}k­~׆þ_sÓþöþßéõxÐ û­þoâ}üøQ…ÿ÷ñã­/°ÿ÷Áã‡[›þ²¹ù§ÿ÷÷ø#)šÆ-Û'·ìÖüõ5µï“Iþ˜Œsv$Ð!‚0ĸH&ï$l¹ÔÌ×`-°™—ÉÕ0™N7NAOèj3ÊOEc”éùò ½Ú=kŸìFðóÉéñwûíýh·¿6É5í>ë¾>kþkeÔþþä´Ýé´÷ õ4:xurxÐÞÇ~@<lp÷,úáøõitüæ(:=è|«z>I&ti°c£`¥/\™'ìR´}„T“\¯#YÆ9:óðËwé áf¸7ßQ²#Ü1œ”4IH—¡bH(L@«)ãíÛã˜æâ{–{cÀ) h¬5>B-*Ð÷0.3e¼.9 ¶!Çòß&ºK4'CSºŸÔÒëµO‹Ûîkjà–ZºÄì]åe\OÒwpÞ¿èwÇÕº\Ó™ …âh,¥S¸›Y®°êiSŸp_Ó>ƃ^£>‡Žsv˜'gƒ¸šâµ’`öQRü6„þ“ºÊXFUÆ4CÙOºÈ­IE”`õØj {’/)T>yã ã ß h“Õ€˜çã‚} Ù»t’gˆ[¨(uw2‰¯…}B˜„øpáÎ9=çé‘8Iþ&2‘¯åAÊ^¡°¸|”(zÍ]2*vv왣äh‹Ù#ˆ>ŒÛ›²ôìi‰´Óó°ÍzKÖ4ÒsL`ñ&ÿÞÎëdgX:áÅ'@ Nµ…)œ!91Y¯–ŒI)&•ó0˜Ì™°‡CX¦|B”ÈÓIÜWò™? µðGùT‡ùCGL/<‰µã1æ{IESœ8º¦3O÷<ÆÌÈIr¬u—)E *HèÌ®éqL„šFQ n#¶`–Çß6%Á=Ž6mz2õÒÈeÂ䇲q–óIvGV1{é ' ‡3DtEB€GÔ*½Úý;ð^ òèDÇÏ™£ïï·£—»ßµ_ŸEÏÚí£è¬Ý9C¶~í2ÿ‘Œpô§ PjåìkšddhJgì‘S‡“(i䂾LDu3÷qX°db9w9 8:ûád¿ÛþþìtWàmê^U&ë»F¨~´Zl‹[ØIº ·zO ô;:ö´2Lúþº€•ò¹#Ð!5ÉÛam~A,º4U—”ÊkÍz61·Joî¸é „A •EË Ú>mH(z Z‹œ¦å×µŽÚeÎ* ùDæUzŠ£óœª%AÓŠm Ú"NÂc²Û=IÎΚàCiBply =6„Çѳƒ³W»'\¹» :é¥ÓQ·¿Sô¾/ä¢/u¾wK;HD0t§ñ…A½¶vØÞ}Þ=Û}!¡ 8¼€?m;øÆ„,„>É0’JëÕÑl8MéPœ'?xq„DsmzϤb[¥†j@õM˧T¾ôàe³gDô»j‰†Iv1½lÊIjFËO ŸX5µ¬KßnâºvR dg‰îKÛ«÷&ï ê+?Ðæ<ð—'¶—GYEMëø¼<®Ž#7v‡ÛiõP‹ðP;íÿýº}´×¦Ñ>\b@Ðqíåž-Ì‹P£.৛€²mnkÆpÐb¢×·“æFÑ:߮Ӯ}gìDG¯·—®¤jD峇´©n”eè*|{µ‚(ª2 ¡?ŸPÎIa€‘mTÑ V·X¢nYm©ejïwŽÎ@‡îR¼­ÍÍ@?ð¨Šcq_êDâ`â!‹anÁ—ÅïJh—»ÊJ=Àäü„b¥G žîÌ?$aT5¥êü¥Ôø`³âR§Ù~AíZ°oê9BàŸ•‰¨hVù$&ÌX¤6Û ŠMìR•JN…$hCo­@ÞòíDVVB]ÆUYÈAáßr‚øÆêh2fm…&öU±äI¿ÄÄOKAŸ‹$l6Ü.×'åCÜU¨£g‡ˆ‚KúE½‘sÉ0']£¹ Îp‘”°d )a úuUu5«¡Ô*ÅL ¬+ã<Ðü1ámòÇû{‡]J¨Æ™µ%µ ?¨7 ïÈÝSc~ºcz;‰ÊækYrU‚N†Ïø./É…Â?L³8’~$ $¯Jè1h`€>?ukתÖV?UõÉt[y}d¯£®l,ó†¶^1?ÑY?Gwºí£ïC]—›so ~•µ ôœ½L³7H?ßðr ©= _Ãíן›·Ña³²…mâ¬Êç{¶w|òC=Àq®Íê ÈvÛóçYN~v®Ä2Í«GJ·¾sdnLƒ8Ë%ÆAð5>P )c©.21ª° ÄÀš_!ÒšÖvš˜ŽøF’¸<âžo”þÔÒº4ÕiØíåÞÔú¼ŒéÑ6<«finÃE.Ic˜¼‹¹:}¡A# ÓÕ-ƒvhzø曳4ß"r¶ÿí «âñæÕVEÌ2⼧fÇߺ#€í†Îé>WWºM…H™\&˜c„Ö~eøT‘ÞŨÕÔÐG]²…ýÈ }ÿÁOÛ6~lúT2ÌͶßÆ0¬j¿hº†\çTÞbµ6f‹µÂWˆæJgœ „‹Žø>¥Ïm*(‰3l™ C]Ž±¼h^SKö»Œ¼bé”3|;ÝÃöÑ‹³—¨ýñïl”©ì7¼=ƒ|›#ˆ×ú Ó†’Whù5Ò;–x±öí3è6†0j=@›eXïì8Ä¡Ë’•Èµmžn(Ì~þÇjæW¸œœ‘ü_{(OŸ:GAˆßj—€,KÀp¼^£»îmÒU:®tW~TÇù¡×X‹lðÑx&±½“¡Ýd€ÔJ¶694-ŠqD؈'v‡2½hsšÏ€Â1ñb„w­ô9á æEk>Ýœ«Ü:9P{ǯNÛß äRì.9x‹Le¸ÇÖõS­:E¥Ñ …I†r•DU còlZifÛç.-ó›W›îžó%9 hþEÞ²šLY!)’pñªŠ‰tÐOÜÖ«ªquöJã3-,¹Â£8:î¾j¿’Q,Õ¬º„ü gµºó4ËIcÇ#À÷rm±l;Œ†¸Ù 4±Ž{дȌ½lzM”Ct&NÍi2¸ÊàQ¼~6Qm¤òáv²­y¹åTV9Ñý Ò(>´¥?áÍŽ¢Mý /Ät«$£;ŠŒNN÷BoRŸ¹.j`[ owíZBní²0GÓËÿA3z°¾4ó%`‹›Õn!hxb,ÆR-i†Y×ñ®m‹-2£rNeã—¯ßUÒP¿D3åBÛñMÆ/5BhG®‰Hö;Ø@Ã>Wu.yïwÔåöë¯îÈl?â`ìg7žŠ‹Ίr*ÎV 5¾‘¦ü uêM}©ð£ŽêæöýKµwÞ‰§¨q>ÊOœ/J¥¨+6¶—\¤…Íì”Ëâ,½±·ØÚ@¥d3”ûH‰KúéE;zºb/CVîfèag?5;öß2R +¼•ºäBÔ6zTÍ[6`jyá 8pجI4‰ñ'E®N‘¤ù™OV!NëÕ€¯} zµ¨GþGЮè[O~³™¯¢Å|„IÞ”%™bIü•”J‡>"2[®/=5÷†“Ñàù£ÝÜšZ@“õ²(ZŸóôiÈãLå·w"'5‡o±y%‹òwÉdxÍÉ‚“w1F–UR‚L±Ò6FóyŸj¹£Åê‚"ÌNÈy\LUèŸJR&k¦ûMa úسmTææ;êTǧÒÔdñl‡äHÁÈ‹Ýqžá G*·ƒvlú ŸA§ê«Ôö=Úo??8ÂL mi¶¡¾,©,lW×&˜•ÕP¯¬j¸Úù¡^sȺêåI;ÜBÃ)µ°hûcµý:Ül;üÔþTzÖ 6SŒjuJ0¬š•q‘=ŽßÊ{?« :x+ð\<™÷à Ö¢“êMX¦…ž¢/ÉÔ…öSSé-ªv,Þž${× Ëlú½†±tÀN¹NF²ûáíN½Ì È Äý4˜s:'"ZäTxÉ\AsNˆ‰í‘•Ð…9AøætøÑR£Ä­g=?œßxÓa];É-’¹éNÎ%q éÈ|Ûo×{óè¼.¤Ý@üéäÊÔµ„1dÉÄŒ;@ ¯àoòô\âQ5Þ(æ“\ì2h !KM]ÛŸ¢_•ÝŠ«$·÷ÎØm¸tˆ@·‚&÷X¸$²s°ˆº¤€×Þ]ÖªhDY#ù רüpcáæÆ^¨»Û·Ï’VÙÓªÐÇ฽‡Ëí|8a8s™¿ðô«ÝoÛd·¬WM¥ x~3•á‘…P£!J5‘ãOÂÕ·H+lëh•´ah–͵®€o8ÅÍã>±+ÕôFÙç…»ÀsV„ŒŸ®Òº7ƒã´¾”¯ìJ·”U4zsOúƒñ0žQæUK#tMSü"¨3Ö[ü[å+ûí½ÃÝÓv÷åþiwow梁&0œÏþPÁ6Îüü€ÑC[M33—È*1b3¯g ”PêÐ.Õ». z~ðýë“îÉñÁÑYû´.5Êဪ%ˆT^TÓÿì3ÝÍ7êKkQCqu'¯;/±„ÇYû謣⥑æŠôT¦#·½î¸Iè[K`å[7l˜ÚtT•=+Œ Ÿ„;ÉiD:QØ ÛŽÀ¨SuYÁIöüwÊGwv9CTRß‘8C™#LçE@JLÛÍAƒM¢¦ß¢p"æHŸÔCT χù•çqf˜ÔUÜ—d¤²W‘ŸÏG •/lÝJóv v Ë•ÛDÆÄã>c(ÎßiŸ²¼÷èX¢¤»ÖWjêîãÁˆV¯EÐ €wqY^}Ý5Cd¢¯­vÂo´®v̪û%xÅ7‘SR΀BRšÚGG‘)’[aÄ /³pQú@<¦^¢ÿ\ç#¾,A(|%.!Hžï±Â”7Ø‹Õa*@º¬D1ê'B¸ŸÏ¨LË”Äz$æQ<…ñ´k*Äžš¡ª%8× Šfì9ìMàêhK[­Q£|â{‹lÍj9f¯õÈú˜¼zÛvcZ? ·Z¶’êÓÈz`fÖ{ŽÂÚp;¶í"¥¾+Z--e.)©ó÷¢¹/‰ÁLaœÇ ›žwŸŸžuOÛgõµgñ@'ÉZÅȾ{^%áJùAæº~ü©Eј¯ŠgÓɵÀ*?¤¹±'!fSl®©ØH2¡Ÿ*([Ä(–¢‚¤¹¼‘‡úã¦úiXÒXY`1€p.K:Òº¦¦Ð—ª@Žûi*ͪGÉuHK‹nÄZ^Ì‘²­Å5;­ÁØuBçrÛóÃ2h ËFB ¬Ç =?‡5Ñ/hÇŽ›ëAÅ…¼n_ ‰7ùŸi¨H5ŒÀ¾õ‡þeãH®Á'õÅbÛ©Ê¢ Ur´Ò­îÃ*þÜÂJ“£Z¾Çš¿¡k,mJ€üÀݱRxçX²^é»Õ-´r~‡A#Âö5n6~£Ý _ÿ^b©ýëÂÃ-VÑkn¥ ®åëX¹†4~¾?|s7ï#Þ®7!+ÀïgÎ]øž²PæÞÙÙi÷õÑëN{¿\MZ ±áNF#‘°U¸Sm¶Ÿ[éGhýKš úpo ûh?ªô(U<— Ÿ¤Ý’îâ~`?.ÿÛš~YŠõ¢`UÂÔ÷ x¬bऺ¢ÔOu6ÁÚÖÛ„úcuôJ€& BÿA­’°•8çl60šÅž{¦EBþwˆxÜH¾z™piH†$ã!Æ·‚6ŠJ1ë9ú‹äçÖë4•åÒ;…Í'ˆ©O®[+ë°åÅŸÏø„ÜòR(+‘Ü2G©ò<ý•Ég_ô®s¤‹hÏr,¯iŸ¸Èöe®šeéÔ7%pÙï_fh‰m‘:y?Ž³b~,¼ÛAcõã ý<Œ‹‡dtåóN§ŠxŠRS¤6H6™:+8ÈÉ©Wsšç\ÂÑñ¦TRˆܳãËo…F²Ÿÿš+þêÄuoׂá e½ ¡Û’á¹½ åm!wéY(ÓŠ°äÈ6â-5)Û©œže6 rV¸ ñ¢99pRáöÆK¹í$ñ+,˜$3Iü&'Ÿ;‹dŠ†lŠ¶Êpš:Y“{t÷ÍË鶫ðòàÅK4ðkO€ïØj4ÌMq§ýýI{ïl?Qü ãp úI•¯^rÿI=Ýá¢?wжΟÕq]ì‡tö‡†K9-~c‹pÂÝ%Í´*l¨ºòD°´½““®øS¾ªÙb­­vH–\Å,]ìÐ;¸¾a«¤CÐ2{³NKuͽެdÝŠØ-7&Ÿ»±ñX÷.V £ ÅXò›2z&Aô^ [(ìóÓ'ÅwŽÚËpoË?j¥€2·´µ±üz»låxsz©m‚ã§Ò [ ï Θ,%/Gu²QÊ÷Mîù™K"¼:f^ÕáTei«ñã1yÊ´²±Q*:Ì ’kg;„Pà“¼ðkh7þ8Ý züÂQÿ%&ï047ÛˆÆS€1ÁÁ–7óÞ–‡Ô ìDè­”!ÝŽ¦æÂÏÈø:–X–u÷‚¢`gfÉÝ«´¾aïve8½OÝolnÌǶ·ôœñØѳ†sÂg†=TÃ}¸JuÔ;8a ¾¨{ hbÿÙ‹îÞñá!\n°8²4øœYÕá…òÁH€ü8ìY0PUôÜùqxñÓü‘œÊƒëI*B—[vi=×e»KAµP“" ½hµOwÕtäˆõš¥ø˜€ïV:oxfô¹«aÿU,Àº½„ètà\ áä3^L´ Óìm=÷«¢Ûß”a6ñFF´¾.‘ñiBUr·ÅEcŽŽaÚVýýh·ÅJ>´…Œã)8æÓŸÕî n4q‡ã÷|2 Ðf5ººì .‘7ÓUg£×‚þRá‹Ì6mÎ’Ì¥æfSø ¦Ëå:»ùùy‹ÍX ç?Â0"‡cDÿYF÷àø¤þ'Ãø1Œ%vd»XWüçþÛŸ/…d·B>"[Ñï«=ãE ÙtÏ<(¦$³ƒç¹=sbæp5Óˆ•]TJà‹'Ó‚7,ÆJ‡Ïì7£Ïœ©ÁïVn±rïêqÙ4I.$΃{r±Øy©VäA•Œš­ãLì±5üÆÊ …p¬ïDÙ¶ÿá=m ªˆÀ¾WqyT(áÕ9asF°t7KÜ[KßHNhëWŠ5‘¼‹o¤’ôÊ•t[q4´¸ ÖuÙ †Æ¥}O¬8ÅÕ"dîCJE +l‡ÍÉö¾¼Ë‡ v“jä–±O·tJ°u/–æ½(xQ–žÛˆê0‡ê¤bŠÚ³p †ãù¹Áú{+¸z¢ò“ÃQ0úñR®o+œè‹—¿l²’„àØ‹î2ée˜´×Åóƒ£ÝÃìžÕ¼{øÁNÌò9¢ ¼àô¸¥Gx‹¥b&I‰ UÊ„lñkÛšGƒ8C¸‹41ÏqJ°O†¿HÁ•d)ˆ,Ó”6ûeÉ$v•4Ѥ×XAÛ<ñÄбl&oxµ±Õ¸…(E\kG6îîãÓ¼MÆFë§êc¢ƆrÞ©{¦ªßÜoÊðËp2˦­€•Ìòã]¥hŒ6™¦éCž9ô‚j#qHu?§U*×Tn*Žú—1Fß.Û´)9‹(XòÇBáøÏÚ{¨úçèئò{×ÿÛÚzüàñãRý¿­/þ¬ÿ÷Ÿ¨ÿ·õõW_5ñﯣ—qVlü½=Ë“ËQ3ÚÆY¿îÃM9)ª«>þ઱™¯±™N OžE/&ñø2í˵²×ˆln~=ÇØŽßåK3:Èúµ? þ¿X`pquÁ»Õ²`¢xŽ7³S·Î}˜®‚'L“Ÿ%ùÔÄ̟ɾIV%D—¬N½¦>Œ`ßäø-ô°ú9 (°gÓâöˆVE"º‹ëëzx,¬üQIT½¿nÏ‚Y1Š„"4bæËÝΡÇEPqÃüB`åÿiÙEÛâhCÄ~؈þOTú´þ„ÿºnþØe–?ƒ¸iŽÕ°‡ð€‡`z·ÆmQœ‡þ®ék5QB.c P»ír’š•cy™IÖ}›\;¦ªÒ+\+ „›mÝlI6uá$JMÀòÃØœ°•Á°+ ÷ù‰–Ó2ÎÙçTþÑ·EzwÒ2Üîpõ÷ ­%–'‚5<*’ _ixÍ oš›jF×@½l†À–6žZí rR¹ÄúµÃÐÖ˜ÅêtªX˜‚’¢7÷Ð$¥§lo4M{0fw3_ÇrcåP#EQV2-Žø,Óƒªsè «úw˜ü¿UP&öC%Ûv“ªºI'øáÆ}$à'›ˆém±·Ãã£ÝÓöó0º³îQ»½O+óG2tF"]c_ܺ Ó!mxL"ÑÅéV òó\m$mÓ­¨<¼å­U¢ŽrÂŇF¸kÖq¥µåš¦ÅtDžîfùUôË,™éòvî¤ý³XËŇ Ú±œµÛž) çJ B}Ðúy¶Íl„'5™FÄW¼Ó¦”¹OcëPÀ<-·îF“°5Gù ßWبþÅnò|¸¡Ê‚š›˜Š®¯ãdó.22J.¦êukxgk&ôx˜rF³S²¸Ôi¢òîîÿ+[ßV“ê—X ”mkck›ÜJGGíS·´•j{bÑqZB¥|ÌñoÑBT㬄ÞVË·â[ö†_â^ÈÇÂW™_ê«h!`1š÷t¹à×]1Íít°R§ƒ…ÎëKv­ÑŒBŸ®Ø–µ— íÚ‡E|Ñ=9nô¼¾öb’\Á˜…¹5:Sûg¶6×]Êf5÷ؘ۽DìHn[ì˜Êç¾F\Z¨ƒïJ‹ñ#5ùÓv¤ºã˜8ï’‚,Ÿ4üëI= {&7vþ¾<ØokNl"„&Vj)±ü¾!¿ùÁA`Š1¸¯OöˆîCןKHíæ ^LFéíFS_÷Nl ÷kVZÎóQ÷|–õ#ú!ãÙóÏÛà›«^‹-ëÜjcáàÊÁqÛK­ÝüÛ^&Z)¦Ÿ³ñ~˜¾ÅÜÞ«äóá0¸Ctï£#‡=ò­– ãN–¦úñ°?RÂ5 A¦Šfx1byD˱]­|~8á2m"¾ˆ 8‘Ñfg‘袤Y ´¦R¶îÛi}r σøÇÐÐå]+¼Ž ÿrÿ´ÓUÁý¶y=³ŒœDBʺ$\ïÚ½áÛQ/†—ut„¥Ý¿d²K²†•–#ôoAx¤˜¤eôçšÕ´bÞ í8—ðêUYӡ¬1üzo¯ÝéÌ#—ÆqòòÁl©)²Ä&Êï”`0\âÏ¢ºNÌ¥zNx–Pú i΋µsåÑÅÓZ+-ÖB©Ò5=5y=D’2pîÎA¹«LÔÏOÛíîþaætúƒ>úÅȇMŽå¯ÝE…naê©´‹ŽåëLM© ©Œù,à¬Å‚„²Ä…Åh¡µ–¶üìÅl”ˆ¡ižI¦ÂxDíáÁQ{ŽŒ Ï̲ۋô·íW•Ø+O’wÌÕoÝ—ï+盛ÖMu;Qï?$åÑõ=„sÂŒaÊ¡x€ÐÕiºVÇWÖ,ü:ú3óàZCöŸ'KÏÍò*Í+ïä¼ |`A~ q¶Í–ÐßT²éy$¬ï/IÚAr)ŽlÇ„³ë°_)`&'(駆L—;ó!†ÛÝx6yiÖè&§…ù§sl)6¾Àó²À ƒÔÐ͸UÔìoq–ÇsË+oXqåI韅[±¥Ú"ÿõ¤:ü]IÕ” Á)Ý© W Ó$ýêø;hû ³{rÒÞ==€àvþÖ¥oôçPÓ40¢oŽ@œÞ+ oÿvùÂlžúEé©®©¯÷f´n‹ârÁÓc‚΀_[= &oß°žƒÅùF»S°PòãÉâÛ¦ÏU´`$óµ˜L³X81#»µ„²P>ñça8 sýV^¹Õðßµ²ä¬ûüøõÑ~ée5MR·•âà6övÞè§FI ÚÆ؈¨O6 ÕÙ&Æð«Ó$,À9—Ô; hÂ#ÁIèùY$  U ÐC°‹káRÛ/š¾_ùªró½{ˆ?gXh{ª¡¿N`9{q:l•áW*­7ÞÖ(i%Ü|ˆá»Š%„5•?Û>ªv]²J™wþ ªw=1wáö¦Vi(q%¿ Íçî~µaÃ<ãŸÍ€Éb®x¾aêËq~Sz9ÁBŸÂJ±L?±#™øµ’`¦1Zxk– °X²™Ã·–”tl ¢¹wØüáq‰ %Ê,öÍ ¡M»î‹“Õ»j€«CÜó´ë¶ï+îüÊ{ï›ãWÚÿá¢ý¯*,æATIPØ"ÉÕ•oÊ®4G „-¨ÊN9^ÁîUdáG±pAíÐ']EÞ8 Ù¤MùTIŽ³9RvŠÄ$NS/B´¯ÄÉ&&Ì@'³Ÿ~\‰W5C‚š[ƒ‡ð™âí¾è¨ ^ƒgÄ'Ó§´Í¯o8Ša @çUg”÷¢­p F–ü…bg$ÂìSÊZƒè„CÐÌÏqWbÐœÊnþÅ…£˜DßH[cäÓŒP _í!úöGX>RGíîËöîINÔ/CÕ(; M€Š>ß³á¼Ó탓Gÿ¾ù£2.)Áƒ&¸I±Øåyqþ;Hßi\ØÇZÖÃBß0q‡a­Ønv­×”ŽÃÀ%…kîÆôJh=û,¦ MN+¥‚¯‡ÁiÂÐÁÏíè”NÃ|—¿­Àl(ï—6š´–¢ŒùwyWj8-%SBoðM­ç¦±õ|•æ*RFãPØ¡eu &—Fxž7)•”Ùó|AÀ\¨*,š›Äº¬å®&{—7ul,°7d2Wñ$#z ¾̳d ™‰Êé+~8§„ÃèJ¯ß:‚Î$7TFΕ;["hVùÃæªz¾1UâéÎ:{yÚÞÝï0®ÖURQ¶92冹b–¤UDsÛ2?9F4|«U/‹Ð§ÿ$ÔËŠ”,¸rÙºQÓêI?vÚ„o*%y²(ÑnŒW™ô„²ê„D/¹0àéåP[G"¢”4à`“Ù˜Vxlq½Dµ)#ht(uÓ¢œfˆY(:÷«ˆÏª[‰)¸áŽ1^E"e;ïDÁ&¤,Ç•q¼Ù écu·pZ¯$›ÃzŒ<ï3$ö­»Ø‰4‹·DVÂ^©40ȱIe¸Òo;HnT­y˜L%…G%¢¹q2fihš”y%J‚îUÒ¤¢ §šSÈ ngGJgÍR+ª¢P8Dœvåè*₪Æ7îx̲\²Ò 9<›á¯— –sT1½·˜"¤¶ÜçD(kh‡(ÒcY¿8‹‚M¬\ÍErT­¸Ã18ƒºp¡Õ+PÚ?~¦ßf6ÍîÂq n£OvH Š`%=ØÌ{ÅÜà;p‡o—ã>RGŸRõŸè âb!­P¢§:\¢×]„w}à(eýkÅEøî¥L7MU°K OLøÌÈ,—  —ÐasÏÉ͆QZ0Š"ÂàõP¥ »„w– » ^æ·( ³2â….ÂÒ²›;²Š‹ÙE+–[ŽûëjòiQ5*øG†,·¨a’@ˆ¿9 Ùñ"Ú# 0@ÿVÙto_û°¾*G¹»ë¨:}Ѧ²ß"‡àh밷ɶ¿àº¼A0>„`ĹË__Ru/£Ú\)œ6¸D'³ÌYßv’ZTŸ›ü¿|Ð~@&r£ö«ÉÊ©bãÂjaü+LhQÿ<Ï äG ÑÙø£Î+eýk„=ÚAJµÅýš$#*ðšÍ%b¢Z[òŽþÂÿiÄ¥«ï‘PL¿£¯—Ãùm¿{XÞV‹¹‚¸]qD*Ž‡PH@&‹ä·œ›ßùfî…ïyËVx4ÑR J”‡%ƒa…½²úÿCo×¢Å2Õèœëíçø]ìNÏëkì|}:æ°ü Õ¡l”Á(­’"dÊ£¤ygïP’2¨.SJö „È2HÖjìÛ©¯õâ2ŸL´,Å“jP‘9gÏ Óå4uUcºJ#X8†¡?c£°:Ò mvÛþA‘M¨<(%»¾: ¢A–HÐʱÚ ) aú~^rP—(gÅÑðƒ_7ܧš2NLöÒûgßÊ O VÓà¾Ú=£„5ôŸ=;ì>kÃ-R·cÅuæ€N„@8ä (²UÜß—£àÊË ÒòòÙYw±Ppþg) ‰ãNþˆà”ykÙ>Ú¯‡W¯*ÙÉú²ZT7OÝÈOüïÌ~û°íçík“àÏJ,ÎG8YÆšJp±nÍšµrê¹o–“dÔ0·ÙÓ$€pÖV±¼¶?ÒªtpùÚ,¹72,ªžf3¡·›š… T *ßWRA óÑ­’'×#[á]FÝ•ÌÇ&ï-Ô|éû¥ÙÓJcy9øôĹ*"Rf¤ÙêZ\ö=®:ÖØî²\Ê-@<žSuÙcÅëÄ”ZŠ9žÃ(Ôú)l’pŠGœ] qÏËÄöÇ ±FX†6Þpiñˆ„X(z¦MŒ)SN1ãF(>³pDE0“›Óºë身êbÃ'³ #"­jpཋµ”à´ ©œÂŸ² n¬‚ œ‚·¤©$#¤øA)x• …:c„+¹ÆÁ_-µ)å-´ùf¾Íå#xl󊧌+ùCšUÖ8L÷ÇÁðþpø“VšßÅÃYR¡“Ø:_“w¶u5‡»Q´¬¹' *ð.j¸×®(öú'SG|ÑÕX²JÕ4>UýÉuŽ€¢Áw)UƒC?8(f[Xpˆ¡‰YÍ*|E±¢æÍ*%iL`±1Í«ô’)‘Ã+\Ç£öÇNõñ¢R?ØâµÂué‚»§ß¶÷»ÏO2Gõ’EÌyž¯)§"<.Pv¹aáŸ7»§GÆdGn›þuñÕAO¾ÃsYe»óC­Êpw@¦mæ¢å| ûPÌêÝ $ÂÇQØ4bqìÛÖ]2ÏUnMž…&Ç刼Š¾«#²„[ÿžä¨-»áBñ‹¨®hYa!¸qÇĤLÅ€²¡N.±‘ÄËÅZºaZó#-çÀs£-¥‘Ò€n‚¡žÕÈ» Ô0ôŠ’ÄWqJ×_IÄ(-–=<-øŶkU]U$%*'ìÍ^"x(_‘S…»ó‹U)UPÅPû$áÀÜ[Ъ`'H©R7àÄ•Û#½h>ƒ¸WÝŸÛ®ÎTùƽÅWUé>0÷ž9âJ“ÐWe#P8 ÁC0'Zv¹ˆÙò-PÓ7R%»¡´;UáøJ¸LòæÔl#$1쉜½7ªïYAh/•X—ÈD‹às5ÿ¶Î‡Ĭšmf+»ÒTÔ[ÝÝš{WÊïÌ w s̲œ± ‚«š ÎÚ%b1Â#\í2¨ˆ ÙvúÎDo #m#¤ºÄ¦K×W¥ÞºF÷¹ñ0öì– ¿€ ±PŠXöB]LC«mÔ­h~Eº_žÂ×{I€¨UÇ>©«²B€ 0Ü…‡p¯Yãt‚s?è^Ûõ'-n<õÂs—º·üu×yŒ†ÃÌKñ,­fä ;ZÀ Š:¥ÐÞjé°B2GÓÉû]”f3÷êœw[÷¥Â˜ZÂ0{YÉh9Û…Í¢Có–•£-'"œÇé°ÛÏgÙÔºþ÷)1De>‹ÏvK3&ˆÐ4ç˃θ.ŒvhFÈ }hkx}”m\nÀ†^$Ë’£ZÅüÆP?aÇÝر‡ßýn×1Ø»çjÓ¨Ls÷ôØ•õö9:{íc(ìÁÜøÛ)쥦~…}9e½RI_U_x—뛜@ 0Úg¿FË'‚ÀàýwLùnÃÌGlJ€Ï0  ÁTÚŸR Û01Sg¨öþ4lôªdƒx¡þëÈú—Q®K«ÍOÓ‘G#X¤54‚ÒyAßÓYO“áu³Ü;Ámƒpè‚ócËä2çV¬æq C¹Ô‰ýÃä|Ú¤ð2‚u#|‡s„HÁ¨Â|,ÃùáõÞ·ò£Ÿ’´ C¢ÆPVI&ù¬à”|õ¬˜A›8vHÍH§ïuÁH2EtÀ&7€ÙƧ„ÜòBõª>·ïàÎVs ƒfE÷c‘xòawæý–á#Ýð:êM€Ì2v•Ú¤sŸbø A\o€îàiŒF£ê£È*૾qÀÂóü:®•iRS‡½"“E3-¬LëJ Qjä¦ôQh6jV‚J%Üc8ÞÎNþQgk‹›‚¹4½D_‘šÀié ¯ ì"Ï^Ð0â˜7‹Íj¤x>=¿Æ>T4¡4 »‰{Z^SˆCaB.¡¹ÉÇDeÐ7”4w±l?ðš¢$êÛÿ ¦ÍÞ”ÀUQŠ5áÏóY…â¦â\å&(0 Ðïô’È,´{­¨þºHÎgC|ÉËšÄæ—ÃÅòÉÅpÌ·g÷÷‚¿ÐaNÖtJ/7u‘LéF‡ã—K¹pý¬ÀÄ%Y‘¾KZE>ÿb,E€"í@ êˆì/åx ¹T¬y#j @ÍZfM-3ᎦS—ÌG3ZvÂógºtn ¶J£‘¬)üIný ÝzÉ92|ò¿$¦V+YœÈßdFwµ[Vݳr7ˆVA¶7žM@ö ÎÉH8øyɳÄÚó gž»‡ÁËMIc¿JHxÐåH…›e ’‹'l›y™Êì|ÿ^¸à¢Ý./–`!Ü­2Ä-Óox[‚Bú¦5 úzÝG½i4týõjQuQ¢â2¸Oó°t,ëð½{DXþ–½>Úo;¶"a„p”t‰PUt¹ÅQ¯;¸É°l:J#“ü RΣ¸Omw<"ÅlÁâBÈ€¬ÓИ­«²zæ„HµA\žbúNZªŠ,ƒxdˆ@ƒ¼Ž !.Ž‚·<ú§„+‹…³o}úÙg¡æîøGÚæþAp IÖ;F[w›‰6½5ª°PܪOL8N>4{ ÇÞ…âLÚW ¾˜S pc‘§›O\®‰Œ†È ¡Sxl’‹ÌÕ·íöI÷Ù.pÓNƒÊËW¯v¿móW/NwO^*3¿LËÌ©Gº“¸Ÿt/úÐ=ô³µmçp0ˆTž1Nš›ÒWº8¼ñ±¹üAë¨pû¡Šáàþ÷,í¿¬‘:_R³ Y:ÒIY”ŒÆÓk7І$æ–—Râ“Va"?}QÑLÍã1F‘õJ©hã!ˆ‡«–‹‚¸„ëKËKÖÛxŒY\ 8Máf2ÖZµã ?HTŠRPŒj[)hsíІ¬“ÁÓ0y”¯~·‹ïPiê!ñu¦ù¸`ý@wu5‰ÇÅ6Mÿó":þ6d<ª¢U¶™Ô7¶Ûœ3”ì—$<ò–orMœ7 ¶gî4Œéuðý«öÞði>¤}-p×UxçeAOÒÆ4+ƒ8î+3êÊ} ÑÍûýó˜—ùmÀ)jéŒË_´¢yM½Q "Œ 4-!…¼Ø#ÊPrJHí2Àtl*îSj`Á–¯ƒ©¹ õ ÕZ&J%,¾D¦øç4éN@ÕÈGfÝã¢_~§ÜÒÍä hÊ¿Ù\’õè¿VŠä%£ö/DÇ÷é"xt'ùÀÚ†‡us4xöâ"–Z xHznª÷Q¾¡E“6-ù½QqõA^ÍÔÅü!&‘„ebuNå%ÂEž#ÝÜ1§ÊÞ„ù‘9‡Ú'âˆ2A™§Ê¬"A%Vn±•úºõ]£ÎõÅ:ÀaPü-Îø¦"‰~¡ß÷Ue>·99mwÚGgÝöa§]ß¼nDõ÷ tør¥à¥_ºnØ^â’0É|Å]`β´wR™ôѦû™-#*‰›:Fß¡1øt8sÅ(•°PçÖ"xü>¾Bø÷©ƒ@ ´ö.©À¤®;Ãk8vÐåž/çG,ñ^õî¬\[;˜J:´ST8hcMéªêÛ‘ã<ÄȺšRmiö—Ù« Þ[QC+wl;6°wŒ7‰²£’AÅ6QÓÁuUÛ८l˜o–Ü Û—r’ËÆÜñ7ÊÐNÕ££cÇ°‹OüåÏ?éÏEãËÖ£Öƒûì!è¢Æ3ì’æÓê¤>6áÏãÇðß­/¿Ø´ÿ…?áÿÿ²õàᣇ?ÜÚ|ð—Í­_~ùÅ_¢ÿª…äÉlêÿKþÜ_¯EëÑ^>¾æÂTõ~#zã߀¿¾@t—ÉÕ0™N7N@ÊFŸë^>dž8í¢ƒ_"*™¼KÐ Hí½<è€àÖ>=Ø=Œàç“ÓãïгÛ_›Ñ›ƒ³—Ñî³Îñáë³öáÑÑ1fîýµ¿GÞÓAÓ!ˆs§ÑÁ«“Ãö>öxôCôºÓÆwÏ¢Ž_ŸFÇoŽ¢ÓƒÎ·ªç¬²Rn …M’©¢Ë™´7Òш6¾¿ç$‡¯Gø.Û3®£ñl2Îv¿|—Ä’÷° &Ê7h_`Oâ|Ã×’[­“kyã@ ”|€Ep¨öPN ɶ؛M~"E@L2æf⛖׊å;埖.¯â¢F¾[é‡Ì‹ýál ²`MÛ}M ÜNˆ…øùh .Áw ^Þ©l]®‘ çY¢ÐXµ{Ø% âF°ÉV| ô ¸FqæÙyzWGùu%ox­HkrM„`f;ü¶sð¶Ñ^nï—†ëTn÷/¶õ@^Å¡[Ÿzë ‹võ±¶›°¶ Cv .Á’ ‰'“øéDÜê¥ I0}¼‘B:–¹XÒBïs‰>䡆R¨2­aÊ0T7*t‹M¦gG?tŸŸ¶Û‡³NÉfJ¥ys·œîlŒò$Yz­‰ë-‡J õ nÉ“L9G”˜ /“„1'¬âÝ ðˆýœb.ðhS( ^PÀtJ÷i¥LJÜǪ%Vx Õ Æä}¨){…“°ÐÎ&Ý£³¡ElŠñH9é(¢-ýˆŸÍîDeõ¾Øû{·óúääøôÌ.0üqó'$èöé)fZVù4ÜíÚ¬Þ®êÍÚ”ÍÚj¸G¢÷/;"Á\ÖMÒŠLÝ: ÂÒâ1üו´Ø CJ`«]û¢E~4ž¦ ŸMÛæôt_ÒõþmÝ‘¿#u üÛO'¦äó‚~æ\¨Ñ§NÝMe,´Í¦XÚð:îclSRwÛ MÕ³CKQãçq:äk†ßÄ뚎.­‚a#kÁåÏÎA,¾©ù,’)—PLûuo€cg€¥Á¡ùU‘„´`{´ÆÃZ¹.éòhŒÑp‘F ÓÃ)þo)é¶í¾¤Å¼ãº‚gP7yÑÿyéöBŽŠ²lå4o„ªÕ:qxR6e6æÚX¼I|‰Â¼ ;[\Nù•”.•º¿çrG’“äb6Dάhâ¶'¥´:M!£UåF)žS“‡cÏ/ó+Œ.hÚ$B`‘Û”Œz {MÅ€£_vx…E’ÑŒB}ka´DålVRN˜j6+7`.Åè…ZR,ÜfÝwH%yTŽ›fæ=W qÞA<>¿^À|¹eãö E°¥Ù¼Š6"â?jÆôÙoªbžépÂJrÔÑpÀÕF‹¢5gŸKÂPxã)7!¶´«ÑÝ'zÛ}y! „[vh¢©ön½A.–ŸË],K"áÞ43'rËLPÃkx´uW/_–ÇG¼ÏJ,Šbc¡¢b6ç“i«Dp•f Øò7E«ßÒؤžr7-]Òßexð;ŽC´9‰ÑTÕž¹j‘* `EmŽˆðëEE:d“?! ñ“N1ºl¿ûú]Ê Ô¶;u~eÛR¶` ö¯ìæ·?YŸ¦Ùuµ ÍqÇVîOÄ Ñ¡äàùÁžWcÔý½ÑÏXÉØ5[Ñ7ˆ]Àêmuõ*;M™JîÂbÃÃ!a±s%qV$n¤‡˜›3¡f©P9ê"×™ çqŠAt}Œ«( í&2¸eAd›ìÅ6² ,¸8#-™åm9K1øœ³PÃ宼cr©Øß,ZyJhí—›u pÝAË°D¼FI®8AxvÔÃBœx(ÞÞÀïCüO{¨žïvÎäÑÑèÔ™ì›úø4UÃÍhÿàB¡9œ‡kˆ5à Ҍ´ºÏ5v6ŒusiHVJ«íJ3ÇÿÓá¬a*Øa­ΨEWþ]ø²²´®ç`¤5#5÷²Û’쾂&Û®8ÅÍªì« ÷(ý“‹ýwp1µ[ÿ#™YÕäWái‹¸TIÈû8l*:9;Et¿š7WꛌÒBÆ ÜbwƒR$†°(§7ßÍÇEërMÕ~Ø=î*Äÿn/žLÒdÂUHí7åô£€tI. ¬ÑÐÿy£˜^T•#ƒ´_HjÝ$‘Ýl’öß^Keišô|– b,Y€)E1#?™Ý®Ø`—Pù‚,¢t1£M6%|R5… Ú†ÆQ iVLQyÀü¦w”™½¦Í êHS%†YÜtSÇßÚ†D‚ÛMR çõ 8y3…8@¢iÊ!rSôýôrV° zO¨ o\( Ïë_É3‹þ$OIA=ãX³V”³ÈfdÎCƒu’¬kI{Æ`±’LjŠ"ðù&§ÔŠ[ÒªL‘UlçƈSXgX5ÜuÚP“dÝd6X$ɨ]rœ ëE­±nŠ –#àÍ„¶ž’?UüZ>+0ÅW¿cÔ·Ø)¬š NS´oš"0ÀãšBÄfRÊ)ÍÞJÈ6Ó†jN –ÀVM³ H¢qÌNÉ—1GÜàn ¯UŒB|ÖZ‰àªvI&NœÐEå™ðî$¥´È˜ÔÚâ³”és{‚¦–ENàÁ¥KaƒI\¤¸`=üýÎæÔtkJc“Ñ'ªpF s}eBr~Å7Æ…ÜbfYúÎ¥ãfjÑ÷<}|š°Õ—ŒCÓ8Kg£&úΈôóós4%ê¦8ýyª‹ƒÃlhøèe祓>¥éõ)UÓláŒX ÇpbÄ6¬P–_5‘§Œ1 …VÒ¦Ô{j7Ì*ÒUO¬È98öKVFk’áÞá”Ìr%F‰X-¨¶Të¦^g´tšíXÇHKУðsAƒ ¼ÄøÍUS†4Œ2¦ ¯}ëúâ„Å…Ò$! qs©è8iŽ<#y—]à »ÄY*µ’ÈôÚûb„'BXãI{Aoñe{1o+ W‹¿Ž2Wk,dèÛƒUÍR„£ßN!“ž1»x 1¨´_+…Y.ØÛ9ý;(mÏé}]Û¸x™kn÷Û7r@°†¾„èMÑmütm”€45À¶×ZQE@ƒÁ`ymY×)·Á"áúêMñn£rQS } 4¥«AaR26–WÕ™GéMü0¸b÷ƒ2Õòšz™0û3u~D5bÞŲh:½VùùæNjù£¢Ë^BîxhEj\-Tܦވ³‘+Q¹žxò‹)þ`É!±‰ß§•rá)¨T;‹À•'“Ù%‚ªQÙSÿ¬N„ã!·±Ô7‹„–Uæ¥Ø2í¼¦â¾"EXñ˜eƒû@-ç+')Úb'éT‘•×º ’$ÞÖNð ]@Â’ÇŸ]Û9W"6ÒØpÔ Ó·¢êƒ3+[¨4’"4’îf•Üƒ‰³dÞZ9Î(O[àBëº LCgÑ0ØÃ|;:× =ò›ºÚ”“*Œ«ÁÂ_Zh­Ã–µ–„Šˆ–€ËMIÇMhãíÎS àã´-`S¸ZFiYS ƒÁoJ‹‘€¹á©¿ ,N‡c»Z°ÂÕ8³ÂAØ‹bì5ª3‰ÄÉ.h¯i>üäËaZùÒNLK´²O­åyšpUŽü”*O8N³w)“šÈÚ¼Mœc÷6ÃœòËü ¿äU&Å‘ÛZ›„wQè£tŒÞOdуô]:@ü™¢Þ^hѪ,»AgN0âù°èÂQ(»ë8|ïƒ>ñ³ô3çUýtÉÿlÌ=¤UáZýù'ÛrÇÞÈ_¢§VŠÀ²iÜEÝDhéfKØÛµzw±S›ûÙãqFâzoþÉ{[m‚&'p­ß]"X@/ä¶GY1Æ2J^`áìÀ‚7‚Õqö5”—ŠEÄ-çâð6øè¡;4Cu« ¢F¹Z Q”Íy‰Ó25“àgfi²CÌ[K³’a9R-Ãgã§!êöñÙ¯¨×J"\eRÕ¬OŠN›n¤ÉâX“ªNÂôèʆs¸·¡ /Ñ&sýgžÍÿ¤üºª& ÷÷“Ô˜êüŸ/·¾€ŸÝüŸ­Í‡þÌÿùOäÿl}ýÕWMüûëèeœoEÏòärÔŒv‡ Á¯ûÉ(™嬡­¯¿ÞÚ€¿¡\ü}2ÉßÃFéŸùBæ ÙùBV.NšS*F&aÞ¼ a¦°ZÁÀä k£»µœëäMÂh ±,>cv€!:Ày:¤\Ð$3T<Ð~uÀ ¼¶¥Éhö~ƒQQMƒn–c8]õ2Ùÿœ÷¸î66H©2ï’É0Ôgdé@ý¨#‘æúËL¼CE‚V|Þ’qÌ{‹ÕOZ•T*‰h×¹; Æé•~R“,u\½ÂÝellLlŸL·Kƒ``GßZXAòH»Žjúp¯í~¸÷à ~Ô’nœÁ¬G“.¿ ã©x3Ñh\6nl(|h11)ho\| _\gñ(íõ&1¦×n(×ÊÊØ”ºÑ¥ß|µû}÷ôøø¬ÛiŸu@ZG:€Á,ï†ëaÊS‰»]]3üC‘\ئ4+›Ì¨K ðvÕXRs†µÙjY7Lòù»({Î:|ø¬=;:îî·Ÿ½~ñâàè…ƒMTÒ <£˜Èi)¡Ó’ñH@µÁƒ´òKÎ-²=Æ3¡QO{ð ;½"€ë›~2ŒàY àÁ¤3¢òNiÕÒŸZDÈœ^þÊ"}—LA¸;Iêöâ„éÊ%ç…E?Ù éÍ..€@Ÿ˜…sQ'ìa.±`+/–Î9¯¯=Ç`ßOÇÈŠ>ZTÄWU/^³rÍ—nŽvô·h-ªO“ “ëÆZô$Zsó¬1Ûô÷$’¨°@Œ—~¨aeÛÕ…È‚äÙhHÒ…yÕ‚žL‚CÀ[1ŸL’þôÎmª¶L¸š.FRMpB_NÝïü#z}µn­¤\HïÿŸõÓSïÉ@ð£Ó죥›}TÕlÕ Üª«zè3Xù|cË TqÎÛvÑ…Bo'Mò0M£žÞNqÝuü-:8G¥`¢Ý.m\¥pÃRØfî¯ZeÙõFh.ºBYB=WÀ¸bPdÓ“i»'aíx‡áò'Æz\*:C shÖ…ñª’½ÛS!ßõqÃN;ºRJRš3P;@S0Ï;ÅR |si=R\B4Ü–µf…ü2A?d/É@jƒÖß`urýKv¦¥”ö'ä4Gï´ØÆðOc(¢äü<í§ªTX›+7E¹ž"\“ÛzvÑTR¶ÄC%…±ôèe‘‹p@ú´³ 65I6lE»¤d·–•"EŸ„+IPY”4µŒ ª‚‡ã¯îæ|8(åØðÖ‹¾Q—›B¥î䀺~ê^TwrÆ7¢- àÏ¢ÿøx{éø)\.C€>g¤eq ü­âSKìñP?^ÏH[WYeßFäì‘3Ñ$Ï%qÙÞÅ!ìø±–ålÔc%ÊYŸù!46`ì/_ŒxM„•"QS©Ç>Jvµ4Â~Ž)OH±Öòá/ AÅšP%B@/,ܺhY±¸Á&zñë"Á\8ˆVbãä}ÒŸ14(N&”Á&Þ¥“)GÊë"I)£1ÈGiFÑϽk³ZéÔo£(Ö¸èKé!:!­e×ÂÎ)—É£¢´ÃÁª/VÕ‚L7ž‡4-k(sxwã)):åÓ¢µ¤ÄP»<Ï·w °ÓÉ’ïØ·»2OÙï j~ø0ãÌm9)ôÜÍœ1ÂÄJë°ì–ykÁøðàÂ+ËŒN¿ƒÆ«ƒæ\)³néÆ‘$= r§‡ZÉäB…}‡o`MÛ½NèE¯¦,ð½{Ë‘¯*Þ¼ ó}Ä›}/UÿuŸ ìÎÊGáϳð‡8 Ö®…©‚IîGʳi•ÑàKSØ€-u)'ä‘YP ð*Sñýoly¦ôÊÆx‘6U±Úösþ7•å’m8oû»?‘“oOçk”tæ^ÃŽw×Bª®"¿ÀAlp\«É"y`ý~i˜ð éýX@/ØÛ]A§¾PMno!Ü{Ç9åYǨCg9wf×Æ eÌ÷V&8Ù³»»ûûÝýö!5X‘.ꃨ[6èèÓÁôW´Zóü±4Q•%bžŸ¡”õZE¡šÔÄÞÛ^æ%Þ¥Ø.õ X®Ê»Í» O±VhgdÀ(R¾Ðì›8°–%j•³^úé7%Lîø NHWÒ?ahd¨¶gЃŽóì·´bGhм‚Þ²mæãíî³´OëŽU©©Íáë Mðˆ*l–>£Œ ˆa,¥cŠ³D Žý†2[¹6(‡ØdÃëm®Î%ÃfâÕ —Šð4ÃxÚçETÜé[Ì┚ pP?—d6ió£yHoá#sÞ6¸X×ê>ñF˜A¥6û[E$¨Ä*â@åÊ,ш–¬<)âæ#x¥J•í'Io–Ö!¬öã¯zb—Ò¥5a-žSÇkçF“ïÿp´ûê‹tìîû±#s­>RfÌúêdï´ÂôÁ¼v7ÀòƒÀª¡%ó…·*Bó5‡ fdûICõâQ‰,iÌ>@€4˜½×›øõŠTtÙCRqÛï|sK;{õê”›UP\¦–Ôoe…ÙÄ™o²mxu…B®À¢•½!%7ˆq}I؉W…Xç£DÑ­CQ%n±i!îµÒ±ZÍ`Œ½p`Cå-bYøÃ#:÷py>»8R:T¢~kóºb¿vûx´£œ0Ù(êˆzÕ“÷ýdLÕ½UtDÓŠ*’H熃Ɍ¡¶ùä-Ã>ë¼ãã¼Ïf7ô Í2õ[/¹¤¢Ø³ •k|â5µ FIK@sB”B`…rE|hT’oÿ/ O²¡濤%¦?|üÒ‚¦Ê)§Î4W kR.y8|Ê#?†òLpèçÄj¤ï»ÅØ‘RÞåCÂÒPD§Œ¦ëœÏŠ°Qp³þ éI³ûòèb’_q‰?,hyù̳!"ÔÄ”ûO€ëI!©Èœ‚Ž/½Ñ,‘‚ ˜…{•|>©jjSðaŽ¸øÓÕ$GOÐ ÉÇêæ+Æà¼_½Žöž€ÞIã4}—`¢°ÀYYA˯,å*‚ƒív‘“OS„eGIWXN}³±Ç…ôWLŽ$+ÿä ‹=q†Ç)pŒ>g´SF… àjéÐtjƒRAìÔàÄÖ¨ÔG¤YQíæU Y…_ºpDqííï÷_w0\ù§åýÈÑ.•R@´"ÕxÑŒâ¢Ç!»X¥%ÅÔ E¨Ek"‰ Œ3h]L yÞW³Q#÷Ô°|@¤Vx½)B‰øTLÙ,‰ä¡,'Ÿbµp,Za" vØ%XB\¹ª!ñÓAøЖ„¥ºÍ +‹›í2±B'^ìIb€"™¢q«|}£ •¶Â¼ÐŒ×ÕŸÉgææaR©f½˜§ä³Kà¬XöäZçáQ:pã¿èí§Ø°Íªá1äjØÝ=ê áw[ŽÑ¿qý†áž^sÃxoüÔJ\qО²eÐœ±›{ö‚Ò ¬Í2tUTŽ :™?&aW›ÛÊ’i†­(“Ù r¾À‰1ÉKУÓ욆Öbè‘á˜t×(§d™<«ä0@箂µ81‹Iµœ4K‹K/ªÇ¦fü'ÄF´-†’´"è‡õ‰ê*áç•Ø!c²„»M)¯S> 6]¹Æó)™H@ïxÚ&7¯>iº° ˆPcOÕ¥ÐЃdô.+æ(pF¿Ý" Ùq#Š'§írËBùÏ×J©óF³³3w8âÕB•(0WñdPøwµ×²ñ¡”Ž¾O˼ÏÔíHcîFª´˜Üf}ŸZmÃm–z95ÖÁ§²ÞG[?¹ƒóÄix…T\–¬·˜Ë¾QrÒ™{|Ík¬f(Ⱦª~Þ[ŽÃ‹‰€_ºw¯br7•NKY=^µ‡KcE¶y¡mÒÉß"Ž£çô>ŽÝ3ܳÇ ˆ‹ã&…Ç”£jÇ36ôùêÙe ”½i^„_â¼  L«Ç(jæóNJµ(êÁ#{¥XT<ûçxUª5ñìVsx=:]C»¦XôxV\"ž§ÚRe.Ås¨D*•DÝ €ý6º¯gXk¡ÌXùtš”-kš›·)4Læôw)Ç×G¯;íý¥./‘בìåÕJÖx”š“Ã0Ë\üZ©¾ÑŽð;PLe·MïšZ,[ëë^¿2ù“×—X¢wÿwëjM§#=6BJ÷vE—P´ŠÓ‘ÉÔ–ëÛ4àAÖÒž§v$ÝX°Î»‰ 5¥XN³",h²KºuWÙ—ê ŠêÆËâ`wãñ#m*Ü®ʼ°›SÏ›…B‹î0W ¿\¦!E£S_ ^˜Pï ®ðÀh·ˆÖKZy?Ls¥'PÞÀœŠF)IœÕc"F$”^„åÅ AiÜ0_ز[Ób1MÙ£aši€õbÒu«½fä·èKû»  CUøMÕñ;øÌ]*õ¨Þ.¿UÑÒzɯnL{õÚ×­¼f™–Vª¼J¡·<Ëž'eÁ¶sUkÕGÂ;aLræ0„O‚¶¹Â!Xýø‹+ÿòøì ¡ø_î)žYêÉ/]È$/Nßtº¯O£ˆM¥V›°.VË´aȺ¬¶÷àÄ3w•;Àå­ê¤QÇP}ú™ôù3‡äÍâÁËjq?ꉸ#Ûç²¼-°ZN%’ŠM`¬‹|Ê7Z¹ãÅÝy‹”iöc™½ï%·n“jÌMŸ•Iœîîµ»Ï^?¯éðP Š NX®É±«Ú‰6´º$s_×û—pÝ­†0[ŸãÉÅ–ùñ KÅsÒL*.N¹§( *Ó–°`ܪAÃDQà2'83DÞ`±âÏhÚÀ¼†Œ!_ç7•ŽFÉ ¥l.XŽ#BhõÓKÈ~’l,j ©Ûºè•\Šp=eÈo²® ¹wñ A.µF2[°rdAÒ$¥#Ы*€ dÁfЃ“.xqÄ cˆí)6]¤j3;:”Ø„öY‘IÜL`˜Óã8Ù«2B‘ŸC"Æ7„  !œ2J…pŒFÙOâÉúJr¯¾»‰:$9:á~2Wshé9y?j: |BbO–Ú9ÜA®¹A€HÉÏoußP°Ðw‰ <[ ˜;=Otg[º ïúM.'•úkÈñ›ý·"C×n%=4ƒBkIP·wèßHZeŸÐgvÞžrµâH¡V ôC!¤èêU|Ö jVIx<3Ô¨oØe)ÇG5òfƒ ‚ ‰£^:mÍgànÁ@»¤‡±¥E4“jÏàÉŸSüx¸©…7~k¹k¥œ¬¯|d*ñ+Æèþ䢀¿¦XG{»6ßÒ+”Y ™èÁ棯¶ƒ8U‘ õ•”t«+åà|\äàèE·sv| än§$ |«ŸÑÔh FÖKÐ/Aôäo'™²âÒ‚¦Ö˜ä]s•òhuÁU*KR©3UÊ9 3ç[aà¥7ž–<Žáº~¡]_È:–ìq;ŒÁ0ÇÙ[Þýj>V¹à¡Uò°ù£qY·Ýj/ktÞr’ØÅbŽ™Ó$i“•xýþÒ½ È•ÑÑ;3½¦|U ¸˜¥I ˜¥¤Vk+» Ý‹!…æÆw—Ö×ÕŠO¯Ç´:~˜“ ,ØìyŠVT™–  DõBalau,Ô¼Àµ¢Ê¨›Š#ÝmÈsS§y‘ž0+ìR†8G]ZùJŠ ¤Êûõ̪Èz.sáä *7WâpXbThiÆj³Ë"Ù±p_¹ÂǶ?â\0?ðúÇ"’pù\ó8zš¼#Ä”ö„‹¢/"×IX9ÙÀ4WKØp ‘è„–ˆ3)rttÜ}~p´{xð]Œ«©¹g[ÕšØ …jÙWÈךb¹úYU#|«Ô£*JíyH\Y)¾•OÃœ¥°«Q ­5ùmòMBŸ—í%}šäe+„㎮7ÐàG+§Áfd%]Ûe ‡Â²1‡è„'8«Õª˜e»¥à:ÖIì*º|^ëA½®¬õè¼™=öƒ²›q §°:‹CjJÊE²ßNWI[(rÄÓÙ FÆg'T¤+VáÇ!yT)Ï)µ*’³’}ÎÞØB]²VÝB¹µ1‚ò’Ü07jêä–ˆ“+Ö¦ºtØ;;¢$®âÀþ)ˆò`2¡Ôød¿rµ‡5Å‚öÇß’38-˜Ã<ÀÌ6Â9LŠV´c3šCV.°†´Ç€ÍÇ4 TÑi­ÛB—hG.‰Î=Ø°­q¹®nŽSR +œä=**y‹Æ…IEªUÁª˜­X<¥iÄÒ2\i“l1á°¥öÌåýVSgóÖ¶-ÂÞÏu)WPÙ†TG¦PƒÅ¼¦RÏéÂB½’Ú2Üþ”—ýK"À¸¸Îú—“<ËgÅðºˆò"¡yp-ó‚G“‡\nS D tø1 Æ;™#½¸Máñybjü€¸ƒ5w±V-¹ÍMó¸Y©«Ê3‚ -pÚ~qÐA öáÁ³ÓÝÓƒv§ÛÞ==üÁ’Ù—`ÙFM·£R0©€Ž:‡sÃŽÚB FKË`®T¹Lrm‘¦Qs‹UÆ „½ñ 9‹){Ë õQ‡Î…Œ®v•kï&Xñ49DB0Ûñ¤rº2&’õ‘& R±9¢óž$èéj¯>ö~•˜èaÔ·Ë3Äÿé7EWR4csÉÕVá&è‘KŠ«¸}¯)Õ»]ηXÝвD&)ú麧©z{Áyt%¹ È”ÈÆ?!OÎ{\ó½øÿþ©•¿ÕÅ m­H§á{žyAŠŠRµ¿^:­Ó#Ö»7U”CQo ÍpÖ°‘TI[*íš‘­ˆþÛd>º¦w@Æ*ƒq•§«ÏŠØ²M•T.PÜDN“‰$ŸNø ¶.Û¬æ[x…Œç[Àî“Hb°Ô×|x*Å¿àÞvÍÇBÔ« ÈtB¸ºV¯.æ­t+ºO Ï·›pøÿjgÀÜ®’`—mÔ|ëuØ•e”±ú+mGøV°$¬ù<‰9S‡$…‚yÀHSµ,¯ ¿ÌʱŠx#ó,‚ X…©¯é¦B ÓtÄàñJQhA—-´¦mÙÀ‚AŸ©õÞ5²1Åz”'Gù8(/Q ˆ”-¡hYDÖB4—h¾©ýIžLT%þû»jFÏÓñä(ƽ4¦ 뻆uª,'¥ë dºCú$-¢Ð%ÄiZ^uscšF"EÓ‹7 ÛØÏ/2º‡áÐÂýéçì—"¤íÔ›ƒ‚äTë°8Y³X"ü|63P@ -ZbÀ¾þ+]÷¿Añ×Eõ_·>øòÑ#«þëÖ_6·6n>ú³þëgý×Ç+Ö-7ó¶ÐI‡iq,&ñø2í«4ðõƃÍÍGÑËä ÔæéÆ œËx2€‘¿K†ù˜4¶=Щ㠎ûaëäÏ*´ÿ¯V¡½e!Zowï¸FðBã¡~9½©˜ÞvTßnwo¯»{úªÁöRýøuqM™¿!U‘`øPv’1BÅ$–ì)±Ñi&;Hv]p¦ J  $€>FËÆ5G^í~üìïÏ~8kwh“18§/y¬ÄõázÚ|Û(«>ŒÒ.°#|•Ô—·ª ºQ©"ßÁTy"¦X¤d4ž^uª±·P@åЊ@ @µvJžé¾ùM‰‰Kaü$)6íy¨B6bnÇñˆËÉ2ty½@oGCÍ .`’C¼¸ŸÈ¡´QÌÇèmþLt0µ* t£œ³î{H×éqÜ%†qúj÷°ôÒxŠ¾h|Íÿ†›ÂQwQq@-½]‹\o=‹’dì¤ÚE¬Xª>©²/Ûh»aQÛ!Ãfš½Ë‡ï¯f ,Ó#d<_À*¡ 혤:Qqd2GçIa4š02£6ÍŠFF)»‚/'ŽРxóÑ×+•£™þ‘Ne÷`í¬–ó²7|ko.Hå†Ô¿œeo‰,e ŠÞ ýÒ=§çÚ: _Ásɧk6œ¦0Ulß~ùìðÛÎ?P˜kÇøˆ¶ŠPƒ.É©!y?Å 2[5·*9ê½_¢ã=b® èÀÝ©.l›_ï$ª˜`ÑêK‘O8ýâը)-‚­-°©ÊÚhj ªÞtÍAŠâŠ' ûŠžêØ$²ð)Ö'%Œ½­Ý\}†ZP#[¦êŽ‘‘{ùzš¨ZÉtš,žÿl KÜ;’Ý4•åâݼk\WûÝg‡í.páÓö«öÑÙî¡v-›ÙN¼íAwÊ6?£Š1ìt“[£f·Xo5ð¨nÁUiù2Œv¨ñȃ-ë§Ðj‚[{n~­Ôœž¿><ì>?mÿo¸¤’¥ý)È5ÜE›NùƒM¸üdÍDlˆ#PH†ó½›Ü„y¯© CU5÷Š U5AAFÓ@ij–²l8<ÔÜa«–žÚ¶öMY 8~ã¢opßç Óüxi+GÊB£$Å.M/[æìªmŠ¨¨këØ#ÌPÔädèŠbQ³‹½w7>G[6‰©˜c£Œ°R\z9ù-kpZߥtŒI æ4M´SçÕŠvjÿ^ód÷²èNò•+½GkÍÚZX|ÿbñ=ÜÎã…øp3$ÅÍø‚¼ïóZûYß7òüòÂ<¾‡ìºÈgËH¬Í°×¢&€ï$3t÷'¹JȼòʺJúhë²)÷ˆ-ûö®Çë¢_ù€A\ÆTçÄ|×>Eì îw»§µHHO;øà•ÚºÕQ&R¿Úý;,Ö7ßD[ѯ•‡Õyåàˆ_ù Þˆœ/öNæ˜ 6= …t<" [SàÔªÇW=7øÕ‘±!ÿÅ¿‹')†‹6sÁ;êøè¬ T´{´onŽAž!vË8ÎL©ˆ»â¾>â1û¾8m·»LDÛ?øî s|ê^¥¯£‡äÚcæÓhÓfÑŠ}‘aµcÛ 6”K«rsÛVÐ… 7£¿˜¿£Ø‘| Ü/ë—6¦¾ÙPøûjFg¯ÚÝÃWgÎLÌÇÑ›*wJnýèm’Œá¢%¨ÒƒÕÉî‰BfBd_d$;ÃiÍúpP@Í¥C[)y¡hUÝhNw SƒÞ»”8ÍëemI.p²ö É pӯݳNÚâÑ›L©)»ËÜáŸáÃh%p•(C½gß檩™®TfjJùljö°å®LAö>ëÆSgž*±Ï•ûô—0V†£íY~t–¬ƒŠ¿"¯zKc€QBœŽ‹eÖ‡;2]jÍ)Dý|¨ËÌ¢Õs„WᙡÎ g ú'>*>˜™f^º£ ‹6ÄŸc1gºþÚgÄÊêö˜å;=„Jï0ÇÛ?xþÜy¶é°5+ÄͼýtÇ=Ê^â-u±HûÉéÁÑÙór@ÅÚnîÊ<“0vâ~ÊOâwôép€¥Q]øPôé ,裇Õt™Z)³¿¾Õ(%—usj„i3’d©ê:žæ ¼²wNŒ"^=1A‡¸¹É…ͧ]PdÔæG³Q”y*¹ƒía¬ þBÇ>̆¦826ÙjÝGp‘H!Öö8C#×ZÒ”%]çæò?Ç©wÕ&aáYó]ÃÛþ…|ocîëL=¦FÖ>Åb²ˆyE5qaS’=lr¥äŠBÝu (çÚØ%½fÃmM;¦‰¼Ìe€ì^|'µâvHtP¨½¬c“»t€ÔS¹ü¦Ð?>Œ¯©Ø»¯'³a²Âöë‚$ÂüÕµ7¾æq˜ð³ƒ É¥µÛÆÓ,j×äçT¾´á™á]š Í›—}éé…ðžq®1cz1ÆÔʦôfHC³ ¨f:ËðzL Ü zbµÏê@MÏíãM"t«IöË,™ iÊ;\]…Ò¦ ¢ôJ¡\—ñ€ã¿&‰!p2Q«VôÜn9Î$À<¡)±ÖsPFR•;H@óÀ:mØ<]óàX+ÑK‡éôš–s˜Œ š™„{ˆ”®Ö†œ™ÊÓéb˜ÉŠ~ãnqÝÛ?¬¿ñ°á‰7»Ã«øºëÒ&[÷¿Òàƒr¤™£jÔ¾«žwgƒ^HÑ›æ9°ktþÌ(ùÒ„P"¢³žf—i/†×¸ŸÇp„)´†A~mugpøzk©¨a{O‡ì71¶"§bxù%†–‹–ß”¨|Á5­ÀÔ•Wxw5ÞT\Pw6FG^r¥Ð7`ã¦í¡î‡É9í ETæc¯%—ž‰-¤„ªÏP²di܇[“$ŒG,J\X§u晥;•$X0ã­Öˆ!qa啦…›$)‘*…‰Må¨!4¹ýV_¹1âþt&CÌ}eå)_Â()´b0 ”G7† ³À½Å[¶q‘dÉ„µL«5çV×IƒT>:îÂúsl0wrï°½{Ú=zs| 6 ¾bQ²¿‰?òòÝZ_Üþö+?ÙEa)ù=Zg¼l`NÛëNm ­ÿ½$ÀÚ&aòëƶvŽŠ;Í™ý TÚ/.¦öf (Ql{o Žñ‹ánæÊM2”IÐI*r½ Ôoy çüñʶCÄmq°gô7'£ÍrÞ²¡ºu¥4ËA%ä|3Ävø1ŠIØv+ÿqœÂ³`˜ªõ½ùzÛþÒï—Š y‘±)$†°U[6ø•\mzØØMX²‹ë÷›C¬zì1ÉûîÇ„‚>ß…qŸ³@¹ú¤䜳ï>(±ÏÏØÆR–&Ãz^“ÆMŒ ¾´4e×Ö2á`Ç´H†ç+ùí…ªW,ÝyVU»$Pr£¼ÈçY Ì†mÎn–kØw†iŸ‘Ê!o/5àóL[½ìQ—+Ùj [Vé܇Gm½®Ôy~­"BÜJϺh³³4lÐ6—/ÙȽ‡uû.G¡¤E9%ð˜˜)Q¥Ê¡³í_6ìërçIm×4ZX:M)ÔO¶#‰ô<"Óáx‚ÏpôeŽ™X?Ï cQ²(~ª,¸"ã4éqÐ-nƒó{ìCBÅ×½Ä_x«vj¦ð}à™Â‚£0þªƒîËãCŠ·ù¶®À\ù+ Æ£½ö¡2“ïÛ™ðeÞð+ŽÞ©²Å c•œ[é¸A™Éï cOɸeèËéäMƒŠ_rÁ›²/Ñ* ¬ÐÜ‚)Jv¼kÅ–¢ôq²{ g–ëÕîé·µ:Š;óq0”)N§]P(º¬C™Ž¬ä©ž¦k U§nw"|wèЮ@½ŽÅœõõõ§Ïg’ôN EèwÑ{cü8rEÒÍ´VzVJDx/Új¾ttÞíÊ)ˆªù4é’øcÎœþèDJ­)!;L ±Ù¤PróS+?À).K©ßôä3/Ž5Yïã´iÁ¶1vn<\B1hïÂYã­ v@úñd–E˜B…ºD:Rya&Œ%¾jGvŠ«¯5Ñ®á#Z™ð;&~n(ŒàhïUW¨çÑ,áú|ãñ§*†ÎbŠ¹q\JÀã3*Ë?¬ðêËѽ¡ìx•À„ÿV[|îáIÐ N¼ú®Ã¢Èw·û]›$îÞË݃£Z(¹aÝH¤›‰´¤õ9,«Ì´¢ðÕº°ä»ºHô™ ᲡԪ-9 ™Ãוc9 ]:Žd÷T•Ï•2Pˆ›ÐÒ$j-¹õàÜŠ°à²hG ìåÆ=P¨pÌç*O™†/&錺خUÌ( ëZ#” <7°‡4bILUwhE(Œ¥}w^á=?x!kgÅVx!TÌ,PŽ"c¢m ¹Š'ŒÝªw¬2DÃUã—Z(ŠïËúº¡$]+¢¹ìP’b f%Ñ­¥ì‹¶´è~]«Xë'V–-UfÚŠ —«>4°ŠG³¿c¿ i³ö‹-Ðz}©Ù˜³^4«»{M*ÕXÚt:L„ž¶ኽÁ›w>‰)Ù ½§„¼á”~ÕwC)Ô%ày¹ž²´Qè¡Ã½Ayf…îØËãQà|Á„ð T)4³ÔJyIEà\Š+4¯i&Ï™ÂÆÝ"Ñ9<|Ñ÷Òe1LStácíø‹YLy‚| ™¨šÌŒ ¬UÄ>Дªð º0¬·’S®LëºUüI÷ÆÆf¿)ä¬-A§RwD¹É$DcEöp×Ú\òÀWIèsåóÒ¹{ÍÑ á{Næ|Æ  ¨#5’óŽ'³ê'g²Фv{´ÙKOÔ,‚˜’„ìbJÎ@ï:¬8ÆúX¦á`FË xÒX–¦† eA)˜},‹ÊwJËHΙ«§•èàˆX®´”²JÒ4ã LÔÔ‰ªA‰A@`òªH5gNŒ :L;¸ .Ôi’ oiˆgy’Ƙ° ôÜGcßp†+&Jv½m­z[%©Ø_û™Y6Wëº!Çó`Š"¢^%EÝHeZÄåÅ)wvÂ(¬M^·Vž]€°5Q¥ÑrÝ¢2Ξ¢Ç¿5q‘sÂ~ª#;­»®ò¦’eíWž$„ ‹2`¹);’&.!Ý]zˆ³[LÊà4Ÿõ/ ÜC4ÐvOwÏÚpz.È×Ïyr9Èaò0‰! mÄe¥b®iÖÒ™”hë($ø,—"'—Jì i¸ˆ»¬˜E8ŒOˆåq€ª/´Ó€"Y. òˆbÒŠëz±§±\¨ °³l6FÄO+&j+g§ìD4ÓlmªèOõ(ÖùðøQòÛ¯NÎ:æ­òwÑ–zß:(¯â÷^äè˜ðWìÐ~£öëÜGÙ•Ø6hc+%XÞNðª{ÛT`³@†ª èùñó+‹™¢?¶~?O Ûëž(€a1Ì+4*Žï”üÁÖê|ÎˈÀÕí§Æ-512+R ˆ„|…T|b~ˆiEóC)g…׊n…Q<Ü_<>6jP\&;nÚñà¹(;ô,^?2çÞnÔJOÃ1fªàgiÂ~½ñÁêØgVœ‘ûä,¬geÜ>Ó§^tU^i³Q¡÷9ÒªëNµ$ÀÕ «;\ðèrÕ¶á%mÄKÛŠ«Œ/¶ÝØd}â?HñKYãJ#™g㳦Uaà 4žZ…´Wiûª²žUšƒÔŸ1oC_ݬÔ~;dUíiÝFú XÌý5œï@ Ï~‘µo΂ÞTT§·x÷SñP¿oìX|¥ê¥o¼—´m>Tc[;Ö©ñ´Íèùa¦ˆ'ÀrÝ;¨ð!(y+)[d#ú™ #/Îc+Ë)ti¸.ØlêDºúŽá+{ÑÆD_Bã9·AÈ›L§TZ`ž2Hz³‹ ®ß£ÛˆB+ảM¤–•©ê‰ë˜Ï­S€ñ6²ì9;ˆBí ¢â†VIò™SªÊƒý’^O+uH¤ùšdsóˆ0$ÎÚm“Z8ĪMû ôá•‘n ë‘ÈluTÇpU­q<eMcÕ5æÖó“Ó<„®iOÑù2Ï›ÜâÍmLÒBêÙñÙî¡R98­Ù¸šŠK´ge–õÒ Uá<µõ"Ö€SjÔš½è¾ÍGÞâ¸C’¢†„Ò=Ç}B†Y“sZa™•´ÓT–\¡D—%Eãvñå"®¿oDïÍw{ǯ^ívKOPåhSá÷’òXÝ *á&Äã_Ø´yÖÁ¸r¼}F7o—ÅCìD*à@Cn7¹© :)Žƒ”>†}nH-Ù&x—’“f@g,7‡WiaÅÀa‘ú<¤Ûw†ªá`u÷κ¯œ™§ú÷ô ŒpP[¥ô­êaDú-ÝBs«E,F_ܙˋ ùHèVêtŸî¾h,°á{Lp+Ÿtߟî»6Æ ˜Œ¤=üU˜!à/>žMáJÀ`Ëì-"' ‘Á§TûÏIY[±öÏlcã)Á“»aqd'}VW¬Z•c+Ìr½Úý+QçîÉËÑ‹‚Í.Ävñ‚{³Ö“¾¿@\™zÐúT+W¦á+þ¯0'!FH/ ƨäk«<"r 'ºE|äãÇõͦþ_êÛCJ0}yá ,ývI› ùËFᨬédNš^[”u´}:#a€ "—(-OØÁé¶N²Min„òY]°ÖWÄõ”éçËVX+pšæ*uÀ NÏ̉^ÂWá*!%;‚W ±á+¦Ì/¥ÿa–ø³öþ¼ØãJ‰=p@åX6Ò ¿ù6}V±Kî ¼Õï©ÈÇEÀÚk dUvߊ£ÇÜ œ:Çd™Š6ÎŽ»Ðc÷õaÝ6Þ`?‚[A ¡Yiõ NÓ^c†ÉuÛ#<<ù,ÿ[¾=á¬ìè_ÛÙ3auA©’²¥5·[^¡õóv—›Å*1$J‰¾9y¯Ë¸–…p®Øš]CÉÎ(UÛºŽᔲLÂE+ŽR¥›˜ÍcŽ^âªö¤€ZÝ€~OÈ"ÒÒÓ ©Ýå”ր›¢|@ËJÿŠò>,WáÌêð)t±es ݵûÅMhQîíX›ò ÌFíÆÆVÓ•àï¿-Nún˜VžDFœD½×„OåÃ9ê"^©¨£ªÉØ!#Õ*fhOçk˜÷îé] T~WÏi ­²úF§}sº^µ¨Ž7d¦¬ G¬yÞW«²Šg-ê$S];Š"4ˆÉ¹@°WT­ÃÆÛµë¾wKŽLb8ŠSë@ý"ú ãÀF„ĺ~ Ü›ŒÖ—4ÜËìæ%üM¿ç>AÿøÙßë‰8Šm“Ü­YŒ•’bjrâ~QEõº„D(Ö“³Óú/jQ¸KøæR>À>ñÁýÓú¥zÈîþ_ø,<³ñô²×¥QÔŒxµ½mXr±ÝÓo»ÏκGÇÊIð ¦îò0óâ_ —_ÜQÕUº(wv¡¿:vÚ”6=éÌ.ÇRñ‚}ôïÝ£I‚TSÈxkJÒþùÅÆ þÅâ/õI \+™Hõ'Á5—.q‡xýÝé”ö¤rc–رÑ?7ð'>ËÇGGcU% ËŸùH´¨@®µ[¡ÈXÞêëc]—‡bˆ`1'‰z(Þ¦Ä3Òs5[ªñí Z¼öב°¡"—²ú )#{ìw_¢ãi˜ÇƒnÜÿe–N°Dr¬RÀàû)œWœÉNTçßðOéùºúr*3d¹s y#ÊÇJ IsæTÒž‰јÌ2ÏVÁý -cÛýD“#]Ä”&Hÿ†I³sð¶q7ʣ،53=xÕ4v„Õ¦£±b6Îùç—³äýÔ:V”0GŠÕÇÞiÞ}v bÛîé‹õµ×*œÌ+!Ä4S%y¯=QŸŽQå¤7>ƒv%ß›½=¹q„©7ñ ŠßØå¬6ð5,ÿ+·Á5Yð+ “Ý×íj4fíö’s ¡@(¼1…2âIɨʟ´¢*ÀúMõ •Bþ¤|ÈnýKŠEŠwJ&`Škå•®æŠ3·Ý™ç¾rMªžD=ê"¡Q±›ÅGP ¦+‰7Ñp\k‰Û†KIp‹ªû³ÁHÜb= „cj‘Þz³i¨)âFÆ1wOFCa»Šï6fÁY{^ªãi"t8z»1ÜÇžÞØú~å3äH1$Ëx(1Ù’@æÅáQ§•nÙ°x;ž¬Sm F6ôšs1àPæý »†sïo);qÂô~b™-å“G}<ÁÇ—ÂsRÑ?Xø2×ï&p•îqIÑ•êÒp2œZNÜ€ß@[MãEiJFïŠXЛ£™hÓ¹rÛòÉ{xŽÇ“-5%îz ‰ XÂçÝñÍ$ºØŸ(h¦wìR`@`rúmßAn%š3»L3UY…7Ž%×:%;D¤ÿeâk‰Ö?‘Õ§ÃB¥[ˆÙyÆPô“„H\%»`ú×… é€ê{AP+ÆÂ*Íò±%*@Pé¸Yêmî½>Pª@˜ $î, Û¶­Þbýñ‹ól‡>,õôtG¿û·h3zŸ~£„G´VÜGwjÀäAvžz^XÇgðQi¬Fúž¾¾$$½Pk‚ã9LJŒK0QË\0TEÇ'7µTAp 3´I¢#=›pR-G/Á± ïü?e¥€ŒJ×Ö3袨ô[®pžþY3!fs–SçiÿÿgïßÛÛ¶®¼axþ½ù)`e’6EKò!©»MÑ6‰ÒTì4̓"! 1 ²iYíx>û»Nû€¢l7Ní+±%û¼÷Úëø[Ï_†pæ‡ø®á¨)¬xÅLšQÐwsϬিJUºÚ §zázÚ“ ;#Ó1¾‰³séÍÉÿC¨íZ¾¹ ÔªêÀÏ_uÛ'áé°ý² —3\ÐÝîæ@³›²É<:TÙcСHòËbqOÁ¸5”ÄeØõ‹C‰³;€n¾qvEv_„¡»Úö\5\ß®î¨Ûÿ M2¢bo`r¸ÅO¶ ‰Àò,âô:p+.œTodœ;8=:qbut©ÜÎãl%[róeqZ õÚ-¶·¤9VîC™…§íöÁ ïj#»Z( Ðé·)⥋i™\}‡Lòd*#×Úî>7ûÃSI‚örЮ¡;äç¾UòҬɲü ûuß³ÿýUv€¯0ýk£¨šÿ`Ì@|Æ”w­ ãœÚŽ$!&”»k"þí]w­Âù0 EbYqQü#Û?_ GïÏm$–5Û‰’hq™×ã-Ÿ>~<èûÆ,ŠSIpGkÎÒç'GÎEQôÊXç8ð•Å}—»¦§öü ¾Þ×ö‘)§PGœe:ææyDáØ*a½‹’)ú> ª,ë[ƒ˜\,<5 6Ù>ðúÍ¡¡_yÜõcô$aÖˆ­šãh¢5#%ñûe#Á =°=åÐqÐ 4Ä(?43p¤Ê5犧Àd%¬j-ß뮘{ùê s/Ð3ˆ7Q’ê”Å9'a¨,Ô`ŒVfŸãÁ[ÙçZq©£ËU^œò„ð3è-1u!#3­#1Ö­Ë#Ê\’p£8áö™bT°O´ü6Fè½v­–ºþ~kÚZ ËŠœ:B¦¥äój ªÉó¿,=ö´(ÕÙ¸eüÔÒy D“¾´¤Ü]ŽJUØà²Õ1§HŽ¹ÅÄbmüme´Ùª»oNº‘Ü‚–ŠNéÊåØG/º]°i‡:!EŽMw0Tï쨬õ¡ÀFÖ´"Zx®K憉•?a°×å¿í”Ž¤Z1/C¢wSþÍ7¥m¡ÖªQóé½Ó™]ÎËDÍE9Göÿ:#³Ê¤s·á/;6lÏÍ~èš„Tø’ûpý¥8[nê¸àÖÑ{RÛtó³qëÝ7½‘5¬ rnO]ÉŒ7h6á—åÜÄ;¬Š,”>2ôö[ü¦mþ¡*jәľäZ·´œSîõ·±à²&+о.«²Ã”„fº‹|CÒÚ ‚&mª]VPÏV:ìC!_”¡oüìP¦ŽˆR)F¹µ ´)^–ÂóEx÷pò1Z€ÏdW©[F ÔÌÜÜ&fOªÒ¡ÉãÞ1ãµöF¢ögžåÞ.â‡õ¦'ŒR9ÎDÝÔ¥bÜ´Fµã„u^!‘4HKqD·É,”«œo¢4à,¡XUËNe‡GýdpÜ _[¡]e™íÒP@›÷¹·£î‘å=#Uä.¼˜¼½²GÈÊM&Ú‹ j%  ©š±2€šÀtÌW™ôÜíHâføb2G‘œñ°ª'¡]ÍÞ+øÞbT,·iO|@Må¯À²†Î0ÉžÀ;-\ Ç ³%þê,„w0T7ù®af0„ZIQg»rªŸpÈ$êÝʶ O`ºþ‹Õþ¯­Ëœi®qZÿ1ûÌ< \‘D}Â4¼ÀÒSñ9_âUjòÊQäڃ™¤÷­d©âD *­mn;Huôª¸_¢TeÙBô)Î ·˜’)P}ìá`zKLÁ’ŽKOay…ɵ'X(ß>K0ìÅ~Í]iëˆWÛvrôVœB‹Ê—ø&¯D9¶|¹ùþc2,¦ö…ë¤éu"´_\ÂÔÁ÷²4)¹`±Á,àT‘–ÀtïžåVÆÓ½mªw½;èHd‘}¸“8a:çĤ#k_aizÿƒþÀO#¼Ê"†6¶úø‘ÝÒ*”ä/Øû„XõÔ¸¾àãÖ5Ä'¾ôú«RÁ àP<‹ åpš¼Ñ±ƒW¦< Êô)i©ËMÖÑt6GCTœ¡’ÔGÄh¼ÖŽFðWÙ]„v̳f±*°Íöʳßܱ±¸º†½¡)}¦×X{^ùÂÒŠeÎÍ/Þ9r¨–ø-6-WEÀÌg* paœªÈùÅ*a½:ŸF®f•(H:ô–°Ub÷t=Æz"ÎxD" xÿ¯(±$¬&Æ_•§ ù®ø¥ðæ¢lJ’€cë9æÖŽãÊÍ^*¡ì(zË>Þ°5¬%Èg¼mCcµ*;ª2LªTÀà/ÅÄ¡Òü2YÒñNUÖÀ1À çcáú6gœUjY#a/«p÷uUÝÕÈ­êCa……®àÝ«Wú³lÅåëâ­ßºO­%ä‹?°ý ïXÙÎ)ìË^ÿ¥í,È’‰¡;^’r£¢f+)uÂØK•aŠÒÅ~¤êÿ¶êû TöÕ:x+t^áÂÙ”×C‡c[z—´'æP§D¸´iœV|mßm{ß·µ¦gSK.=¿¤ü“vÁ÷@¶Ö%ú62¹á^ßÃÞ4öƒKלjŒaU6ÊeÓ°h ì$³\UÔÊQúši1F¨€Ìó5…£ß'ƒJ—A“&Ï­üý1‡t«€/Q‡‚÷M× `$>'›RÄã~w¸o•¹á P–xÅ*©v½ç¼mï›üìZñî¢zÉõƒ÷Áxå¥:Ò•$éM•üàUâeYƒnØבêU–¦J}MæÇ:¨O d±>£ÉnúFùú´71±“VÆ×D¤ 6¢ªlI‹¢j”jߦ±ä\ª4hì‹`>ÄsœÅ¢=›h÷ͨ䯘¸³¥«"¯ªìbE–8ÂØ2´Z¶«ÃÕt­µÑƒ„r‚B#«EÃT5Œ!Ò‘×I”LW·¼H*ò#x¼MÝ]úÍ"-}(eµ-!b]9Y—¦óÅ~©n…/,˜151gÇìz¼Yêuº€p×á2.O­> ¥ˆ Ùë“l Ô#=ä7î¾bœS•+9 ÷Ò7EA\ÄœÑ[áïvØ8†nço™v›oX®øFüÒüÍÓàìçAÜ96¤jg,:Ã*FÁ?dž×} Tèc Ïv‚H !³˜‘´BM;Gɪ­º'öUMÂR¹¦#%áФ:ó|Ýôë[/à °*Löm ØX_oÑè‡09 ‚-3ä4pšv¯ÿâØÁIÉæWzï)?ƒjä% _c-‡+Q2bU©2J‘Þ@„è¨äÖ$#gÀ«ÞN±‰cAøkÌÞ¶ÔäKÁç8š#o˜£?H\¹ÈUDàRÞ6’¸»èú6žg(­¥VðÀ.‰)M` 3ùð®R$ÝuO³ÊgÀÑ7ŽlC.ÚÂYó¾û&ö^öŸ[9L²R,ÎÏy`/÷[ÅCQ …ŒÈ¤ÿÓ7š Øt¸L«…[1AÑY%V²+ÕgýžOÍ”~ætÉw/_Ï”ƒ#ìÉFÉZ;8× {ZL²â»A©Ì´ÖÄM0BbÓ©ÛÞpÊ~X;ek˜ÀÊùNìfY}ƒÉ*Guz£v³°e5ñöÏL`ÓnŸÄ³ª¹HÕ1 Mâ_/ΈUŸ¡ó!ê £@!×Sª`ïÄÛvéRHÍ^ ‹ºzõl{UDâ“Õ5*l¬–Ü@¹† å½²ï %y–A´ ”Ë>³ŽQ€ 3µ zÇÆV,iå)Gø §«Y~­²|·…Í…¥E>:…ï&@j´s)ÐZëЫ²fAëe¶ˆ[#þ~”?JØç‹'É;Ú%–sªe߀bþ üüRœ-KÔeic¾’wÎç!Æ+qGƒc“L‚ºˆîÿ([cƒ_³ X ðJ¡ò^o}L™hÐ78¯–¡÷²s_%|ä¼)Y2{$RJc¾œQlXƒ\+dÀö†_ü@<ûÄùkbdÂŽøÙ?b³‡hAHu ½2öœµa’°õÑÐké‹\£%µ•Ž®ÀÄD:ÞI´Æ0½É”êS_g±+^êâÀÚŠZ¥Ùk…ø;çÄw«”P‚•ÒÛäþÆ´¤Š*Ò9ÐvÊÍCM£f“@/ÎÔÁÇ|ö62¡"]óLŽH…Äã…<¸MØTµ°ÑUt~~NòÏm‹Ó4ù~n„¸, žÁ•zŠ×ÑE¼Ü4ÅÄfi$îóHܱ²ñ}óÉ­VÈFdÑÌqtu‚—imþg’ýÝzt/x´³ã9#ßYz,þÛò“U%œÐi¶, ²8b ”É\å/±P^Wýò­xÒ|k¹ÙÔeC;1Ê{áX6Ÿp6l‰qß›V`³ÓI¶«2´)A”·OؤqûðÂÂ~ªòk«­Û®ÞÂÒªÜñöb'ð–^ƒˆWê–ô$X“¿w¦?>v‹®ÄŸ`¤…—N-¶¼.œŠ- ”C‘Š¶V7?iÝP¨Öm!(!ýÎiØw?,^ŽnŠÜìÚWd¨JÂwÊâbܯ+nò®ØKCâƒP`µÓÿ=—Âbã¶öL{I4¼à-’X̱x³VÄõÕ,@¶$ÉXgBWÜŠë–sLX”£3ùùµsÂlX&ánð"$$`1•{¨YØÕB«dq•¶–,°ßGõšbÕtž,5¸Ö û'Æ»Tì­-ê‡&››'+Ê{ÁÝÀðvÏ·ÄÜ/Š}ûÌ]ž†ª¡dÑŒMƒåFëXe©­¸ŠÅ}UV´rD~aÕ@éV—˜Ïç:•˜½*÷›ÿµ;#nÂ"!b5›K~&±añ-n•Ó- Ťœ„ÄÐ9q! .\í:ÓŠŸF!¼ÄFâ”ÙTñº ÷î±ÈgYŠºÈcÎ+~D:Í;^“¢[ÃHº$Þ®Õj‘ÒÃþ¬ê·^\4bŒ®í£ÞËvƒHº LOÃm‹\äüŠ^¾²,¬•éQò¼UËÚKŽ AqîЈn]~ö,ØÛ© 5¹IvA²5PaéÖ&/Þâi°Xòè"JR^¦[¤È©¿ÑÏØ ,¸7狺Rš³‹,"?húa5Å“`JfaçÅŽì°Z#HÝ€N7¨Û>:Ž‚ç]ÑÑñO݃àÅàø(½êÂÝnpØ÷?ÓÍ»Ç)ñŠÝž]+ryöœÙ²­d>hZ‰õ8¼&Éó_«˜y™ Χhþ¦~C .Vò«±(€§r‚:4‚áõâÕ´ô`^iH3ÏæYC “/†w©[Ž§2Fp,ù%Ê|è*ݤ[·HUrNÛ$DºÜ=‚ªÚ‡K#ê.E[É]€»GÇ€Ÿ3gæÚŸTf ¢?:H—@UíRðÔ” \ÂL¯Br+©èÃMå‹S·&)Ÿ•œíiIr¶B–akT²äí¼mddÉÒËÖÜ EiyWœ÷›"¶úÐh… wHÜNeµ½®Õ*뵕½¸0ÇLžƒàfE-ì£î+^*µŽƒ„`\Ü| ’M÷p©‰îýÇš?ãíïZ[{÷gÑøäšEküŸûÏüyüø!þ»ûÝ£û_ø³÷èуÿ±»÷àჽÇvwöþcgw_ÿñ¯ô‡³£ÿýùÃWbg¾¸Î«d÷ßßÄ¿ÿ¼á}ûO­àù<¾œ5ƒöˆ2üzä ËÝRõqÊüawþzˆj®7q6d‹y)4Ì¿‚Ÿç´µ³wœV‰.ÃW½!ðÅ@…zíÃ~>ÿÔ;€»°=„_›ÁëÞèUÐ~><><uúÇÈ ÚýÑÏp¼NŒ IÏÝàxôŽN{Ýl±ÿ3†``…íQðóñé 8~ݽáªå“8›%¹RR _ ½¿ |ñ$!6%ŠX\31§¼sÑ ËR¾Øô:X¬24È7uþ.¡Å»ø…d¬¼HbtœŽ)“LDZšð­-¯("T­xç"Ú.A…ÌQ‡Äð $h0[zO†5ês+Û°ºÉ;6u“W­±n‡ÓÑ¡]a°4¦î±Þ\3µ¯äû`k‘%ï€-»¢þغܲÞþ/'ɼuùL‡ìÇl²Â…áËþi' 9@T•šÌs,óU yʬWHÊ`|÷³øB>ñÓ¦i °£vçxèAƒ½î~†aÃýô䞟tð©JwÖ?îÿt|Øõ»áË“0³§ý„šöÈY,Æ¡ Þ¬ÊÆq±Èò_J+ûuߨíwlì2ñÿ€WÉò˜ùø¼¼-ç7º¢|¦rós‚ä@}PWŸºå0ó 1b_£ÙÝ2»šøvûv­gæ·uû¯$ã¬&’¯Ý±“U~yMç\'UrÓtÆŠÝ°8“¹˜´‡ö0¿¡ñ”æU"çÐÒE`Ѳ̣ èi8Ocœ¾¼E˘0Œ¹Äš £Òãï·' nj¾:kádõ°™/ÊçVH©¸øû™¢‰PYÙ²gpP[SèÀ^³ž †óoyV6÷û·üþáÍß«¤sa8_þdô˜óe5 SýÃb|ö ][.A‚ ¢ÇŒÖÃøùœ‰‹ËeCáì,&ÇŒÜ â8ý{lúç÷±¬Ÿ…mHD@H™ÎÏ¢iÞhbïêÔ %6„²~‡ž»ØEõÜ_É-WcrËÕ˜<¼å÷nùýã[~ÿÝfßG“ÉMûþ…•5[{6§¥p²bÌJÁ‘òÐt¢=§Ë]1d=Ù-QC›BkGN{£ g7†¶K ]2¶¯$!‚©Jö Bx³ãGîn½‚4÷´¾&mž[dÞ1Ø–‘R0aôÐÆ%‡Kʼ<‰×šº(Úq¨øn3˜ìÐ~œì2” G=GËdûkVÕÔ ‹[ß‚{ü¯@оÙyÿ°ùu¾ØjìÛQ•âVEÆ"âÿ90Y7¿2 ¦@K¿Æ›êj`eô jhQÒ-Gaá}ðñE~|ÑG_ôñ­Š¢N¯içRfªb_Ç®ŸŒÝÞäãçvòñs;ùø¹|üÜN|Ñï6(ê—…»½ò, „/°bìgFt “±Ø‰Ag}G¸"´–âÌýŠù†ÃöžÞXõÙƒ†—¹AÄÐa{Øñs6t¢Ô1˜J¼ùðjØ ¶ü-F' £VP>U\cIþØÒ¾n”ž›5§¤¢¦ƒÍ¦öàÁfŸ=Üì³ÍFyðx³Ï¾kø¶°Ò-öÁN×^`+ØU/àê —ùèU¯ÿcØiHóR¹Q¾´ ì=™^[]ø`pÃOÖݬÎÝJLŠŸI¤B<Ý¿I(myõXö ÈöÛkß>,¼Ýÿ4y­º­ÉÚ~NÖösòpíÛGkß>^ûö»ÂÛ QjßP­³Æw'úÜ«è°(£n]R;YûÜÖ¥Ýv¿4#x຾éÃë y_ž芆w ü»B6ÒrÛ*M4­glxlIF¨”z­F©Úˆ]EkrKc÷ öØ¡w‘Ää²™³TÇKB¨y¾Š?2šÇb…¿ J[‰zgƒiA±,<ìýØʼn1*ßää=VÎÊõÚ?Ætãþ¨ûfä̃öàu¯ï&ñ@âÃ7ˆr;ì÷CD¦A‹×Ý ½ßÝy¼Rølw'|ŒQ‚ ¯ûtß_¡]6~¿äžF·l}WøFïî¥âSX"0c _œœ†Ý7£öðÇðùéK¿Þó8}çÔé)®© w¦Uö²n*î ‹8le®Ï”ÊŒ$c`âm`ÌGÆa­ç³˜Y/;ã½,8Žà<­GÙE3/ß/huŒ-ƒñÂ=r|$¢@McHnk‹úˆzŠVÑZ<=!ƒÔyÈããÀúÝó´Á10MñbhÜÖS4(04ã 19zJ(÷Ád5›]ï[ŒCì¯ÞÆõNFͽ‡‰ªt6á4§ÆÉPâœKYz<À´R–G„háñ Ê®@hÏãx†Óþ¨—¾ÖítzH28¢Å=ê ƒÃ$]½‡:–°Ð*Ñ„¨M`Ù0åDÁwЭù–Þ½ÖFÀ³ïdlXs|,¦õõ<{Qˆ6Ô¬.‚:á¾+(@(Äï)Q%lh ×m F£ãÈ 7?ÍÅý÷ß??lmH6m}À*érد1@š,߆ú† fó©J|•I¼0(»e&^×.'Ž'ŒòQ"tÒ4¬C1YnOg¢víZk²ÃX£òK\eÄã<_ÙœDÿ·hªÓ¿Ô·Îóåø*øzg+xl=mÁáûFJ;Ì´›;ϯG(Ñ×ç1Ì;?*bU|ÈGÈì¹oˆaZö†‹l=´Öóœ"“Ÿ4\”Î2°!ªIC½œOþhRllHÈ+×¼jî¦=w0{…É3¸l·^¬Ùûqží’’Sæ•Šì¥ãn~ÜûÃa78zÓZ¾ ZÑÛ|IÍykMÏ|Ì þðiPç¾ þ§þ¢‹3NZ÷düðC²VðßÕ9çë2PØ)Úà²û›ôx:±{¬g¸¤ËŠz^DwnT8ŽSôJ”½jíboÿYèznÙ†[lss³|ãRÆ ênH‰jË6‡KaB‘dd!oâÕ‹¾ÂH6Ž ”6RR“ÜDÌo*ABÖct ‹KŠ·*Ñ}Q›ìd]°b‰‹q™¡Ãyœ¤ =Vw“æ°ñÔ™õocºÄŸŸöG½~xÚï8’ž}³÷<‚Ø®..(ÆG6HÆ—ÐôWÐ \ÎèõÁAWÅë8—(Óùrö /g¿¯° ~zQZ·åöÕIÂDKÌ¢‘b+:ó+ûlTM±*šs)èÓñ­Ç¾Þ¸¼-±Ng_^}k“IQÜðDYt/ã)B¾:iye^Sþ32› / ü/]”xe34-Ò3“æ.œé AZH(¾ª*xÄÿ6[ÀŸ{ fe‘ N$çZõ)s©Ódf¾É aê 舯ƒÝãa¼„>h¾.šÂNÌ9?ç”c@èãyÑbãO2º ÁÎÎ%ß#«|.¢ì,º@§¡J–­õëÅy%;Ñ1ü04šKJ&n¬ìÛ_+؆°+ì9”‘žuºÎ³ÓÑð¡§6³ÞÝ:oBÌ#h= ÃN'É=h=é¾>üs‹ZÏ£îÑоž¯€V |±Ù;4À9ùÞ™>Fˆ&°æb{ÛÔÑšAFl1_PAïŽwÐ`ä‚7²‘UƒóœL1©û ÎZ%^˜“`Wbñëß´,¹qm=jÙ:‡Ý6:X°jˆxg8-£šÂu/ºÔÄ9\ËçŽÆ$Ž-XhÙIýø-ð:L?8Þ_c€å.Œ£Ü$æŠ@-è ‘2[ªDK5ã ¿ù—ðÿÕþß‹q’zæ<ÇŸ× |½ÿ÷îî£G=ÿï=øï‹ÿ÷?Ãÿû‹'÷Onß“Û(îË=¹…xŸtag’sž{oðrÄBYVsØs<ÈPBkÈ!ôˆ¹Š'X“ ‰&É-v†½±.ƒ0{ñ#àníÇf`M$œrŠ".5"-ÅI‹¦´FÜÙ¶öY2M–(«.¯0¾žƒ¨çË9¹YìšZOl}+Å÷ù“×éyrqF—“Êq¬/f3z{tä>ÿ!βT\â•™ëèçð¨ý²× v¿;tžÎ/¿z¸wh£ž¶qN²ùXEú~7®FøÃïà&}‘Åö4ÄÏ9‰øÍ…KšÇÆ#¸oÎÆX,$[ €((¥9Qçó?wǴÙŠ¦†§4ìK>*t…ûа`’Íô` ßŽ(ñPÉL5Aü~~ça³öIÆ»0D4Ù0ü§M½=Bh¦wö¢èý ¥ !‹×„A›èWݬ¯¤eR[sè¥ÎžQ‘ô£B#ô€tug¥•º]G¡pÕ0¼à^P½ÇøXç%uÞþ‚Û§ïj^@v·]wd³~7žÍ2^“#ÄlÙ6Üa˜ÜˆæVEÙb9¶¼a+ûv¥˜š”#'úÖÏÙ¶bm0B`w[F <©)cœyAæ꺇qí„eŠ'fDá¼&—:¯‰~–‚üoû–H°°AšÄù8]YàI)§®À`µ˜pB¸ò昻 f8 «Òxæ\dñx•åèÞ‰v½»²ùÛ8m±>å’sr¼:Ô/e'SûðìÒ$j.‘¯ÌßÜWjXx4¹¤ˆ…>Â'îªÕÕµ£±1˾o¸F\=Ñå½ÝÂþ«‰5¯“|2÷€ÃÕ† {y7ËL‹zó4J2š>òqïZ]Çݨãžþ[Óµ6¡E–÷žêÎ(É9£H|6eGòEâ¹Ëñ‚i žwÃ+° WŸxßU»— µX¸ôS9§RSR=ª©£ášXåàF[f “'Á?ûöc³þø–»g`­„îp8]ÛYsŸñiW ’‹Å”`—0 ¼×‹$ |O,L.¿í;^ãâe⩺zTNyÝzo@«@˜QZŠ 娘Û9Íåu·îo†íg³Ù ­Ñ¨kVç½ÉKXà,Ä£ÒC‘xµ`þ'ÃËÕaPõgüMÅv¥›ª¾b ›¨Šº§Öuéÿ¢ÿý·Àÿ(Vó‡í=ØÁ«øj/—Û'@ÉЋâ ~Oç 2ÐuPe—^7ƒÃÖÉÕó"b?BPÒ¢’  a–‚¸eÀÞ+ë‰í¸, n„Ï S™3ÿyÔW†"^}ÑdÂômzÖ*ƒ.wCš¥fŸž ä`Ó8´RZÓÒ£\Zz¾ÔÁtåFì-µ]!RLäÅav¾¨H!=Z¾a°Rpáï{l|™‰íŽú¶s7T7¡<œšpøçpt>ÇC¨ïS’"Ü ×° ÅÏ‚DoøQ¨|”A IúqÉž–:‡@”×qߊ‚1y‹ ‘/}I71lWêK7µëº†ZÑr«‚fX$-jR©eË7íEÐ$ -B1ê+`§Bç%çg‰Ù8uba½×îV¤žÖ<Ãm[˜o:š‚¿ê„gVûžP(ù– ¥t"³â»ÒK¬üS•ïÆ^®h½àL(wfJ+N¶ £XÙÖ]u Ìþ¥héÏæ“ëý¢ªÈ͇[{q‰›Ï ñÔÙYÀDX$U«°€¿Â…÷Ëôì×}Ï‘Öd± f‹«ÖØËÓ‹_m7oB¿‡^{iÒ„Ë 2_®‡‹ßa¼KisNÅ×ù•¨;…¯Z;ja×:ÛÓ‹ÒV0o#Uá°nÓ¤J_ßyì4ÖuŠeÅìÚWšÞ¼Xî×…õrÒcǬB/Ÿ–*iËÊx£þÜ)TI.õ/i¡B Vè´ &>½ÒÝØ/ïÝ|±aÅJnø»P ø{ûv£X»é0¢öýùjÊ»þÓ6ý§ïöÛmóÿ…»\ÖñnCåØúçìö z£€¤ÏÊw»Q˜° oíú‹*¦Ðåzoøÿh_n¤è$™äËp1V”Ý$½/¯1â6oë™Õò¥ Ùsð»¨%ÖQ€@ööfç¾°k¼9åÍ€\"'¯OviÉG‹ÉùøÞ³“ÈozI­R©ýíCüOoàßàöç—Ϙ±£¨ ˜*Ÿšžmo—åm·1`‡`˜`*iŽMt>ÂÆÌ9§oEÞvŠË§™¢(Äë«èz3(²[_µ«Í‰ÏM:æ;¬c.Õ ¯=8ëÏÇ ™Å#Lpp†hÒ¹6. ipžZ©)/¥Á=‹+ä^#× (Š&”x†^nY2ÕÊÈJÚÜdd†ªªDΓÒtžÁù°²QÎT§¢]«¢W„½†cc¿Ý`ZŠ´¥$£^ÕÅá©H=-‹¹?NûrÌ0{q]^`ÂÍï²}©é¦Ëd3dA¦ñ³"㜠_Œ5ÕÒBÌ{Ir9ÜUpSʼn°£ÔjŸkݾŸìÒº9\lJL"‡“†äÌÅÙ´-ÐÖYñjÎy+%TTÝÂ$£ð¥ˆ ›ä«Åó&\°G©R-¦mÚT3ûa ‰›åðBjãçŸ7¢ŒrÁ‰§BÝ!ºn…03uœž¦šÂc<Õ¼[.¦cZ®Ñ0kdø¥ÔLî¦3v6þHҶ㥪ø•À›<“¶Ù«]4Q­Q®´ çø`ÏËÁ¬ê*òQÔ$U¸®ãloÁîÇÈ$ÞËòÁ {Ðàm+úiþ+ØLØb ¼¯¦M ¬Ò”‚¹"Ê,CyŒÉŠ'+ÉБËî=»¾¢Ø[$Êäb¬¢ù–ü [íã$®`wãþŒÙQ,Þ1Q¯rµ˜Å¶@‘›!·ˆ¿ÊbªÝ„· ¥_É°ÔhI‡r›Ú”ª‰p‘¢É,YÂÐ`/þu…¢×êbzÝÚtûÛ1ÇNĹ5^bŠüxm$VÂçƒðõÂÄ.WÑSš»Ëxº`Ô†tE(II:¥C—±aþ@˜ã) DÏaP+ˆñzéÒ IB ¸vW‚‡Êü”»òNUèÜ›“ŸÁo«Ù"ÀX'4Ô“«vÊüž¬ÖZ@W ¹¨÷àûÇÀ5†4¶=¸f¸uÂ)붔³m „²Ì†V_~K~ÕÈ—Àƒ–‹í×[~k¹…*?k& q:_]\¡ÅéŸEK4úµJ)¢xšJ>$/í¢y]ÅèTnub°Ô’ª’tNÈÀ+\bÕúHäÁͼ älågÙ[æÓ40\ñêóVD§s©”GDMèAUAm„á¦WWaÚYŸNÇðÅñ>}>€–»CIðá;OM“³…Š2íè·æ»˜ÜHª¾šÞ\ÑÔªÃ|¡â¦pžñ«ð •¾~BåéçwûŽå2®VâéAûâœ÷*Ú“'Á5pÙ²*;3!>£{'пú–©{k'ö7%]iúOctc°Ø¶×íA¿¾õ‚PWÉŠžæûæ³B|8éÌ“ û~ööqå—I·\ãŠNtFÔ._¢¤@N· ¦‡WŒ cÚi–199¹,2÷qb²Éy/˜äµ6ÇÉD1¡ýмO²É¸·'·â—‚Šm*<î®ïÂZ²˜¸ˆjU¦þ2M7]¡Û¬ÌÊügÀØüC높ü@Àpœ>–9ä¤1}€smª‡Ö[ÉPòMýä^lì4L’ëÃÿŒ¬¯ë»§e\' ΟƒûÁ^£A¬¼¾lÇÎe›6ƒÂµ‹³ž ÿ¤ v¼uÁÐtûJÊ‘ ÖJ³þN¥´.hYG?ï.ü4Ò¨w®ÙlVØ>$Û0˜ä¼£YÄ }Ü/4°Ã¸Îö‡°x%!†áº&:ë ¥Æ*à´ÚÒ¯„†*Sµ!•gi ü☣ŽÁÖå) …CôòÊ+úB‹…‘ªÔW%GÅœèAæå]’ h•’Ó|ÄMÂr¥Îjvúê2NïÃB‰“ZUã¡ MôI‚}=»P¡ã)¹X<¨0Æ?¾ÜNÄ_™WG]ëQ«Z•"XÊþPZ©R­J]]Þê´¢ÁÛTD°L_¥"Mïz>Š“»š&c=I4^2ã½Êù_²#ä¤%s#z‚#›ço2V.ó$œ0w¹Z´ns{ø!7p\4&Ís¥‚}4Y- 0Bgwù×úîÓ¥zdåGV4ö|9Ó:! Ë-ÅßO þ½Œï«ˆ‰S›šdQ¨¡Û?>êí»´qǾŸwŽO~®çÍ@™¶uåžC·{ai’Éãm¨d>=5!!ª³¹¢¾„ÝÎîÒB —fíYæmÔTuqú–#s¨%‰ŸL.‘r¦è–jˆ¤9°2YB˜À‰f­hfɤ*JC§ɯA2Ÿ­‘$»’Zö”×ÝRŒäpOO#ò\“} Ó‹ÐžÓ[$-ì‘eæ ï˜-Ãï1ÚÔ5%À°ÍZfÖŽÀWÏt-D»øcx"û {×ì/øüžŽ #,6*À y7ÜeÆSÖÙh8N¬­‰j˜îü¿¢OÈ·ÙùÖÙjäÎî“)´Ý®ÑØI³¼±êŒDï1%I²¤²:ÀÀ*,Z7ºŠ¢1I )Êv„:a÷¶(”@AÒÕ@1µþFÂIO\háR<–DÿåûÂœÿ Uê¡“‹öîÝó©´D„©øÊ£æoop$\8á·Ž 1à  Â0BÈLR‰`v Ì*ļvT„£|ü’ ðCã‰8_°7ây}KMå×@i¢sT¾ì_}=]!W]*-šA]GôLçéi»Ça:·Åpˆêé“Ñ ®Ô€\šÇHz›ˆô+P½¾FÕbƒ¨ÙQ ”Ý‚°×pÒd b8b“äM­î¦è1• ,ÍU®Ì<å’˜«íÕy1ç !b±ÈºaO!¼åUÍÔ1j}’œ"FQÈÄ` ÿ1g’½îˆ¡lmR•‰Û„%5ÛÖÝF!Žls”ÇuöLPÛ¡ OAxM+4]iïÏüo*´œÔVyuàÄS }ãz\¦“_÷}ç]ÓÚO7¸½„­õUÞÚ‰'‰ÌjªاŽÙ§þ–_ßR·í–´Ö¬·Ì]7¬ÜX‡ ) R…sA¬¯6ÝMò ÓkfÓÛ}ý‰À~ i÷¼€þaÇí_“Ä}*Aû¿BÀ|²«H^ϺÞ)¼$?[£8vž˜h“Z×±–ãG59±žHÈÅZ¥ìÙRŧfÏX7Hß”y³†µGŸKÃûú¥ËÓÊÄiàöÈ_ë ´x¹Ê1!ؘͲª\Ÿ”† Á×:3rOTë)ç õ’þUÔþ_T”ÕËt¥®ÌUÅ_9Y¤Dñ$˜rÈðsð¨ [¸ùP¦ü sü¯’ò§ÿñÝŒ²ü¹ÿñÁ΃~þŸÇ»¿à?þ»â?>Ɔ@/Çpü̢Åe2ο¤ú‚ýè`?òÎeSòbÊŸà³Ý– Y0?0~C\b…Ìág{­ ¾àÇ·|Ì:9S ê¹©ëj3D$ÎЧ ä'`rØVwÅ\Vâ÷F P;ÆëìaMSD9ÅLjÄ_˜°å|rñ»4š§´8¥!¤%*œöÓeg „¨cÆ%t“à —ò8„¢Ï©Õ£V¹uç}·ýœnÓÿ)º8Ô/a÷üúsY¥ÛlxS@E¼¡`ñ½Ç²ùj‰Œ½ rÁîâÈ©`&].!É /Ñta´õ¯ÚÃWáèÐs4·aˆçéŽB’°•mqM¢ž¯ü,¡ò”çÞœãð5¬›y…¨Mh–ñ£1*¬Àü0**†2,Ììµ£‚h’’˜}<_ÌS•PtÑDÞtA uWuÍ6çw Lì*”"ˆ[a³ÃÊstÌmm€}öò´¤½ ôŸtøl§ez«»_†‰bõâÜRJ J8%Ž”ÝKu$ó,Ô+¤Ô_ZU`Ç’=ò</õ`Ý¶Ö ¤(2oêEÅŠRkëfÈÚSJ´<ôú#ßÛAŽXOÅKÒ¢‡¸è²[aé ´<*†xG—c̃A¯óù*ÇNøæ-kr7u׫NxÔ 0†:X Úð™(@š…Ûü ×¶`ƒpÛï’7¾–Ä•±tíŒ|A¨ŒØ‡;–‹+Ø×):,¬ óTdH¥ “ÖIuRë¸eÕOÛZYq—E!£ü+‰æ(6!)qnœÇÖ¨§¡».U†ö”%/‘ ì)õ-}Cg~S€¹)sxÙqµ<8øûŽÒõ´æ‰š ˜"Õßg<ç°{Î)µ|¿ýŒŠeB#¢öâJíüC")ñïãBxÒ‰O.ð¢Ry²ý0›òa)!´ \»m—0‚RÁS ˜ºø‰iýC­4…EÁ¬Ý)NlÃó1°7šy5z°‰gÑ¡¢RüÑNMˆœ©ë‚N¿ŠJ¿]Ÿ\L×Éx™r€Å4‰ÉÈD=BºÊIŽÝúTV_wÊõ6õ!în·*=€œöÊ·³iövz¹2ŠG6$i¬Tùª~Ÿ=#—_ *…àŸ Š½ {‚U¢Ì) ˜á!B1¹N£Y2v,/–‘@LV Y,Trñ—ÒwÆ“ÖÇÛ^jâ©)×’À£“½‰ÿ;;«—È<"ãIP Å„) ùn㮟Ÿ‰Ä%EpßG-Íg˜ªªjQ„Ê+ïu½ˆ™í»‹ÞËa(Yò õ¶r[*Ì'Ôdò’â‘ö[áC;Šß›­ÆH,®Ršì%l_XÎä†{Ôë¿êõ;GÉïÜ(N¤Û _×}šN˜@M¢Âû†%D‰«!S=rïu‡`«NOèº#êÞ‹ðè¨}½(è+='`qŽºGN…ðg8Þø¨CÈ}Ó8:kÊ–eÛY?{¾L‚P×?­4ý€s„,Op¯¬îe +YæƒY¼[M­69¾cLqt/¯Ká7›î™êJR;ÔáxE¤A6Ö6z刘d~áª+ŸÜbÿEveÁ)Öß)%d¼ ‰ðÓråt£´´·•‹õî—Gºtš§ÓvyKI‚ÇAú¡I& ¹‘$áEW[æ1%LÃvja‡L [vÓ¨9ÙTÕ,¬y·í*Üù:o”danB,ÔÄÈTƒj)u»Í}[ÁáLƒjS =Žß/K ± ÅPÙB0¯1r<·ŽÕWÓcÇ4cP‘Ÿd¥QÖY¿£Ì ™ˆæ+JÃN»óª¾ê†ìÂ|ªÜR40Ú}à–ÏÅ®“Xu=;›OY¡ŠèÅâ»B¶ÂiÜ[%Ýx(Rk¹ù3ÔŠ¢¬ø¥m¥´`2] ÍfùÒ®ž‰ì ‘œÓdŠ•×]^£b³È^±?¶ÓÏ8uú— b:g™öXí¥ùêü<cnRE8P×äRS—î›Þ¨îlö¸°>okº‡U×šÆ ~FÇ'áðÏðó½{žÔ°œ/¸è/ɯ–pýžL’R“g¤vD)Š_žQ–+I]%qäÄÒ»ù‰(ðˆÐK¢dºÊâ[‡Þz‘Mˆ™Gͳ[ ©Rm¤ÝËÄȬg±¢ŽrÅóãÑèø&¨¬-gÈdzê߬ôé¢ì)Z"âweo¸1«T¨Ô]ìíè0Ä7õËDï ¯Ùùt¢¹Eô3{Œ¯½®ª,ëUÈYë\Ø\ ¡y“‹?4í%9²¨9$JQ~I~:Ó?l•gMsàmgÝ1&Õ©ž4"£:Aé¹ÀÙýEŸ©Š,‡¬ ‹–ƒo¾»„ý -›°ßq* ý{dO“¥·ì¾§=ÁDãJ#B— T%„@s4ãŠg@üÝŠv“}z…tíVQ¡aB(÷yLZ{«•c›PŸ°; …¥÷ú´Õ-…iÂZRý»Œ‚OG”iU*ø_ÕþZ$öºí°¹Kƒ+­IzÕ ,ÊÂo&+íHdõC}pWF’Ud0£Êk,)HÊÅnØr5üÂ'a¸Íÿùþ®Ê³4E Ú÷ °•þƒ£­Q’íW¤\SÍ,•³wÌÁ'-¸l8¨EógØÔBxY¿a‰Uë+ >¸$s”Ã$Ï.y ÚD©O¯SQÕš£YÉTbÖšV \¶«(£Ó@¨:¹½4=ÿ›3ëVâ:5Ù\Ø›l ö7Ë“·"ÿÙÙÂJ‡£˜2âRà—}¹šñWåCu ÷1: ã³{O}MÛǧb]ÏRâø¡z3pkHURÔî-ÅhÞÜcÇÏ3Ïãðd4z/^`eÍÀv9×» _ˆTlÜ3tÿtztòGýSð$Heâ…sÀi¾‹ígo€BNJÿƒ%68^w/#AÎàN“…ÏÁe¤&LI3wõ#ø‰y{§{åÛtmÿ>bGjá bkÚë{ïÖ«ë,ݎļX€htžŠŠÄò÷T¾H jÚƒ—Ã]øE6‚(óÓAß²ûlýîyÚ( ŸN×xŠBFˆzëÆú´…ÏÕÙ%ÒëßJ¹]ú7\ØçX¿çÕw\/ SNýd_¯Ö S+¿؆Uú Mh;û¥é~ª-ˆÒÔö3æ‘~ûµQ¦&¤JÈfå(ê¨î é7øuÔë¦âI~ùcÃy+þvSUª¬–eÖî{=X>žüV€ …qÕ½I*U%®­¦äSTÖ­Ù(Y ¿²šÿ£:/c6’*…ÎÛožÇý,Gô(‚Óerd¤×ª–‚Óyß\àj˜¥ÁN„Ä'¼‚èjòåųdß}ÏÇY Eµ<óæý¬[‡HÁ5"!ÞC~–X,ÏY‚ëW!0º­Z"öå¦Ò5Q—¤’lÛ óðð©bÝáG‡w§Zø¡¢¦øoVNJ“MSUgIú j-å8\,MݤڄE{ĆÎn¿wϳ=T‹"ª¬Ô´¸-Y²æº„&}5*¡2UCäåƒ w’¼£ þ\wB¯n¤Xe™#~sõ*÷ŽÃ[íhÆJ¢ûÐF1qÄ!íw©ÓnAT¸ŠÓtš¼'ªÄf#>ŠÂqd/«³’d"kiʈŸ‡9ÌÄÿª„âùf”é™O™´Ìî’&Óí`÷vdêYÉåz+úd…Ãßööo¥”èc [á/z‡U‚[¯<áª"-%ëé‘o#”ЙÿøògóøŸþ(|óø¡Š Ú?v_ô»ÿøøŸï¾Û{`ÅÿìþÇüòxçKüÏïñç+2L#)Dùð5P¹ùUôGý"Éx’q6Ïç猷UûÊvìÁíÕByŸ]/2x˜%ãËà`>KÒd¼ÊŸÔ¾úÿïÿms¸Ê„ã-d¿q„@aÛ LV=åxQÌ…p¡âübÜšEoƒ:Tè×ÒXS gÁ_2rÚrNøC¢ ôË|š¯ë»uM¯‚0§€2õB=çâqP]$§ˆô‚ŽïÕ™¢Þ¿¢æó,™fñ_·q¾¯¢,†¦+¬,oMâÚWPp®ð?ؘŒÖƒZ­vôsØ99}Ú>:xü°†?ýg5jw4ðeº¼JÒ{8aÏÐ|æ%[ã±BG|—ÄW8Çh $Ëë{¯NX·ôSçÞ=X÷Gœä+*GHÁ™Æ?eO7=ðq®É%=ƒ/‘×HÇ×­ZkxúâEïMwøÄú1hÍÏ~ƒ¾-ðöºMù­Âù"DÁÊQì¡Å@6/žÆÊ1ÆìJi¾€ZOz2·@î aRÃà«Høøµ…µ†);¢Ü \¯ÒE„RÕÓûvFc“yefêˆôé‚>§“uGóÙ,"8Ú”·ùSΩ‘V­}ð 7x:MÎ"=êûy6Æ—½~çðô KügÝ|ݨՎŸÿi(xš=ÑÓÏðtLQøË,Éù‹Y4¾ 'ñ‚~™çúGÂÊÏ–9ý¢fD½àÏ~CðWúùl S1Í—ôËy’’!ƒ~Iã«P·Šy?gSnø<þMÿ23]Η«³³y–rë4œÎ£ ý²¼^Lt tQ_Ž¹Þ‹qÛĪé=ýL!äðeî7ø›HýĹíñ§wQ–Ï–`»§Îçv–ÑZWx{€)lz} mæðä˜~ÂsDi?<ä<ÁöAØA ØnçtÐ ûÇáA÷dÐí´GÝà?ï¶ÆÁýsø‡{ÿjòð»]Ø—IŽ“ÁŠ=’'Þ²BmÁnÏÞ^R_#J9:|G nï uq˪fœÁÖ>&Ëk]TÇå*(‘þ¥¯…ñÃI…Í+Ñ9å$$e„¨/®%A‹JmRÜáUL¢¦ÏPŽŒSìʤ…KÁûááb=ÓËQ«ýgÏlƒvRþÚdØm3ù ü‹,{¢@n½«±ì3 ¹çÉEy ¤"/µ oןL€ž¥)V¡OÛ%\W‡½þ>EþÎ ÿ¾8l¿>}gi<…{ Èn€L~¼˜$òœè|ô’~*:™^È›hò.Z¨ÏþRË/㩪i>ÍOÑj©X%~:9«àÇñB~¹ŸÎ§ó‹9Ôv?_1¬å“+¡å÷‘*܇±fŒ£?}’΃û‹ÉÙ“-˜~øw+¸´(ü`x‚û°ÑñÓ“-¬”PÞÎøa±Ñ­ZMÓœ'lÜÃ=ñ*(”ç¸;¾Íœ'ô¡sXñµuð×p1ÇsU,è?ÏàŽºô†çOJŠfãÍ냉ψüeDë`ª³`û|dº:ðüþD\Ö2fèàV `Qì]ÒªY×¢ôÿ:Ëǹ™9ü oàâ\VÏnà/“³ nÚWþd÷ñƒïò&³oïß«—ÖƳ©x•'6Åg.ןÂÿO‹3ƒLE úA`>«Õ4CB…ÌQR…¹láy`—Ãe'²p!¹ØõXF½©¯œš9ëü¸ äd{sʤÀ>ƒ\DÙÅjF€ÔW—(&&\-¼>C–óh ƒFëÂ-?X,@ÈÐIu˜Âèkc3cÖpuÖNô'î(»Y·ÕÊ=€<{ÀŸ,£,xÿîüoÃË·àqëâoû@àÒJá»I< îëU×Eíãô?2÷ÿAª‘ï¾{T¥ÿ!u é>xôèáâ¿øO|ÅÓ]šh…š¯œÁw%Šª\É b'‰î•Rñb¬·Ë³/6—Uûþ?ÓÙßèüï>ôÎ?\¾œÿ¥óÿåìÿ9ÿWqôV]þço÷Ñw=üÇ»ß=ørþû¯À †Öº‡—¡N]ç?¯Ý¿ûÿÔj¯¡z…°ƒšÄ ¹§ v]*LÞ [’êø\ÈðgshHúü&dH Ix‰>dƒ¦> ²ö9éþ?rÑkµv€[Lǯ%˜3]Üö!ýY-¹+jèmG†uj™ Îb´_DÙB & V½¶šT¶ù¥À˜¼,â,åãK PÓˆ…©L ÆÚÄ‘!«¦oVÒÒ$ŽÆK2ƒL8¿ÃdjŒœ$c²­¼–Ð> 3Æ$íX¥ÔpIªµ3´Òe³hjP—·t=×ðéqûáVð`6'à¦xœä1AðMçW ì²ÓEè~Mu?‹g°ÉÜ1`Ââwèò¹wZmÏShã‡æ7σQðL~²IÅßk‹ÕÙ4?q6S=Ý W!h¨PËÎ\R>ã¾r–ÜÝe+X’¿'WÓiKœ`GÄY6ÏjÆÏO2G¦Ûø«»:™dd6—9žÐkм} ­Ž†ýøª6ö?Ôj#´U×½¾Z´ô³rø?¶uºe~ÓiêhB5üº½Šu•6¾dש:LAÙ£²îìFg/7ÌÀÅ…¶>ºÛpG¯— ©ßö3š š ÂLZ öwž=}Z·—üÚ W‹=³´/JVçå«Å.[¤{Mú.zgÒ¯KJ,¨áa…4r5§y43éÚ{\Á»vaÁçªiOòøVÕÖDÇvO¾&¯“y[kEØ’ +7+]­VPïÏ—ñ씢JKìrOw%‹PkM(™¸³LIF „ÒmŒm\¥”=çq©ì)=«/w)q“ÿt¯CÁ¶ÉefI“¼Ük5üÅwÖ½û×U4µW½‰óÖr×ÿU”_šƒ`PG1æœoÊ|•°‘O0n_Ül5]&b…zoÛK× ìïwž[ûD¶Ö‘¾)ìk1?¡¸4Nëµ_û°ÿ™/V¸Y5ûÔV·Þ¶O˜è¶£Ì ð/ÐÕù8!bPØ5ƒÔF!ïæoUb^Lõ.‰ã*.2ºËï¯wIä_`-æûœméßÊYŒqDäàAÎ\9ìÄSËÉ$½Mì%Øæ;MæWêIM]ºxæ)rMȨst‡eõ’SZDdì’aÀÆ©EtÀµ¼Fe2BOdºa(Š¯E“¥jDÃ}Ïâl­äK8i¸‰ì—fU­–std@=å‰Ï¾x†¿ùXÉë\X8¸•G&"¸XEÄt:Ýn ¯x‰DºqmO‚ZÀ:¦½¸ÄqÑ÷” ;šRô²B¶¸Œ—+ç:¸kYLyÈM7‘õ¥[‡¶RD]Ƈóñx¦j’°Ðö¶.USùŸ£`£×f’Ï8íÓŒxdXLµ1€$À¾‡IèÒxd ä~' ωàZ/ÿºŠW°Ž¯‘.ºó…C·×ÁÛÜ”Q-N©|Ž?#ó¿ÌkR!Ú2‹=@v-è6ohçkÀÝIZ|%u=ÇZ”²©÷1a që…)tÀð§ßæ\…J¶bËyU¥RjXBŽ=X§ÐFŒN ‡AÂÁ¤áä:[ —„åªé„\œˆû’ˆ@Ñ*C u kV¨c?yËÐ ®ÁÉg)uȤ÷ÀºÄùjƒbüNøµ„4êÅ¥!}(^‡°#ˇéü !X.çµü:_fócþ5‚=òÆê·‚—®¨A)rFš¶v„ð×5$ž<÷ªñ\SWŸ› f$þr—¸# …Õ,ÇÙ%¥(‘‡—ùÇ&‘eèPŠS|vÍü? 9[¡\5½.fv¥žCè2yá1,0ø§¿àJeÚ²˜“±ÉòÈçâÂrpë̳Yœ,Ëxþ%ÅÔ/luž×— ñ¨½‹¦«Xøbn1¯øð í¥T9ëïô\X]ÄÝc^!†I„Í ¼DŠhÖK;7cyBj.NÂÐZ‚È ìµ0Ï$—kÔpαF››'¦‚Zù¼ÂÓýÑ©)?à¾Qb”°¶%@P?Œ—,F5ù÷qŠß &M–®àæ’® ™0 ÜüÜ]E>µ?Œ›Á䙎ªæüC¯ -&™¯òéµ–\‹õâÆ¥÷ƒ±ÍŒO”·= @ìlN‡–´UÒOCTv6«—ÎqT¤“¯†À¦Ï†Lêp»ú&ÉXú™¾ì…îŸqÎnBp¨OôœÀ&ñäQÜQ‰È †²Ö!-*¬(Î8s¤ö’w e‹«‰kÍÌË,)‘¸)ŽêBj¡œcIÎMÉ¡‹€¹ë›œyœÏ tUE¾Ä¹²³-å´U\úç«t"x¨"xóyø/Zý¿«Ã€ßÓ£º“ØQ#àœÈ>ðÀ`ÿÎœ?úɣȯš¥ Qè/êÔ¸N¨\à4ø×¾€™È+öëüÜY¿ûâ5Ï›@÷¯©¦Ae¤¹qúwú_ÕÒÏÛ„fø3Í)Xp9â–äEÇ@;/î¢}7òÆ%Üš]˜mà#L2¯#|ñÂ!m–º»Ø-Ì._ºHZns§G¶†Y?=9ZzSkÆi.$îð³ rµÚÀÒä8rÀµ¶¾YŽ%‘¯HTÉ9]{Lóè1гlqe‘‚¡æë5_©D tÖGß6øW wQ–ÀL: à>\žZëÄŠt¢Îf%\ÞcÜñô¼Ñ¬%Ð ‚s:anN Ç¢‰ã ý©b4pßÛÚNIµ'Þɉ¹iˆj2+‡¢ µ ïÚÌRrœ (°F šíäœ51mæXPÖBˆ§3AEoBp4WÑuNœ(~‰²ü†JÒày+@µ w$HÌNaUé’ YRÑð#ÛŒ¯Ç˜Õð\éf™öú`ö)¦ð¥ÆX·ú×Qˆ×j¯‹Zi–u•ÖÔé-½½ìzzšÌ:Î*üĦØPÀ¥ØŠw"d£5ˆ(јéG}BÁÎ(ÀüE¬E&O€ì{_åÐT‹wW©6Óy Ù)ÔqÀ$þ_aõy\¤¾º…ƒ6ûÑ™s¿ú|‰s¿úŒys¿úlis¿úȬ¹µ¯`<ÙœlKíÕËbYßR°¼Dù‚dÄyýL+AÓáW–°JrûUmñöBú¾ê¶0èýÞÓà/œWÈÅÑ•=ŃkžU}€ÎÆ‹eåkŽZ)k^õ‘~^úþbü[Õ«$EŽª·é^ún!ÐÀ;¾Heï–IzžO+__/âIÕKAU)}ý[ô.z^>ópA½ ÙÀ[1õŽÇ/®¿¬ºxÀ‘K AµÈ®€Ý€ç!Lçøhýv@èò]|—!DÔF*ý@¥‰žDÙU’†9 ‹Ëyoô1"þ_ͳédýׂ\²îÄ°öµ°ö£EåÆ+äÄ^ûÆ|¨þHmã gB¾Z,æÙrí·Ê¸ö£ÚŽ«„ëó佦Gµ(‘ dù˜p þOm¸ ~þo÷ÑÞžøÿ?Ü{ôèáäÿíí~áÿ~§øŸ’•öí¥Äü‹a“_bŠ‰hLJà'ø4¶tªôÖÇx~‘&Þ:º‚óe¨ôËÆ.œsHÑŠBJ!v¼àGœ@!”ÚˆNU^v§ÖÑñQ¯žö;LJ‡ÝΨýü°+©0qìø>böu[Â_X%ڃ׽~xpÜ…'íÁ°‹ u½KŠc§.Pa6KÆxðü%¢ÝClùЄ¬«{ðüþé›@áWÙÕ¼<}£à†Ê«‰;s˜wLÚ¼TUÚt;Ç\ð5ƒâôö~;æå¢nŸœ^”¹Û©åèdôsø²;êö A8=U-Ø”¡¦‚cÿÚçÑ8vêíã*…½aç°Ý;òªT3Ô{~´{¥óƒ v{7̵œ¢›­]”çqÆà^E”S¹wÜVô〉`QÞÙEk»R¹æ¤Lðýc¿NX~xZQéÙ*A|;ÎÎL“³,ÊÐ)‹äò¥kŸôtºø=JR¿…ÂöT}|‘ÅñóáAÕpI^WtMÅÚFÖÜ­ãeçOáðôääx0ªèÄËþiUàUYãhß9Cé7©“íj7ÕxÔ=:ü¼I}ùrݼ©>8¾=L»Q}À›lPßaïùfõeVzc…ƒ^ÿåpó7«p£ú®óûèyc? {Ó:7Ú:XéÆ{g2ÜrrS•§ý,Ôw#aýSû§6\„@‰{n#?íS ly´m-7&©I£¬1ˆ­*ìvOˆ1ÃÔp>™/–É ]ö‘Éœ¢$DÅ$”ÍÑò»²\“/»aç¸ÿ¢÷Ò«‹œÁWgÛG}Î3ÌàyFèÍèŠsG¥B×|·ÓÄ(<~þ§ƒÞ`³)C<ðFŒr ]·„zŒ)/K;˜ <Ôß°+ì‡Ãc% (°^¾f@W€êOV³»Ü¡á'Ë#ÂË}~úò%œ*¯SlÈp\"ÈZbÄmBI]~I@Ý7ÝÎ騞tG½áPmÇ“l~™œ%K`&»òòêõïŸ>‚ByØØ b>>um¿ì–ì4•ø†÷ §Y¼ xdö-A^Oª“x+˜o«ùåå ["J±¿úJízË*ê·ºkëÀ5ULÈõ1Ý,©ýÆ™_äTž÷pÔTtò#Î8aþ –Õs:8,©ãCÖª\Ø_Dnú)©{ÒÜI{¼o÷˜EÙ?½sA^yD85Ñr.¶¾VfÐÓíŒH¯®‡±Ò7«é:vÜ©®‹RLÞ¢> zºÂ‘J4®œ,Â$x-H|œRðaÓ&Qs?€˜Ñªqz&ikˆ— @ÔOû|†¸£Ä!K©ë²$)_âDù]Å<‹¦)GQ lL‚Fÿxž‰ô)z^FÖR Ä¥ ô÷Ú*-ø}Áÿ9.Ý`Ô9‡î xúæƪŠû6¦19%Y8Ü{ž ŽA&8xŽ#Ä 7² íþ°tlÁíHrÊTãÕu44ˆ²ùŠìáJ€}Ôz@ÔŽgP!ÿÝ©;í=‡¯Ú°•Bà ËO“ëm2*YšaÅÔÄ,…„°#Û‡¡Ù™§°î§iBúúë+R²ž³dƒÂ-Þ¨)€‡ía§× êíF@9ÈLýÀ+uŽº%2 n+I¯²mëÅœhŃSçÙ•£“ÞawŽ‡%•Ï€°û—ŸÁÄã,½_¨ PÜR~­GG"öÚª}R ˽ Ž‡| gÄnH¼Ç›ßÊì\ì/OêOI¶\EÓ6Q“ºß}ÔHC‹ wxˆ‚ ½œ?däâ½lo$L'ÇÃÞ›à<Ž–˜×ƒd·Òûõ,§Ñö0Û™ÆM–EÖj´:+Ãn-®Þ鯫½”'Zy¹" <÷¥DšrÚíÐ3Ç›Ôÿ_(aø-Îœþý[¨‰Ð#ùJy¢tôV¬Y!<ýÁ<¡ ØùVW’KÎQ¡ØvÒÁk›Dl*/¦«ÿWçzÄ[î‹ÁöŸgÿ5~(¿“ÿßîÞwßíüÿ|÷ÅþûûØkÁ] hm÷ßßÄ¿ÿ¼ŠÒ|ûO­àù<¾œ5ƒö¤È?aøå ]ÂœR žmþzx+Œ6¯ñ?<† R‹¼Ì¢Åe2ΫKbáÏïv÷΋ÜòG»/BÙÏæ¿èö㡲ÏåÁU}œ £ø`CÖr ÀÌY‚Vc–}-FŽÓŠ)($]¶YfèE4ÆPÁD +‹¨ú–÷ç…£Ð-*<Ô’õŠ ˜ˆž–˜ñmqFía%cb5­Ä)4³º  °Ùn{tÒCîAN0¸õŠ\'Tò¸ ¾¢<µÓëuÉÄwоÂÿT¤DÌP­â=Ëc2éG+Ê3_RÎ]á‚—T®qL|À1‡Ð2ª 4¾YŽÉTQ@&ž¶ËvXwÃ`×lc‡†Id‹®e™;€æ¤ŸOº¨AT°“Ö#û³WäʶcL¯s¹¥8üÊg-‚À‰’P_ÒõÆõQz[Ê×{–,—Ü·£Ÿ‘éã`3´5”pü¨’¹ã°gªƒÐiˆA3É­ªü¯ (µñ”ŸL«˜ªØž—×ǃƒáŸƒú÷Ðq”ççuI£aw/qTõ3 Ý”»¶a9ɩ䮳Æ/uyyßTþ+eùU/¾6/˜dx×i&¿¹™ÊVþûi û¾‹™bËÛôG¿x1ìŽêÀž7‚úüü:Ó°lžcë&…Švû7_——7zÞ¡ŠÓ×R¹ºWÑ=kY¶azìA6Šû uŸq>Îök˜?Gõ@=þ‹:N~š,àxÖ‘r,­={ßÚ¶ÁÙ vIó¦T¼öo¸ÄZ¦q …Kr€kô5ØšD+Mo¼à6IÔ=®1‹›C UQ7–?31*æ²*IwEUq0«ªJÎ?âlV÷*a™&&–TŒè±Ÿáæ†ÎâÃEÏWS•ÎwË-¹v¢1ŠÆªŸÕUñÈî‘u•w“´H1‚5m ÏpéQp=TX]NOîÍ2œ“Ãé Ö–BÖ×Ðà¾ÝâOyU й[MrBö.£NßP•¹fAäea=I)ùé˜`•ŒÎƒ]«ÖT%Ñr\`˜’¡¡hñhß´`qh˜|”Óf󫞢€P &^Kò¸UŸAœ÷tªF΂#‚á Š眢&ùÑšŒ3ÇÑrÓ$µYãË‘ÕЕ`ŠVm"&>#æô°Ù‹Ð>¥A7€®I<…z¾ ÷Â^3hµZ´ÀhUù“Òî@UŸåW¥éøH(ü'UEc ‰ÿÅ»‡F_ƒ§Áßw>ìoR•º¤UmMÿ*5ÏwýÏTÕÞUáê|¦i—Ù†ù(¹7‹ýÄ[{Tè!îMs·G£˜:ô¯ôÏ>Üñ/zWÝØúˆPð\„±öŠb…JÝ\¹ôS’†gרÜðæÖ›ë>F¿VÝØmeµðEìËÙ¿†'­µKÓP™ j£= žwƒôˆ=FÇØpnªJÐÚ ´!†Kgñ¤UM-þ¡+M¢QðSWhƒ«Pu×Ç7n¦4fÑoãnš¢R2üÜûÑÛ‡Q–Á†,º«ê‡&I ßæ Mˆ}k ’èø…s½år%%ä¦Ø”7£$õxÏ(@Õ6Ž½¬ ºd¨‚Liãñ^²8˜në¢Åhö¶‘ õ«ô¯<€ÝÇôwwQ‚d{ü*Jû½×Ú”aÒŒÒ-Ο–=Y²V2=ˆàF4âývßœö:½ÑáÏ,¶×iÍ`Ò0ñ³†S¼SQ[â*lý p%«LÙUÏT.#Q¹ŽëÛ¸:atŸY¦¹rT ¬Í±¹¡I¹qØ£95ý»Ýyhû­B±Gá4N÷‰Õ¤ttî~{ýŸÚ‡½ƒ ¾óþ‘üi”Z\¥&LV§Êüðôé3=D¢¦ÉD-{ŒŒ/£,¸‹ý‰è|ßÊh!“›’B€’¯J¸k•ñ·¤k ZÙª‘«2HЛV%(ÉINòiÇ ]G* ÏVç›VeåyÓ`Ê爽 3Ey¿YUm×ç,Hœ±ˆ§šç*¸Å\y½Rs¦;u‹ªÄ7×6fß½V•ÀÚŸtºö%Í þlvÆ ÈN)- Íì«Ö»é„S8”•]3(ºC®êcºh:mïhàîÿÅ7 T¿:ö&z¯ŽÈ¯ Äê Ã)ƨ¿LðúôªØùµ%DIÕA?_Åz/¶ ’µ9Ô/NûºŸžŸ¾‡˜Ó´wð/Þw¿îÓZ,“Yg«æ›îk(D5u \@Ëéò}Iþ‚óÈ ˆ‰³4Cæ”z}ŸHQ*ˆ&L"ચp9§I««Á¢QR¯lvrò+kÀ®_¶Ý•+6ñ"fELl"•-Z!6V5E ¤:Çꊭô8Ý"òŒ´/ûžb¢¬”¯ìÚ‹þ)x(±Ë-¹‚ŠŽ»Z}ÅÁ…‹¥³˜£÷ŠÝaNÛ„¿¡;|eu·É+ó¾©f0‘´'ïÈGÙï½&ŽzöZêÎ<цÇDžÇeΫçŒÑã£LQO <ç „ãIùµZ2&ìLqþæïÊûŽÉ¬c:Ûöì>Ýj› ç,¾HR¤áOªŠ– SD”l«Ü5÷1å…1‰õ‘üci”ºIí]*í5R²ÍKö9|YÒgw-*¾q†-:<»ijÑî³¢®^‡'HpÕvçi°Óø£e2µÞ#%ÿÅúG·m@·Ú¯Vá'…¡. ¯o4:îVIŸ° ¸h‚·£U}„ïïÝszP·&qÑhÂðüÐÜUö@Í F^Çž¿¦[ÛÛeÝ’¶K»eÜú<;õU|N7€õµw£–•â ë•!6ÆíóÈlR¡¸‹luF¹OVççìa¢0¶uÆyBÛD¨g¡mº]¡­ó%wS35¼éoà.+¼À)p2¥4Ã]’´†¹¸€¾ü€‹ˆÌzÊÞÈÇ~Ý©ˆ©t}ÑL ÓŽ@·è±ì6 ìôEÑyMR0=¦Ý¯¢h·{<…ÿ+¦fMw±gøqˆ`ømåé…£T¿ñ;QøÌYzl²5¹¦w_”ÖŸ#þÓCZÿëìííøú߇»»¾è¿ø|ñÿø¢×þWñÿ` © ¹ä xÓk WE‰1(]i¾JØW!ÂÊñJ«­«¬Ü™„8Dj>UŠeŽ ‚ð.™cèj0_e„»“N![McNí­åJ7«-1H°4EïƒÓ\!m†\ÃzïP»£Âh-ñê]XxÉŒBÙ''eX¦ú}Mé¥1Ù"ðhè"¨87ì¡Pe4Z†¯cÏH¯äqX6žjÕ&BÕGYµ”C¥o•ƒÿcM¦ Èëú:P½%%mPp2©Ü±æЃŒvköñ¤K*oWõª½¾S6ì±[ÐD.)i£ñº%œÞ’’ ±[ÔÅ*.)ë`’ºe]¸Ò’²ŒÖ[ZÖò-)ŒX5‡8ëµ^Ø>Áöq‘X kï‰vþ)áɨ-¾}õ`O àý¦qû]°÷‡w|]ôP²=½×ªxyò·_ÞÙ…¥…cç½s÷SiqÁÚ¯Àæ.¯ÂÙïpmî2{/Ý ØphW9Í*Òª©»äN]†š‡SÄÆWŸwôT­m6…Ió¡Ÿ´C~g7Üu/y¾î¬ó¸¼¹º\,"·Ø 'íFÃò$3m‡Iôø¡c¢æíÄxO ˜.Y»Õ(Ãhº¸ô{FÏàS¿—Ú혲³d‘»Ô ruÜË¥¼:`*²qU}ÖÜ©—ù*uGˆ© ¼áá#«ô +Ó1›<~X2%7ìÔé|ûää°+Snžµ;¯Š“áål(Ô%PôÅ‚>½”¼SMLÈ¢‹yúbz­æÚžm?×9uº+ÅC)+ìå ²²éK6?ÞO›îåÂnò¹«ÒÓ¨_°]u$ É šïvãhH~^ßžÛýƒŽ}Öœ:?¿ä Ä_~Q|Ü}Ù©¬kz äÑ-tÔë¿|Mmèr7ñ*lsNh³¡fó= ½’I¦\Þ™@s)§j”€Á§Å›¯®ÏÙ9œ½Š¾’ÓAºJ oÊà’ÞÙô&÷™½"ÝÝd1:h_æ4ß'4ÑîÄš!Ÿ”ñ‚æJpøÐjÉTY^á:îй‚ña;<´_ŒvwÔÅl×_úE°[1¥èàVöóxIéˆm¿)«”_Úy” ¶â¹ØÖX´H]'ñ-@ZL‹kÌú„¡õ&™¯òéµVK´6rd2óaÀ"õ¨WáËŽ7UgØíV…Ì„þð¾uùÌ?cæÜ»Kgêæ+Áªˆs ÔŒ…ÀL¬àÍb™…˹Oú¬K„_Z [÷ƒ©œé3?_ÚÉ_òbU.ÉtúÇOÁ1pb(]´ž½þ?ÇKV!½….^œ¿N·åª#¬ù“Ü *¦],ßB[øù½/ÂQxÐ}Ñë£ÆRœc–ôîœË£+¢ªÃ%¶(ß9TÒ˜ªöK¨¤;jw "í8a‚£¢ZŸ1Dòm.ÆÂÇzÃÚ¼¦ÍèC Œé=Ž=¦€:h4<Éáa%¹*éhû¤×¨­9¥w«ðIr_P7 | ÚäÃp§:TŸL§ì|ÚvˆPn*ÂézT`zËÙŠƒ£N¡÷e¬FPq m:B qþ=¾n:ÇGߥw¥%7éäðç£ç½6_ñ·ì&oò°³QÏzGöÇQWÐŒcÔÏ¢%ÃÏ@‘Cå~SNN¤¨ß>—äÉ‚4^?½Làò`€nÍíJ ú$ÒQW­Ïžo!ücÔSoØ{Þ;ì~_õºýpØ5ë†ÃŽ0¬Cã¦ãðû–ä˜Øj4e’„Í qðA¡W¥ªÛµ)ŒúšB|<‚ª1yHác|¸® …PÂ÷Ï· ðm 'Áº8iuœS2 lS®åЖÛ÷::oÁ©àé lš¹ã6¬ÐË–À’3m#4hÙU¥ót›rT*¨D¥®Ä¼")gI¢œ ÎE€à/Ù‰×Tuu))t¤"ŒU^ÎÀ&(1·f]ÕÙµ`uWùr>ÃùœÏg!VÌNΖ¶àø(DPàÇF§ƒ>&íµ‡-u3«¬t¥_ù¢¢*ƒ/³ÅòZ¸‹Ò£ê¡àÁ'È|ÿô)€ä"òIÜ-ÈGvÏ §H€7Xªª¸o°ù…Zx¸¶MGÓ9-~Ã~†P¤Y2^rkBøJkò-4…ãa ˆäˆðHײ òlŽèµaˆñºË$ †…¾dåñ2s–² ùÄ-4·5¢ ú8¡CLU;9ÖkœºyÝz̽ÄË—øÇVõ:Ÿ§ Ãñ4JÑ“ä·yVØ_ÜŽû…ÙQòƒÑ¹½½ò-ea@Á$¥«Y£¸½Ì\ÁïòUcÝâ+½q#ôûH„ÖÌ·sS•µ*UT(]ºšN7„_GÖŽæ {2èvÚ£îM‚ K±ªþºÐóvc’tãTYufi‚aäý};‚²wcC†9ÓM¬[€êûso+×/’ …:¬ó|HÈ6öü»½—o88 ;½ëF…ó½ov7 ù† ÅÙ®¢WZ»ïŠþ‡½çJöw쬗 ùªÔœ©’J%‡FÎ [Ÿ©«DB°';žØw “õå3  Uq§m6mCxÚ‘ŽW”«Ìù[0ò”g®Ð0*G©!Ã}ú¾¤Ç^ƒ60©:å!/Õ5âø´½ÁÖßÙÁb ö`w¯µs/¨ êáÇTU5Åí£è¨7ÃG᱕•êÖÏzÿ¸dâ?f¥n^§r¹½¢F¿á²µðÂÊV«üØ£M×{Ãòww›ÅŒ>§R÷âoW—Éøí;À»äœŠˆ6†0)ã·9ǹÚqã1kv²„‹hbó B¥$Y„ÊhLË™@'è#UÓ8( ÖfÆ ] œ6qâÒ.£O‘Ûçx:®Š{"#*Ž°Ñ(:a|`p;Ä] ñ^ƒYòÞÁ©±Ò+å­OÐÓ)Ÿ1M"Œ>£ˆÔ$ãdò*ŒR£ÛâD›àžåÜ­ ˆo–ÄØB 4¾Œ’´ukí¡c ª ×Úæ>6VÌRÂ&&¹’‚'‡íÑ‹ãÁQØî Ž{^iyjéán}ºœk.9w˜†.v¯œ‹ýÃ#­®À­ˆáÞyp û‡S]ñâHÎ+¹"ùð\©hh,â+„¥ kl½Öæ áàæË[ î%^ßQº O?â;¬¿‘*”vún I ÓTÀîá:Gdß»÷‹jkáI{Ðíì`â˜bŽ´ÇV¯ñ®¯qAžLVãOüµˆò<Ø!.4Ò`RXuÓÚdÖwJîÙ;ÕÃA2I½\³m‰SÔF6>w=|fk½Ç©Ä;p˜o•’ûÖÖ%™ èr&Ó9P‹z¯tÈ@Þ”¬hò8^,Þ 0Ÿº =—ÿ€)s´Z;aU6hè­4„©ãÚÃ×MÊ ›'³(ËsÏË'§lj¼Æ¼9ZÃ]«ÀŸe XÍ uLÒô1éÏ GpR—sÎå ’·PÇ‚Ek‹À¶è¸`‚-”±¶tbƒ}ºú¼Vâ÷ɲÞpÓ- 6°ÓÒ".ãÉÝ2Z‹ÖF´ÐH¨jž:ð÷ˆ25GjSö‘'†jQV{÷MoDr\ïùé¨[Y¿ûYe öJÞ)š’½jJwdñFu¥s¥Z¥ëÕ.Gë] õ®êé}k/42™‡ÈeÐ >Ö­J¿%Â’ƒÓ^v:Á»½Öwêë ¦¶D"—€òÆð~Ž™~S³Êø ÜÁoÓ®ª¨ÚRò »¡¾ÉvøTú—T§{¸ ùcìàôêµ–|q[Ö(m³Ç‰ãó%^ï%þÛgÄ~»9þïáî£Ý]/þo÷Ñã/øo_ðß¾ÄÉýoÊÇØ!È/l6™ÍVÂfâ± ‰"<­DW -ð®¡.À”ÐX×4[%*.Öi–ÈIú”˜J/¡È o D¦YœŒWp7Q„êø”á×–Ñ[˜ ba13Ø2™Å¾þ‰Ñҋ奕 Q±·8Šº®†˜cô2‹šŸ¦Ž®Å4šb%³“›Éöët ×hGï¤o çC„¶c¾Ž;X‹ 9 ÜGÊ Muº Z"Œ:êj¨£‡vkJvDÐhÔñ(Ÿst;%벉„ ^Wdìj•Fc¼ìIª‡»»£»E®‡ÈK=Áï¶a±]ã=lØÉŠ¶gžÇ3,Žv¼&·œ¯–‹Õi Ìô§×XI`O¦•Nû‰»šÚáé8SK È\#fœo©î,É&ž$˹ô*gË\´†ª@ ëåÃ6yîÌCNµÐ éMŒçÒ†u¡k\ §•Ã™?ÇãAiNÌiŸR˜ÂðVÚëŒTΉ3¹&ìF Ft­Ö1¢)…=ì ù¢)GËxeºº…Üi¦OÌXG#3i=b•sqž¤ ?ÐÑð9Є㨇^/èŸÚ¨âË›"žL”#v–Ý$Q#jÃóÔê Pr˜£)#r0.ëßè{ÄAð ÄŽàVÙÆkⱪ]èVÎŽ’`Iï}‰æá(„ÑÑÄF°8¿ÂÅ«Ï1òöŒ:aŠ"ÄG²ÏP!H®õ„÷g#ø{@ù¿<| ¤AO?Û¼ñƒø}4CùÂ;rÿfMàÕ„N˜W ÔKÙý`ðû…Í)øôïk7guÑ`(So‰¸ãÌ=ÇGvF!Êv…¡íÑ,æl}™r}ƒe.‚‘´Û-Š6^ ·wªuá8oò¡ýœ~°×x.¨ÅÞnàqºûÏž“›úNþ\?׌úãœ1•çVÛ¥<¶JÏÚ­vÁè›6¤ã¼Ö_yÃÍRt2Å Ù7Ì3)¥*XU3ÆFç5l[®™¹&0Ýx6V­Ù<¾Œ™Yùë*¡ì g‰yQ¡Ì&Ôݯò¹Pö9f9\ vƒ)¦rmzÒŠoØ5×´0+´m£\…ÒtÅ2©+ÉíªKÄÈ\)šç%AklÝâXÌ–/ή› ¨C÷ Ä!èËU–Àq‚{dÖGX®5‚±=Ù´H‚™zýŠõÖÒdñÔ˜?ÙQ†‘5éÌuDúûc¡¦Þ0Žpëy#¨ßÅ¿ï< ¾ýËη Ù:Ši±o`íž«e8ºþ4_ÚÄ—×´®Ö"Í ù˜ø¯+NaM1UýäVÐÐ%˜¨Èm)Nú÷ZðíîG'ÔÌÓEÆgns ¾'Ý«J»ÍÝçù•R˜±¸©qE#N= ÒÊd¬z• ªgBØFxÞÄ$ûî<ÊK’Ò¯óŽÐGâš"€/)¡Ö4˜”¢Ø%¨÷UŒÝEj)¬,‰ÊN9‹³Ö'¯Åh©•rNƵFP…Ù1Ë7[¬–±¥?0¼v%|-2èÜ„®é‰÷ø[îòt*”d˜8Œª…GN½­+þ3m¨Ô ÀlKZQ1L¢e$í˜!­P/ØŒi动V—fƒó´¬={ ¥mÉ)O”Ó"=HºŸâxM›Ö-DSR ¡’ÈYê¡Ä¾à˜DžeÅÊó¥HŠÖ°®”2Å;ÑȈÐÐËUDúÉ8¦ó Ö­¡²(Ï/ð¦‚'7U½GUd0?Õéò2›¯.Pö&‰ÚÒê®Ø£w®W¡ƒZ¨/ßÉ9i4tçt)‹3Wu]ó®ã|µ¨ï€;{x?êDÛ&Çad­´Š…TU©ë~_ ¿ôdà‡j;´>Š^Ii—Œ¸¿e¡ §¯ %¨õ»fU•ŽhÁi@yºbóYÜ×| —MꔪÊæ Â5ƒXnx~E6D»*xÇZæq¶Â˜'kŠá·Cè8EÜ_çKkýò¦Û+NºÁK€w A{«¡Âj“Œ;]ÍrBZC ·3'ääÌËÒaH+>Qä=I¦Ñ¶I Âz«"#Ü k.¡ÁŒì±S™n¶–N`W6õÉuöŽBJ ÔK( Žõ'º>^CÄí^è–õ‰Éͽ„ü®¸9MÄ!X“ƒÜ‡Ï7ikGâÄ6µ»~cŽ {@g”vb ̾dóŠ:,aÿ8|ÑêõÒúv˜-lÓ œïêýíè‹Ô&gÒ(Çœ €ÜJ›>õ¬ºVzç·v=ßS4 ¤Éñ_:‘3ò3D<¡ó†%@iΰY#ŽbgBü|OÈ"Îb)7§¥@È·5@Ä$õqò·HA›Ø6E–hÉJ)¾MƱuÈT…øútêÍ•á  Y ÝÄ°( mNÝWJµFž=µØÙ)© ˜aÕGAGòI‰c´”\%ylGùYâŃ"‰"á‹SEB/ÿƒaÌÞ7Z7b ²Ž}zTÂØgF[A½lÃĬ9çmhÓ eZOGÔ‹viŽ{tÇäGŸ£ucïÉšÎ;R‰Ýã Î!•‡¢øõxÒ°gžîð {£'\ ; .yR`ê2Ì'ÁÚ^η5¢~+èÏyçDŠ‘m±—¶lþ>F.ÎÞÙà Öö–Š˜É…P݉[®‘}Ütµ)D&H÷ij)¾As|,P·Ý¢x®ãC\u¼ê€ê$™gÇÆúWP²M%߉b’£«D45èL64Ç먌;>‹r1¼[© ÐfL&V•q#8Maë,WH¿PecõÊÜóÈ=œ%d¿˜0ëQÞ•ÝÎÀÞ€}ÀôsÌø-ñŒ¥­›YÝ.‘ÔÚ¨¼µ…IàŒ–!ÏŠž/¢¿® c¥@”ûUI†,¼?b ü*gYªÓlÞ+×¾b¡ÎÓÚêÌÌÍafú˶sé^“Hfv!šÎPKûPqæbø×6‰L²º¨>##„X¶ÌDm±“‚üù)áØ «EÉ6ƒ^OjúCůüp|Òþ¯Ó.$cê{æeÉÑ3ss²œšMîoÊ’SQïÚd9ºÐ†irL·Ï–£ ßœ'Ç4s›t9©Ÿ/ǪçræèZnŸ.Ç´‹¬9V©›2Î8U•0§¤ÿ%©qLM·Êó9;kÒá”t¹$íUß-²ßèb7e¼ñ5Êhz†wÊøÌ6ä+êΞП4)ºŸ¢SÛØI7(ˆRœ#ß·Ç,zu-. ´Åñ¶jwÄ|=¢SOæë5¯m“Û#\˜µm}ì}"¦Z%ˆüÈ_øP¸†ƒÕl!j ?‹æ{’&—Y«›ãR@)ÝG”¦¤=@ñt".#“øluqAìA:½n݆/3;h½\§øÓ ,MB„¦£–ÎØ6ñ5]ûšPÂ’\¼H[cÑ–¥@›’˜.žM2Å{º}M^劬¹¢ôzý´QM“: Äˆ*†­²¢”Òf ÷9Fó¶Z­¢Ó™m5(´|ðn£t¡Ì­`n„’ôcÒÎ('ìdø ÿe¯<Þ!:*ô=|<Ûûà)ÿó,¸^øõöðl-m¥¼Pb.ß#äH¼Š–ô K¨L,5¨Ò¶*_Ë)È4K•x4-Ëÿ³¤àPñ™´*zŸÚÝ—9{Š§ G?¿–çUÒeAÙþ"a׶à<É€²ÌÇÌUŒI&fó½£å êqmÖ&kÙ3`í;磩Üì]7-sS‰Pn/ŽOûxX‘iܺµ g3A%j{{2sw;ŠÈâÊ1‰øóâÏu‰ä½FDZF0†Î ï^6_å*‡p‰_CÁ™§µ±ñÌÈ<ªì¹µRn‡¦ïØšTL餵ŠÖát3¢­¦èDe•@Ëk3€‡ Çt¤=˜,½8=T¼DÇoÅ$ß[R·—=Q® ü2‹gO Ê©‰/M¶.ˆá¯¡ð2Hùœ8jR³+M©Èà˜ÞG/Úœ\¯Ô{cìUç**Û(ŠeLCr‘ľ°¨ˆpV¬Q£[Fú1%ûÁÄŽ©W-tv®(ŽEºFáæ„Âz›e1«ìᣓœ$s"Ng«s`Ÿu†ÞÛ š¯eHdrº"Ú5â(+ jí„»ŠµùÜL; ¨ ¢v¥×d bòˆ¬¹È1´” p‹Ç^Ö+¶#\¡Uõ\‚Œú Œ Ñùnþ–÷CµÌj<ñÎ)d/¼Æ­çÊ­ V1óŸsBð¹¤J¡WÖ„‘Æ3ë³âŒª ïõ¸ hÔª¼?Ïb¸-Èû—W¥ØF«”JP£çæ´­H¨ƒ…8'X5±¦°Ì^3ºB1Ç°¥ QJr¬VÖ»ú^#{¸692*Ò¦ "xž±å8 Nû½7‚q›/v0Yf«˜¿ÒlðaM'‹/ešÖXq=™a;ƒ‰~{æ&¸]ËX•xhJ¢Ú¿®`õcN8­c"´šEU —w& @>Çê4;j¯ÂÖWŸÒ¾™Øä£uÃ…`2PÐe¸dF¥a‚lÉÔºÝL„q;ó£ç£8š¬µn&ÄÀ"Ü4ˆiô·k #늯í@kݵì£B§Õ¤™g5Ÿ1^3a#ýÜülê•ûí£ôΖÿ•ëõëJ:<í¤FÁ®38„Žew!¶Eò¹çíä¸9™À£ÖÇjνU°ý–…Oñ[=dP()§»›ðÒ´( v™V£l%¬Z+íEÁ°éÂ8Ká;ı¢V-Ëë,1þ[´"L8mÓ¡­ÄSd–n5÷„ƒ¼™L±&àÈÓø ÓM6ö¶Yô<è¿  L¶‡q–a¸òþ@Gw¦mh­m#‹•qgóÎØVŽŽi«t²¥QÉP–oÂÕÜXß[å1þ®ÅW uñgjÔ·w…mÆÒEè‚‚LÝ2_"‹­fÀ‘RêdXÆhëe cTòÜpeWP"®x¥’re&%XbžK¶:ÞÎäX)ÔÀèJ S¸ÏMU"¾¢§ºˆŠt4Z·Ý [ÁY´÷›Ú¹{RœQI>–â ªYÑî¾K¥‡]å ü#b°åÿ^ìjÿAίÓq墢±ZVsÏù1$4Úœ_¡?~Ó«ÊÙùöNX³¦P/\MÂgíî´»Ì$…sfÉE‚N‰š™Q¾5ÈçJ^<óæ*>Ùx‰"UJSåDò¶Ö­`”ïvî|ë6›þ ÍÊŒ&°T>T°g¼&¶w•&C†Q³€ºQäþ ¡£-š I”‰J…ãÕ5ÈŸÃU¸äË4Eó½k  ­a¶Ý ª{rv ¼³òX\ªâŒ\ZU´‰U'‰Æº>_³ _ÄmÃq#kúÇaïØ ±ƒ­KñtE~MÆÍ·ã]4O‰ú“wCSôÿÅ‚ïn,ù. §°xnòÒ*Î¥Å'nÚò ånl×îø•}ìµ`…;™°pkô‹WøðÿRþ÷Åâ³"ÀÜÿýáÞÎŽ‡ÿ²·óxï þË¿Pþ÷Mè…ûBH+ ú埇ü‚u(ð—O@~Ájlð—OA~±ÓˆœœX!ßúÜxŸñO­sï#Îò‚ˆPÏçñå 6âUÚóŒHþ4¿LƒA+èN§ ?BkNðj5Öj„ƒÌfîY9¸â±ª˜LUúÛc7@y )F.Å‘ìPûoí€KÛFç°ºŠs«½Œ²3>‘Ž“Ê6 q«‰ç«8‚ƒZ[ÁA¼œÆçy­~¾\<¹þn!@të=É°M÷«³û1ŠÝhÕjx0/ãh±­œa‡R† Þ/1³%cEÃÂœ‰ÚpuÖ#˜>9Ëîñ{ä6TNâi¼D>Ô*P“6šl¿‰˜í½ë‰eõp´ZÎá¢R®®fU¦;¬ (pVÆówlr.Yìn–m¤Uë”GÞú<‹ÑÖFÚÔ]8½63ƒ>N°ÛkM³x¬^èIÔç„b¥¶qŸìÓÛ6j¯žM{_¸Æû÷áñÕv_ì9JÈÌ:fÁ 3çp#è™+›Ž¸«2ƒ ˆ.Ïs¿‡‡zËfž~ùuK®Q^ÄЈ`û€!ÜíÑñ ìw_‡(%þ¬˜ö#è CþÕ ­©ØbiµÐÜ’ñU”É,GÐ^–±ÂYBš‘ð±ÁˆÁï<.¤I”mÎ+ NQ3ÌÖ’k£ž¨LιrUýES°Tt1«ë-°¹$EMp_?kÜUl£pjáîgîýüG]ÁžÃÒ™ZÜ `}°Áž}]¾ˆÇä{ÖkÎÕE'B0A5 ô8#——M¦BUVÅ zÂÙÇÆUËNôõ‚…š¦ ü7ÅŒ9œL˱ØM4æ(.*­f K³ üQaY¦Ú–É#Z9Â#|Îñ¦ö¦=ò¸xü>¯H«§…å:ŠD¸Æ;Gí»Záêp¯dÿB>]˜©ªÕê=¥<'ÞTU…Ýà¶àE}.HG„æw]×?”µJ¹cÈb—#2Ajƒaÿu•dd‹T£öŠ±ýë°ÞÆט]χ-q!rq¶ºÈƒ:&p¹„m¼6L‰BÚ„ÑßÕhñ{p±t:A}ØyÐÚih2cYÁ¶ŸýϨް‡™ÏËV¥Tı6æ%•1[¡Uûy¾úV]šÜnØà,¾H(f²„!%º]ƒEÛ6Ä„)m ÖEy¡ðÆey‘QÀ¸ÝsæOMÛšÁ5ršn¶®OngdfôÝð-ýšÓ´LÓ$H>$âÄ'ÙL“°Û B5åÄ>±øc|ÔBJŠÆtd Îá‹%^}G& ¬rGÌcV.¬ÄŸ“f×,ØzÙÙ¿ãèì,‹ß%T} ôÖË,Z\âVì oóûå–ÆVRæóG84‡žë V…ø×€ %©±U:ä™J¾Ús%pk,ÚoQ6‹‡½ÎÈJ掫úÿÜ·LM[ÈmÙ°Ø‰á §º³r Ãÿ:mö^ü\5€'/gã'OFœÓ~ͧ£BÊÑ«^ÿÇ°srxJnMÁ1b×¹YžŸÿÿãä[»£áò$gA —Q–*ìöÛÏ»ü|J%’‹de¹IŽç&W²ÿoÑ<Á0˜÷íT%¡w]hFƒÛøC°'©×f¹ú!x\™ì¾<%àO¬ï­éœäöôïÐØî «QLQœjwiÜÄů ù÷J>ñZ½¡ÉúJxFg­žÁZí<6óýÐáoõ€rv çqÝ™« Õ¦ j²1òÌ»ûùäŽÚQ·? º‡Ý‘“¸°p"É}CCÔ ¬ý]§+ÌD}¢ÉÑßkÂTM­Ú4‘¡®¿ì<Õßqe)Þ0ÉQ‹Õ€«ª)rMõ3óÅ¡¡IŠžÛw7°yóºŽÕÁˆáÆþ-¾n:#º/n[œAt10=×µ,VK’‚1"Õ Ý"¨Ê™Î£ EïKÚ#•Nů^LçgM¥âÑ×;$x7}gMW] éì7ì3C™ªìEþVQ!³7Õæ΢;„¸7AÅ9Å 8;FÊOó–×ïÍÚâHç ›¹äÜ®]Ï_~½Ýöñ¾¿ý*Tàm¡5S€E?çòéú*p³¢%ëွ–Ü“°Þ"@ òBo3M¾Š0‚3‡ž°Ä¦¤²e¡†N4•š²$OóOT ‚TjGŠ„«ù¬ã“à]’Q<Œ% —“)S¨î-¬Ôð?î +ŒÈ©Ciqþ5k¢Ê˜ –€•¢e„«ñì‰ËŽÍ„»e«|Š çùõ:5f% j,ÅÞmµÔTƒ«©.jRâ9[Q*;n_†¸Äí¾¼úß{Ç¿[Üb€»YÄW„Ìiܼå·ìÿV7x”INbWQ&ž Ûn¥¨ÌYŽ/ œ£>‹ìA¿¯L%¤ šDß ¢À¢AE4gh|¢S!2òâE]Ì"Õ|}ÂÝyòpï» ÝóͯW›_·¨L‰es p¸_Òžyu‚§Áκ: ‹ß+ò&£-;¼ €ËJí¾MTwÏ3r¶f"Õ¢aÂ`.PŸ‰_ÐÖ-ؤH ¿¥÷7.o§«éT”ÑJC•ø&ù` þÝ*ökzO6‚ÚðŒ¡î@·¯½q·Äœ5f~ 6ÞRäOŽq” 5F§½j,ž<ÒÓ`&G&²X7ÓéëÒB\ÑwV }ÞZšç&1ú{ÆýðË´üd­Å+x3î©ê4o@Ö_wH4â^ÍUçþ]A|STéç&45ÚÚç²0Z‹uã¹ÀaVW›Rчc Ûœ—ÑbÌÎOè©ó˜tdéâì'\OrNÉaY~‰ép[Gl¹½hq‘©Ýu;gh WeÀò:© éþ¢±Â%”½|ä2`ºÒÂE6cÙ ükx¼»øosûNÜîjb‚:ïés›JM}!«ñ›F —5dß‹Ížò”½Ð(—ULLÀMF“ z{*0Æ ÖîŒ\<ëecm(3jmÓx4æ݆Zêáv ¿Ñ(7¯ë™é&ý¤-¢®T3'ߘãq‹1ëú¥z³e¹¢r¦nÔíüïÐÜJ;Ò¨ýÝÞÀg¿ Þ¦Åd¸m2¿bÏ3¸§U‹ªK1LjËÞ¨yCt_ö†£î |ÑëC+†Ÿz/ûǃn8ì¾Ðê 1å›Þo¾‡ø½¬ Ì”;N—µZ3ÞRæJj¯.TÁ_QÙ}û²£%ùð©¸E×n;}Á|’D)8xo®‰wÜ}g7âW Ö2Nr•ù“ð¯&%ÞZB4ó"£’é*=*AÙ$Vð_9y턃:šZ|†×Ó¹ÑH“j¹Þ¸a7Êf¼i•knG)vì_8löÿÌŸBü/zJ‡XY D¹üÇÇÿî<ÜÙyäÅÿÂÏ¿Äÿþ³â÷ ÿÛ{;»»¨Q|_Á9_nŸ šA6 Ð~¾ )ý(£ôšs~ÿ_ Ʋlƒÿ‰‘Á:,˜"•?:2Ø Æª>Odða·ý#ÜÚ#`~àêqb„ýW„'wŽGiDÃ$Bm°½­.'Öþ'ïP’Ì´9çÔ¦ø]ôšdT¼C¨CgUÝÍИǶûüô¥ãœ(ODÞ.ñ‚ÔE]éõ;‡§ÀÙŽ{Ï9›õëXl1ˆÛ:MÎ`tÉÇȃ—Ö£æû,>ŸëjìFCЪ2l´c‘™ ¤W,‰öK:zø¶€«ÆF '„zðÌ}È=yf®g2þHSz ¥å´a‰iC}“”|úKù½¾Ú]®×½‡aMV ]†Å ²P`8œžÀ/ÖÇ©÷uJŸK P O%¸ÍŠºÿuÚQæug¯kZ©oŒ¶ª–,Ò‰*”ô\y™Eyps†/møºçس5™ª¬µ½B¡œ×›Ê¥Í—ÚxZ¸/4-ÞNˆañA¸6{AÔ#™ ç*† qïÃBa÷1¬šª¤ô……}óªÛù‘ÈÈÐJ,mÖ©’ ™{âVïKÒÝ'ö‡Æ¹|ÌÑq(ƒÚÞu E$_-ÇÜwWQ&y6—’W¼±a\Ó‹½'n÷6Ÿ+§:7(^¼stH#·1¨‹È]K^¿O–­u½(e½=’ü… ÿÂÿÛü<þ¬Ø?ñÿ|üŸÝ½Ý/üÿïòG{}w;ȹ) K¿—p†¹BçP'÷òCÚÏá>¥¯Âð+ô“âLÂãK®ÑÄ€Jd¸r;ÒiS9cÌrÞ²p¯¯% a]ÇcŠ!ÄúUÃC&¼|´g1çRˆtš®“©Ín‹{Ì¢R[t0ÁŒxâé|þ–€ýŸˆÈAþ®Ò)ãqð~¿ðX0Ýœ£Á}Æ hçûv+ø§Õj•µ¢›`ÑŠí—W—ˆ{Ž˜h^©Õà)zëç^©²fì¦xù0GÌØ+ùÁùMàŸc-*5ÚûFC ²wî _“·Z’1‹Äñ”% ÒM«ÔðÆQZ 9§˜V5r?vRuˆ„ãìþç§/†¶ãKÌÓ`wï{s”ï)oW=Kò+ëÈhéá!Ž˜•ÃâFÏÎVç‹ef=åg¿˜öîa6ºªfÎM§’~Ôl jªB)­<Þx‚¤y'¡4µƒë ò˜êÌ6ÿ´½Ûøõæ$H/¦«\!æüè"Êt´+hâQ_jLvéHËœØbÎ7‰h'ßÅ”nL-ì Æ$À5³‹äû8`Dm7ÉÓš‘˜ìSнsÎ@]e“ˆé]œ-ÙÿÖ!~Œ Î#þÜÞ6Î~êÅvÞ7šüõËί-™ž†ÈÎ:«^±ÉVFÛ/ˆŒí­NäæÄv¾†õŠw¼t5tÒ嘔 N®«²ž•`|{¤£´‡Å~x îÙñ%•èÊÊgy§<¿še%e2îú½¸wçcÜ(Ì‚Z÷² Z'SÞä ë@ûI Eýí˳ležÄ l§CÚ…^ü_D‚cþÿb.–—È-…Jý¢DpÿÿÝÞÞwÿÿ¤‚/üÿ¿þg±†ÇXÃ0™&Àx*Rþ6|¼ˆ³‹UŽ˜áàïoÑeÃØùbÃøbè²aÀ}w¼•é JUÞ1„اpòádÛä¹3¹À§ûZç £‘œç<ŒYYˆY“!Ô\«’‰î©K2‰å±iF2W8bKkŠï”¶^R…2¨!bÍ;¨p˹׫r@Ѻ…Zrzêï#Šò²«ÂXÑ:\ ¡bpðÇK«Ï'ÓóqŠ‹ç‰N|~™L)󟧂)ïñ½‘%Ô…Ôêw|xÇnÓUð5”aïåQ{ø£Û-ÌüL¼Û/l Â]Á7³([—^\ί¨SÜ[x‰i©—ÁÝM\âÌ×XúeÕx¼^¦ÞwàïA@ G5¸Â²8ÅáÍ¢FÂ;¬Þ09žIàu,Jêå¡ÚRå%Õ«_7™“ªUÑr™mTï¥ú݆róÕy˜z'»ày®êùop¢L¿UÑ»lÞ]¾‹¦ë‹Oà_š XT+Ý…v¿Ó=\³Ûƨ ›:u鉧ˆ¸â¥vßôFa{4ôžOSÀ_q>;èvÛp¬ ï|T8­VGѨ¥}ª+;³_⧒Àh'8dÆÿ¸0D`ÍÂÃðõ }"–ÅSF!°Aü ÄáWvÍñè!Y39ÊVºæAJ‰i<4’sDåÉñ>:kÀU…åsª‚«ù‰6…¤>½†û#è¿…Ê¢sâDØ>KHÚâr R6D:²bÂu^á1îêÂCÞ«FÍåÖQ<ÎÅ/±Zÿð¿âvŠ§d#úìvY°½a½W%äÚì»Êˉ[áËÇ®œŸúbªªÊ;ÓÅŽóY.ë7¿)ž{§)Ô»«¤9<‘eásÿäVË’³æ%R±xÑ/ꧦþG0LîfÕÈwß=ªÒÿº„ô?²ªÕ(*ER"ù‚2Ë«4¢¬ÏBy"ÿ$»ª®ê„!Ž$z÷_vhœ­[T5¤,’1Òø #J‡ßÍa‚(µ8'J§7¥Ãœ&gY„ Wæ«%ITÛÚ”¡V¯<؇¬6 ñBüWJ_Ý R|÷<“ÅË1CLå¥ÒÛx‘ëþ¨aEÁEò„'¥ªOÈ/7ö¡'o¨ŠØ1z•xžQÙ•ÓئUé| +š@·$isLþFW…êßëXü’U€³FÜ´­†ªÊ¨À’‰ yrؽ8…íþÁà¸w í.üômœ¥ñ4T%x+5ÝEG˜àl>‹Ú`ò²J9f"j^¤ N74¡ƒ­1NeØ ú' <^¥¨ %—Ÿ( ΧÑEÎ= ŒHù¢×ï _ÁeºkãäÐJ#`6J–åkEÑhUuе;XÕ^¡*8aKR>ë Lµ,—©Š³&‘µ€Öž«¢ä/W•X…ÜBv‚[õÊìÔj‹á€0 Ä³yUÆÔ@ø‹îŸK¢ø¸JU×rIi£0’åm¨nH¨lDþûl¯h­Ù Gm}}Õ f«X§dÐ š…®( v±ªáéð¤Û†/ì¾ßÛ›s,æ«\œXYùG[ã¬+O7¥Bó®RÍàlXÆCIö ɧ. q %§7ÄÐõƒÊï¼ßÝ¡ô¶:s!óe‚#9aORUØ°WK}ñ4“ʱÜ\T¤BbÎðn'û›´æÜÐU×ò†'Þ "•ŠÍX‘œÒØ“æí怓!Ž)}…꜉Ûð˜Î I5½Öf»Y”&‹Õ4²’>mVRXä±ð¸OôÐ0Ù%aĸ™ «ÂÍ›š;1§_[Ãò ¾›ÖF<”»_€ƒÊ–Éß&‹…Ú3ÞM¤?Jc P›í«Ó\m©þømè×Rol| @ˆJÒd†¾œ”˜rKÍ1òm¼âô›VE`£‘rL×]Ò|W~ BËø³u™Åû s‹ááßi´¼i_LÀaŒèµn]@=&Èo(§ú0¨3P-‘à[ÐÿDñýuÌ­‘¡ LÞQçI{0Ä ÎvçGgÂÃ-{|>Ä®ïÛ=°7ûœ¤ÇI:éïê;ýÛP8q‰ñç°Œë@,ÑÛø¦ÛýÓÃC³­Bçi¬í¹mUÅEöÚê6xìt¹»,¦%^ûù­[ˆî®¨¬æ8FN·KÔ9^²ð°ú"Y×Yà(³ÏyÍâ-/ã)yzó&;[Ïß¿+YÞÒ8#Çr<Ï°ÛC6Bä9­š´ÏoXGª 9K6ãÁÇà*¬»âÄŒŒðà«|¿%’×Yå dvGkÓíE4‹óR̓ˆÚ]  2ù"ß–ÏAr¦Cðú¡ÉOT8Ìmª:~8ÁÖM‘”ðä☀²Ër•ROå1ßr€ˆb‹\sÑŠ ”›W…0 ë“=X'°Dó¢]<i‹µ/”ã˜kØ|ÓóÜ>yç<ä¯Ék@˜Œ²‹Í‹škœ¯jÂ$¼›Ÿ)§&¨ –¢dÔúYNA¨z¿_倌š¯"¯t0ªù/ÞŸÇþ ç Ï[þ¢Á×Û÷övv}ûïCøþ‹ý÷ŸaÿÝýÃ÷ß7ñï?¯@vØþS‹AvšA{¥üzÏâ,/5ÙînÓ1Vó‡Oµ—Z~•µw©÷‹µ÷ß± ˜Œ¡‡T%$ÌÿhE žâ÷ÐÍÂY¼¼¢ÄØÌãͳû&Aìl¼œOÉÍ4Ô^©ªnÄ–íó‚Õ¦?a›uÈõoÜŽ5Ê óqŠâiŒÖeÅíµ’V¶ÃWퟺá$¤6DˆU6%²´–p0ê ­ÖSb}6ìƒÄ8xÙ…'Ã~î(-ØëöÕQMÎD »š]¤Ó^guÛöî,Ô£¶'“.yØm÷ÑÁÊÔ")ù"ØåoŒNN}Ü?v?õ:]oÇ^%)ˆY¹ÞÊúse謁>4êÛ» Gw½Qu ÃngÔ;î—ol-Nµá2àwÚ‰¯ª¨–×A*¸„-gûÞx‡°¼t4ìt Ùe}8Êñ²Ãr9ÛÔz“zë崿A=zø^a‹B±: HE…$õ¿¬„`¿ù •÷¸QhÕ¥¶Ÿ£é;›5í’Œb7 [/v³±_Ú­.êÂ:YBheC6 ¨GyÑÂÚíSNƒ` ¡º©ÓnK¶GyOãè]|ó ¤w*¹tåÔn4'7Œt£.YB¹Õ›ƒ):ýxZq½zÄÃŽ²3ºõKr4O3‚9î¦ï°bU:mjú¡ºW¨}ÆÎ%é2›OVðËb-Ñÿe{“5až¢q6Ͻª8C=jqŸœ\1ƳhÁ6¢@¾ˆ3ÇñÊ®êÕ’ìcc}mà ÕÔ |p\˜uçK¯*]Ãd¸ozш%4NfKô„ˆ€=]Á§nUðxAÂ/ù(—9«ªïyJ&ÈÛOÍrŽrûªX³¨0Œ´‹‚·Å·§·³ÍýwzB[G…›ôêÉs‰hÛïtž^4ð¡_R…à Ì;¼ßÅd\{X~nî þ~c{pª{ÿuÚ­¤w°µhè¼ dÅÁ2™WÕˆýLÈÈL)),0ö¶•“œ¸¶3"4E9!õ @¢ƒwþ âŒy{àÎ_R;ãÓ”¨¯éL‘Iò—¬ïÃ:ï­ Ö E9àw˜ʤŽÏÞ«gïÍÊpôRåÂXŽ2ñaÍ:-wN DHö&FE˜_ͳ·äåçιt˜º˜cxlœ‘/R™:¨B¯ÊŸR… æ7´ÉD'a®$/Wr¬å²€ÜŒ;šÒ2FRs†þfÛÞ6e¹ê€Ù(î×…e;€«W«dÅ•IË9·EËÖ<µîDeÌb$i6Ë=aü´¯'— ÙNŒ]Æ¡ã%ó §seû ½(³©r‚É8S>Q»*Â/˜Š×$Öwž¼‡ • I®FXÀéµK» §ˆÒc]¤_AøWx6añ“YÌþÍKì]´h¨†`ˆ]Å+Z<ÔÏšSdÉ9Ó^?SŠË°k+ˆr£! žšÍÀ÷M׃/õG÷¾íM=ó©Ðym$CÐ Ii!n*˜^/%×æâ9as—j›¤”I/Êãm3&ù#Xd”•a^ˤc—ŸÃ1ѥ«¬k£”YUÓ^ÚÚ:žzc®ú3ðÔ0†H³ƒ’!šÙWá¿æÜ<·k&BÍÂZö]òA¢KC‘Ø(X ’Ö *Ú‡R%Gܤñ® ÝÍÛöƒO]eeHA¥ î—Ùj¿÷”VN|Ìÿ(™·r;|–Ó÷™dZwÊV)õ±R¦5Û¬b®“>üŒÝi˜ïì57·ÎWvïJCϤý­K$*˺Ã-¬S«ÙØelH‹tf:of×¥¸ 9ñ:X±w6Zdç0¯#4êýMgùýŸÃIÞZXœ¢¢Fï&þó§&,$-h¬sQ]xã0!_/X®W2îŠûmŠ†M| òè:¸æð¯‚ê+¹¤ºMæ¡dJu—›ÏCÙuTØËUÌ­å¦`ºÒ ×`Óíc‚—Þæ+ػޗˆQúáÎ~íf^ù+wÚÁ…äêi’®Þ+'ºÖØ˵-C,õv³§Ÿ1\Q·œe,Ø¥€¦^íØo4…±ßU_¯¥g­þûÂF¢Öz¨’ìÌ6HËöˆoôù®}ÝÑ®Zê…‰‚8º™£0®Ôf*΂\ìY’`=äs‘ÈÊ«ŠjˆÌ™Á-åµy v<˜¬ËÕºv\‘Xݳ¼dèªi‰XTdbŒ¦×9º ÃÎ`!ê'QÎæ«¥¿YÌ€Igx>]‘"Ê`“÷y7€à6‹0}k³»›Ì¹KK·šw¹Éö-[†ö³  ø÷•F¤ËV$ïëUV2bio&s¹¾½‰ðú W²øqÖwÊ;}cEêK¿*ÇB*R$ÈnÌ%ç©"A.jÕâZžíR…7¥ù`Øñá‹ßÜÿ?Ïÿïr’}÷¿›ð_¾Û{ðØÏÿøÝÞüçÿ¿/þvÿ÷ýí^ëÓxwæ¡9qy6} Ä'€ÿ÷™[Â|Áèi2ü3 öS²žýÃØn×Ï5}kØ×Ð!¥°K-/w:·Dt4_ÌWä%¡îà³x:¿j@ʱY¢T2íåÄ+ÀÝ¡Ó45ªO%Þ\عßâaöä,¾`_‹¦¤¶@_º—“y†ø¹©*É5¢Á§º (¤!þb 6¼`n€æÕ®ˆÅ›“>ø;¶@¦ÉªŠÂâe8vb:ÊR!PŠÕ•á=ÿ@sä‡D‹ ª¶B“tÂi«fo_ÒRÙ»¹°çˆ^?%Š´ð,Š¨ÝªÛÕ‹&X4š¤=m4¼&}køJÚ‚O©EC+Ü>°êúïå%o<~‹l¨ª‡4‚‹9¹ª™ò›6¿Ù*;ÿ‚;KùŽÏ81F¿hväWÛ!ÆÔÎBÆÙ|¹Sx~â¨Æsam1HÉÄÁÛ}–àWÂ}ÈŸØí”ÇUüm V¾˜K†9>D -¤i õŽ¸v`J72ö…Ä„à[vMÀ.uò{üð¤õ7áŸNN¤c”ï‘*§àâ]¨Hmëv†þ¼õívø4‚~D”…]Û¼»âïÕÏdJÓºž%íg|‰*ÁcQ.Ù"ÿnã×FµÖZ„:êÎIöÛþÅi¬îêî¹­ÿj À0,âñ±¤=Fj´¹0vZ[ãÚɃ#öU‰ÂÃ×Y2ÀihY)»V2¥L…+ {Ò´ÈËû†Îåë<|ÊÕpK[ì¥)Ç¿=•>X%†%œizpÅ–ÂöŽ¬Æ",ò]…ˆX‚Qx©³ÝÐÕ¡£yˆùA–ÅhVí|ˣ÷Jý2!™5¡]%* ÜR’×¥%kžª¸¢mÂÅY´SîÁ…ÓZÅJ¬aÎ>*_Á—IP”Öo±i÷Ëëön»ð ›±OÊ/Ö4ýêV"L1–xÔÀC?¿ù†ê¹óÔ¦#ÅãÎmIi‹°¿ów(|½_Á˜¯ÝK›L³7nK½€‰7›öuiܦ5f“ž’¨‹u»h>(ôTNî]¯pi熿oç°Oš8Üع ¨¦QyôX‘h‹ÏéU”»«Ž«ô‹iéx:Ïîh´"B©éErÊØï›;)Íá¥è×íÁA¯ÿ’f'<„ýÞ¡¬U½ŽºC“Z‡¶Ø•¡uK6äˆb¸$J-m°í =ËÛ‡!¿«§Í <€_,±~4´-®@£êWbýFÙ!Å¿Žÿ€œò}#øÿø™å-§<‹]vå$Ìë¦Z=‚ ^nÔëFy`µiq˦ri5³©èOP#š%g¼%)‘Þô ÀÌš2Î?ã`°ò’ ’7G…h<Ž2ÁÊdÄ ²wJE(^©²¥+'s•4]Á~kK‘Éw½øë2qÞn‘Á`gùdËêwÚà?Ä’³€6·Ê_›±a ÅÝ\ߦ*“€|ÀÔf 0X9ó!-€-DÔ Wi>ÜC _fótNAÍ‘JèHy‚—R)z%}3×ßk÷ÔÄ9ÅX¤\Ï[7\¯ƒøýumÊ„vpÎp/¬ñRÎ z—+ ç¿øž=¥?:›ÃÏŽM¬qÁolUv,\ZÎ[òˆ“€×áÇf0i¸OCJË€ï^ÒÙ¾¢†î"ׇÞ!µ*añüq@ÚÄÜ.¥ø˜I ‹EûŠÐ1:EjÕß á}úÔ»I4–Š¸è›ñ¡f}P¶AhkpOô,@ÅjŸ ÿ™œ]„³éøwˆÿyôðÁ.ê|÷ðñîîÊÿÙÙû¢ÿù׌ÿyôÉøßßýc¡¿¿"ý›"¹:NÑŠ¬ \ù¢&„v8biBpªTV^¬Br3rnºŽ¼¦Þ w]I²“µˆ?+ûôa7II¨<þ xÎÐq0QgÀ]ÃhSAÅd}.u„ö+d¯_|œúS•Ðh¢ y®½¥˜ ˜‰4vcÁÖ­8J•ÜžX¿³˜5´2‡cÍ€Œ×çÕ˜¬äÒŸk¯Ü ó ž¿ ;V—õÈÒàY‰²ÅaüÇn÷$|Žîâ'£ÁÐÎ6 ߢ,÷™—¨ÚŽÈyúÔ Éá¬//Û/E´óþ<žŒá¿3óQ·à~r6žÄðß¹ aÕ†à“ÐbØ©ï¼Ñ=èÀÏUÍ’ªíïŸwºðß ÕŒ¶[Z¬ú“¨M8áéaYb‹U½Ú÷lÏbüHåtaÔ¬R–w5%zŒS•ZToÂVIR*+øÈ]¥ÛwõWº:ë“£ö].ýrÐ>y%þ'âÁ¹ÅN¼[f×)a1P°ryËrjRhÀ¡Î/ioÔa*ð«0HU©ëZ…Š‘ì‚à3•˜‚ÑÀOiÑ[¥øBqµ?Âu èó’_ å4|Ñëùç6akkc5m´½RœÅc^L$Káq¨/GLjð”KJG28=R¢; ûVD ·Å‡¶Ht Ò~ ëšÆKªâÉV[MÇÖi“%8r«zõ´j³¯»ÁpóøûJ©EŽí(ÆMàßÉk“[²-U–°Å«söK¦«Ws tWûiãî+¸ïQ,{ÃH½‘QšÄܘ–ÜŠUh÷¾ ÿ&q]Ž2z¢Öu†óŒàh¼*ŠõòÚ#ÐZ«óºPÖ‹³UB§ ïôÅ¥r[gm1)³a1 WXP:-v”Ü^η‚xr«Ë›+™ç±@6ë«PV"´™~cÑŽ2Àc†i™±5–T!¨Ö¨+«æE6¿¢Äæ—ìŠnWUÙ ÖüÍ8Ç£‚H&pcô_Ñž~áá,L'v¶ô ÖÂâ]Åúâž)u² Ïçe»P…»÷´û:^Ö—Éd´}•«õ©˜Îó9N~ÄQÃ8¢”/ êÉ9¬x1ER¥Ùðª€I&LÚ,RHµêŒ³ѶآÓ2ôw·éV¡÷o¢ Æ‘§„^­’üÒP#ŠEÀ‡%·qZs„àvœŒªs%UägعÖGhi¥ “k…CaƒI6§h¸dϦ°JÛS3zå»3—$"è²ng[7<#æi®ê]llA)­â5…– lÐùj*ê\4×ÿWY²ŒY »’ø_ìåNËK» —ÞËþQ·?B–l×ܾXÁÉw¶¬¬9š"€í+¸4Ñï/zvrLÆÊúÿì¢ižjSƒ.½goªiÑ(M…ë1¤&(ÎX¨aq û¥õx4vmEåÕTÞewž®¿ËL(÷d¾"µ-m£q`ÂîcÈ 9ðशƒÞLV³Ùõ~Ê >£“Ï)´ïâ§( "“nS®¶¬.0Ïbö›jú³_ª´.V¡±íx“~˜ŸNûð°×qlG 5(IÏçØÊ8ù¥ÿbÐ>êÝ·|§El¾Â´(¨¼:¥VÝËÿ¶_Ž"&òcÁŒhd*[þyÒUœ—VAÇ58ŸFV¨ ‰Noðå¨f_ª0_-y `ZpHÙÇøEƒ€ è.°‰¿üi±oÕ5ùùvT纃MgñsÏBE_Ùùµ5NÂÅ=ïá»Ï; ¶¾¬ªg7µX’ÆÙ̦)||2 m¨°é7ÌolÖÁÔ0TIÁxÐ){±"&ÎÚðÙ4óÊKÁ¾V혠îÈ‹d™ÌÞ‡«FÔ*cÏ@ðÅžßpÇ"3å!…t‡4ˆ€Ìîn¢BŒâå%£ÂͨýQª»s¯ÚC¹rGs½ùêõ»ìo “º¥Ç°¢5Czì4J²s©ß\‰…i´ÕÿF¡ëð¨ü‡ûÿ?|¼÷Ýâÿÿûï?Åþû39ïÁ2dæ/vØÿsvXeŠ N˜Àp`´TyÃ^vЋ®Pp€„ph̹^q,«½;û:C²T‰UHÞ! ¤˜âðA%ªìÍA0‚9SµÒxBÕä>V°–'h~qA-Õ#umS¶\Çesè ;mèpPG„Âóè—è¼{ÿ{§o«·9µâÃ}â× èÅ5Õlh+Nùve4‡*hå#TÅŒ“nPñ¸W&v¼ÁsÎÂ@‰àØwž­¿ºH˜aÜêybãD~ êÛœUÉ’ÈõT N”à1ZšH—ÜŠ„«‡€³XnÎ {ÓExEwh¡ÆcТŠL_áH0«Å‡å¤o¾‚K§Î¡íØ$[Þ`ÖI'Ó° ï5Lè— ìZö¿Ìâ:AO¦×NëôçA#.‘¸FÁÅt~æÔ!þ¥Bqt¬ˆáðЯBUhXæ6Y¢›~§Uøòaƒ¸?1ç‰Ê šæ¹ðù£¼yê çf™LÅ｜®›Ào•÷LÛa?•½Ù)2…ûqVÚòãb6§1îÅ(ƒÊés»P…ÌÛ!QR~B8güP!¡˜Ø;õ"Ç Û° õ†$Hewž;.§ÛÉ{÷l,È|ŽwÞž=U‘³…1ù`Ÿ^ɧ7­¸ó¹ùRÕkœØ*![J¡o°NÑòÏiJZWˆ!äÌ*7ä |Ú›=›È™¶¿Šñ§½åî)“%X…¤é͇Nˆ¤6±õ«T<ë4¾+]yI5d-WÕãpQ:G!aùôyFÐ÷} #É0‰‚>ôÚn£K‘!j°D9Ó×cG[·< ÍŽºýÑ°.C½ùT4+¨«l­Ĉ«³ëðÒŽµPqM/ø“Rx\U΀Wü£QlËê…qÓæý“`¿t3"mµ3l ¿—íf¯à±± `þFböÙR®0Å! ÈÐŽ¿6%y8ñLæ±™a› ƒ©»Bž§ê”Hv4¾œ€Å0™®µ šªJC<“4°"7/ªÞVÿm.Q´NöôÎBÜòlä[ÅïBÊÕ{y|‰R6¡Ïp—6‹É¤•ø±Ðb£%[ Óƒ:¿hÐ5Ãd¿Éµënødõ®[ÉZäá»…w ©²`°ÄÒQ-’iÖoerèý>p ’ØRrp›mRl«Ülä(MpŸœGÉ4A³V®¶Dq_šªÐma+q(¤•=‹S¸%žÜ&ž²í Ø“Þ^fœ·&á}n „«t§~·ÎËó ­dÞ(³n‡ó¬^wcwï6¸`“SL7¤ôFXÖBmáA~Þy÷¤)gÊlì—|tŒàTŸÊDyßàlbߨoÀÚVMÑmåþ[—«F3ù lçg&l†dB€?«sYB&É;V•Q‚²%r+m–¢i6Ÿ¸u5oHÖPr©¹CϘ{3ØþZ.!ÑÙëwôhX÷­ƒAn)õoð‹íg0+¬Û‚Íï0Ö¶ø ýzv fÛBk‚zï^¡¼ïÐí“'ÓhÐît-¤Oüµ®.äñlÒð4^â}ÈK‹|3Z›U°„ʯð”‘1õ‡ ¬Êk%a>žQ}‰²Óò6q jå®XÜï6ÊÚs'«8¶Š¹Ÿ”˜ z¾LVvõ _öO;aè$ê¿ NáW9iSþç}3¸®8>aå³0„Ñ Ãúˆ¦Óàë½­àI°õ4ÚªS=°Å·žN¶¸îÆM¹I äÅVý ílÕß7ëîÉￛǚþÂ2H«Š¯õ÷ rª ´]ZúÚ¡°ú˜Ÿ³§?±¼7~P!åš7§ŠKé+ýó 3TÙo§þHì5ðÑ ôwŠ2Úqš3ÍŸúØARL¹7¢B…øŽDBÕ,I©Lè²5iQ’°-ºm¼àJ±.µÀE˜:÷Ï¡h¼4VMGèZdñ8Vª† ¥ýŽWSöþ#Ïý|5Ç’º)2ÎC*FÏ‚^2yAÜd Š;cXdêŸÄî•Ÿ dt¹Ê•2o>K¸erq¹J€ëÐZMJ•œ;U¡ €–Ñ9kæYQÌÌ„lM’|1Ý7ÿ„uãô hie€›Q:ñFM£‹„+>žž£Ê ^HR»0PL¦õ1NRš 8Áºƒvÿôк >»ð·V dp2çççpÂ1z£¤[±ÄÐ,#ÔöóÃzÓCÕµå ;°&‘¦xŸ~B]´ ýE±Þ\ Ó+LW€Ú4ø$þ Ü=£áPzÚ©MMg +ã½,+J(bWœêPVÒMϣ‘ÆäôGÇÞ®Œ÷}ÇÊ‘%œ ¦@ªÚ5tqÕÔiwbY÷aÞh:i—á%ñ¹»Å/¦Â_½b$ªébÜ&-¹-íN½«›ã» Ÿªß7sáÊZ²T(nq‚@> ¬ð4Ù [f,L’º=¤ÿ¶{JA";ÍàEûpˆø$·5XçÃ3NgíŠ ¨H²šÀ<3ó‹• Ëu>–ù‚CÌéÊ2Šç²Úç–ݯu%Vu.`²±²bö"SèŽ,TQ¾3JVóõöfÈÿVH+dAÊ$iéÆ—}÷Ÿunü ’/–›'@ø‰ü£¡…(ÞU%PAeS]!kâ$xd‡Ëà©)y“ÿ¢Çþkq†個®øÚ$ddHC7+R0Ý ðº"¯ÿ›sªwöýÄl²pÎbÏ .öÿw­ö7¡^C) S»ªQÕ‹lZ2á ~Ð:óÒò¥ëãŸTŸ Á2aÖq»‘ѼgŸøâqøäð)û`cµ‡³êÛOmzSB@àƒRúòÁÑöv Kv6Ž<;³M/Vg¾.¹X\BõîèJ\I ªœÎ/Ø•þ¼¾õ²|õõê r¨®Ó'ŸØµ¿¤[ÍM25jüSÄà£Î@7¾^bÍq©r|³®gñ»d¾Ê-Çgè¸#ÃrÌ€# •õD9–|½`ŽôkLX›/ae×v¨ØfÀ-Ê&Öò5Ö>ŽŽVd©\Njêh[9&4#r#Ú‹6#™•q¹¶zÇy-ÿ[qÀFÆ &Ì$Ú"¯õU’¾ÃÄáùÙ&¬œ¥jPm4­†å°q} ‹ÿÃ×êÌÔ3¶Ì0›žÿ 9îd"ž•»Îã»ÁÞÝ»öJyAÕ2\>®fÿPEß{sÔ}"<'Ta¸;7(T_¬,Ð)Oˆ—Á>¨™|pºê^ÿ'Ì«|Ãø…Aü ގAü_ÆÞžÄ`Ö1|Ž–ù8%ß©Ä:hÀV ß}T.`Ô…v9Nj¾ûÈC ×Y¯{Ô‚Õô¨³Ô#„]Îx¹ÿuË[qŒx†£k„q%…gK6ì‚ð+´ôȽ Jô&ŽfL+´zç0ž&»gÓ<)£<"oàm øÖ&W .0ùÁî3¡ÿü§uE~a?ÿo°ŸPs/® gŤxá*ozÜï†WÝ‚š‘÷:æ+fhWÞ’pzB´'pß­´`M߬W°}Öæü`r,Ó(_¬O'2ÛªAÞ`Z—.Ö&6 Ïq,(¬—¾›¿‘a;=±kô*QÏW¹¤‹ï&´ËAd ª)iWxíÈ!®l©ÑÂ+lu*kNšãÇÆ!cHú؇GÅ‘oÑÛ˜âÐëÛ!¨ÉsßNùZ’ŒåâŒQëJÑc}.fYt¥Ñ( ŽÒ JÿjÛ¾›&©¥®XbÇh$)TXix ¶URÈŠ@¿P‡°`ë®}ÖÑÈ«‹ÿ`J_jyyÞÝxãÖ47˜¹êüݱÿ/>¢‚y—l’ÅMòo¸ØE²Ìø(9‡_J@Œw¦ƒ · Œ‚Áƒ“KøX6cøÛ……xãFéþ½ê¶O [rÉxN½e“û¿mGVú?-øzaîù*ñoË›y 7œAô'R'Öê_õ¾/è‘JvŒ–ÅìwƒøZ ˜õ«Ô˜ïIJZŒùá ¶RÈ$E©P‚r¶´Q$Q=ÃHAF¢½ d(ÄÈ9§ -(o¥(Iã+»AÛ€½àæ?ÆßN C h^ñÖäH‚€ùú‘G(¿ c箶…€RMl\½ì–/ÛÔ`áƒæFN eÕ|IŽlôÂön† ë-ÅQ2uH¼1ZÇǼi8Q©Ä£à6°`h¿bà&%ALHÙ´i‘<…Ü=ªât(;Ž¦ˆ×¢iÊÿà·ù™ò.`(š&’Jè9Âe2(öRÇ«³?¬ëDÜÇj‰PÇA¶"¹Œˆ$–¤V¹Žéò€Ÿ$âHyÙ’ñZùqÀ§4V©9c‰'ôÊs°Í; ÉNMl±¼(â^_^#ý¼Š©"‰KÔk‚ËI¹lÓke¡ /Žëj …fáô­õ»u󲡋hZ$”èNé>jT#;.Åíõ§ÁÑÄú~×½ø85 y–,‹ý(íË|+¶{‡üvÆP×PpþPìaB_᧳ù|Z8íó0G<¿ý%cÓ‰ÇJæ:+E*ÍÑU¡ÊUCª»Ø˜YdtœpL™Þpi/*/)žx -¦½nÖnÖ-ÂØæ\1*_‘:Dœ?$ÕâfUYÁÒŸV9˜àfŸcø‚o7I²åµ*±a·Ót‰±{‰¹¦x?L^‡Ã¬¼.©*‹1l3àq_Ч™Ïrò~ú6߸ª OöhDô’Aòm»YU4ÉÚJnÜW±éiëvóÞÓYÿzO¨$›Ï— ˜ƒ:¸ñ•¹ $éixç+¾H›U…è´RÛ_MÒ©RõkÃ^Ù>}Pï_uÆZ x%ç©M«J7ˆD$¡W1&Lƒb]ý¹V3ò Ö­ ÇÁë­[lÒ£’ð㛺E¼ÿ ;ìœvÃ`W×5ˆóñŠ”›–FÀ¾ÝæìØÑ@¨!å¡~p/–·ªŠv€ ÞŸè|XpnÛ¤*/t/' Šµ™Ý~Ë­gŠQ[ÇQʬNõ¼;¨ÁCovhÄv—n3°R¯wVå̲?s­[õjP\6¿ÂÂd ŽGêJ"D߬†íþÁà¸w†@zGÛûÛ£ǃ#õ^R¼Yßóþ¶3 CÚé$ÃÑ?øA}í_+ÁYãYÃpøóÑó^»ÿ`Ïï—¼°| ä‰FTÃ×½þ0 i,²èbúh˜Çõ­þ¸·Õ0ICÌÚ¿ ÿ½Ófa"å,’âÃ$]½¢’”uÕ™)>wÁô!¡±~Ôî¼ÂÞØ;ü =€Ãì4{€w&‰Yi­égXî²™/=>zAÛÃõ¡j+y­DQ6¾|üЯ¿Ýt^=~ÈÏ €wÒ%­•ID9üyè=+¶_HÞäw%›y;žvÉòr5;+twpD)WK;ëì> åûƲôدe¯»exy«Š °çÄN˜˜5·ÂçžÒ|•:u6~ü=H#Òq=ÁðZz<*a Œéj½ñ¤¼ÎËÅ ŠüWÍÑãï$G¿IðêDmí¼¬ÚVy½ö$ëþ>þþ­T 0d A²Ìæï8%1q¤Ô™Û”R:uû3QÖ“0Dx²±¿í†'pL>W ¼Ù«¶õgÁe¡û¯n_·u~êÎ:¹§iŠøiëaµhê_€°“- rrüº;8é|žaÑ’0WB•>ËJ•Žíó,Ô»Ègïà‰_ñOí7Šj"ÿ¹šKþ^Qýëp4èÉwVNCýžoW'Oà-/!Í´¸±®Ã·i`–,rÑw»öN†úNQߥñ8Œ¯¼²ê¡G¯»¯‡à&ç†+JŠ•ß[ë¯(իü¦Þðå¡^ɲ¥ö[3ðÁ#m¥Äß‚Ç­7&i¦=PÞBÃÔm²ø8ûÝC½þ#Gø‚öfü¸ývðRf\Ÿô„@ˆœÂG…Sn˜,•dþtØë¿ ±FçÃÂóìjÎ ï?µ·™ì¿N»ýÑGtC‰ÏÐ…ãÃ6[ß‹ Ï&ºÍ½.(¦õc´Èÿñ°Hü»Go”Üa>ØÃøƒ›EÓ¸!’³Ùp’œú”X­Þó£à¤s¤Ï͹«Â;ã Ÿ9B 38J¦t ÃUz< µÞ›S¯5VÐÇtÞº|æ&¾µWáV«ÎÝ´&{•"1³iŸÛOµQ¢¦°ÅYï…¡B¥å,™Õ}a ­Å™³åÁÁ°ÿæÖÂjöœšmGq½¨¹Šð:œnÕh6kâ(|Óí÷Þ¸ … Ùüä?#¸še¶iM:é²È†‹Nn•!£‰Ë©OœÝ‡aç8ì¾hx’ŸVäi†·^âã[ »}ú&Ÿ:]ûܶïà ¸±œž´C81ÝpÇ=¦úùnéó=ü^¶°õúr±ˆ¼ãŽ¼e~uÕ¨\Ç¢¼:ñŸxˆ®P.ÀœÉ0‰€Æ»\9Ö©¦×t?êt\ ÖkË… 7¶îÑçëãóîñÐ?ExÝp`±Ï&;â]è_@%·áFM˜õþôûþ– šêßSçÿCâ½U¸ßiÃyƒjZ“·S¶}ò°ªÔhŸE`-Õ8Kr=$9fÍs™̳ä†K†+zoÀF;°&®Á*!ß#©)«‡Vì3)Ê&Pôrþ¶ø8uIÉ$U2{…a}¤B«lPŸG‹QzŠÞe¤•q÷óOƒÏµŸgö²ÂZ<Ø|”z}º¸ô/^zæݼíÓWݼeúk}'èÍ^m1ÂÈ‹] Þ£õ¶ÉE²Œ¦˜lG³öËõ^¶Ý^ò#gÐøÄ©I‡zZ<·éÁèU¯ÿcرy!‹FÁéýqXäæéÀËôu}:jwŽ‡Á;8Yßmf*“P+Bµ ð±ÝtŦJ5luÃÆ^xK] ›Y \}¸`òîÑk¡ÕAªQ pÐ ˆÛ?þ®¤Ð€0P·åŸ õ|¤ÝÀ·T†Çýz%VÙ9þ¥»¤—Y.{bcVÑ©ü>un¿3ûñ›Qµ‰«â¬ö»oFßÒ§ô£Z÷Oà§vâc£§4øÔn|š¢âóŠÚü{«´A#Ê•‘¿]k¬ÛrA*ž?½öϧU*·›ä€›î§O™E ä÷6µŸå“ä3IÝÐÉÞæ'àŽåòbå+¹¿l9UìüÑ+˜#úðöç¼ó&ôyñ£ï¿ÿÑ¥åß»´œÊÜž«xé54û= üv„9Ưµ£ «qÜl`ä ¾.è«´?ˆóô¨×ùúÁ^ÝŒT†¯4ᯇM2J4>éÔ99cÛ)PÑ`¶JÊX.¶ú:ÍBݾ†ô•Çÿ[¥ßWíK· ½9J+ B8(N=ÿöÞ½»mãZîßþˆ²šEK²ã8Vœ,J¢%6¥—¤b§iD‚j`P²Ú“ßg÷e®À€e'mϱÎi,á2˜Ëž=ûúìâßø@±Q½¹JªÉÙfšJ°¬Z ií%ÔÝ™áѹ]­.ú?uìì!5ð[„ÁàCÙ²T wàÏÏÇL¾ûNÉPQ­ÄàÓ‹òa * Õ}.:Ýøš‹˜öknŸîéüÔ7Qüü™v­’WÝ«/f·èè÷³ GD’¶£&ØJùè/ÇUýfÇü^~ö€1-þ.GÃN«‹hœü%¸ œŽ+ÃSÍ3rÊqFÅMÀ@áZÆ 5=¸vâž¼ ©ü³ˆÒÌN¸Àìök„OFlÊûdéaedÌ[Á:Žp¾aõå–7ÃÒ”¡‡i»êô9G†¸X ¹ F\\®“ u(æº(íÂ'ßtF‡çg‡%ÅÅ8+žKmÖAI…@Ôóá³ã7ÎÃãŠ|^…!ا€Ýó^ÿèüÍPôÔæ ý‘Ù¨“ÌËÁCŠ±QoõCÆA£(#Ëž~»S˜l3\Yí”owbÊ=î_:Y¡}ÄN8 ¯àñN–@ä’mÃŽ Ò·ÑØ»8,™ÞÉåà¨pÉ8Œå¥ÍªGÀºgJˆì'q†ù<ÃmØx‹…ÎØZÍöO Ë8¯S„dåW~(È¿*DNm•þpt~ñ€µ» ßc Åúå;é¾íŸ÷ë¥MXqÙHW%\¼Ù7MCÊ¡ &oŽð–cÄr 9+R¦8cÒ|¼$1D4\Œð—¯:öÕ(+T[Ƭ“`ŒXyÿä´$Ê(4¤y™Éµ&óŠ’èõ‡8—OÂrfË«IÄÉð…óa{]Sgœ˜-Ç7(Ѳ´djE‹³Ñ0ˆ}q=µyÛÝPªgÌAã0Xž¸yÄEI´ë¤–‰íÆ_Ó©Ãx4YHÑࢠ-·M€`¹ Qì&B‰$‰9¥W:·F”JðçMÀuå®BBÏJE^,…¢‹ibÛ8™_E1'o)ÚªDDY,Cè%Ï ÿ¼zõ½w–ÀG“Yà=±óvg ²4eü¢Á‘Ï`šúÎp³å(¯¼¶)òPKä£QÒrs󦨘Ÿ ò™™§¯mÒ”×q-<ÚZ¼Ó’ÊÞ²Ví¦4IkCFKm­zEF˜–Œ|k‘Ý—æŽêãñœÕkª?|º÷£ž«nt†5æÁûÍV­º©&§Õ¦„ù>Ø}öã&Ä©§¬X'lЫŸ:o=£WGÝCóÒfÄ@½¢UãHaWçê5EÁPºW'˜øò䘰/¼'/vv6í•Ùò$NŽ‰Þ°Wd3Õ½â?o¿yrûâÉí·™+E bËPœbyÖê5Inl{%;èí~ðJ’›w OV±[5©þ…››¾xñvSnʽ"«#u‹-‰"UÔØŒ^Á_Û³è–6í•6;óIp3#ðA½úÖêÕ·©Wbß°W"BJöª38ƒKKµySh?,ž<Ã<å›Ýèë¨ïë¦z¯Jí…¢S/âh9o>„Dy¾‘D9Vóa$z♌ù$Ê‘ ¼ár¦'ïÕÒRÛ|P¯Ø̤zÕ9;òÞ¿x¾mÑBͦ„¶¯VðàìIg…†.ÐsÄ76 ‰Hï^}Ûl±[ñé2H]›CA„éôð4ElNWÕô¦MEÍ@¶†-„´%,«²ývͦ0Р«Î{›»yª„™MxûÓ½)Ñ€špn\®à³f)›úÿ@u~î°jªA-ˆ Âq„jD†zFÓr>lq!UQ•1tDÚêèKµsxqá¿9 ÿʵ®22¥^:ZÛ°ZBŽF°4\ ÊPœK;0Â$Aå`å1…ódÙTD¬Ï%õœà*šEjÉÈ©ßD=濈૳,‘ïÛ]@–°ò0îçÏè…ÆT¶ÒP`sli_3.·Dæ S ×NîàQ|í ËFG“ü&“E¤AµyF•¼EÅøáéÞ¡€j EehT¾± è=/‹üfl»@h"£ßÐ ܱÐeï(œ 7ãpžîµ›b (®ŠP#xr‚“UÎ&ÍdZÒéi $à•®fÉ5¢˜ CŸÕZ|£sÚ;"¤ ª7˽~‹Õj‰­ƒHùgözˆ‘¢Ÿ`ÆÜ¡O}^Å+Än R‰šDFšd.^ÙeÄY9Iß±ŸDà¬Ã÷’tv/»ªá-DWKuµˆÄËÂk4øò$Ä‚«ü$™7ìâ‘í¿>øØž¯äO¯âg¨« ex|è3ü Õ9Ê¢PdÑ$+%~"‘È ŒEÑîèèý@y“Œ‘ÃuZÂVša#é¸XÀ«+eŒ…”Yè“Þ»<­^÷PNÅe¿÷–¥¦ì>ËÉž[æ.àŽÈ;lÝ ¡“a~‡ÆõM¢”0Z’ˆZ`Ýr¹àÂ!G:ß‚ñmÉ}N˜@7°á· |‚'Ù¢ŽF'@‰××Tªý:`â©Äñ΢øšŽÆi´Èa`q~óå„kÉpQolƒÑÎ'L³(>„$³õņ]âËBò-o Ý\LÃÌšØÎ#*·3\ƒ'íì*˶hÒ­žfdÌCV!AauAòˆÖ(&·áÿ˜ÕlÏ q{›h&{{ºˆÆø fãcž9ª½h̼dAàWr=(xîà|4:?“hŒßa<‘ûG`îsCÛL…-`]*d ’ºÎ2£÷â—1‡]°{çÃ'ÀáîBr°°uÁ£}Ãâ²|^`À· PÞåá%ZñÀbvŠ‡a“¦sš<@×Àå…,¤Ã†µë4¹CBÁÆ#HåBöa[{ª-8TLj΋8,Éï±ÈiÌ^CðôâÆÃM¾GîŒÐpMõ.IL¾Ñ‚ºcBü/íQM£iqÝÄE™yY#m*^°Ì;¤a™\=žÄÂ`7V©W®Ö #9™ªx/žLÌ*ÄŽž$£/*Üc ‰Y’¼#P>‚‡Âwåéj,Qô$(Y¸výÓÞ‚5BÕÁNšlM¤Õ‡™+v}Á8ˆÅ>áR ^£çhŒ¤6Ÿ*ÍõÏá‰s.&hÍ!}܆t«F§7ίKÄÖbÔô»Ä„°³'»°(],sžn$¯5±õåB”•`R-lüÖM/fy4ÎhÃhj{ â ÂÑGUDÕ¯ðà‹T5E(6žÒ”@Ø`á“|ÚY?\Úä}nÕC•{²Óo[ßÞÛàÛ £¤¢”- šX¶f2»/u Â"„y F½¨÷¦æ ˆ„ÈûM{§Ô 1!YŸ‚ʸˆõž±(¬d\jdÈ‚‹i·Q"Pý`ù@cû=Öʱ)˜”á€æYJ\ö'bšp2 üàÊ=,I랇' mqÖ•K,®"ˆã%Õm½˜¤Ñõ2üçö ú€ïÀ·—Jq‹7`ÊhrZ†„Öiñq«ª¹Á>ˆo£”; ìxl Â'E.Uè×CVŠPèQM>È  _6Ž\z!Î/V>à[*¤ d,À뉂k,ø”7Ì-ÑyLnAº…¹åñàd"a"%1Xç<Ü ñ-ÕP‘UælŠp8£<Âr0B¶$ìƱ>?‚YÎ}BLì/B–3Ø;5ÞnËõé¡e0œónp 2‘)!¶™å-ÓI®1¢e†µjŠÒ -Onž*ÌöáB±=ÙÒp¦N®„ nÈó[bX3½èÿøËЙŠÂûM"Š&©€R8ÎùDkdò •2PRtÔ˜ü£&Yéú4Å wL‹v`ÿ¾®;žJìbø¸×(4¨b©>vï3„´¼tD‘›¢´#¥'„3çÅ¢ 0¡EÏqK€"Å°«ES|ÎR @4' VЋ¨*…‡ÑQ4’¤¹&ï–¬ø#C5%;DaÍ©ÈvHœ‘0Q­æ@E9 kˆ¢'š@^“‚$ã䈖–1í+Ú7;òäâ/ùËg ÕŽº‡#ÿ§£ƒ—Þ›>…$“ó‘Ë|‰h˜ô†ìSrw¿yï]fÈã§{Þq˜SoèiXûy„0‘â’ ÕØüð§Á3–Çõ×R ¬At\ŠYÔ§,„íËGŒ¨UÁ! x鳋ÑX” *sVB*åA|]pí`"*“áÊEp *„0P*{Y\^Cös¿sÖ;ôOÏ;G½þ1…øÜÇþ, &í±¡§ Q¥á5œ¿aêÃÁ<£ö“’© öž´ÒYá5ë¿1è¾îŽOï›8‘ &à§EI¸1Zfñ0{ü^‹!6;Ò¼£%ãjÍòm˜À¸4ÓMƒJþÄÉv² ~±/ù@ÖTÐìâãd4{3èºØ ²!„¤“=~OÇÛc‰Ei©U#3Iþð´ÛøGç—§]1DT¹23¬u/4:Røì ÑŠó$iàQ¼-í”’ù¾Æyp/ç‚äW6aÃyoÞBÁ…“D-ûŒÅ>… QСa<Â>éO}ìYéÈó`±Mt'Œ«RÓpìx‚‰:b¬åÿ†Ç—,ëKø×cRDQrB¦2$É÷im£Ø_Æ°a'¤h5˜N–™( »ã–MúLœcÖ6ìqÿR’6ÔŸ”ŒÐ\]»³Ôó¯^y{Ø„¸pÖëQ3/šÈGX.õÔ?錨5©âñcÕÆ~ÅÀäñ…z©Ù|´®XÙ (uèô}Ó¾4:-Ü?,O¯«|öDÈCx¥ùN;aÕtRéèLŠi­–ŽZô‚ƒô”çT>w¯NKÀ–…ƒ Ø3Ú‚ŒŠ±rÐh»n™?®–:V>zŸv ”óØMæ¿zó„ÍH‚o§ ŽSúÓP@¬Ý'´N OÞxÒ‰¶É B—£ «Ùuþ.üÔû€dwTëÑÇÛöIƒ6öŒ‹˜KÅ$DLE%µ%ÊlÓnÖÁ8WnŽ†(ÞíI.ê}âÂt:^âý?þ­gÕ@?.ÎJw·9fÚ4ÅJ9wñ†¢“&Ò3;»w®ç™%™? íq­:6Ÿ»'›ÂeæIŽ»£‹ÎqwØûk”€g;ß>w΄†åÑÈÂÀäßœuÏÔI ØûirwÎ5sw$ëªI¤†“˜…¡ž”©'XÿjFzØõ,¹B3‡Á<²v)mÉòÔ ÚðNÏ@µ?\¦CÔc@~k4 I¢jî*go³¹Sx*nñæíh˵z6I{×aÎ ©ÑlV>î÷† Ðô‹8'bçý3–Ÿ››ÐekR5ªÂÅí­ Â*‹æ¼›Èó‡h{Òû<ï¹+f·xÏ~07ÀA›ÿQ4ºr‰\¢LkÀ©@/ËN¢V÷Tâ»Æ/=8ý·DYÊ•wôV)eX:²þ‹*äê5â®Z!íé&Ÿ¥C¥ °ÀÁyžC•…A\TX•¯˜34¾ÇK:q)8GÆr©Ÿv}&m­ÀÕµÑ0r•9bâýþ^?ÒW¼ÆRØ'fËð8ŒUW³(O@S“$dÛ½HˆvzÜ÷íºgŠCåRI•þ¦#uŽ|à‰Ñhà÷/V,i•öáXX·B±Rà_#•¬GŠ»GÕIrÑßܪÓé":ÜÇÙu«Yü7 ê|=»ùü!pf }éw}Ú–ÿŽ½¼nãû2Õ) ñ·oß¾$.Lçcµâ}³,…¹ý5?˜mòÉÂQôl‚y&\!ée™ |õòô~–Œß¡úq-Òý'TU®íè?RqêWœG®€AùåíG\ù\ ~>=/@6­®Ÿ×1¡Vr]ëT¼áó§5ʳ.ZzŸ=¡£¦Júíü üÏçÄ|d«ºèºk‘̳È0*:Ï$›W˜7•G«6m,Âí¹þ*®Œ.MèÕ×ek³Õ‡O#¨ÈôJ8+#ûÍ")ŠéØ*“@sâV‰æÖ™TöŽýáåð~ÒÚu=ßRCù±’d&»å²ôV[s×™¸-“¦ÓÂ-o*£»(OzÍôé¹Á•‚[üPs¿Z ®xŸ=@-)±­§žr¼Ò QI«}e1¹®ÿ¡–ïaƒm;ìûÐ œÌþÅði‰%Ãõnÿ'ûrÙ眧híé·ÝU–U³ÊXf„ò!Ý\s½½Èžú(8q9‡ì”„-ÇéäPñE´:,‰‡`@”Oƒ:#L3†c΢q”WÛôЪ¼à88šÝ{Ÿel€NW¸‘%kl•Jßé½­ J¸#)’ ’éd»"EÃP « Q0Nn~…íT¿Î^r¡m®0>›aàrM4  %Cû¦@ñd™¥OÄÉú]VWÇÓëöÍj™yÓógT·ê÷Ô’”Yý4¦Á¸öÐÊ/7KD,k~A%© âÝï"ì›~mŒ¡ÅõiS ^SùKõOþ!EMG‘ Q‘Nw¨_ ׿LsC_~Œfu¾ŒšŸ]ÿ¢þ¬MíÍ`DYJùP5ÚÂ0h»j˜üùå×VµÈVtb0qÐ{Uzbéa–óÊ$°ýÕ‰I˜Éǘ• h"̈¬š”ä-P„î9¡‹u‹˜´m†e±F½àú',¾´eˆT"Ÿ§±…u–øìWY5­æsMåù-ò‰#\^ÏîÛžSw·N*>ªLO†l¢à²÷]ÁDTì^Í— í%i»Äfu4‹ãH+D¹ìTH»UFyü€,FZ6ÅÊx˜g4° ™µŒagH[äù•sW÷Þ³öž™ù,H¾2Ü¡^ ÷zU8ÈÊXÝU¶z#qDDè! W—ÎBÌþ¦hì0ËÛU§®]}´Ô9¾½µmnüB7+XB 7ôðÞVïOÕprÔ¹ý¶Yµ_TŠ„Et[ÔO;Ã!þF¿T‚ªZt¥Öbþc¥LH2í¾´ûÊç©VD0r/TãÊ0ˆòŽ}r‚}|'˜Ë7PÛðùŠÔ„:‰ 5ÓÖ3ŠZ uÓªCf‹õ.´ÿu./ë&ý*nÚ±Òªú^÷È™[,V­_š/äÚ”ŽgWò)8ŸŸmáÅ«$™¹UBÚ.Ök^C}¯å—ÝfU°è*%Þß3;lÙ4‹MYOª-[a)Õ2Ñæ¼µUY¦º ¥…P¸d«‹ÈläHsÚ©:Zÿ¸Aë+Å$ÎfÞã né”[o]± T9¹w¤³€ðâ0šf;x&ò%¼iô>ÌjäG@Sº 4cV´€àMÁdmÿsñ¬½Êg%PЫ #|ëaRã£ÿW O§,ý¹#ºÅØem§ìbèp!„ê|¸&|ê€Ô ŠÆ{´n >Æ”Vè#˜®Z¬êw2SI…úó•Sºã^Xö °ŸÙYá´Ú5îU­ÀºH¡ÊdtÉ[§VÒ9n çbAˆAF•æ¤GA®—ŒFEQcB}ŒÆK·[29ÑÑ}aïøÀ[ÜÜgˆéÍÃy’Þ3›ì¤@Ú¡T­Ôi¨€¦$¢V¶@#»SÜô§Þ^ ì¾óþ…v{µh¥] ^MAAd:ú¬†Ä»Fð."0æñ`G¯CÐaÉœ Rª`q¾¬«7(:1²<û…X ¦”)ÐoÂâM²¸)11ËM1öGÛÀ‡µ´JxÅ+TÆÊé]ÁËwm¶=Ê° É±G3‚M£yBá|™y3P 4÷J›a`=-!±±ZÿßS Ì5ÚÛÃapø„ëu_÷úÝ#ø@gzæ¥ çŒ—û¾Â·(†_Ç.æXµ âãÀ “l€§Y‰ÀSõ§,í×áù80<‡ç#ñ|D$žÅó±x>"ÏGDãùP8žß€§¸uKÐ(„3¤¸aïxØýåì¢Dûh~ãxñx’¢°ß?úÑK_\§FæŸ/òž°=ddŒsæ¢âûϽ†~ÑÄà$ø†(æ(~a’m{l/)[Ú_Åòþ#`‰lµ¨÷üÅs•@í2º³+Óe5¶§2ç[Ç æŒMN=.,Iw¾ˆRÝ-[ÈwpeæX+Š Q‡ -ŽÎ£ÒP@d»ÅÆ¥EBðDz‘ŒŸÏq«af7aØ⒧˱”7(|ÛÑžJ‡VÈÿ0¡d›'ñE€×ÒGó4˜N£±6¹»ú‡¹2R*®¬{ÆôÕ„”£ü|pØååB¹b¯2ûÏIü Ì*QÒ¼r Åý?nE]#îT`è„é:쮞®ÃîÖ‡}åè/ÇÕö{¼»U²Roeùò*Š§ €X!F¹äÙ,7 c÷=ò÷ëÅB$y“êóp7Ò®’ÂvI 3¬µîÔ]j×CûJý¶ý=z¾·l¶Þú]ƒ‚þ©Ö*-#¨ÆX#ÚÚíÊ(;ž´dõú˜ÒuQ¥µâJ7þw…äUG—n_º*´nŒéA­üáØ#Òª%l4®VÌ MõÓxº÷ÕófÕãfÀ¦zük›Ž×è¯õñc×t¹WZ#¶Ôu¸ôŽGÃÑ,ðûáy¤«x‘ZÌp<$‡ÏîÛµ,¡ÿî U–ÿÛ€ZÖ£Åàܹz€»¬ûâùª^èG¶ÜqƒÃ£Þª ç^ù5¥¯ð­ðUý9ë26Ô\áMþˆáÿ·e4ÁŠAT¸£r|twËʦö B…Jv §è\+ÝàÍò.íÅQ΀²\Áªâåæú•©Þ¿æaXëPX•B¿š93 $žŸ¿©B󤛼 L3/g3,„½_‘âºþ˜úèübß€Ó !=NTI74,ßr1½LFWʱ ,÷3‘‘Ú&¼+JWõ¸(¬4£.æ\½èp[Ö”ËÚ¥¦Î°k†å–dIY*Ž§ÞµÙò Ð,·Ý6›ú|‘×óÀ –ïIó¶oí»ž@Œº·YÍå O ›è©0çVáN’Zœ_è®®Zñ¾¨FŠ=¹Tå á­-7ÊG!ð§*ìgív¨•&ó1‘såŒ4„Ô‹:S•Ðéy} Ñ,Ñv‰1ÁHó÷aþCyqê$«nŽÈKašû#ÿ¢3v™˜ê âüßD™Ý •÷¿“ö¿6•"f~­Õ>Ý«ªE÷ª@•=â–?|UúÙÃàN÷·÷ÂþùÚM6•¹GÒÚéi @…@ŠzTU—¬ !eu±%³Œ[E%Ñ¿Úƽþ°i&®õ&BÙÌ9 G¥]4Œ GBÅWž+bjù>+ØEX=ó2›¸8¢ò÷ðtÿÙ\½ Î#¥ÖÅKe¶ZI {ºï.jpà†Z†À"'[ckºêú%8]g¬pÅ‘ÆÅvTBÊIk€ÎDøHN}ªswrñäòm±"à·í÷ïÂg™¢HfÉJYs Ô8Â= Ù-+‘T4›IñŠ¡õÁd¦VDñm2» )±!–áß…¦duLŽÀžDA8´4 #¤DìîrÀ?`†"[È[ŽAFÑdaá€Ù„ªŒo`½žœW p~Å2³±1‚1¾£i÷ó$žxoÛ£¶×þže!WYÆãä6Lq”vS(Õµ›ÞÃ~êÅá‘xµóô)Ù É`ˆÁ¶OÂ|übOnäY¤Û³ ðÆñfùÆ—LÒèzþs{Áp/[^_sqµ±´„P/®¹Ëy¦M^ŸPGÖmeä1«/\…S4lŠ%µ›b›0ÂŒoÉ[ÚÞlîÜÙ^^)ÙkÅÜJ÷¦U*7sSsô}3I_Õµåy«JÜ!èù¿Ö¢[Hˆsön£âç½òTDÙ_û>xî5¶NÞlµ¼úl ~YÛÆoÈ%@ól¬2"w´m†›š¯«l›t}Ñ¢Û˜´pì›Þ'°Ïا%1ÁÁæùÿ¢ÒÒéÅI•dF÷*\j/ÌËeÙìAálkíVQßÓH.ŽrFºîƒ£ÊReyˆ u÷#•ë|ÿS4óT43F™V0!Ý݇d5&¨!&Ho"ºôI0[Üm—lôðh±ß!Ö÷÷îE–Eù, }ÎQ7˜ j(×a‚o?ޞŒ]e“_ž}ýëc£°z~‡eÐÙ+ƒC#ÏF»JZú„pûÇ"Üê²×»+2È^ïnÕ³¬=+â­ ¸_õ¶Nš6öתX.XAÙž ÑN-­(¤&„^ŒUPÈ®Cï _ Òû‚p¡üO › §µÐ ¶¸ƒV#„fš¤^¥n§”YPáwÑɤÛQZšÞÿx +i{·Ùüj×+ð…Ž÷1iSÖŒ'0x&IÈM¦·ÄŠ¤þ[© ‘R r¡~{Ñ|N¢ F&ì ™¥{W7uB>‰»ÁX‚V}q«¸”í t4J…KÊe7¡+ˆ°Näˆà#“(ãÀ¸UJ¨u‚VžºfEÅl¬†x•<Äå•kº„ Ø—J¢°“¹c r´…LpŽjƸ<ír¦õGï\U—âc@Z¹Ï°š-뺊ԞuÜn½hµ†÷9\ËáN,Fþr8jA” Ói$ÒM¹R=¢š Û”;õTZ¬Pô‘%Ûk8RJzGHÀ”t¸µå6ˆª…í^*@…͸Ð{Qâ-ó^xW÷yÈ¥‰Ï ©L@N¹Ýéþ³I@ZCÐ nþVUP–ñ»8¹‹½ÎA¯ B;«ÈîóäEÍã¦Éùô€¢Ùù“oc;Ÿ>&.*øÞ:àÌ a:+,€•®€;à1¡Ã219£Ó„ÃaáUa;¥ùF¾ƒ5¹@N»ZbÉKïaóMB‰¹öW -`ï²ךÊÍ kÔå¼8R‰ݔÄòƒQ,3ªµ¨ÈP–Ê`Í`E`ñÎ]ÿ¨7¼8íviK*—óêwô.@Ó .Ò ÊÙTœLµ¿ºíƒÎ°[õª9)?'ãéc°ò)è¥`öóÈóá³Ï>s+þ•5³WÔÚ. Õ”J%úà,ë_v‰4Ù Ã(’ÙKcUÉ:oGP(Ú=kVI“*CJ¨Ð‰—‘QYò±Ê‚Y–PˆØ˜Ý!YÄ–+s»€ó·»im*Ó!„àdŽ qÂ+÷ Ñ l ÄäSgð?YËT¯JÉá…Eæâ<{ùAšÐêý³n¿öè‹b˜âï½í>ßDtU)ó¶S¦žDë ¢ëÅ9¡ªŠ¢Êâ@â„„; ²bÍ(­E8TM.*ín•w Í‡ š¬.éQ†•ÅbSð)eû² zü¬¤.ßk?m?ûóg  ¦í•úÞCÄúÊ¥Tž·^Ô=õÏÏ.z§ÝÁ*(¬UX-yeÆQÞ/Þùu‹›Ò-Äiúp­â7ÚáûñŒþ®ó­ÃS yÿèüòà´æW²|ÚÎä穯¼šî¨I¸ïµh^J`Š‚çÏ`)Ó(.¢‹:¦Ú÷y˜ üå^ócZÞf“éhA"ëÎZ ¦>Í‚9^t„õŠR+“{¿|‚çúýà¹$¾”â8¯{oÏ@.goÀÒ1¡Y3ô$ ŒÉPÜ8ñÐ;ÑBWEÛ‘Ä÷ßTU ÁNıj¦­%]A –í@œ‡? äê𻋎°‹RX›ÛúqöâEUN$Þª“Y‚ûò­¿ÂŒFwWnEwZ•‘2øT;•UÈ6)ªñ•Œ‹SàGEþqsçýTÚõ8ÌKjº–ìÊŒ>ý†¥G¤°©°'ÔYQšŠ4å)üsêæ]-+ßСÅÖC‘=$pú‰ôa Ÿ~»ãa6Ëu’Þ·ëo½2Ib‡«HÒ&˜“3¹ dR¨b££á³ê¸¹9Ûê›`½·ß«àÛêdª ΂«^¹ŒßîH»ª 3¸ô^—ÆÎÊh\ÅC73q%™V¦˜V˜×e°2¹x…éÅÏÃ+Ћ}¿Ò¦û~³ùFÑ-oø•µÔttÑÅh¶éy{_?_m ,­Gð:¨–>¶zéñJüÚʈ¥ÌŸ÷Ÿ^V¾:þ<Ôb¥ùA³þŠÔ¿E%;F¹f=õ²q-r Wçw2+*¾a+òýP<ö +ó:ƒ3ÁÁ*Y›ƒLñ¥­U|ò#EϹ˜eh•auõ#ë6¶ ­Æfó6)üöG1öÍuÀ²øðÒ*ŸŠ“|*NòáØ,k›úTœÄ+ªx¿_q’ÿˆ2«S‹×$oš;lÑj•Œ~Mç%ÓMeÂp‚°›Õ®Îæ-›`J¡è+N¬µ<±çM‡í]Ü Ž^ij³¡ßtPÁ¾ ºÇÐÑîÀ?ëôúøQè4uàÁcÿƒAמþ/]SFÖ‡`¯Ù k‰íàk5A×Ô4Ãý£ŸOü´A¿¾<=ýÙïÁxKÑÍ«Ÿ[Q/•ú³~WÊ úØ9A¿¯F÷! ËŠaöËÔʨºVHé¼qx7‹®žÀÿÆOpÑáøxB¢Ù°Üj„^£ ZJaA'<„£BóÃ[[µÔE½3vÍË.½eÅR¯Tgž¸F¨1æCéÃ;í}x"œ+ÓâI Ýøw—Nþ[1«á{msÂkBe*^ “A=sÁÃ3åÖ%ÊÕÈ[“W'n£8KsXøºYöÛŠä·š¹o5Ö¢è8yV¹}m¬{S®v¬Ø©EÜOƒj;ÞÛ”Ý>û·±ÛšÌÖÁe‰!>ÝljˆÄwjðÚÅ +lg5,gÿ~&Z˜í·/žû•n¾i#ÚPŽAÒ¦Rü]á [¸Zé)1ù齞+ÛûSBómBóÇN˜úT^^ÇüôòòŸ ´¯ôÔ8þ×oWú~>Ó—/Åu;ºCõU2ò>ç—!xµ¼Æms| š5î(4ÀsAˆ$vCŒJì'ïŸ?£Âã¡y½¾¸„Y‡äŸ€“½Ã Ö°_ÅLP Íï¾=<ë ô.ëTØú¿^ÞÃûw—÷@pͯ§ãO%>þ-%>>…¬qô|* ùû…T&¬ÿ]5!T7hƒ@ ‡¢¬Ž(©>T‡ç§iwwÍ’¸_O÷\!ð¶þØpàß)X‚«¾ßE’’ü¥CI¼½ö7-3£•~0,$ ÑJãØP>xმ*tW™M-òE M:>J ‹4Y„i~/ãdtª_‹Aïõ©Eò ~Ôj*™YùCáMX*d^ÄØsH öX£×c\Pò!~¸m7ÕY,ÿ"- 8^éaã·A P2·2*Ä…^aX( BªÍ¿Ìtú# Ù”,ägê&‰A±©ë”^Æï^zù1aöMƒÌí¼ì†•éPS)IQ«,b}Ìž¢¡H Ф²Ö°%ó‚ÈrŽzì]”¦RœÜQ,Û˜l5Mƒ<0üL£B;—eè Û€C Laý1)Æ€4b–Ɉ¶qM–›B%8ËFêjïÍ@ø±:4¼BGo{¼$ø'ð\e¢»€;ŒA×NR-­mL„š-LTízv¥ÍŠº<{PQ8‘6Èa\YÜâ?=õÐ&r™mU².fËŒ3LJ‡äA‡I]{æ—±PWÚX^G(—Ì ÕÎuÕä(pÑFH%{£xŠlØYyÞ?Öö>h×ñ›7ÖCÕ¥ViÅìX±àkOºo;ÇBáÞÀó%^ÛÐùõÑò‚œ÷ŸþÁÑÞ¥÷˸U'áûàè ƒv¨¤qt½L‰ìþÀˆÛÏÝ}¼®.ûÇfw Æe¶V=Øó¡£¥¢ƒq½—̀ȥéæÅ ÷SgÔ"Ó@>8å®qV¿ÌøhÚF4y|*eƒÓjA2}(‘²u<£Å 7•P fW½ÔBžQƒÎ¬ÙÌ›ÑÌ€B¤bÜqâÝÁA-œ:FŽªÖPa6…c7#9b½]śٽÒY_‘ýFÁ“l±ÃÈ'I4ÒñM”ÃŒ»Hû]HÈtV1rvSåil®ÝÞ–ªr‰¬eQ¢Ô#®ˆÑˆ¨ï“¤ìòêaW!åü=¹òæaJfB„Ú…3/ÌùØÓ½gÝ!Nâû9¦SÈ'Û›žŒn³©cxeâ ù°‚‰H‘o1@F6±¿ÈgF­>KªãÁÎaŒR¾ƒÅÇVa´¨“åÖÔ¼ Ãj­ã`|²Êj4Fè fã2ŸA ž6mÓ“øHšÌ@XLd h|Ç—–h×-€¢œˆ»¤Ø™! 3¶CÖ^…°ØTµ$™69%¿%…?¿“23šB§à:4&ƒj5¸ÙzSB1MP6Å” j˜¦dR ’žC¡áfIÊîH¸¨(#ÓÃ3¨åm$iPpa@d`@+¶Ø‡w•\¹âÇ ç-•[cM»üŠn3€M1ÇHÓ±Àèx5ø¨LsJŠ½¢,ì±OÑõ ôÍ–ãw÷$’âi‚ ÷w„œDð”b º©²vo4àlìg:%”P: t9Iïs¥ 24Å÷q0Æ0WÁD­w¬•]’i.Ð2—9|Y·©mï7+.œ{·zV­ÅUM!¹Àº )²™@9I’tvߢ’; n} ;6åjJUõä«6òF0‚4À<ÊÄnAºD @L#lç4k×nÊC0­lçŒ4ŠMQùcj$‚d;%¥E½Ð0ËMACôn,ªR* Ë–Ói4[ÚСbÔ¼› oةн€­OÀÆDMT6LÆ*—¤¹ÐX<Þ! mæ†ËŒX¹¤ÅzçÜl¹×Õøî£p&À옛7{æ΢(Vå±™§–ᦪq9ªt¿é—^Ôš‹~© ÍÞŠˆ~\i&[¥g¥âm(H ºªR1IÍŽc¹”$jº…BhÅóø¸;"WþÂÙĬ%!ÂvfÀR©0ª·àc‚Ð |ÿ˜Z€ wâIŠÇYck{&Úéž %°•Já!EŠÒ×<ˆ‰hšBÞTƒs8RMxAÙQ>Ùx½qd7¨Oaý/ö”b Uï(˜ÝF？ÎÚ«„ƒšÜaMxC…Ìÿ4xÖ\™§[¨J§}Ȩø8]ÎNws ©U4Q 'ã¥B¬?Û!­¾RXëŠ[E&²qC”5/ W¡u akY¡sŽLêU5ê.òváh0쿵® ØŒ…` *ÞMy¸Tlb£UéãnhKýOGwÆh›ÿÒŒ¦÷mÝ`ãöÙÕE~ð=ZÃy´ \5/‘ù²ïÎÐ`ºq‘7• Cà®ïcɳ}+ÍÜrÙ?~=ì»UXI(õžV¤[©¡5ñ£Uø׳{a»ó¥×—&ÏVUƒÇúyÖÃÄkÍõ3#)»o/N{‡=à½ã~玗þFWX:‘nÇÅ~¡#:žÂÈ%£+¾bvKøx¯.[0õúÞӧŋ·Þ󧎦Êá½î°^±i¢„¤‚¯Û{p~£_Ä•óEC@-”ºžªxM†R‰+eîB”7ØÌ$f‹J©´°Tòûßy{;»{»Væ–1ÂK1DJí2sÈÒma&X 1÷yñ ¬t%»¥] èÁ¸¬j’ÖdÀ¥€Íz´Ä§/®÷:=û5Žq³.a± ƒ2/û½· uýØUã È€]ÆÑûmÒò„»eêŒ\‡í²Õħ>{…à|°9ìk|n› ñO‹Ò!¨ŒÆÖ;Ö¸oSüÅ!¦k° ªl×5R%”UŠ¯)“ÔnùÒžºd8÷øBÁâ,}€‡¾àâ7E£Ÿâ†ÝÃsû¡ Rbe®)°FaOÌ ¡"WŒ¿tÝuè¡åÇ?<ï¿î—ªòõ†ƒÓ®ßës¹sÚ” „þ9»;[ºÌûÝòàŸÙæQãnÓ-¯ ÷”5S"ª ©¡$×…‹“í¸Æ%”h é'!㢑æðþšùŠ2¥|­8Ùö=1ÅÚÛWmY\#ˆ­÷Ô®o4Ên^SŽÂ‹—}¼¼bf ^@&ÃáåÅÅù`„Îm·ÝеüÖjtú—SÜM5!ÚSåÜ8b{É}SÚn¥cÍI.âµÃ“îáÃ˳¡k©ŽOÏ s¼\D‡AŒ´ŠÀ.ÞY÷ŒÁ}ý7Ñá …Ç3$g414š¦×®0°ò§xꙑ҃ñ9\„ßÇ’Tº´Ü¸UäNôÕÊx€ñ¼½°†[V`θ);n÷” Á†Ï“LŽñ=x%´xJšOZòÑ1º#º¯*Ã|DÌñM‚ÖGë3RSôÐü|9Ë£J¦9úO¯ÑfÜÑ m_Ͷ=-•tBßúÜZo[¹¥£X9¦ÿrSgØ«mêl2 e™Áhey¾]µZnÞ/:noFùIûª=Ï“‡WxIï<·ŒêäÜÚJÑ}ݹ<-÷ß`3RX°.‡”aÊ'«DøU!ºmÒÈYïÂf˜”«Úlšúp£ìàѶØ*‡6/{þâÇÂûêià‘g掟¾x®Û2WTû`,ˆu½$$IHrÛL c!ØM Vô´øIù¾…`c¤_-#رO1wˆsÎèä ¼/j¾Ë¥žw ¢x¹óOýC‡¡[r¨ÜîÚîªqÙM¬a!©Ó°=²=Ÿî©T»h6aÐðs’’+È£4Q ^¦{py|\H•æç(ÿì:¦âI‰DJZôðîKhˆÂ>¶_n3aÃUNDlW ·…5sž+×o¢"LÇ‚{aI·­qˆPµ@„C”&ïbßO?€(«H®ŽÇònžŸ¿)PösÚ >;èuúM‰´(Dˆ`ˆèã'†@aöÒ=H²òƒLàôFúæ[?c€¾¤[$yÄ ³(ŽæÑ?Cªæ 4´ ÝÎ]\Ò˜ã¼Í0oõ'©i³k»Ç‡¥67vû?•LpÍíÓ¯¬÷Ç©g™1¸>â‹Ô´’Ýk0:¿<=-˜¹˜\adÂlh¯øu4ù4O–û¢gf[§X¾` ¢kŬ2£‚]±yn}6“ö3ßM—MoŠ±©¬bsøxý,M4kŠ¿ ¦¨íŒé/~Æåð™zF˜Dd²)ºáýÃNŸz¿rqSp?ÿücÏ¡ë¼àEKdáIì$^hº&E½Q6‘½_Óagxæ³çðü¨K IxK”ÈÒfºD+ק¸ ×ÔFÐ`(r…sä7$©°4ådk‡lýžP.ZgÑõM>³ËíqSG†!?Þë¿>Ý’±ÜÁ­P·pUDÜlê šŽ¸•îÀ@!Ø4Û•›ÂÃTO E~ ¨n,¿Ú^Kµ‚ðí 9˜v…†åÁ2w2§Ž6]gxÙÖ®MëBî(Q@fHhÑTëµ¢ªy4c5‚VÁÖ ˆ6e¾Ž‰‹Õò¢6œ› ÃlO“y”oÓ“Û2³g: ®ÛnñÌ=ö4ÚdZ ”Ñ$à*ÖÕ ]´çÇX:‹w=gÏhs["typ+fnPhÀÁˆù¹ÅçúËùÌ(3‘¥H6‹¥8 îåÍ·œH+Fnà\[=üíy©'Ìåd7Ú^*¦´cW3í¸•P—ÞŽv•µº4-’Ù©ÃûÊÛ%¼ÁÝf9Úâ9ÆáUÜ"¼Å©®ÉËhH|~×¸Ä µúc¹ÎŒHr©cZb¸8öÞúhé½ÈçVåT8òýö[ôûËw×yú ¾ïwß‚Ð8ì÷‡ÈT*ôfDäè&pPøùª[–îüØõžòEzÿèàØ?9 1´ÈŒ©0.»M“çS€ –$ï Oz¯Í¨ë:®ëŠVù]g³…eó2/ VíÝfÓ­ý¼î½½¼ðÅ{‡©ø„õBcÂÛÂ{…h2¸-ìyøî;¯8|WT¹Õƒ[7q?Ø6Ç3;Õ]uÏ€Ôýü è'bl_žv‹9Æç1ƒí/{"Ûœ£¦zn˱JÈ0+‘½ñÀÚâ(¿÷r´Ñ¶‡}e/Wu’máB""S)Q–êì6J‘ÅVÚî#ÓÊâ²#ì ‰\†IþÜè€ÝƒçÞ4\ÉÐø¤½eJ3Ÿ­èÊgµúòÁÝ°f¤äÅ]ç,`†¦;Th€#e”;¸AHž' ÿJì»+â8hþÉ£"lT Ë=gÃæ÷ 11@Á®Çþ"nÛ7-þ»”ßÂ6¸¡´b´¦2@ )Gëåb»©ú±›:Iî$ !‰$_•Î}>|Y·)í`È®ÐtÆáó"9XäÐ1zYNZ,"»)Y­’ˆŠ­‚DÉTb©>ô¿!aC)ÈŦÆ7˘Òk è]ñ§(Çh®L¡r(0íT°Hi %\Sµ±›BÿÝY÷¬Ñ„£Á3üOP> _èž·×6µCµ&a¢bžœ &‰åÊÜfwS½$ÔŒùœ ÝbŸŽl9Ú†&ó*¬h*Ð1­({‹›{òÁy˜"Gæžö†sEj*BÿyqX'‚YL£DíoÍ…)ÀdãBŽ™Reú0½ < %ßqŽýIÐ4…C~») $n„=˜åér ›ïjön_ÂL!¬²d'íB:éR¦F¸Ü) ê3a½‘ ¡ش ~Hºã[Tœáb4h˜/‹·›ò™¯9âªùx£–”ª~ìw·Ex¡1 ´RS{Œ#á%ÙžÿÀ1ˆäbÝBq ›tÜ+ {íPú¼ê2Ï[9-ýáèü¢JKèœõŽ;e5¯ú¯1*k¥»ÈÔ1ÊxV?Dì®SaðýCøæà¬YgÎÅ3Ac·µá$ Z³ßñ¶½òÒ¸**äã‘…·Jw˜îÃI(Õ€TØ0ö±÷¸Yj‰+u¬ƒYOÌJ\ÖÛüŒ9ü,³m/ò»yŒGá|‘¤AzßïàªÜ0øOË;H’ždº=£3½¹_Bw-éŠ9w×½v-òÛ¯ZA׆r•¤©è'ýÇ×ø0VUÑ ¡5s¸“J43?Í-¹iF3‰<Âà©p7˜G×jÖ ”zŒUlÒ•ÓYúʇlíµ¼¶¥»Èžn¾ÿ(Kn5¤?XNàUú ûqŒ[ Î7þôŸøs=Þþ¦ý¬½÷Dè;OP´iý‰p¶Sè,ŸÚí›~ñBŸ?†ÿî~óõŽù/þúõ×»Ïþ´»÷ôÙÓ½çOwwöþ´³û|wç韼?ý7ý\TõïÉÏ“Ç@¶;L÷)zŸ¼Æ¸éíAÿ·á?_£·â$¼›…y¾}Œß°‘Ñÿ£“ª3›yôªáY˜Þ‚¦a{£“ÞÐ;ƒ-1èuN=øýbpþSï¨{äu†ðgË{Óx‹.GÝÓŸ½þ¹÷¦3tú£Ÿ½îÛ‹Aw8ìaKç¯wvqÚëáû?cd6Øy?Ÿ_<4f€dõ£üòE˜Î£,:-êõ0†ë4 Œ ÐF0H<Á˜¬Å=GR-ÒnÏñ]4¿cŠáb™‚R‹å¢àæ-ÅûsÜ\Bð„y49äT›€Rž& ¡É"Õ£ÐTýà÷ÚmDì â5ntµÌC~ý‡Ò­$úÜÂÆjvƒ=¿¸§Aשɻ æÔw0‘C˜84~0·=VÔÀ-သq¯'ß@øX>,âŒ$„%qÜo ‡èu¾°m8 E }NcŽ”@è´mc÷’ÌBWiŽÊv&$ŒÝ´û hG0ž¸‰4ø`gˆ•Œ¯„!ÑîÍʨ=F÷Tî]¬N$à€”MF2Vï,¸SÐin ´ÊêEa ¤¶‡ïñÍÌøÂMA…Ž'YÅ{‘â Ƴ 嬔×ÜUøÛ!Eæ!û'>×Ñ ÎûЀ#Ø’G‡R·”¯üªù"¼Å3ÄY¯Xò6‡ÑŸÐæUaêòÆr3X8ºÃG$¾2>V&¥ Q.º‡½×½Cg4 ¨ ú¾㊟2¿YnɾënçðôÐ3ý9Û¶P7MëP FÇÓ£¿ËÌ_|¦k#'V|mÃèE‚rc<xÚÞmÙX`G2ƹržÛþ&ÌZadá%i×xÜ^Ú<¯3]Ó1cå’NöZWè=îåÖº ÷ô/¥Öô_:2rD6±u‰Òƒ ¬ÆjyOʸðJ¤ŸŠ g½þù@d¥6K°òêZ>²R®°Ñ‚iÕpB­L‘. âYiÏ܃ÀìäB;"A ×?úÑK_À‰}ˆãÁ 4BBG&ÐX>ËHŠGH‚¶¶°Šý`núñåÛ§/žWe„ l_È ±í6Åtû–¨ö¶®…RN”}»˜“UÑJ¹6§q“lO:,º…Xޣũ²Rž¬‚¸¼Æå}TjÔXäî|¥œÒ”=XñëñØ{Ú~Ú*­›ª`âUî^÷¾5ƒ&¬§m–¬€·“eêHÐvèÓí»,Ÿ€D‚PVx` ']NÀ¾¦Nœá"31ŸMzq+íZ¶¹$ÐiVÄX‡÷ „Á 0^Ye½d¸(Báµ4= KÃ*™÷¯GÊô ª5^×7õú?Ežö†£!UGϲmÕ£ÊÍÿ"=¦©ùzü÷Õ èrNƒðˆ×§^CÂsÔ%& Bú c¹pJšfû¿lïþº_p…¹\(yÄa²Üȳ`Ò…u·O8G½áái§wfFÌ¢†“Õƒ—ù˜A„¼\ZÄjˆhTj¼lÎúÉ2Î ñii8Ål(™f«%T@–3T1”/9:Å”œÕ.£:ù3;Àü¿¯Òp,Q›Êẚhü˜Ò~`/¾Ç èï^y—(b†Ô·Ë §èš0w,íÄÕ Ä‡ž†w*(–6<¢œPî¯Â0®èÿ›# UÞ®5Wº¸·7àÂc bJÚQ“Ù®˜‹Â,ÀÌèFiµ€@2ò³›8Ýö@Œ¥ly˜žxÌÐM /ìÔM·.®FCö≸$2ÌÝz”ˆj¥¢S½Q,”NE(K;/Ì´“kÜÞˆ’~#».òïý².SR6,¨1D¼•z³Ìv1®YÏfŽg³Šgß…÷þžÈ5®¾d=™ ”/[iÀcMAÀ¹r8{蹈a aáÃ÷X —&Nž*ærùu„1°d…²6T€s¨SUsEhï›UÓƒƒhy·‘OÃyå5n›(Æ5Güü¤iF]}œ©|~ÕœtMeÊ7N»>ŠÛþüb„ŽÛ&ܤÎgv?õ»&Ü&Jî2!ئÆÑ,;s:F×NógððP<,/>²Ë¶sxq}/[Ž1o­åͳ)×zchлXØcb*€üóË‘þÚïõºo»C;€ L: qTìÈ{ŇݒPnÐkafFsçýkñã€vVx øó³W0JÔrKâƒÙ˜mM¾ãÛ?xÛ»ÞË"~ýé8 |:@r<#sñÙ'“0Æ7?HF(‰–&bõ>vX,Š6!Ùm´ðÈxG6æ(#˜7Í@Â.Fe«²Râ¥ø–+4ÓÁÉÃÒRÛ¶-R„|l@'”u.†#Y¢üÊ!áñ#@Ý$3ExSâîæÑïw¼—á/ìˆoŠÐ Áý½Esÿ‘ú„¨š-í¤l‘8hºÅ8ô÷‘B¥çÞ½!èÔÿËeã}Äàò{ëæO¿‹ÿwgïùóôÿ>ýæÙóÝÝg;èÿÝùú“ÿ÷ßæÿÝýöÛg¸Å߆iòî¥T$¶s…Ó·ÜÂslaÁ›ü8 7Ñ8Û¤ØÀë0Å2N'èÅK³ z }Øߺ|ØGám8K$tH66ñÉ£ýË£mø>…C@1'ûôÈv}ºn—ª5 ùJÂu°R»§~Sz_å‹òDã'øRÙìË$cœ“ÅÙ¶ñR°æ+YwñyÏW?çßù)4沘ÂEqà÷}aD&œeY-ÉâΕI '[”ý#K ÿ¶o$¢ñQ=Ë‹Î$ÊKaùˆ.Äõ¶Q²8ŸRž{cgyO°ûÅ àØhNÉo@oX¨‘&€áQ÷W>Ghñ¡|rCà..¹!–‘ÄÀóŸº'ª¾¿\% aF™O³ÏrnC/ Ÿ›ßæÿ°ó_9ñ?ÎÑXyþ?ÝÛýfw§ÿõô›§ß|:ÿÿçÿî·/^´ð¿ßz'Aœmÿ¥í$áͼ‡#¨Qðçˆ÷iæ<²w·?Žè€Í|û¡ò÷xü?«sö·¼Óö…8n?õÿûÏzNhœðú¢Oƒ-èÌl¦ÍvíP¢B\âé©uÞº•ŠÖžI†¶t[F[qÂÔ–Àth–Ñ`¦³ET $ŠgæEÏ ƒ¶úÕbëÁ>Õú%)Ò÷0rþ€ØŸßÃß[7QñV³i¤ @˜òíR qå'-ØZWèßê”ü`Ð$ߎ(â`oÞË,F“Ò†‘;©(…ÆÞË=¸Ml5Kñ4&¥bC7!Õ= j+ì,ƒÖ‹^:jJ}Úõ^½hBjv$Ë‚.|Åü^a[½²v¨ž€ÖnEk®Šû²å)ôøÉMKdo¬Ü²©Q‰Àk5Ø)qdfÁ’´K¥A>S„e' åvÃâáßLÒ¬âˆèŒFÿ²‰Êæçö.­^B»4Z-ïÎeŒkD@yÎ c¾ìÚ6ö,˜OKÌêŠJ ÇŒLlV仇£Fø~‘¶°T<œÉ¡Y? n„ãœïËÛ¼¢]+žh¶<%‚ L¢±s”P'üÀ«W¢‰ia6¹ûÂ/ƒVƒ3DR[ÍT·Å1[Þ»ðžd2:©sTÌc ì,ów©×9ô‘¢°nSÛ+°ä;“‰›-x‹ý³á¡ÿSwPP8cêT9 7Î許¬„’§…Ói8ôG~§?ìzl ã žŸÙ…ŽJÃð}k ÅïZ f˸YkF²°ú1ç¼èùçCÄ«3µ(c>”aêšNŽ½¨ÚͤX #2$ñ´óa–ˆ{»â$ƶ‚Lž½;5NOÛ`¯µUUçåÁµæ,¸•:Œku`Ýil¼À­R¨ða´éX+*/ª÷Ëïaáë2F׆͆E£ç}BTdD:Cmðt*컈Àeíðüœâ3N:}ï{óÆÉùh$o|gÞ ¼?~­ñ¾ußô¨"£!¿ò÷°Á¾÷ĵ÷ðÇ¿èÆ+¼³ÿÛüœ| ©ÄXIÆnÁq–zÀýãàÓÛÔºcñÌ~W5Âï7á6ð»Ò·7áÎÚq}¥ÆUö•1€Ñu†‡Åcõu…Ýi*FS¸«HëÑ“Çë~(ú¥D…F–ãmæbsÉgT=”íÔøÖú>Ìuƒ,BÄêŒI#YŒ Ƈ²û‘;í}®€Î/Î}Ta*è2u–/¯®’4¶ò¸zÙaÅfÑ<*£•­sTê¥X5“+FZü4ħ e]‰àÁBŸ¡•°"{ ñ ØÈáŠï½NÒ1'}hÐbø'ÑÉÑQ’Š ºUFhŠ³dÉ,Ê4ÁXGŠ‘+'K¸Ø/‡ü®h '(û%³*¸á(žÎdž„*u³ªW0)h’%mDV¶œNÉïx×Ë€ÜẒ”(´ˆz£dY ò#Ô¼º)*ôÌÅ\¼ë ½ ®Ãmµ1·á,År‹8eÅ.r,Õ@ä–µÄJ¦9Rd ƒ#JÛG)lmS(^&(q^{‡Ò×”Yk¢ìÎ2“†¦ê¦H)íf¢v1Ï= ×÷ žGïÆCOh1›}Iš¾`ƒL¢L!Æe/W4µÛ6ÞVu7â„)=Ì0/ªeLߊ¦0Θ\çäµë¬à^›ISWP‹7èÀ”ú±É¶Wö AæE2‘(ÇÍtË•˜¶tá–·®©«{š˜k` -/ÌÇ0šKŒÌò†Ëø|è=k¿Õ¿½µM±TMúÆchGtj:BÚë´Ïõs?ÉûŸ0TfUF¸©Ah52”V6¥&ʈ–ìf¤×¼£cowgçÇöê¦Ñ²PþæÕ‰¶ÜT†Wk]¯æT ‹­ðúÁÒ!€'W+»â*VæreSÀÞóe _Eó å>ÉÜ´;ª·‰HCG®¡+x½vá€ê¦zSï>Y’1>äSp@«pR¢Ú-`¤íuMM#ÀMÍ»0\¸V’V£½ºWR—‹“;p¤òqž&¤½ÂÖ³\´Ö0¿I Û¸f3_¢¾<_]y–N‚¥~°"Uï¯ôCuvHKýédVñî&^Fç÷ôÞOÐ † %*Ü<Íä³,?­zC…LUzGzS3¦ÝObÎÉÊÆ|& ±â5¼ÎÑý5%è´½stNßEYø²]‰¦0÷‚òñTS<ÌÝSQ`.HÃ:îÕ±ëÒe¬j­`N'H…r¿¦)ºG ³ß‡¢ðßñ¡7¾ÏÂbçr-–Ù1,•Å`.Vé%ù|½ÒÎ î!ö`ˆ`p¡¬/<ºŒ)¼m"÷`{SF!šºŒS,×äA¿›Œ5Œÿ± —ð­õþ<‘…Œ†e‘é·ëôª'p€èð[“žÃ¶?OU0Š†?’x}…•NOøæÌcáç\-ôçÊj"5ËÕÜAÕ‡7“ ôdÑ€{ŠóÐg´IëpX9Ÿ–Ûhà+Ý/j D¢ š ¤F[X;Ëû^5ÒòÂnEÅ2:¤Ày§¼\âûXù+WÇg¶p‚q~Qè…™¡ÒWÔˆÍÄ÷X̵}¯ÓqE˜µ» IKÃzXü»<p¾&Íöú¶¸–@”½Ãô2Ð&àü ÌáY¼“ȼ:ëÛš,¹®—7 ÐÆhV—Çì6ŽDÀFk´¥¿ËÔQUà,šó‹PY©5_´·®Óä.¿©ˆÿ1mu\ª. nqÔV}¸m`.5»ŒåŽâ™Jàò­#1Þ7…F¬ŒKElºÅØ+xRÈÃŒ¾ÎlvW¶ üðzâWJ ¸Šòm”`É:$ržsQõÃ`ÑY”Äæ4¦™ø^CVQz ¿Ò·±vSÓû³·‡>ÞÝG…E?e5QB|º´'d—'Ëùü~¿Ðüí·RÒE± ›#Ù$Æ6U› "{‹Ž…CŽøÞüÞ+ÆßÖ£ÒÞx›«©a«ð‡x€/¶+™[IžÂŠ[¾x¹Q¤ üÏ/¢O¿º³DX«ÛÀïaÖ?8•Ê³ø{˜ìËšK;ÑOæ~¾Ð—OÙzælHûG=‚O¾ õ¦ Šæ!Èk†§N´„¾—²gÛ×éÝÍ¥T‘Vü³ï|ò:Ìùvcp9ì€ü4ìž¾ny_ðŦû¥÷Þ+Ñh;]úKìµëÁßDú†ŽlNE#h]!‰ÓÔÚù­Ÿ…coÛ»¿6a›ïîìì¬ñe}å9ÛZ-©µ'ÔZ³àü_)ùÇã˜W¯‚,´PI Ú!X 7É°~ÓÀõ:óQ4~wˆÀWæšá¹kÍíÆ9¹ÉIˆ±*bŠZâ·Ã.üf†Ý6B”r`²hdÇ®f,J5ì ¡•ËO=!‘˜Ïšõ&ü srø£5¶ú3îvv9uéQÁ–‡ã›X˜cAH]^Kþ^Êõ¯ÔâÈŽUÍ£”|= ó¾­³„œ¤]9vSKËÞ¼‹¸£³ã/séRŠUµ#V:çW :Ó©gL±W‡tšPž€È*Á ô€¬”qû¸ºÔÅ1?/ôJ}\Ý{WI~ÃO5¸ˆ-RDFåÊq\²T•Xà¬4WŒ ˆB1Z¯QväL¸Ù·DadÝ*Îb¡©, çd­  *SÆã±°Pœ¿ê.”¸ê9zâ{»)ÙÝ– QÞhZ¢? oLΠJ81왃æÑf6'ñ$ó†Œò:Š[ÒÒª†˜5Û«QõÊœA¬ÐZÞ Öh5S(L🙿BTŸL¬Ÿ&‚! ÀF€éoÚ\Ùhíeùt0|,ž/5\ÜéLä†-}’, WéXû¦ªi¨·Ãr5¨*Ö—5ªT m`o{6—®)’æ©Õí<ÙÆ^ •ü6¤š]mw³T,Ù¢à±Òý†ÉòêŸašÐ6º¢¬7{b$Þ”Xˆì^F¯*%¹*šŠ« [¥ý.áH²c Ï/~ö»opÑæ©êt|þâGì–‚@>°ªR´Y?uÞnø†ÑS#KˆΘõM‰¢«¥-®¶cWê|Ó\ų`Ì%s _ âÀ€VÜôpcŸ%·áQpÑÃHckžˆªàŽ|ø¯ügá)g·µDT¸]kdçá| †ŽÁWU=–¸iÿ¯ÝÁ9÷_ÈÂû¸Sz¡h ³¾Ä3£ÐQß7[ê÷{ø}ý§y®¬ Ÿ—]˜¡9Ì“mWtžc0ô|™h•ÀhâlLi5¾8HÌql—ß<«þèæ0ç”'3jPã/4L~©^ð‡aÞ}-eÑmx–L†¾e]' €>AÕÖ,Œ… ÛF×Ùlðâ]å¯A…ÆØ,Ž¨3}œ!ÅËÙ¿c0ŠúìäV*€¦5Ä´çvyh¬ ÛSåxˆÌ~²šbì†W®D¡éRÄ+ˆAóåm}¢Ò-e{¾D‘J 4E=[â“)8 ƒÅˆØbO9í´AfiZ"?[ àÑ¿ä2ÎU]·£hœ^ç v% Ÿ7ѵe¸ØÁ9|4kÒJ€þå_ÀÐƬj©ùCGhà;€ ÿΠi«¾öeÿÄQ´Àȇ>ëõß<Ý;ì–ò- O^ÁÀKý$C%ý¹…‘H #ã<¢-¹¥ÂzZ "Ü6˜¢mt œJ[%1.¢¹OòÇö‘Ë+ý+ŠÑpÀ¤).®Õ9r¯Â›àãä`¢„H«b4¤ZÅO ®Ú3ɶÃá<@\é6—uA½šúL1×5»IŒõœ#€ÝuØ®Z Þ°<9Åéjéµi>r…©ÂM‚ %˜"‰D”.c¢­ ßÆ׷ȶyŒße®~pÎÈ&}Æ^]°_^Ôxw~®ÚbåþÒ¿JÔ´oÑñ¾÷›kŽTéä—Dg‚’¯’÷-Þêc IÄ8»¯pÆà&$3ö6p;l·DÔ(…Ê ê[‡ØJÿÅu+N„¬„!—„‘](u’_dEÒ)WDX½b7 »ÄÐ×>7.ù!U¸×˜0M„-ˆ˜ã#v·Ÿ*Ÿåúð’ýé<7ÂKµ1{åØ©‘‹F ß³sAæù±ç #¿cTOà7áQ— £Ôùæúl\sòüÎàx·A]kñ0Z8ÆÝì×0õÀtXò9Vôš[Äyý >i5ì¶QóJÒ[͵Æéâö ÿîýnÃÍÿƒyZ9úïÓßyHâ#>°GFr½GyŠ(Gâ§Ø‚/ãd›‹•©s°Ú–7ˆ_%F.>Ü5Î\m($€`vÜg\¶½ŠÚ]Á.Š}§,3 fNqûèœ÷1à ¥Xþõ§áhöÃÀÏx*W\HÅ6°<œæ숥x°}ÝÆ|Kòr-ÝÂ-è꣆!Úâ—»­UJý¦ÅIormc—ŽSxÈÝé^PÖ±•cï‚âD„‚äˆð:Ž ˜a;{ m³fžQáÅ¿ †q¹–fœ/õ«[ζZðßÅÆEmýyëMgÐGž\ŒíõÜ oÐ>‚À ·q·±t64­LfóÞÖl²e‚Ň9lµÛ(M8Ìþ—Þ‹î‰ jÂlîöò_÷N»¦[_ÐÀßÐB `åøµ)K¹¸¹ºd[Ð>h«A—¯Òõ‚Ÿb~«YÑ 2”Â;ݳ‹ÑÏâ5Áðòt4†ý7¶â`VÍCtß…syݶ (•Y • &*G opx _ãMòÊ3GÆæ>rÄ.úŒ-¨Ýëù ¹]˜E… b¶P9Cž˜£§Mã±ò$ybš¬ÇÊó¤fêySH’ÎÉb‰qåT=6M@‹ÊÓhqÚ^”J½§®0wÂ66RP¸ìR¹f)2Þ'¿!m=ö‹2¥â­£-=7èÞ§Ìr³$sˆð3yX,4Š¹ªVŽœÕžµ%9¢awͤí—ЫA~Báz¯šÀP8ôD-ˆÍ#Ãœ.SôȶkrµÈÃò²úG–yAƒþÚSªŽå  %èK¡¦8mÒ(2Ýõ¾ûÎkð3ì´v?RÁB“´lqXQÆ;“è¶@ÈßÏ{¤©Ò¹< r¾º·©Y27{F^1w¥,^+¿#¶¥=©Æ6‰M^Á!\¯óöÇ×ã¦TWWJSÎwéÓ»NŒG×óæãNÓà{3׬í>¯5mÏêMÛ³O›9ô‡ÏÝÞï6wFåÌØäö<ÞrVÅ7Äõ!’øE (­ÊóŸ}¿'˜mÈ©‹¸kZœÆÚ6 ¥Éßk»ûÒ3¯ŽÙwlú1*¼©¡Ù„ÊD Å‹e²3BÜR449aàØB0DÙDŽo"¬ „Ð ª ¡B€U_‘8¹£rÏ~äÌ_ÕÄÛÏ©&bš“‹ŸÀ¼a- Ë÷Â÷ãpA.Œb2Wg¶¸ ^"âò\PPÆMË‹©#ÕXäÔ„×òÒ{Ębj-Óö £`.ݵ#¥Ã0ôËY³-—f:™Ä”õÊüjÓˆúéœ^œtl=7ºXUúîÓ ‹Gùɽ•è‘åçwJ›*ššõͽ¯w÷V¶ð­dæK»;{Ïj|·øæÁ¯~m×õšHi_3+¥×^ì~»zh4íå±=úbÍàžÉ©Ç¥ÚÞþ-ú&ÁÈåY(©˜”-«Vtä?f ÿúiП¼âݸù°~xÈSïÅ™/ƒ$¢)Jª€lC C™$rÓ)'õM,žFY³Ùøæjö®ÀÃ÷ùq(Ó<•Šß粉 –UWUUÂŽð¬óöüà/ÿÂò“=-Y™ócÜh:š¥¬x U¾g¾ãø Ýp}Ež)aÍ·Ô›ŽÏÉ{Mƒ Aô£é)J‡&X…Z '-Zÿhï Õ¦ðð¯ÿ°Œ÷6 u¶¼Â¶dÃØóJ<*Ê.éý=ËËÉ ^¤¦¢‰B(}Òö«T?YÂʉêRT*™ÞHò¥PÅ84;ž4Àâi.,FW@Lj€¤ôJ¯&í»6…¨Q^œ·@ø9 TÄBŽKO¿z›ÌnidTö9ñÚÐÉö*˜­±–ò ¯!—Q"õ+ Ù€í k…‹ÄbZ‰Ç͆Ð*<ù6öÿ¬ÖŠÍõ†§Fƒ’þ¬& ýñÈ»Kõ–óЬNŽòN˜±ýŒ– Aã%šî¤~"úLÇàîüË K²Öå-…÷¿ò¶˜¹ííÂE™¦)Äí"`Í+®+59`·5HlJØtùçw¯¼†¹[T<Æ¥«²cM«Û…þ:*¿TŒYÁØt݆݄ùú£–}³#˜VŠa\VµRÞÛ˜/ŠµÌÙ¼Ë8³$!K'PEáÝY’ß4<=¿ƒR3d¯¦á0ïõ™“¯®sḃÞÛ³îK„aLf 5Xe28+è$Èn<‚ÐÄ(BJÍUFnrª(K°øxO&sxú‚AÒ ÄX‹:»Ç7˘a‹ÈÃ.JóˆË^±1ô{¢†Z¦ÅaܨLÑŸÿHºì¢ Œ×>' ÓºMíî½øñ ÅÑÌÈÔ¨eÊö4@*ë5U ª²2<º4i»•“¶÷Á“öâÃ&mïëçÿ–I3Ã#V¨~3êí¾Ð;zRqg‰‰…6zQV§÷Ü}N´ ¼Vœ:¿iŽwiŽëM‰g¸7š‡%ãñkeÂöúQ6ê6…¨°¨Þã Ý¡WBÃâ™lj6•ÁªÞ³)‚[„,¦N؃¸nSpÄPqº»PuÕ ÓÐcŠ5&ËœrßD©¢E{5~[™&¾þ}iIâòš³DÏI8`sˆ¦I»0ü¦ýëªæ»ÊP­ é‘UQ»åS·~‘/ÿºÿÈnñ¤3vïASòŠê©ÔÂÊÚÌëí*hqâ¡&‰n¼oæ%ÞØ{çeª±©[¼d-gVÆærCjÄàã><ë Äy3tÄG†ycð£Ð±û Ñ>±T7+ œŽ ” HÏÜÄ›­ 2}—DVlÏÐT±ôRÅ’—ÞïMUç©ï¢³\ìjÊe¡@ó}.uç7ømx”bØ©x6YÑ”F\ÕÿrO3›òznºrüVçA­+vœ w°÷ì˜(½O14 »Ã) æ~é;¡}lÁM+‹?”Þ·°ýµ AeAÈ Ã¤¹¼¢®rýšEŠ· æ‡ZaêçÞm2ƒ›Q‰Û\XÏ=OžBlÙÐïÛ~`&Ïš^·0SÄË™í¦±€Sç”+´ÈJU•c+¥³f…¦kS™àÒ>Zî‚Ä_Rx<ÑÅhv«p.]á\‡ÛžÒÔ`ª¨ÎÛ, &4À5D>ሒe†™ùš¦ˆ˜"Û*k³ÀçOÃëH–n®ÿt\gûň¤Þqÿ|ÐõÏ_¿ö/:Ç]ÐRŒÃŒaJD¹¨ýÃUN머q±/@+‘§™F¿YS\@CžgUÀ:Þ¬3ô/ûg‹‹î‘4ð)È ¦DZÜ–°- ‡Ø`×]…!ÁÃ(è*w›4E†¾öFKUSp¨¤!òBYW;€þ !\o6À)A”Ëêâd f`{³^ÇÂIÃËa×?£•i¯^A ²òQ|fX’I´Œ2Z@ÆÆð4(´ÐÆxjuûƒS„Þvzgê®.ßÄ"ïz/ꌉH‰ Hh ¼ÄEÛfG w´.û˜†ÝóŽéŸ1>s§ÎWÏ›#²*ÓòdIŠtƒEYêG¢Â'±)Éûâ-¸ž¬HÒ^ ½b‚1+f•Ý`4 p«Yå¾:†öë|þ'ÊÊK(!àzìÇ ŠÏpNÁlƒIÁ¯®n4oÝ… ˜¨³àÞ»KÙöS¯)°øL.¸‡Vö0=²ê¶Þ:²ð3—3©oV¥™1jnãôõ›˜‚6lJFj÷YïtMS" ¿]‡ ¹H%ûç¾Ô½xû·¸+XlëTžçînáÙ=œE L¶&Gxw“̈~õ…NÉ©Ã"•—Ÿq%s*A€Cê®nK&pìUÎÐqxÍ0áÈYÎp;¿YÐ+ûe´¡ÉÓ. †n—çž: 3O’ö~™N¹N"Ëá ËC¢EÖ‚(‚Æ|Õ¥|©½ß_AqJ¬­ÁŠ¯Hó°*“„0ºN’‰e<Àï=~ütï QX{“íni©–¾¿ÑqÉÞ°^ÿ'ø×v]$+ó%i´û¼„öV©ËBÚÏ0+&)$‰ý‚µ8Cÿ`$0”…űÁ©M(вöÃÌ—ýô4ëM@X¯)m"`Z´†  üÏÛþÜ:|´%õ3I.Û7“”ÑEÞ¾—ÀÁµ=P7!•ë¸$¤”rvô¦½qªXQ6©7ÑᣛÑÙr1¡SŽôc.ù‰ H´iò>š½R¯)ºöâ–sä ×E×%X®˜» ‹A° g³®-ÑU¿©nœ-SUÆ&8F~ïÍà úÑ]]›˜“PSÈSÂs7áoµÏMU?·e¬"ƒ…m“ÿ¬¶¸Oš'‰w]#ç=âú/šÀ6£+2üyA {& жiÛ0ë5¥J(eŒNBØb(ùÒY<÷Ÿ5ëŸ(äKœ%YÞñ ±h¤›ÌUœÄÉš%wí «‘µV¥x¥WÅ‘úüT†W«0µòp£^eˆÓ$OsY(-h©õšz#L+bIq ei]bÈ0ÿs™yØ®'¼Lr'õ”ô0ò5àéð<`A ˜ &â嘋*_j©EP /ý¦ÎÉB¬HÖO±Hµ'éJU¸iéŠ\9ôãþ,5%Ï%²öïqÄœ@è¿£ˆJeVGA†§8t÷ŠÝhªA©…õLE!<†U¥{+«MîACú°ÃÙ¡\²«êꂪ)6YëG$´ø$—ÀQý‹¹‚¿®ÖÅN‹¾D š†aÁvEáLÙÉštÛu‰QçÒÛâE¨;‰–"l¾^S|®µ°Ú_û®ýðcJ P-ž\¡-\íªcµyRB<ÙRƒÉL±EEݹBT/,õ ó«ê MŒFž¶]¤Àœ ñwŒµC´›©¹ò›GâãuŸˆ¨¦,I¨ô\[QWEÕ:®ñÄ[3ˆTœœ„kÃQÚ< õ›òÐéÿ RþQ÷­·÷”§fk€€Èó-½øä…f0%×S.¹áðÐ^%“{;¼˜‚¿E(»r¼ ˜+Î9,<«CÑ«ü´2·UŸÿ†J.kNBY—•Žš1týEVíEŠYcqÈAŽ÷äD!é©as'ˆºåò–œÿ4 Ї쟠ú2¢TǺã1}¾:-`>‘ïÁÂZ Gßé )u´q#ÂUèßíï•™ÞûBY=›˜H¼cF§@'`(¡Ž d@ǬØ|üó+Ït¬«ã† 4<× ó¤Ò¡1Âè‡5H~ÇðÁ™5OØ—ý“Zá)ÙÌu&È𜙋öy‘È\ÔÜðbch} »æ=~Ü„¿ÍIÁø ‚¦-s18?zÏí£ƆŠP²oÈ(u.ïŒdrš\ ¼EÝâñ)Œ¤~ ÷Çæ ‹@Üw˜ƒF–©”cà˜ã &:ˆuðì‚!-æ²@M­ìéàü|代¡ ˜‹:£zS¥hAªˆ0Ø«&ÐK;!{ƒL¬÷RmV¯*LטeÝE‘•U3‚Ò~Wä•J¢ZqB[1ÕŠ#áO/mHqòú'Ï(é¬4mYxÍñÙæı‚/Ý:©Aš‚1ËrÐ"”'/_µfù‘á'¹Öl(Æ ¥ߺ¢ÓR¸Ñߢ}ƒK_èàZÌ ‘öaD¢RÅi˜F3ÌÍGÑ}²DáDÈ C­f]ò’ŠX½‰b¬)&åUØ)TKà*̱‰¿'WØKnÜû ÿÎ(F¾©zuGfL‚™K±¤VÞ¨¼¨ù¼¸BØ'*Q»%­Ÿ½*ðU×é‘ÊÆNº ‚=ÖÍYø¾”²`·ClÒ´UÁ¦˜Î08Àå]^ßÀÙ³»÷Â;>XÑ_hó›ç/ÌÕ 04êMd?Ú”µ1ïN†m­" ¨xjú¯Ïþiï`Бq¾þ™T“rÀÞ+Úh®¡ÌÜ];8uÆT ÄŒî}ýüìècïÅc%±_æ„Üb¹ðÛf5nJä"‡“B£VS®ì¡ðKsHjŠY(G±`3>„íë"ißà³ ö­LÜ¡c8 A8ر ޔĖ™ƒù”mµ‚.7ÐÕíþѶœTöP«UÜWä2*–Æ2Äh?mÉtüZX.Ët‘d2î‚AìqÏp)Z -æMôZ¶x7mN Æ©rœ¤ý 7»U§·ØÔÞãM+ÜóŠûº¹,+©<›B;†AD=³Q\e†·&@M¹Œ‚\ŠØ¯›p¶ ²“·n”—›’Ñû”b<ƒ'–¨@N÷v½  ±¨Á“Þá_ÊI¿0zÄB_!²¨6j[Ro|?^S @X:HèvQ~uýãÓóƒÎé°€ojŽÂS|©m]×3Öek­«‡81ÜÍ£0?ûC“4Á£ºêK*q›Nsü¬xA~ôø¿S ŠsäP#ŽùX„ÔU]¨,¯p_ë\”"yι€eÒIž†šCàÁi…¤•¼T·t¸ DÌbŠ¬Pä<]Îd¬1=í*„…ÙõŸ…IêèÐ3“Ì«Á¾vŠÊnºG»Pç1;áÀ=ñ¹@âÌbu\¡ ½Üíñ1B8ªH@_0Ù“ÐØV2Î ·8ºÆÅ–©çõ{itMN{ZÙɃB*ºÊu…Ü\O}$cv)êÀÑ®Fˆ ~§íp…VLÑxÛ9Nq΃öu¹Ðx„ŠÐ~ù‰Æmíg 2ì̶/”ÆK’¥ ¯·»og)oBA yÙ+:  Y+sá6 {DÙeñ¿²£°F—×æ*Ìï0r^¼ÆAgÂxÖæ*óÖ«ðšsÑHiq¼ eŒmÛµçÏp@:¹ÉN%Ã×è •âT蘽j"˜ŠB¨(ΦEdBÎ&¿Bx¦AvoÒ$&V™øFçGç/©kÓÊç:TåZiK‚êi©ƒú|ÓJ•‡ô¯èŒ4=!¿ÚbŒï£"R¼·SZ/çb™å8Ï`§92~™u¡r H·‡ÍÜ{GCêZÇ—Ê@?‡‚¿Áal]A g¹qYdºa2œyùrë«Ý•QÈ™”»kšh˜5Û¸‰=¨èQPÑ¥àãõ‰ ±kYAÀßZ~È·.cyj ]Q8FMÄ÷ÖFè˜>.'±]&0;µ¾ Ö¹)¤A†_ˆhS!À¬oâ:H¯0I‚Y»ÚoÖŸõ)éØËá“QŠK¾¬ZóeÕ¢?t%PÎáU^®\‡x‰ª{’Eyˆqà û.Vˆ7 ÕO-¯NÕnuȦ!DˆäWÙ·$ý€^hÚ¯Œ5Uçb–R&…±ˆc®¥}ÇÐìûî* …vwŒÕ9>ý Oýb`sY´`M”J7“¯I ²w¡¬Æ%c1Œ¹ "o çr8º<88ô9Û¹0î¬bgdÅ!¬5ûâó‚—¬WŒæó¥ˆuìǦWêùÁ•)0xé‘t//n°¡95 ,KFq•hÝ&F¨Á/Ã2Ý‚èº*éHçp(ô›‡O?1ÆÂ4’Ü~ý%úÕ‹²šŠ¼?{v+í‡öJZ?´˜, bfLí 1ׂšM)`I+¤¡Ó˜\än¹ho0W;¿*ÓL)|I¢1¯nJ…Í“Ø•Ä…nž(TÖ¬ÈY×”¨ãiŒ íðÞ"ÈoTFE‡bàèê¦0ôoCtÃ=váŸvûŽl·€OôSç´w„ùÍÃîƒõH¯Œ#¥Íà3F@öKáñ_÷k¦ÛÚ­e¿zEŒðï÷@¶ÞÁÍv˜ZÜ3¢Ç¹2dPSÜûy2¹Ë _7õ>dß?8ùØÕ«èÏV¿L¾¹’@ŸàM¾iÝ`ÎoƒEyö#Öñ7Ì—WWI*9 ÖhØVùÍ̲tŒÖâñGÉÖÁį•½¸šÂ¡)ò TŽ¹|×=ðòs½0°ÚÃÿØ£wÕĸO1Bœ¨*Æýã7oÊïƒèœÒåÂ<_§Ëøú¾<Ãæu÷ÜšOä{Q˜=Æ»DG‚4íÕC80f“šho2eöìÔšúHyŒË6´Ki&Œ'Wꥯ®Ÿ}:b0øQâ hC¾€ªrþk ®™2g%@JÇÕóY_ç7律ë†fm^®ÕýÃd>Gf0ñäG0„Bœ¦ÏÁÀ>ýõ‹pø«€û hJ{†ð+Œ_hξúÈGjÜþe €6KÃѱË>þ* 9íÈkšV…Ô"`&¨å}àKd«•žÞ*WIžKÈEì ìM?ŽfÄ÷Š÷òd!þøet~!óg,”—Ñ S¢²kQÈ…9'úªIïúê~‰&‡ˆ}vH‘‘'^¿ðré°GÃøŠ¾jίObóD•Í'«\[–gËx¾r=í•T¯\Xkî.‹5¾P׌J™0C森g±NŒ(´éj4#!FR®‰É_¶]œ if<"d\öÒDEfKÿ½þÑ‹GâÖ};êúòä’–¬1²ûïqòΗsÇÙIì'%ZI×…Ô,8\ÂÕ©þ5AôZF/è©ÀDwŒÌ“­I­nb" z¦÷jÀŒZР8lçÓÐW}ñÔÏ´REÜlm„TŒ|b¸‚iªý5¸E8ÊG¬…ŒSvº7¸1NÀxçOŒD ;qÂÃàºUï5 $Dn~­ ä,÷Jæ˜ÑÂ0%ÔHöèL&Å‘‹ ×Ä„«Óg5f¬”CŠ™ÑŒå ø.Ê š’˜=EíšÃGì}¡D"À¾Žufcêb™ç"qaÎá ¡ ˆ++I»ð*­l>ø¨è½7BüWη…ÙÙT})–!Ú³¹z’dعNg;UM¤ˆðA²Ýê¦8½¶¹z¾;'ž‹ZØAçðGy(-ÌPÌhr²øcøôèñ“æÊ©ÁÔ ùºÔ)Œ]±|ÐÔÚ©É4€2Ç{ +åwäÉ,¤ÂÚWáÚ¡ É¢¨*ªfKò|˜¤~o“ooMSá{D‡I1n6ϬƸ+æ³LZ•?*"ô{ýÞè¯"ZcÀ“-ïuçtØmqi4‘·ê]Œþ½_ÑÉjzçœ,á4§óãüu¿|ô«íÓ_]. Æ å6¬óßlã¡rÅ\aø—Aô„µ«IW¥ƒ9…y¾Ì„‰âY[õð¨6õSh3yìf)í‰Þ›XIhvpX`~Ä‹7În!U5*6‰&MŠ§{•§Éd9­ª]°3`ÐóºA@)úÎC‡1–&¦­ Ôðxõ%6íر~)×?œuNí ¾2UêÚªº”7LDEšú-WS_y¡ZjÉ1àظ ¤¤iDíyÎñ•¬œÀ9AÕS|¥Hy|ä" e,kY£C¦&®ˆ•övµ `Fòy{’Ò+âü$rýÖS}GºÁ½gúZoh·ÓxG€1ï¨Fçnà ¬ûMUþ¹ØèÓu¾s·ÆYðZQØ¡p)f–¸oÞ—»96u µdø½×>>+{[1Ââv[׌~M¡K|€7O©ÅþðçᨋÖëó}‹®ЪßgèvÏöúýî@iðo”i3loò³ìµƒ6)Œ”q À©¼Zó» ÉlPL¯’‰!ª`_8©¥­Â®êX€µRÈ1·4cW…0pŠxnÚÔYF·ql‰:ŽW7%d.!†Ó%4qAl–Ã0¸¬Êñá_$±k¡À®²‚v+øM ›9Ó„øœy)Ìû—Ðè_ÚÑ#îIȪtϺýQçÔŠ PP¯ÁŒõŠU3s’,ÐÓ…çÈŒÀ"9ÕÞN9ŒsŽœ‚J‡²@m 'œgvB|L–Ònî Ý·•Ä}™¢~ú‰ÄZGÝòÕ­ì’æžÂÌ|ñÙ^A]ÖüÏ^á…Qï¬ Gûiï¬ÌÍ.ãœ.C³K- ¦‚ÎfçZˆÇê¥#½Ì½lDjeF@.dN›Wá²4€Ú(Ъ šGÎ9W>JŽŒ©Y B¾(!$°8•ja…ºmbÐYyÐW‘2I >û Ì;LϯfÛ0%ô 胣yÐ[û´âMã}#]CÓгû²j“È¥ Jîa¿}4`i ¬' §u‹NÐeFVTኑSŠýÕ”¾ï‰ñ”Ï ÌÝÑ1+oR&¢tu÷:ÏŸnq~+œð’ ƒRe.ò#öM/+ETôç1•Ž’ØRøyQ_c .Ð,“qDó–ÈQa÷—õ ¥HÆy,–T^ˆÓ’JÌ鸙%ñµ0þ"cÅ 7oºŒ¹9U7§DêFž´¾+–ƒçf–´d¨WÔª$ä5“TºØÜwŠ²9î=~LíÇ¥ÊOµíþ²[âJ¤áã·N)£ªÇ®ëûk½™\”-Z­-†ÒÁ,J<yi¯î×Zs鸄-LàÉU[©]ç ÆÄ ŒÒ‰/CàoÙ/n¤]!É tlÏbgþÙ<šÒ½R¹¡IèE"îu¶Ÿ?SÌ4#LØ^Gòù"M^e¾&KøÃM™ä‰-m=„<¥€È³g¹°I‹Âô­ì hX nÔ ÆÖ˜L²*cë ï¡0pA™IÆQ ÅH|ŸŒ©HKT*¿AD »ªœ ;²8p%©(>ïËÔ˜”¸Åd#gÐ#i„Ǿañ€ÀDåE0ÉAˆ·ˆÄblr!ΉÌ%fh_Uј x›h BÖ& x:6ÆG›*ÖæäÄUÞ[IÃW•q͆ªÎ`;èÀ"ìñ棢þm° ‰‡a—£œ‹íÞLÒÆ ü§£9kn¯Ð’ã_ õ’7{‹b—joÜÄŽTøVO—á çˆ@#±’T©‰2èªÑ!̶Â*üÐò“ŤÄr{Qª :yš é¤×ª7¶Ë9 çÄ£ÚÚ-_Ñ“´Ñ°‹€>õ·[^ÿn6èÙ¦#«ÑÕ$9ošÇ¢¦7Ö´ÖïÛq×Õ«X4?4Ê˪‹6ÇÅRÝ1•é­k_ñ›rpÅ/e~¹å®Ø77 Ùò`Wµº^wÜ´ì§,reM)V[ú¼‘î÷Ïìn–öO²^JbSÜh6]»ié+Ça®Î 4s'£fFH€þ®üT£þ+)"aV3ñÇÄ bµ½k%Ö°éC™1bíÚŸê½–sÚxßôÞw^÷úSµE<§øßï=#ß÷o×{i¡šÛó{!y¢Ü:ε |ÿ–êq»ÚJ ›¸T2ZÖ»vÏZÊy|ÊX3ûå6àjÕ4®žD—­²4­Þ®êä[«“¾t[\X£¦)+õ°!| ãÛj%“º3‹}ÚãCæ0Ô™“îÏê5#ú¢Uõ¨¡‘Ù=($@²EŒ½êÇÓ¸Ù°,I7 ÔPq›­•Sz|u´ êb P7n®-ë=ÆÜÈ{YG×6|KŽ¬Ü–jæJ¦3DŸÃ Ö ÏN£PÁxõˆ@Ö[¦±¨‡ÅÛ8Ë $ß¿ònê|ž"þe !ç/~_„)à¨ñÖJdáh‡yƒf ´dñ€Ah)ý#M£xmSºtk=q§¤ëÐáˆ8’KOèC4“Ϭ²“ô­¹)KËL5Å„(W‡¢˜‚1J†ËæẛV»äx•wM"}¡ÚfUÐhI^”ŒûÙ°©˜ËzMDâˆÕäfM©èÙ„ªÐžH0gÖà]<£É\z(€‰MP§'­|õÂ^„)¬åIKFä|AàH¨MeyªôOø¨KCI‚^Éò¹jOeë›úÇ2¿c¹tØ=3¢kæçç_f²¬ÕªÃI°úÓ˜ !—³ª"*ÕKÅ{¯mš0¸…x×t¸\\O|£ uã f…Á™K$’%#æPEt\¡#~Ï›ÜÄJ¨ïDÆsˆ•´TyŒ'Gf!|mTñ$\„¬ˆˆJ Ä%O¯ÛÕÒkíi0úV1X+Pb•AXÚܤ½-oÖs·¡Ë4³& OYX…,ÂĺMN9¶‹Ý‡€:cT˜v5GP!3à DzòK“âÃ& ±§ŒÁc‹p¤êíl8'óy8‰(*Åðec`•ËÙ/t1^ † 4Ôª$þGB¦ÔÊUUÚÎ ±il“µ7ùI1T½êF`½½L ä$[Ä–”ÙØÑ©}2ê4ܦd=me²Ç½N dÈ?]õWvÖè•ð* ±TO¥9?ÈÍËnp>ç˜XáˆRÐäÑoƒ’ý·MEå¦Ñ¸½ÌXA×ô͆äÕ½™Pá2pÊ?cL£˜‰èŠ™¥XœitÜX-ÚàW3Ì眓qwÁU{(8HÌ—ÛÖ I, ,¦0†4K>õ0¾Ò$f„uM5Âöu[ѹùjS•Î¬¡Âö8D)Ð:*Ñ ê5•-qvÐ*ˆ ªOáÚÂŽ^#i I£k4£(ç! ~Áq}amS2–"Ð`šp,/±ý.NîbïiŠ» åêUL¦ùn>šÿ–×=ì«Ã‚—¨Þ7§3ñI=7|®þž`@x}-!0Óþ*©Ö V‡ÃîÔ!ÀÈ;â¸v\óOÏ;§ ¬×4¸ðÖ!²‰7Xn*Ρ¬Ö|l¤Dõ$ì4æ…Ãdë7‹‹Bà•8ÖA‹« ÊÑŽÉDHÛ$TTkÖ2àäó…Ë¢,J}Z ò¢-žUŠ[”b[ßp3 {ôs¿ƒ#§ç£^ÿ¸|vU…³}Æn^¼88¹— }Uà±J:)»vAÈ{QâLDIB–#5ã€Ëœ䊇õcÀѽ?©„…r©JŠqøRD[WU‡‰§Ñõ2U5K™¬sö(¶WóŒoЂÄ(Rp¹— Ë=§Ä¢k "‡×ó SßTy…v‰!Áce·~AGz¿²‰újöDM°ìRy#éUjð%ôœò(–‹-€raùnàms‡@Ÿi²pÚy ƾ\ÁïQjc+ˆ„,[P©—8”‚°»,ŠúVS”ÜüÃñ;Úõ{€‰ÄAî~i¬|QfqÍ2µ<1s2â$3!ÃÖ–MhŸ‰•§AJ (õé’‹³,¬¡×ªêœvŒ“ÊŽ´TÎ(1’r"!|GG\ñ\Ûçt< jÉ‘8 Ö°ÿÔIʬ¾4›Þ¿œ®{ç ²4Åñ2ŠÔòâ»°}ËíüFqNõ? –¨â õ–™;Y±Ê«çs8‚_WNçæÓR-©®¡Ðµ½ý÷¯þïµæXé?nmÍ°°"#2‹4êàÀºEF a "fdÆk‚?ˆ §\) ±1ªýJrÅ[Ö›");’Ã謦ZeÐ#Éè# Â]ÝcC ¬ý”M+ª&¡Pàfa=S¤ìŠ²O¡J,Ì^óèú&V¯ø%TR­8/öÈM‘"½ËaEt[×Õ'yhA‡ç‚QàjÇ$ˆ%3NDvf·+UËøa6’av–ñ„…Ùp:¥`i¦JAm¯›;r®ã|I=£"–dÇÅÄËtN‹,=^k ñT»•¢åƒ,‰ƒ+ÂRœ†Þ]pß^åäÐ9o©! …9 ²fF•ŽAV@Ö* &k&BS%(ðq-QI†¼nSRicZÁ½Ü‚˜§Ñ.‰ê'*ÔË›÷ )-8éß%:";„¸2¶œ°ìŸõf µ¤À.£Ê&PRÝÙÂÕ쟌kDÅ!Ú墖ƒB(ÓÍkÓ š-‹µ†]»IËöF-¡äŠ™ñšµfç'8}EèiUãu‡Äªe¬g\e 7ÈYÇT¡¶&>t4­½tŽ5ï(!V-9þcTiQ* ùÔ$YR'€cáΠ Ž ºZF³IÍÁš–‘(öÜѹîíOŸñ§³RȦ%%mh[YWz0D>bmÔš†gPQû ·ƒ·éŽT¸ŒO j9Oê6%Ô[ ƒ YÒó•û z5¶À¾„^a4¡˜7»¯Û”@œº7é‘ òJnÒ+nÊÈñ[€¡Ë°W‹dJm׎ ÓCo‡z/2×ÙÆ[ÈÜ>|ŽnÆ‹±”W’gpM¤Mš*Я 0®ØlDÊI]‰™lÕŸ"{jŒ"Ìd<Â]2»2kr­“WB=xEW$%­nê5v›ÙAå¾w ÚZ£ö £½$ÌU&挨PÙèB!\ÕnJs~c/åit}N'ØÀŸ$i¦ˆ UÑw2‹hgÖf£¡C‰"= yÛñ¢lž…ñÀMŒvA "P¶½‡ “û0\ˆtPS¢‘ÔQ¶ÁEÅï *«+8ŽË}t¾ ÕŠ)1}S)F#º.Î*#6* ®Õ …HÀ-€ÿJ%¥¥ ·m° d#2£mÊ€Ì1!.bÜŠbÄlUà²ÄÚÅXÚ%ÉÂÇ8'Oý¦EG8º÷!™ÕÞ(Œ¹I1­ÊG¸ð‘ŒT©)ì`8l– /L6Ñþ7ZaFÄo'¨Y P¢qÑJ…ùF䞦\KOSY ‘GÍKå-Cl®ó.Ë>ñ«ÇÄÕëÎ)«–º£`ëF$(\é Åüâ>Œk ‰Ã~F©Ê(“•z6³Œ,0Ì4k!%–tzMu¨K´?à\#+ÅàÕlJVQ<ñQ”rµÂð˜#èŒÐ\¶QiÁ›T)KKxó6“ÚX+Dc¢pļ+˜K2hå€|)M§„fùшy¡ GXßò!‚㯗XÖ)eâL®Z¬×Ô]4›ÉÈQ„-†oÐT UF,ãÝ âˆ¬¼7µ_~È{VFcòÖÛcàý‡ëgˆAZò>H±ÒB[œÄ$[ˆ\[¶ÞGy¶‘ð¶Næ/ F¢óEîà‘ä¦GÇxˆ :C”Žë‡y‹ž˜ÖXÆèžØ`øŽ 2w¾9ÆiBI K2ó º£K¬|t4ð/:ƒnä5ˆ¼(W6„&h™%ˆ¦ÌÚ¸bP&ä’†o¨êðÔ°ËŸ5À"ì9p>ÝU×w x›o[¯1ªM)3ÑxykSþǽ¡ƒ…Þ„ ‚‹¨âyÙ{ßä¬DÍ0ž 4™d!ÀS®1ÑšªL%6±Q嵪¹•èÂN#¨ Amÿ{'E›BOKœFÙ¬hËï_lÔ^‰'Ëö òà×~g$¾bÀ¦2o@éæêZ ¹l vµš[ K]P¾õd™c'¿º"_) É Ô;Bµ Ø »ß¿Z×eï‡5& CM“´NœØ¾‚~L%ñ$ÃÍÃzz|ß®ááT™Sª0%¼: ®Û8Ù:Ë–óypõë¤Ö²w¬q"([[Š×!oH‰…Ê3¬+È_ù†ž%I8ñ½ÈG¯(Sœh,Åû±œm¬–R¼Ò¬½˜ÆgÈÚ÷%»e¥ã¤¦»šÓÙãªs§b TV¦Y#KMl—O €&F0ôèÿLSntÚ¬å'g`¢Ê€E–D=Æ ƒÔX+ß « ü-ÞjTûTxù(~÷Þ[´ Š¨²+žöú—o­œ6ßïž¾ö}»úðŒ qŸ÷_÷ŽM¤ NçÀ¸¹Ú”€æ1‘‚q{¢û Fo»lˆogxIÁ'GƒaU<6]ø“pÜ“Ó} PR¢P3¢\íÒð×Y[ü–yáIЉmì åv'³õ„œõkßÐVæqær@£OxoŠ¡ãæfNL$b\Ì•ª˜^½£ì=¼qЃšf£Â(Äiðä,ŸÛã¶UaM0R£‰}Ñ×~S™BQmÁ÷aƇvÝÞDf•ãÐMÁvýã’³ =ømS< ÑÛfQ¯6G»Ãsð&"Ôªã¨$TÑ86A ÇåÂá”g:›)|Ž—T·üe©zÃ)­6^"Êû,¼ gT—«•0x ×g»Ý®ÌZ•"›nñ ÀMŒß{æL¥“sç§6×ûqb`¾­Üo_ÍÚJ&,+Û ¥) YmWjµ(²Ú-AÊE ‚^úÁìc •ÕÑu­ ´);%AO—ÌÓ4­úÞ ià {6¦IÁ$Çj Œó&r, ±/fü}Î7+rx‰jÙÏabÐ;¹¦ V6¤3­ªäQ}´†…CÖÒ½ÌÚÕÚ9b½ 2Ñ|m¿}( ˜úÚÄú\õ@Ȭ9ç•rˆ9L¸–0+Ç""TPÐXÝí?¸ÌE~ù]å9lW](‰Ô»„<ë­ÏÅrmKĶȔ3¨ñÕ=­ñ­ œÖÖ ÒZ Eíziš1zõÊ=Úè½h¨¡˜).°—a*™„‘Ù¹Q¦Ô}ÄvüÃÆ ™ð“Â*î5ðÝX¶òø‰¼ oÈâÀùò ø¦ ’â¬^kˆ£L¢í ¹4Àä:YfÂƬ·‘0Ì–6lãAήâçì­eöƒbþÖQD ò‘”"f"K0Õ“ qL¦3GŒJ¤“^xò,zxDù<Ò¶Ïey„X³+ôyŠ„6»jß7KÌV<¡ª…»ï›øZò §½œK¯·íM?€°/¯Çm2S?&*Yqšøb2ˆÊ–®(¶-]¦R2ÀxŽ\"Ô¡ÈÐ!vBÃd‘òú$”)´N8¿p‚…O%z„­¨a½h G¨ðÉ~5ä—èÑŠ>YÏØ­a¥›î¹ ©^Nï¯Äžk¨æª:(Ú*B­êß߶Í<ïBUó›òðÐ3•ëPŠfŒ¨2¼“dñœ’Àø@©ú¯påb”š|#ãd» ù!'uF£vú¬3ò å5)φã¸y(\òŒÑyZÐ‘Ë 5¾Ù‡‘ÆËy‹‹Æ°õ<œ˜1@>‰@ÕÀ–CßoÀl~÷…È÷[ÞŠ¶œ%Ú6îQA§¥:M˜›³ ®ã$CÔ'à*‹eþÒ²ÀÉm?U!‡ùý"S5HHB@—iÍ’?±>˜ÙƼעh 4ùV6*9YKˆèˆ‹:Ÿ‡¤öÕ@wÈu…¸0fS_ò\~)L¿”¹B Á〠(¿o¶×E›(ào‹ËMÅù‡Ffô&ø\Ëk·ÛÕ•ÜK³ÛòöÖá+ßj1/$®`²iüe®ÄÖZ±d½(d‹y`\œöÆq)þ†"8@©GІ.òmõ®v¾/GÖqdífÍUѮӽ2òF™Ø‚(U_Ò:)}pßØ "£¤ª7)IS@ÄP$!†¢ qÔ=¸<ößë´º:q›³/fË ÿg¹a‡?Ÿô:ý¦vûlnyÿ2PKó¨Çð±çqÃÿæÒn;ý£ÁyëŽí¢ q5uFCÿõiç˜"!M‡Ñg\Ô²m¾>‡fD'9¤´O-Ëó@Z`÷]% ø:—WÖç,|ίvÑåhΚw…Å&–Ìpÿ±ŒÂ|ÍÈ?“ ôqè“£ƒc"_*!’b*Úž&ªj¹ûÉtÚ–±×rúí9+‹­ ˆnÜï_pŒ$ ЙÃU5Çá‘Ö£E~ –[ú`ym>ò7µöfS³TÚ“V„ÎL¸'žÏþ"»ö«I†ñ­é³•µ9W€îuß^tGD4´8ÝZ7sÉôW•—?d4^Þ‹â-×gÊK`™·Ž-´"š Ô÷™c{TŽHðë8Y‚c.ÿšxº7d4 µ1Ë'ÐÅá xµœNCõW0™¬=ãðnÆb¿Sò4;ÐN@Z»gª)ŸV~ÊfS¯õÏP­Â" ]òctà5È$,ó68k#FHTðñÅæCr jûðÿò´q‹¦…›‚g}³ÑÀ«_ÁuªnûmÔÂ] ‰ï¿÷vwšVj¤zµÂ ¿+å$¹Ã²‡÷d“@¯?êLJO4&ˆ0H#üëºRmXïŽÁ~4Ö¨±²Ê fÁãukñ¨ìë'*s&<æxŸCôT;ó(4F+f–¹B!t §g§¯ò¬‹©Óò#µÁu¿ÒlnZ ‘5nñ…ö¸]ÊW’[÷¸;òOº ÿrØ9îúýó‘ßïvºG–}ZNuY ó*œrþš¡òÓ{² Ý Ï€‘¿9¾ÏÂ}@ Ô€2:îÛ®@ËÓYr±c}ÙM2›W[BæðŠW£% ‚KÏh¬ò<ª)§ÐC‘\Õ|œøwQütÏŸÌfY±Ñ$ó'ábe÷î`#ªÇÌ{Å“ä.óú#h'n©Dý~}ç€ü8ƒs³mÇà´Ã»~´9ÃAoÔÃd!X½sýq¶b†éœ“²©‚ü¤Ç4Q£X™ å¯ýM¦>Í+$ª3µÇûµáíý«†¦#Ðá_Y­]þ+Èæbp>ÂÔŸŸŽ “f–‘‡ó5g¶¼œåÂw™úÄ'6Á2¯ ¹R§xUN3›9Èžaz/°ÕçQ\i Ýé@ƒÒd±ÝG4Ì}«Æ7ÆV½†·¨/"¦hÈnña$,…mÛ=H®±?Ê¥£Ê)WšMÒÙ„Ð ¡‹w%cƒ38 Ÿ+åq̉…òZØÊ…¤¬Ï+w˜³¯:O«`tšžR¡ª¦b-ßcÑbrõwißwÖ§9~ó÷‡¥Ëš§Yᶻ¾»s¸x,B´°„uqæ$v¾AÌXòˆÉ¸‚¶v]"âêU(5Ö4\„è+Á\Ô„a0Ç}xÒ=üqxy6´ëX`ËŠQ+ ¡`8<–ëªb’€b½Y€!ï³€¤¬‰þÃj è1ñ+;’ŸêùÑü®Z"94éStÆ ÉÌB®ÙYÞJum½ Þ(|·‹ú"éúŒ×š™Õ'ŠŒR ÍV|ðj¶ºÒ¶¸€„^7¿f‹@šgY^9:ÂeS¹&†ÏhÄ g¯ ç1X*–[èRhuvbó9¡²t´ì](T&”³LäãU¥ãPSì‚á@ìN±"¡,å0Ok9ºQ"DÝ.^ÎrƒîQo€ÌB$3\²+|gh¤‰ùƒõíET]ƒ{Ï¥ëŠKÛ¨BvÔ±Ò’¹ûd¶ÎC”†ß 7HT3r&° `rÉ®)é®ìä.ÌŒy‚•c—ËÄMpº:ˆyE˜`žhgO¯’¤ ½$¥9ÞÕ©0J25ócTµ ó¢*ä.–õGA5EÙcaX(*ût6á…ˆ¥=¸TJ0ã»ÒXOèÐV†Ùe˜ÍkH$¢Îì02zR©3T (ÞõAà4>E9–ÊA¤~ ÷e ó4…þÈ¿Ï’:[Q<|á.i·\—ŒÅgKÔUË] Ž-ŽÐ]¾ÓcCÐØ[ ÇdL”úUF®¶þUu &€Q fu-,ó"óܹ´áûÜÝ‚]Z‹vÞšÌV73E‰ÿJU2Õ%ò`u#Kgë¢â’³æRŠ’,˜Áá,Wá,¹“ M6´*¡ßZ»B1° YG¦ËjRóZœ¢£ÎÈÄMsÄU&÷:ºÜÁBoÌŽ»Áá MýQgÔAkè`TɼàlZ¾µ¡p‹¹ø˜dNýîè`xäÌü«l?ó«l⇳iw½ì÷ÞüØ}T±û"–´ªòôÅŸM„k–[G““âYç¢`/(•w3Æå¦à¦½^j.çB­Þ@¡FÉâñ<ø;η¶$?æÚÙ—ŒWF[d†hW YÚÓ]„0ÒúœU‡.7Â÷‹´Œ™2IœÕ€ÈÞϯ¬(d8‰·@` ÓÜ0¿ôþœ½üóäoÚó·µÓçû¯{§]ŒÐðQBƒßœu†<¯sZlc+(~n«¢.QñÚob«±cí)i'ŸŒ aË2)×dupûâ+(;ø¦RNn1— á¼ô@FíxyD±†rˆAnÝåç9+S ì2Mo*¢­1H“d š¼ ÒäË1µ΂ÿ{-2[lRá;w~ðÒ;ë] /ÒÄ;D0%BÖSÙeܱÛ,úulVMT«ˆ·‰ Ê_¢o”öŒ³9Mزu¥Ð€¹¹”¯¢îS@Ʊ:ÕöÅå|g;&ŠÎîë扜žxÍÐw±5 맶àKµ¿ÝbH˜fSWV0"þ!ßgqÑŠä¡¿ìxÒQ¹3@ ºSŠQo°¸ÚQ'ªb Û,»Ç7i‹àCØõc,šŒA®*3W@EY‘÷¢þ;ÌÏL8˜QT<×΢"cT2LÉ9šÍ¤sŒÊqñç ˆÒh´`"itý=ñ$À‚mÂÒ¾’b¡Wv\·™€-§ÓhŒ>üöZmÈÚ’\ï"óç»l%ãò™« aÚïEH¢»¨¢ÝQoá¸Aö®6.sy\ÉÙ•óŸ)£ºR)F²¦³ª€•b¹n¹PÃÜù©€¼3JÿXõQ( †…[Ö£„8|eà Sô¢8Qô—T+ `ˆæñ$¿‘¾.é%û¤áÙŠÈSí ^vD{”h =3¶.€lOnè–GªDÛGÇŠ`œäÑôž%n!T,ÑÝ„B]™w§ÁÿrUôT@ÔLáø¬FS˜[„3ƒBdt€‰©w, ½ë1õ³}#@ïh$kŠÙ/55 rJ· ÝC‹«†Ê.g:ÇG€k NÚ5æJÌsy²ËPj*ÅêÀðý‡%V$gšä‘ ®P±ÓpY½g#¯~ø.ˆ(—M•VFe—W½8YûÒ±d¸Õ¦j¯|™”×ôÑñT¡w‚"öKn¯Í{wÎò‹Ôüü^6_2|"K©J%¾…¡±¥í„ÔO_¦Ð€êYd÷eKwM4UD\_ÓÓʦî]"mBˆ œr™†tKÀm‰:;SYÇÙmqΠäÊ„íÍìu´æ1_Â`+³¼ýgÆ ËþeßíwO¥´[x‹-"î׆½cx9¼èö´À!NRCŽÈ–Ù"ä0äo °U3µÃïÐ+3Ò‘Zåz§*“‹€Ã⑆ÂKë¬Î=¶©›âcب¶Ó@›ë6jE?4eŸÿIðt–<æ!rð(›·õ¡†U´òeL¸B-ATÊùš×É'’8,ñüS4óx ³\YËÒ8Z”ÔN0ôz„`¿wìaÃú-2ß¹pa¦h “mT&bXøâ—X)€ñ§ñ¼m¯øõÆÚ[N˹ˆ„q|ùöé‹ç궲èrØ:Œ|øo„ä¦ØÐáÆ@Ò‡%ºx3Ñè›ÂgžðtI+9B±‡)ÂAŠã—pZ¿ã±·o¾/å`X cºÏ¢@È'ðÞéùpDnôlþD¾‹‹›,¯oè2¬V©¯Ê= [â8¥žKÁ0ʳp6ŵÈð•Ëá`—$þ}¯]±8Õ…aÛ±#3›%œÃƒÃ#µTbdL˜¼}iVT}ëíëá_«?æÓRŸõúM3.ÙlB=á}å=w¤Î>g=Z¶éKfGÔc¾º cvÏààêü‹áIgÐ=²CÔ‹w ,éÏ…XæŸ/€àØ“Š|Þˆ滂ّɂîeŠ²µ43<©w!…’˜¥Ðг\ÌHÚÔ(¿‰Ôà³Yé7cŒF "ª©Á_‰Ö†~Zß°[_feŠ3 Æ>A-2œ´7•×>7Š2)'ihó5&®õ0LºwÖYö^åwkVœNýs¤§awô—³‹¦mG^öχ_ã]{ÁEEÚË?³Áóõ’ÞgÈ ÐéŒëª­±*,ÄãïÒâLSP5'™È‚¦4e‘.D«žr}³¬À²yùçA¶~¸ižà.4Âø–2¦4ü³åít|zÞ?ϵ0BƒÆxXõ4^ÔÏóþÁåk| žqUƒî°á¸{xnÛ˜ý¸ f¾îˆ+?Îêµý¤à*•ý®ÑiÝcå¿V´‡¤W ÿp”à!Kö O€µŒg€ñað –PñºY‹)û6žð›µ ß˜ë¤{9è G½C;tÒéG2&¡°Üžoªpp>ŸYûÍøf½Õ.þ4xfõ³ƒ`”Æß(.ÈMlnÿ2l%ËM{ƒ^jvɵÏÕ×z ±XÝz ÌógͶ:ãáEly1¶ð}qÕ÷)TñA1Oò4X01W@ŒÇ«Qé´ãQ'[£èÿ3:%Nô¦´ÌI‹<˜YÔ¥ª@Qr6!™¬ Ej®îAe{º†ÅÓñÉDǬôò2¯­¥"v®túB0I´Âëhέ‚ámɆ`Ú'Úv:iÈŸz-±SÉŠGr4¾áš1‚ÕéÍ,óÈFÀ_ܾÜåÂÏÃ9è B¹ã)˜bQH6œNEí uï·W~ZW88lߥ^ \÷z¨06¾Æ2ƒkl bc4MÏflùVíã=ìôA¿v^w "…å-µ öéðüì¢wÚø#Ðr\„¤y¢ûÎà #Šì›ÖùîÞSjF]xõ ®èŒxa"8/¾i~X±õ ü¬ˆµé*ÀbÝdˆÈȱ÷øI“•-‘í苈BX zwheè¼Lý)221…åðü’+Äȇ(¥ð°”¯¾ªø€ùêQ×õêövWyí /5šÿ•£X‚—ãÇÚÞÖꓪâYÉŠŠü¼/ÄÊiN©¦›kˆ¢žš´È(±·`ëñH鱆PŽ iy_p+¶3Ë9ì}˧:5è2ŠÅÊNUÍ‚ýÙŠ®Ó¹4Páçìú)Ao?3¶}YÕ˳rœ¥ÇÖ¯·Z =*h¾ƒÞOQ×?Á[zàÏõxû›ö³öÞ!µE/î¡=ò›!Œd2Íï$D_eÉ8"ÌüI2^j ·i„.Ê [CñÆV³E¦÷0@­°Ë› ñÕï4’pvLìØyŸt<þEäâldœt½áùëћΠëõ†Hr?õŽºGÞVgoµ¼7½ÑÉùåȃ'þègïüµ×éÿìýR`Ëë¾½^;ôαä^ïìâ´×…«p$^RÌå¼Ù?y$.B³£sú¤h Ehî¬ J4üÙ9èöF?c ÞëÞ¨í‚PéuÐÍjðåigà]\.?½Ó?‚†û½þë|‡pÞÚð]¸æuÂÊ{ÃÄ;‚AkKÃ{éž_ü<蟌¼“óÓ£.\<èBïñóÇ`h‡§ÞYË;êœuŽ»ôÖ9´ƒ#Ĺޛ“.^Äovàÿ9EsxÞ àÏŒu0R/¿éan?ÈÆCœ–׃ó3&N,¼sNÍÀ›}‘j‰“n¯ <‚ƒd«š„µBì1,T¿°”íG,F“QÙ?þÄåÍNTŒ’yÍ´œæ“YtE–S“hÀ’uX»np›B×æ…ÇÈÐÅ£ºžV»yš{F×5½j>ïçWɬV×3õ¨Õ¾üã±Çk&»î7+dzá÷V|ð5œâ§°ÖûÄ@OŽ¼Ú|Ðf*‡üÁß_Ñ#]$hÕ<¨Ì6 ýÄE†ê“ná£@ùúø©Ôÿ&Az‡™2ˆ¿“€ävó{éÏžMúß³§{ÏŸîîìþ÷õógO?é”þ÷¸ î~ûí3´ú¿ Óä=ÜKÑ°+Э: ò³r„*U˜Þ†“¶³…çØÂv=ì7ï³8#¹¨ÝÀ là5(ZËÌ;A¤É4Û (N¡û-¶rÞÍÂ<ß¾Ž€á9GXQ(Y ^Éü)¾§&*šÆ[£PTÎ:£î ×9µ”ÒYXeñ:ÃóÓËQ÷ôgÔ ”ö"„ØyLr7ë,8üQ¼†;#ïçóK³ßô=Ø”_^¥qË8 ªÖ³¸ê[šÀíù#F dý{ kˆ ©®Þ+Eu<Æ£KCÆGÌP­Ýµ ý€¯²&,jýLB©ÃjE˜ŸˆÐpŒ÷¡_ÒJ€Õì† {j(9ÒÕ'ï‚ ›R߉2­žÒ9“Wêº8 I¹ »g‹´â˜èjŽ»¶;µ&‡f[Êg)3ÒB7KïRø—hÙÌö¡¬Ê͹E7tFpžj¸ˆŠ‹DWUÓTX‡z”‘°HafT‰àjžÇp¯Ø¡ódÀ‚!’S -?@xÑAzœÜ ðï*„P*ÂÑd¥Jn4Ea‚?ƒPØ(H¸ (ýë‘i<žu¾GmÿÝ·n¡±„¤ å…’A¯í?ú gÚÏ%L&›Ñm¼JÀtÛ{ ÿ°D±ÈnŠ£W4EO{W¦EÓ†xRcŠd5Ù4Ó‰x Ã%¶Dð,<°ý=%y%ûI7 u¸b˜:ù½BZl/—ÀW¾ÃRå Hïmïî;š¢2Z¿ë7DUªa*]s ÊœC5W0=Ö0(hÛF“>¦¦®ðQ=C_}µ_lÃdi ‡Ÿ/Î2.õ`¿ê뿹‡àhbå Ö̆uü™ãœ5“Â^¹§…f‘ú`Dyz~+¬Çööþ2;€ž&÷® 2·¡ƒÌå›il¸[x@v;æœÔÝ-âø#ååjË“#O=XX#ÿ?}¶÷¬ ÿ?ßÛÝù$ÿ’ÿ?ÉÿŸäÿ?Fþ—ÑÃÑù…ÿæ|pzdkÎû„|i²JÂÌú׺øz>È(#j ¼ªRÁdœWá–(?'B¶IN¯;‰ípa»,ãÊl…S+eîšM‰ÜˆáÉ2?@Ø¢Ô"RÉÓbjÙO„GpF4:qØv¤éJ¤OLXÒÙÀ`®è’Ó6èSá„·öþÚU(th•ù=ãwFž§™r0ôº®½ì>CU:²·C¥éÄ6ˆe °‘´ÄŦ€ôÐïÍ©Äw̵ø8­)Gè_ÓeÌx·”BɘôZM!ÐÊDÅ7f”w„Yx‰¨?Ì ôàæX¨. ÒY„AxfS:ŒqƒÏ'ÏŸy_âÛ_b Ì{!p{…œ["lz΄) p™êÉÅûŒ؆ÊL4©\À½GRæD:‚i X¸à:ü¥ê_÷ üm߉‘GÛÕ(áôû‰Yÿ=ößë1¾1ŠôÍÇVÛ¿)ÈôÏ'ùïß$ÿØô ÈN»».ÙIÊKŸ„¥ÿKÂRÙ^ÚRÄJÁNª¯ê-,(·¥-˜X þ‘@¤²r v`]a9ˆ'œk(,£œB•ŽÑDÙ Q;ls×»} Ï”—-ר– Æ/DyXìDôÞa‚ÏR§?H¿‰€É„¶qÍ£œASd·îñHT°±lˆ¥H¼+=,F¿Q*8žŸóUSê“|j&0”Ì€(G$ n ;lU™¦RI6Jè(ˬf8B@JÊm’ &ÛèWmo`•ÆXiCtÑB9S¶M`¿MYLþÉcX‡ÇODO2­c Ú)vªò‡Èrá Ã[¸x['ìó³jRUEFC Êœqoÿ´Þ–Ø8†’1Ðfm¾ES&ÕÜQ]j‚€œsM†¿ BÓD/âÃ2×3âð:Oµ`ƒlžÞ@´‡-6´Ëþª^]QY5ÎÒx¿ QâTúzqPž¨ûÉ_Îm”«s`¯3]~DÖ“ð>³£‚$£EˆËKøøIkClÜ"=ACøÏæ q'¬ WÔHûO‚zzãYB…mWó ×´åÑx!õekÿ’€†f™Hþ‡M„¼WÆ“}’oI²ø[€±%„yÎ'jÑ ú¹5oµ’+qùQé^‹!»5øö%œ,e«TìâPÂ0±âd®¼žF#ƒ¶]AF¬;Ù–‚'<Áb¨¸#ÛNŠ”%¢¤±ü“þ"%¢±Û4@~‘p¤Vbž"úåÉcüeÑqÊ*"@683Ýý^ªIIþÿ{p¼ŸŽ?–ì_Çþûtç©ÿ×w÷ö¾~þIþÿdÿýdÿý¤Òü1öß#q[(,Äb3 Ð]Çóo¦^|›`‰e$¦p.^wÏxˆˆ6÷XÊ 5t‰ÄÝJPxl‰°½"8ELŸn-‘1£€Å¡G"#‚ jV.±—°B¢P¼L¥ÁHšæÄÒ°f!7ªÙû  ÕˆŽ… k"ˆzÊ•YÆ„;{½ h…Å:áøQÓ²ÂUo˜R1B±¸JÊm˜3•½ÄgáîåÞ< b1sºMAðy˜ß$…IÇp‚sê0üHá`ÁjÞD¦ ñ8¥$¬–…×C K˜êBíd‹H#ýM2ü3AÞÓð²<¢5ŸÂÇÜFG@*шĠRå34bÛopOcVðX×!Ê K„XŒ4‘Ë ;³$YàÄ"•‰O³.–‹ðÖ±š¡¼GŠˆ¹„900¢•$¼Œ½rv/Vn™Ya>f!h\ÂkBWE,-±É*„ÙG”¬µýÕµÓ~#TL†Ù0vÎæÿÓ§Ÿkÿ$š¤I\-ÿí=ÛyöuAþ{º÷ͧøߧü÷|þó Þ*Šp$0-‘o ïA‡›ûèÅc‡°âÎœ4.í†æ3[!]Xr!ùÓfÒL朆aQÊ‚CUêãb©(£&S¡Ø½K¶ôÛ&i“Ü,6)° ™6ǧ~iŽñlEþŠ¯Â¡ÅeeÀ1 aɃaã('V”òhÅlÑ4ð„©(P5-[òñ-5o2Ž@$ð*ˆ¢Pu‡Èëq~/¸$eïáÕ 'Á'¢ø¢¨˜ÓÿPÚx"¥_–ídxq¦¤Çm pL¢ìoyÀ©‹ä ”§ðc<½aúxlNß¾WÂT&ŸÞ–&So°!)Üá 9{„&/Ì "dŠ¶L‰(O,£L ´y«?';'ãH á8VBè#ï±aGƉWþrØ FoåWËÄ&´°¯ªá‚׈°èÁ<ˆ¡3o8:•Eø”¢’$­39*>)u\]U!ȸ\¬R+bK Pí„|Ü¿ô¿úJ­ó#ªEnœ–4=2Úe©QJ ?îQ·íØuÙ£Þuœ¤áv2nS…Aµ`/½ã0I¯iAGÁ vbI£#+^gt> g”QKú^ÔùTV2Ëß{Ožð’a½;²ÀU=J¸øÜ3 v ñ²ªýˆ³A.Ø›ï7à .FÁhaOÆùªüÿñÖÙi„ðÈ‚€pBî¼e&tï•Ÿ„Ź» d:ÏÁøHýÄs2ï]œÜÅÂ/"ˆq„€/ñüE h éÃEn(ß32梊±ª+è€ÝÃÓΠë_ŒˆVÆÈK‚?hS'üú´ÿõÛ¾i`6ôGˆ)5CÍå»ñ,È2zuñ½Ù<Šãð\øLm µ8Ãp#ª\ÁVr«T½ÝÙaÉo~÷½çü²ŠÙƒ(|Çã0äb똕Èu‹w €%÷ÓÊ6€O¤ùšFV<£+­i£ò ³¢üê&ª™Î’ ¢ùI²Æå¾G.õ€pÔÄz0 &|Õ–.à' Ãp3ࣅeöRÃοãí!}²xœaæNŒµí"àpcê°áYþˆ<ùVp|éHˆ[ü.Xï$"nˆ•H©t« c‘â…»? ¿†ß;îcÎÒùë×þEç¸Ûˆ›/ÕMøƒ"ÌuO×wï;sJ¾·;«®oêq{È==F`èX2¬<ÔÝxYz_΢Î_¥Šçâ]$ZÏ—ÄØ*™ÿ0߃Ápk/XF¦(ñì‘}‰~…ëûÆ}`+pLñü—MK¥§è›eb“¢yŸMâ)úÃwÇ»GüPتè2>㚯]ÅnAxGW#/¼lÏš~ùmbüêoÔ®ùL£éÁBMX—¹ÿæ¥/šh(Mîà x!:®ðY÷ì±üºg§Qwˆ€z;ÞwˆcrèÿÔŸüý»WÞ.¨Cœù„PB@(zÞÞA€<‚…¤ïÍC*#'![1!kz.ç¡8‰Rüÿ b<ôH‰L„o¨eÄÏ¿oŠ•þ—Üz_àÕ}Jâ±ÈG½_ †5­ð,aù O*I¹ðg€T²#¢\L¹Ò˽^ÖZ`EçŽtl‰«¨Ò78H:ÊTe’˜2—Ú, ýKI¿¡6=&amÀHv*¼¿=þËJÖe%ÇA–óSÞãï-þÓpðzêácQë¬A¯5×3OþzÛ=ZI?MÊ.’“ìû i¬-ÎsàÅËÙLÕq~$B ¨€Ï\eh¤åYÓeJ¸8f´$Ñi o4ÅJë÷æÁ{YŒçZФxWN#=ßØÞmzOìy R/©äv'-åû„ý/”Û©G|£Á×™œÅ9EËh _ƒ¶¿ÿü=nJ¥ß¹xüwØÜ÷D8¿–ůâñ h5‹ç‡*9< ödË8_Îr·åé?ö”ÌABuÀ_½ªâzÀôäJ—îíC|„ÝÔ„IAÄÙ¬Ÿ}”nÐΤ~¬‘.ü‚”óPi£ØÎ'éã£yiyjH#Åw*¤“ÒceÒ*>òŸ+½|ŒÑi G‡ë%Çd’|þ÷K>Èæ? >ÿ>Á§´wÿÏ BµNˆ óæÃå"çW+糌ÜôÑ»©å*ö?uDa!Yåeg÷\:­ž€,–‡º Ý2¢C§Ê$Áø,ö¤TŽu²¬|˜Î‰Ì™~Ù¨¾¬]2ªp™ˆB÷ ¦if„üˆ¸9EâD„GGŸ1Zü1à'Ë€¹O¸ö[p•aóä…ó Ó[)º¦â“LøÐï˜Í*QÐñ¨-”ˆc­ô8*ÊwþƒVŽÞGzõÖZ³ÖÎâ'ÑnÑ®Jp{ü}C[Å/û‡ç§§ÝÃNpÉkŸD®?VäríœÿS’V]¾ûq,OU_3$–ªG~?yê#vJKOVi#FÂûïÆ·ýô³yü/ßÇË[ÿ»ûõÓ§Eüß½¯ŸÊÿú·Äÿî~ûâE ÿû­wÄÙö_ÚÞAÞÌ[^gZüyÎÃ4sF ïbÔð×–:F…gj$lµ¼Óöŧì¬ÿÙY éhcM¨kèOÅì÷úÇ/½ùácmÀõÉ)N[n <\G´¼€3W"Ü3 -7…‘Fœˆç1ec«Ôü¸˜…‡Û ·áî6Þ•a¢mnªÛ…éuL)ÆÕF×KÞfEà)–óP„‚*”Ý1&qSwÐtU.è ©:hªà¨W%aijLÁ‹jIa¶œQ(”|zÀ´Lì`iî° z< *@hÞ\M÷G~çèÈ?øyÔåÁïbÕ |›ˆ vŽOs%©¯¢qŧ³PôÞì>1ÅY ÷Œ ‹§Ë”äîÈp[΂™=lz%«Îg ÇðR«1f† B#ÖfàGÛ5À³ ^rŽ•Át0)?Y"&V½*ݼÅ*Â_áoôޟλC^u5ÊWÞS+8(èˆ ‡y^æh³jÂóWËÉÂG Ðè¾¼ÍE»ÿXF „™GO49”z‘";]fKš(~àÕ+ш¨éÊ!´ëºÃïr®O1p˜ ôY-ŠÚÔ¥£Í°Õ‚²Xu”JÍÊAøq3à¸) :!t_çþqé¬ðŽvžÚ¡hnœ]áözÌ{KØ(¿1å„F²!NM‘xP |«¦h÷NÃ-Ò°à›§öû!DîÑX øˆ!¢QpŸ´˜ŒqC@DÁa< ƒY"ëÁÄʬC¡6éí#= ÄÑBÌPÂê2€ËòøÅ2Ï8Âdmr]aQôšðQìQ4¶pßlq)¡XíþQ¢Z*0þX×\æ¾ãí5Ëoþ\'ÀR@,Þsˆ1¢Sg¬;[º‘.6‘ LÎûŸÿÑÛ$Zÿe÷W^EÝ ÌðKO³Ô¿*‡® n%oÎGCtî¿99‡‰ž qÓî•zN=|enzÙOÓF·‹É‘y ,òËC†cð-içÁ„$Tº«–áKj½8hÓTK‚!•‚ùC%$°Ñ€ì .Ã>ÏF…a( ^íJWsŠsÄv_sy&™rûM{gŸ„ö„²ç€!a¥”–Ð-‰Q+‹‘a¢šqî7ºõg÷¢÷,dL©Ê{UPd ó¯± x{n³ÕE¨f#sºd8¹)]{׳ä í¢¥ º©…hEJ-qKêaC覸y2ïÕjz•¿J>â–Zröà$^É}ûçh…åd ½_ÞÂ+[1X•äz¿VnL;Qî¿c¾§2&Ìòd=lÞghÇ£][éEÓByŸp@Y‚Q‚¶$SÝ]ÂfPS“úÍË"}ž£ R$ïÃg}ï¿ŒJåáÙ ™hªÞ7Jó9¤_à9s¹²è}f¸>ù­ìÿE€çEž~4ðÿ/Ü,ÖÚûæé§úOŸð??á~ò0ÿžf±M÷¢¢*::`, ’F™þ‘1’G„ß–‡¬(^fwpŸŒ’ÄÄ>ÖÌÛº»I([ ŸBB‹´å%÷ïÙ¡IÜ!™ñAµW÷¶tËDëÁ®Z>Þ»1,ƒhkØó•ƒRÒÓYÂ.)öls¡×û(œM¤W3Š¹Ä;üĬS?a!¡˜-\ Cž:æ‘ ÇŒáå¡ Öĵúš%Àãã-ôNÃQ(ñea9'«.­ÇmhRl*R…b¸­ÈråòÈ(èöÛoÛßÂÏŸ®)MÙ‰Í.[|‡ð-9õ:I&^Sœ>¥ÉØPur© æÞ#Å’ ¹¦Éd9V¥!d¯$øð`ÈMñ&x΀æ¼BSÚœ†A<¢­ŒÄ•«AݤÕ3qôjy}mCo­˜,Ø™•èàlƒŽ ú)f`ÒíÈ }ñw@Ø~V“H5ê™ØA2`›`Õ`K’#õ*ÈBaj£@z“é´sÑ~¨.Êþ§’#M’<Ó–ì‡g$1r8 ¬'VCÒ9¨‚-¸(˜â%H4b'*>C7ô0 çÐ@I–)o÷êÕ÷j*_É8ù–žGò”¬iè& r©Ìö>{…Š‰ÙÿZhh Šuìâôˆªv Òà®ß Ü̳¹BÒÇâÖÈIÛ…($ 2&×ã½ mQÄü3»Ù^[Ü$Œ—s4yÙGûÞ Û?쵄%¹Ÿè"_/¸ ¢éZ¡"¢‰þ¹?¼èv[†1šºL2*€ moOÔšÐM@ŽØD<8?µ¨‰F'VJ .Z[±Mt[^± 9-ë9ð™hWÔsV øƒ[0ˆåìê4”zqÒí\´Ü½ˆ)ú[­ZÛnâu¯ß9íýµ; Æ¸¯ ,døAErY ‰ß¸fÅÔG *W’Õ#äE;$"' ŠrSquMfFu¢ ŒÐ±90BØè²Ú%Ÿ4ÕpPEÿ¼þ‹Æ®£8ÖNFÎ&04}ŽÅ0L”:$Bn:$‰áë¿c˜Gãg4H#ô}ÆY„â":‡¢‰µ½ Q&Kq&ÐQŸ»éãw|™¥cÔ,*HõÑþ0–v 'öߤÔŠ«¯QÖqŠIDc†[‰„™·ØFª°Ðš¥¨MGe]£ñЛ%|þÏC´+GÙœ|’‹§i“,æ$”±°1K!!›L@ŒËpó,Z`I"«’åÇÞäêÚŸÏÆí1#n•¡€ Bw@B7KíÚAGÆZ¨‰4×á‡æšeÊèœFccj/3Ö„±ÞÀ‘>œê‰XÝFD¨y8‰8ɨÆÄ2+â$:ãùvEëV·÷¸éÞçCU·B”H÷ɬö¿ßþ‡¼ñ«ÿóôëožïí{Ï>åü;í”Éñìƒ39>Uýdn³*ˆ>1¦EX’²ÉdÒaò Ég©Ž ´ " ’ºÌàGÅ@Që (I€„¨Ypj†i3_ÒàâÚ¨LDâ°GöJø‹±™wˆT€¹ÜâûÔ@/7|¹²>NFäÁJÊ,ˆ¯— ÚÐÛÕÇ`ù4϶¹.ªìÌg$†¤Œ=ËA·˜:Žó‘†Á»2Ô8Ë_å³¼º7ªá©J@¦¬°UÇ°Ôœu?Úqå÷0çt”h…A HX¸ôº²`[+üX¿†nr]r™J®ƒ,ÓhŽÕcÃéM :²ÅÛevC `ÌN¤KœëöÚv†Eñ3Í&"çƒ ‰7 çÑb„½‚c/ØŽ9äAUùA%p ›–¤qý 2o*K¤d´uS !Ö³­K£=…Q‰º°ÊïÂp!Ö9¾Î8Z]o7uS2s˜-J÷lCƒuF{(ÂÒ)aA¦kå.Î`ã‰jJ›'ï’ôyÄÍHÉRbàñˆÌpË ³ |nÌ6ç W ;/ãÉÞ^µPµ£“u/‚íè á¨Sw²qÑ7ðót·hMËš:v›{Ic¦á¢Eãß*{kg9as$JQ…1gq™J`¹ÌÚ [½A'ºW°4ÓYr—µ?ØÊ7çï8NS¢™ª—ýÅ‹y°”c YCíeZÛ«CÅsÊ “5 L‘a ¬wvm2àŠèò íˆÂ @pþ"‰/‰Qð•Lž9wH+¬÷ÊÊaX[YÅÕ¨÷ò0°;d$Y¬ JZrF^¡?Å_c!ö¸v€Jaѵˆ³hBAí8p²…QgËñ•ö#¾®? -Îx¯Yô’kH$»s0ö…ÔâeVZ ì´7æhu~Ÿ«•ŒEYi‚é`n¸È©>60TšrØS“YÈg7…Á÷Ò3ƒ¼vèMr×ÞQƒr—X•4rH¨šÆ3IõÄHcÃMt‡e‹¸-)NîÈìJ$غÞb ­2NøÜ.’/¨8ÝÁOÝ#sv^˜þÅñ‡‹{;4Y\œÜêB›§ ’º4Íir×&!Á™Ìì*ü%@ì@ÅØÑ2â“2˜'"ŸNXxÜ:iÓ'NIÄy×Þ ¨âkOwèí‡îu žëû½ÑÐÛ+ßRš$-ãá&‡Û/œvûÇ }îaDÙÜyÄâÏ„ fa|£—Z”àæôëu^yÚ†;qê=k×t÷¬sáíRS0_ç{M½*þ:]È>¥d»ºWtd :Ï®p„»2gQ^ ·Í!¶¯[ÀM Q8†…$Òe˜V¤Ç:W¦¸ –”Ú`>²ꮘ— Ü,·_¦þ¦˜6/Ó 9 «tÆIld.žÇس5s%Ûà]2 ©ÌÕyLYˆäç‚uSBR iÔŒké -Ñ2 ¸¾·ê £íù¶ëŸš-ÂÙºº³(\³´cËÑ؉B¸¾õÆ=o½c~@·ÿ“øƒr„ —I£ÿê¦È¤×T¡­½ë9ëüØ¥Ilàâú†ï[x6 ѳ ü¡ë•'\9Þö<£ÙfÓÅÁþÇXÈ"+»èüóƒ¿tGÞSµ’˜aœ ´msí©3õ.©Tå,Uñë ÔQªV+Åñ5M ⹎0…q°cÿ?{oÚÞ¶•¤ ÏWëºæ? O›THjó9J†–h›m(ÅÎ$i"A 1 0©¥Ïok;rœôÌ;홎M§Î^§N-wyõþ۰êŽÄÆîZ\’øßX\…Tnxjk_rKQBJf_áÉQ‘•e{„EÉ“y¿{ªfæ²Ý[JêŒGfa8&x ºØÈÆS¡-?¸ò*»ÖÒåÄu;`vÙ bÝ~Û·nõ ð¤4a(°}Â$Ž8õàF$Í8/ÿ¨CX9XP”òRAHZ=s ¢p'Ì5T´=,%e¼˜²,égW±¤eÓY¶‡KI‘®TÅ÷°Ã<éhÛ†q@ÓbRWÁxØú8É«`oÜnn¬äMí¤]èǘÓyglü/òß^RFë²Ïôä%¢åjí–Á´’fLÙ; ÒZ<Ð*i¥Ígxq'sp;õ£T[|“zC—b¥ØräEؼ fÍ æ ­ØªI0‰“ª±U¬’G¤/¼nƒT‚+^à¢FÀŽÞSË+m®\R„4ÂòžëèÑE'­†Öy‰~.LÅ!#ë¯0k$á‰&ÁuÏSJw‰Ÿ6X§‹.2)Úñ±O ÆZú’ ð^!SDI:á ±VøÀ@`·TyœRÑ0¾Ár,v» 3]*üUød‡î‡\œÁ‹áÜIF¢ì³Ý\H”öJ‡Õ9î ZHpÆʧ-†39H|Ô$tÇf°Á€v&«6jkñÖR›Ÿq5Ê"C4æWýtå#/hj݉9ºOkr¹+·fˆkýÅR2äaÆÞ ç«ŒNè‹G'ÏU°X—•S SSk³ˆÓ•IÀ' Êb÷œ'}IMFà x¼ÅŒÊÉLú£¨nÝÀ¦7ï,qzzÓ¿˜ªµuð˜MZ]±nkÅ9 %õ«9Ü書_éðº7)ŬðëU­UüeaðVi•E…q!Ÿ c{ERˆ øÝI§¿ßéí¢)Ÿ”!Š©²Ñ²")Y­å}ÊÎDÁ9ÚJY”ñ°ø8Óˆ+Û¥öðMm€]Œá½@¯êf1giC¥¦»AhxÏ7Y}ª‘Ò¦[´ Á Žn‡]U %b¶“Û2#„;ãÞãŒùÁâŸÊY6·ÁkŠb¸çGíï"®Qi{ŸJ›(ÚÎ" '¹úØÙPÎZUÓq%‹rßTãÚ#>Ërq¾&k gKTÔ å;ª”ãáÌÅÛSrrá̵m¢t€Žÿ¬ª#‰’€$8²—„ Ú˜ €½ñGxÿÁè%‚‹ç% ûUÜTJƒFù:A=RŠ£{ÁL¢Ag¶ò£%ðÊà2„ŠMÝD=é(\¼tÅFOæg ë¹÷Ž7@ªÙ¾¼™+¿"k šúÐ]âÇ`Ãb¾ÂJœ„ñÞ NPq1¶ÀjLçÑÕõ "«òFöΦwP¢w#eH*{’Ñ0ñëTPýj00>FHÀ à;K›£™(¤6\`oq1 ºûFÖjV‰>ÝìYìJ™œím:¸¢¤\VÀéØ#dBñæËä¤ñyÐ?ÊZây]k Š Db¡uÑWu‹¯i.ÆZ¿`î«•za ¨ï³ññ¢–r§7ŽoÖœ?Ý©/Èð…S˜¦l*Ÿe£ó:-Î-¡ß‰†‘¨žwê¸T6ZåÛù¿Õ M¨f²à•…à– /³ºbC'?žNÓ=¨P¨ ZWˆApêIY™|OPqš±¥¹ô‹]ã‘\ñùB13‘Wª#“6 Óê†ÉìŽdyŒ„™¢4Ô/! Ü h:¥)o«úÇZPrQÓØJhKÍHÚñ U®xÁ1gñ”EïEt¬ÞV£W]bIƒ’ÿáÐé¬%Ƕ§IGYS0g,+½Ž¯Ê„æ«h+ssÐA2p°ÒùIz‚$¼ iF ,ÿYÚE9ûRñ$p,˜?έ¥ô.\%q¤@9gJÒú3DtTÌV²„ÒÒ€õiÀ*3ÃlÁZ)1›!~‘e‰9ÒŠ)~Šð}Žß+ŠÝ/ˆÿþ”¡ßËã¿·7omlgâ¿7·¶¶ÿÿý.ÿÂF"‰/>;R.9¯»¾G±ëϼWxÃìÅ£Ù j^Qžu¾Ot£A)ääææ= 'ÿëþÿkhIs4Òð±B‚D(­D4§´êxó“GôU¿O• Ül‘^?š^ô–(¬Ee’¡qDe—pDJ ‡Õ£ö[@*éL'L£ÓLƒäÊŸ¦SDiRÞÞ–oOƒåŠ¸ôg9\qÕ>eƒˆÃÀ%Œ-8æ0b¼’²ÃŽ꜇þI5°ñt$îÖØœ>€®W8‘Vc´úfÄØ^ {©jåäB8нf€üÉP¿™*9£rv…cFùìa™ò…„èЅЂ2)ssË "•/Ä8Yš0"“E'Úþ›˜¯¯<—®VW¼¬W…vwàµÄ»˜ä&Œ³òÐ'7fâÃÈúÁ–qT<â7Hâ4mÒw©crV®åRR •RnsÔRF… ÔázâÏWL]ÅÞEþ$xãð"ñÉ¥UD%©»[Êrn¡x½<©™ö‹ÿϬl¢Ä>gÜìSj¹T¥G¬ˆxàH¦´MNÎN_ˆê]9íÑ&UnŠ7œîŽŒ™Ê1jk²8Š=QȦËÖtÑõ);¯yMžü©z+—Ÿª{ zÒP[ y" `é Õ(FX  b‹ñäš“°‰ZqÄo•K»‰þãÃäß!1f4ëÐî4È$²@.1&GJ8n̼'–8=&®N¢š"rYª°CÄäE,q–ÀlàׄXûEFµ |qp#EÅ ¢þ• Zô_*ŒñˆVIÐ1ouå~5‘-GñªÖÞ¹Q«8^oO^—Ê|Û=zú±9dEø)²zEÈKå~ñÂùÊzi-ª@Y  bRþO!Içu–(m\]LÙ"êÌQ3è"¯å¦Œ3f#ÚTB¾ƒÐ=XÉ©ò±éí6<ÙA1.Ûÿç8ùòËͧaež†>}ŽÍ3`õÖr— ›¹ÙPvó …=ÊK¬Á`‰X‰cÔ…^.ÜÆDˆ%äÔŸˆ³ú«ä’Ç!GÉX™÷; \îdº¯]tô®Å ƒ,öäøÓG@R† ]1dKÅB0âÄë= ¶"ýá<ÚëXíUsíÁ¥¦«¡]l$4ŸS¼ L—ÖM Ì‘Æ;Δîƒ$,Âú(BöÙ@šÉZ]©—— ¦ºªŽÕ¦HaÔͤiœ¸ÞŽ¢ÁÙíö{+ Z<Å¢àDw0˜¦ñ’â Jþ” þ†í.U XÉõÀhGƃÑXO´¯v8r³FS*b'=ê’ØÑö)¬›Î©N<q©5w*¶ÊëD×Æí¡})¤–óBáÌ…)üŒ¡b)»´dž’xuxÒª iM6á{µ(ŽšèüWox–ܾ„”qªPÕɒ¹­5ÔT£ÊG‘ ¼9 AHF&'¼r“/#…$äK·¬n±¦±Š—·Šl/ÊÀ#Ödè=äCøœLXýïh!ï}+i~ÙU/ŒøšÏNôlŒ´rç.ÛnYu oB¾­÷dXÓ­çѨ;ž Ì¡~&ç“e¤”e®ªý}1—£˜r 6Az·áö‘Šù\/lçu·¢M$EUi•F½ÖCÆÍ®·ÑªÞAc1.Xð3Ã2+s9ÇÂìÕò˜´ÞZheKMVO{‡,2hfö€Í„’’†—v@ئ°„Âýèâ)QüÈ y‡WÙ”yRùÇ/‹® Üu£ÒrÓú¸L0$3(^Á‰ò>­tXïe|7 ?c˜éYLqÁ55וf9ý]àïQÅ–J³ìŒE­düY.TgÂ]¢ËeõâXY*L02bøïva?欃;ug\H؃–’Ý-çäˆè¸W©SB>%œºÄE&Íö'  ’ŠàR øÇäá ¼^Ý£ýþA§ýGZ´{0<<ܹZ žØ‚`y]XÖ¥ÓIØãßI‰û ýç|b°´ù»„Íú=v•^2èqhvOxd¾Tìqéz,Li»pm¶vqàu ¡§ˆiÜ´E 0µwIWhT5*|Ó3=}2§•„{·¹¥3IÚà%·DÉÀØ£BN¸€ÖmVXæ&hÃñƒˆÀf,KÄ©¶s¦…jk÷-ÛÇèeC÷;8Š4R w-{/^L _ŸŸ»Ç§*ºÇ[Xß‘É …ÂÍbRâX–2Y¨54äÂ#-…Á"ÐßTwO–ðé"ëWpíFR äÔg#mHYG#eZ­´”¼(K^´^‡aG·d’?7—‹S…»v){(.U™U( žÈCÌJ=|±DÒŽâu˜æVŒo)C ¨ÜÚÉ<ò*ìHIWÍ£é|òº#™ªoU°lsDzkÔE$w©S™GeêÁˆ¶a­òâ7+¶ÊÒÐa^EÕºçç¬ØY4 2ËV¥ƒ'3áUN l‘ÊëëgÿÚWˆ[/\^Èm æ|àüá‡z—‘•Ç©òíKÀmÒ• ³7k"*œrxf°“¥Ê]V$#}¢\&P‰¢y<Ž/ùXkVib¢Âhʾ¬Z­"ª$¸ÙËûoíoÛ*ýUû¬{|äŠ\‹Iu"V¬äíêýyd¦Õ×K=¢mߊæÏYô¹U¸tÍçKT¼œš¡S~þ…~‡Å×Ñ’Âů*]K³yE5W’xÝ{ì$¶ «vv¶T¢0p–“B“Á”…8³Gƒ(Eî*ükq°¨¢b-àK¢noÝs¡iÁ”Ä:Ìhï`Ƭå¤Xª"ˆ’Ê"ußC0ýùˆ´.î^m`¾ø(Öq$õÖÿNõQ~E×ì{ç,Ø&Eç–U{n‘]9çŒúzO¥ÌìNm¼ö·ÆÚ_˜±ÁÌ–”êrŸ–eÏqЉÆçxÚÚò7?o,]GhcBIHfQK8²²‘IPËl,0ΧCGýÀ.eÐ?¬¯'àFfH¼} pòǬrz™ieYo D›¤…zWQä‹—4lØ`õ›ÍÍùS³~U¿½v »pXEeÅ_í¦0i 4«Šº_™J0V Ó'¢ï’Hí;ª@j±$P9Py5KEûÛÊò/HŠ}'…g!NËž¯s8¢Pi›dÀ(u.Š¢¥`Â(§YJe·D<àYÙÜ‹IÅÓKÍ™Š}é=iépÁ w©Dr^#Ê>6‰ýb)6Ã2/uNjQQNŠ¢­òr\cn"Œ™¹Hàœ€«x‹[5œ“±—pr-y„ÑþL&*n¼Ê5RLŠ”G$`ò@´¹ãøÆqˆY&”0žl”hÈQ­£à†¤$a£™nƒÁ|V¦5 6I5?ÈåZƒùxŒZâ_G6cض9‹³€òŠv7AP%²™"(¤ò)IE3ÒTr­Qµzæóö.+‘+‘z•i ®j–„˜2•Ñ˜«ru¼ß†åµAWµ°hµžzÖ†©5`LÿaÔD>¢¬˜ËIñ6ƒÁù–Sc EØq©¤³º©Ú*tâ`^l\LÇ ÖÔúï˜$3-•Jܾ2™ >¬&‰´~àžÖ£ žÎIÊ 9´ä/‘×Õ¦_®0Ò_.?'->8üÐ\+)ÝÃQÂç„°†@>GA2u–Re¯&•!˜‘¸cBcJâ±—‚Ø7œ%~u1T‚ËÎE®½¸»ï²$L.ZBKç/7ö¹J¤ÞÂÝ•`É£ñÝït³ø×f©¾Y쵬!D_,q\u U1£¸?§Käx¼*õ^6æ‚/ H[zŸÌ,¨žž1HÌá¨bÎÕâ§`Ý&t.C }¢@ÙÖrפ®xÞ;Ùèh9D×ì4Í ñs–V¹è¶¡mÁ£ÔÛ÷“›0j(¬ì;>ÜÑ5HÅ[/»ø`gßFHš`‹=ꃈKY ábÅìº$hþªW—®v\‚KÏùì^‡áK¦SØÙpy¾Óx±Þó-H&ìG!cî&0h~%Ï6­6BR>i¶ê)Cq¨|=" óŽJÔZêHí¸ ã22Þ<’O–§ovÉÁ‚\eÆU SˆWÙÈà à ?œf¢»RÉP[Íq„\!‰o‰zÓSµÂ‰µÇÕH‰ ÂÅOâ®·]Ñ9¸Ëµ¤-•³…®ž(M“:„HW …É}3ÇÐÈ°‰ö«–*&FlW0)ªhˆÜŸ¡]a%*òvDì*Aýù—Pý Õ¹EYYZ((z/Î:ñoûI@y’_,›Nø6œÌ'áî%—uMÕüÖÈO|Î)oÙiÔò¬]>:óŠ7òCv’Ýžøù×zýTëÕZ4•ª]F­ÐK”CSbjðž±v*!èí!”Ž„uWNÊàŒ*sž\J‹&(<èg³Ü–qN¡ì˜‚UfìŸ]U0õg—D*ñ¥×ArE¶F­5¿)$衄Р׿Ú Jã!ÈYU$÷¡†^žx//'¡¿>³ÆÙfê8¼ÇXÍa٨䯭ûKȶŠƒÚݽ‚Ó,‰±«uph+e‘ lVe“xç•‚Ü,èä b«ÕšV$%þ˜8‰ºmð¾)sjõÆ}Zå0@¸Ë"ôõmË»)í2¹ës'‘“Úy·«›»PHâåU‰™ˆéKŠèû|÷ìˆë®êÜ™MècER#›Ýø)ˆÑAv`Ð «‘šø‘JD¦üY]‘½:)9ý Ì}Qp5R]B› ЖS#a!Ž9Z­u?REEñ)_OÚ•8#Š-”³j¤ %å¤ —hTvs²Wl9ÿ³ÿMÞ+»½ô8ÏìŒj6Pëûåg.¸¯#œ(hé>”Ю¼=T‚PÙQ`ب0^Žj€çðšjnª®-K "œë¸‡Áa‡h‚ñ€ÆÂJ¤®¢‚®h=…ÜV&GV†iQÑa˜gÝÃNÿüè {ØÅÁçÔ_°FÔQ_•”ø)”=§™¬Fjø×ØIt. ʲ&ÑJ¤d¾—{Ú Ðîˆ|A*Ô¥fÁY±´¦Ú)¿R³iÔˆ@ú”²ЬcÚ6d«•H!ÒOú/5þŸvÝ1S_sYA†ÅßlviÏ#}Xi°ç‘?3Á¬áQŠK6ùûV¸C¬êh Oᘴ=äoçœaï4ci–ðè˜CE 4³Uñhìc˜·å ˜Ó–àx¼[­²Bgħ‘r˜à1J=³!ÆDšqë7¤ô²;ݘ mGÇýλÎÞùY³Ñv{=í M+Šà—¢çÿ´Óó`¯Ðçn4ª Ò""SsËöoBÅYé›A«m²gšW“A¢”¹Ý³ºƒcw'¹Lê2¦C V~ŒY‡°zpàÈõáõ^ÓDïÉÔ9I¯î\3ùø·³–êU$ã=²ö•[X0ãAÓZ(ª#vV#5va „_×uqWÖ =^fxyØÄfÁ䘙Ô]G”5T–ªVc1 ©å .„ôó= ,„·7ú²ht-p¬];gÖêæÄ¡Íê¹eÔŽÜñgç_¹´¯LÜ܇ŸÄ¨"Ÿ2ŸëSÿß eºš¿Ò£¤ÜfTR{#Ë`#T‹» Ø“YÍ“îS5¦UÄ@ XÐȬkœ*%~Ÿdƒ4ÄÉe„ŸâÍDd5ƒ]—ÎG‘¯D÷èöÙjÝFÊueF^EwÞÉq¯û®I‰HCŸÑ¨KºgX™b¦äLIJ˜O©+NÐ’ ö½äsg 2Ôhzµ8iÆZÃó/ˆg)æ8Co³YZ§$H*‰tðã‚‹î9“g­m<½ò·±Ðaû„Õ ×Ð_ÓÇŒõLÐÝVgÁÅÍ{—‡›r€.ÍÙѬ5)BKm0!>5a Ænž$(;‰™É[O*×òI0®}‰}¥¦áîëÁ:þ'š­ÓªÑÎÁ‹¹¢ÝF‹!Z‰ù ^4ª1ú:]‹âf<Å•®òg G5Ug€·ÙV:Ù 6P¦EJ¶*·á…MˆúmÑQÎÁ-Ò0²VáEâG ³‘<»1þ`(éœÖ„³È“P’:ßƲ[ÄSª8’‚~)M+}¨:È-*®nÏ°LUâ že” öÓ™'ˆf‹7Y¾M>ØW 8|bÃD‰[o-s'vgp ̸3KÕ¾åNYgH×ÕÛØnžeâ‹ŠEA¾ÎYõ‚vLü_WÑVÉs´¤ȉ얿–Ì‚*ì ÓÈ6kðî&«2%ƒÇO´.Ý´¤¿k.Øzm<•¡Ö@c¨Cl¸„pWP&ýc;Ùó„:®él —sŸ ‰-`aÙÁ bËéíZžåוÎæÀ«#ÕÊT7S2ÚêÃ!¶3ùq í`0Ot4|?ˆ†š\ŸK“4t!žµÙã]d#ÙFÌ›3­ršêº ¹‰QR ®—³ÂZøQ¤ â,,+³£Ý*‘WÙaZÏ8a¡]BfÁ ªª…PHMnn…ä@HÓ)&$R™„%ŒqAßHG­%MJ=U4fVB: ‹Ž£XŠï¶c»7Lfz÷Ø\ë.ÒtP´šTŠ2vù¢3‰ð¾2‡Pt‡Nx k·úßî¿T·‘”‘h¾ïih·pv×*Ûò™”…ê'£F÷ºÿÕÁ+›;I_áu?,|-úWÉùü®šú¼•?¦BAε…†Y2œO%'‹d”®VÚnP‰²d‚ » Wé ˆ³þĉPKwq•²àŠ Ëð2bîñ›€¢?ÒY0lÝïZÞü­…ÍWM1í¦ß”&“W³T¥Ž¹Ën )+­ò­ŸI†˜® Tû•­¸45PÇx[ ÃÌñÂŒ œ¿)²UI¼– ìfNrª€O}=ÄI]±É.äo]V/˜ë"ðyYÒciý1)ŠjF†Í‰Á)c»âÑn!Ñ!ÓéäÄö ΖiUP4VÃ{bŒ;ÇJm£Î(ÄtW ÌæZ[ 7(¯Þã&:®ÞË-¢íæ S'ƒŠâ–¬wJ÷bûë:Z;;¸ÏÎtÌÁÙ¯mLVùŒåì %_c¡ÄÒàXÓµÝAû—ÙÖ»pâJ8tïáX]V£‰G¤!-ݤ¢ «û U£“£ ™ `!^¢¹ûéX¹±¤§ÄWµèu:½dŠ$<•Ä=¸õ)¢Æ¨Ê5ÚõÅ]~õe”ÑüTõQOÔmAýªåÍ[F–ÄûS¨³(ú‘‰Òƒ"Éðžln‰«©“ÀºÃ^†%Æ÷JƒYW˜ô´UlÔá)ìâñìÎ ô0b)­” k¢q D—º›À~²žÆ”ó‚ЙɸˆöÕéLA_ c/Õñªþ$`Å+† ÐM)òOÕT áʪÄÛýŒ€4ûjý®ÛUfÊ>>Ã\Á2«˜hŽµÅ%@ £ q_‡°GÒºs"H2:k ]N}1´2+.;KôiB:ƒ‰?-\:Y»RsàüQƒå‹V¡àM×Rvu"¯.}uw kš K‰ð¿êl4‚í„jg“oØJ-ß`¼LzJûŒÅ“ÓÛòÑ)«S…• gÁ0L§côWxRú:A¿±2U5·Ü?"Ç¢ûŽïjXº¢\œ.F«Vgʹg˜05U¬rsÔ·æ(bÑ!Þú½,Í(K~W&Óx~>´L,Ó¦í’ä’tVîᮢ‘ZkI©ÇâIÀ¡ 0¬¯÷h Q•”„ŸRŸ2Æ•="ì´19¾ {WÁ‘EËr–ÅL › õahûf¬Éä.&eÙä°l8ªæ²–éDN–âQqw—13.NïI0¤ j»œNnÄ›–‹µ 5Œ¡„<‹Ry-;-‰>˜éYéUþã;CN‡ÖñT‰µë†¤Ðú$ËO® ö}!Yíá >rð…·ŠW”GÌNbC»gÏÊî£Ò Ç!H­€ðñ~:S}×ç€èüXüãÅá{˜‰KR±„#I7ŒÙ#Z •Œ”²YCÚT ³Âè65H¢“Œ1zƒ¶Lî² )†SžØ±¾Œ [$«01Ž0º¦D,L`hôMðˆNü9z"7ß¼ôÜ‘Ñ'] 4 ”„\a5ÈBhÝûÚdéúH°¥Æ*%£åQ#¤f’` Hv (ú^{¬êÄ¡ÓgR¯hâR¾Í ž½PmŠ…IzŽÇÃþ’Ób›L˜K[œÒ¬–ŠÕ\—f´£wXädòHj„®Ê¸+Š5¹Û¶ŽÌ×h**4Ê>ˆSDäІy¢é&ÿæäð×ZÀО¤5µÔ³ÑGY…Ê»4ÙíÀ 7¬ë< Fó1ßÖ`“àBÖ’Oý"§S AóN”lGÌ¥‡1o2™%s‘ôðTâhNy» Gi‘OœÜ¯µØË5 ‰‹ø/”hãϸlr.y¶±ªTµ%.L&)-“Ê [}’3¿ ´‚N#…³­ñÌÍ”uËo»Þ H(1Z*ŽuÂ5SfFëU½X=ÈyÂÖÖç…*.@ƒŽJ¡™™}r¢ýŠèå­3 1á„2…±q,Ëö«Ä´i*ø.x–¯ß$á, ü|©¹TËM‚#Ôt"Eeé´ Ø3‘`ß, yÖ–u“¦Ëe° ¦Æ•,…$_¡#¿ò#g^ÉqÈÙ$…ÝòZΦW8œ.+30s5à¢}Õåûd˜Æ?†Ê,{E¦qýM³®öÆd)¹ô‘òW!á•`\Q)º›ñutÃ!EŽšª*Ö”?e†8˜úwÌPf¸í„ —° µ”R0šÑ¿¡ÐïŸáŠÓz [Nïß7Æ<*5PÕ§Ò}¹ë}L¨¥ŸdéW^|ên¥4oÖàLÙ £BÔt «–éÝŽZ±‰×¢ºxo±šqäMIÂ×—Q†Ý-]ƒ½%ñ|}ê}îE,Ã]h­»8“²n-x‘;Ò*ÃÉÓö':_4|( RSŽÿÕ0Ÿ²}:pÖѨ@¥âÒŽؤF+»;ž!{4¢BQ–f$EÝƇÃ+±KbåK–®î‚ØÃjQãäptvZpè†UãÁÛ2¤ö Âü˜ø,@=fœ “¯F”‡‰œiä(ε ÖËÌ­ß­IQ‡±˜ò*ÿ+Z‹Ä[WB ƒpF‡hV§fEdð™LFº›ŒÌ¶”íKœ5[ص¨¤´©‹HÂþ;…*;Ëeé"ÀW «þµNy§¨öûtͺ1Žê]æãqƒÓÂ41-L6Ϊ¼þËlÀš†H‰J†kR~S–c×'ëáœ=©DDd"ûS Ú¤eÅóóKPwŠpÛœœ¤]‡‡øM<*P¼šM ‚øàJU¦’!àÊœÀhá>OA.Ýñ(•Õ )¸ÄÑÍY¨°.šÒky¡61#ß9ÅÈ1Š½á£…gð0šVùu¼î-ºÏ“Aðñ§Ÿšž>^Þh0í‰:s€5ÿSŠDµ–@›Ü?­M‹|d{}H¦"3­Fa-ÈþlF"Qõ:t ¼‰¯p†œ“¼6õîÓo¬ßAS’©5Ló¤LÎõ‚ìE«˜³"錽2/”ÙföHœDk„¿©–pa¢p:3¼{¢©;sª+u2ª¶p•Ò5‡j‡e6U!´fœ¼OÅ'É6RŽ¼ë0!½ÿþ¾C4yÞ±<ÆM§ñQ3x «”sb Aó“ÁUˆ`sòçÙ³bÚ$u6¹ã`°žÍκ,ÉäMDëgŠ„îã0ª×"ì¶J*°ãé†A‹<˜t00/¦&¸µDI,·ºQ“ü®e m „êÍT–çR³õаÑû³¸o0“­_q@²117¤žÔTL¶³4£ò­£n†­¤ž † ô²@ÊÎúœ×½ËÂÅgÔ<™^Ù%ÉFÿX¤ÄZö§LÉÛ“l¤—’u9wRdbvœM?— -z‚,8k$Šþã“ÌÑç.« MÓ™ š7ifm¤jÊ)™ê*`©lÉdî’³â(¹øóôó¥>æzLþĹ3~O¦ŽLÈŠi–uüˆÉ…˜Ò QJ}]îÜJg#UN“ðš¼"--ÇMˆÔ¬ËýO¾© eªéË‘0èã^]ù÷dRF 0N•ƒ( S”28Œ|Î÷UŠšsü>n(#‚±D¡úž2 j,Á3bv”U>ò¢˜Êp–¿^˜ÜfN½Îè,Xl ¢½šÝ ·cªc| êTŽ$Sõ1¿‰GxÏÀ”Ä#ÒIYŽ-¸‚(ŒBy‡Œ:Ô+ÙWpÖ;Ú$ÇÛš;~uÚï®mɾ(¡¨!‘ô ¨2Ü*x:»C9U||†'xKuZu‡Å1_(ÀP›q ´²Y‰%æb¼êÑ®GGé¥hMüa ˆMp6·^?kmQ<Φ è¢:K‘Ö%6JèÏŸiF(ƒ‹|„p ÕïaóÓ+ÁÎÇè¸v0–5)ä•;´a4e9žÕ"¸Yƒ³»´¹uKqœßD&8’—M- ‚\ë=¾*Þ%Ü9¸:=Ü3ʱt<`ËãtÙ!ÕVS¶ÞºvÃȲ1}Î({4W#v30‚³”§ÉÎepa­‚N”b.(@n&©:÷ø¾²®O} –ïŸ8¶jŒŽoö¸1ìÙ`fŒý"¼‘jÜxIÝ ¸¸¿¿ÛèŽMà¤ÒÔ7‹Je£L^>4´ÿÂTEjåtyœoGÂ-Dä©áœ¬7‰O®l‹÷៸R¨¿ — ç¤ÀÌv™²;àðÛûþ× GÅLGøƒ5#ÜKHæÿ†÷«ŒÎ6tO Ê0ªàbIÇ$·R¥0OPL1£(Mg<„h¾G~~âsP¦ã|*.4궋ڮ¬ÆŽ  §ŠÕF!àEu¾ðó½™ñžÒ*8´ N@¼5…ƒ?œxýÙÇÙ3…,I. ŒEi9ç–>O“òYš3ÓÈä–Ûª/Ñ©äemT%ëÀÔTzO«šKÆ¿ŽË-—“ü>ZÖ4úÉžâùFŒã—9¦æ€©'µ<_CQ„ Ynv¦½õѲD¬!H·©O<š@¼Ñ\Tg18$×AF4qwBÉHØLJÁºKvOV¾D±•äG•tÂêù860$ÉñþNÿ|Û¡`-N÷Sï×3̸‰÷¡zÏE‚†¼Ñ¾JÐ@‘ä`ßúFè€>Ò5) ’bi|sò^Ýû¼ä`®·4t‹j®YïÅ >£Š[êÄTòÞ†¦­:·D@L¾Á–@¶¤ÅNƒÝrímO0/–åŽâ%*B¥ÆǾ¤½¶ëý¢ñ,FìQíå±¥cd¨÷p®ÙG„#TGYñ¨|˜ šŸIê­òfKƒ¹kÚï×n @F®²%Ãíôˤ GÏJc23g^ Hu¯Yaœ!(Ï`QÐñÅù+¬®/éø‚Ùs hž Z o¢8×Ì×®ãžð”IDΑ.™ÂÈÓ,½¹Y_ÜZjO¾™“òW²¹`Hù#O…îg®šìÌŽ–‘ >Uß cAFoìyK–%û$£¸64ìT½µ ·Ëå°Æ>M AÛÀ¥[×]Pm³‘¤©H•œc’¦¢e¸¸>®Åª5·™ Fê2·ÖÊ6r~¤>ˆ ó¤9C…tFþ¸ö“C/ÇñY2("ùð)P›’ÆC9þdƒ˜0÷oÃå£Eå:ž(Q»˜5"X75R,›V  Ò£TaˆuðüX@W‚6Ð sq`¤›¤âä`,¾°`sy°¤ß°¯vIÊaL/­+¯FúFŠ›‚oȼ;ÄÉLŒæú^ˆüWWþ#þLÈ{ˆ42/@ô¼#?¹{¡hÎ ‡i/MŽZÇ[ÉðQmµÊ@  }dJ"´(S“G¼X L@·ÊE¤E¶©ò¿’Ž¹ëØCÁÅ<Ïåàg‘R·%Ø,„ÿÂí -æ\ŠÏ‰êA ½w[åT¡€Ò0žëcw­àëFÞxé§6@[2v|¿hÄ3n 䤽$' ÔR[Q‚ ­0m},o£ÃnÄáˆ>qQß.Ú<ì{°Š‡¡U}{Ù9Eí­FüËv¨!LŠlhÂqƒž;l‘þÚÓá?jEi ÍD‹¢ÚÒˆèHMqIá•;•‘ONÏ:{g½þÉq÷è¬sÚÓiŸxÞ¦J{¡Zd^ÁÖ5x¢…¤ÎN_v:Bj«ð›ÞYû¬»×ßoŸµÐcJØ1OrcS{«jËÔÞ7ú£ç9ð¢c혼G„yd˜'BìÑ::>êxÊ›Ô 'UÁ¦1èé Rs¹ ÓÌ")?Ìü÷eˆa—öÉûÉæƦà½!ìH9Îc¼R´~7pYÜ5öõïÇ£U×J!Ë>%Þ^…Z-uE{ŸÈuNW>óÌÑÝywvÚîá¿N;gç§GøÝiÃë÷_u:ý>þë {ÿʗꟴOÛ‡=£ôôž·ç¡¢ÃSá¶K´¨ÚûTSFZ+ÜÅ™˜š¾3ªUN’ÎÃÉ:n\1ÆáΧ%ù¤³þ§c r¸ÍòF4²S¦$v,TžÏõ×ÝË•­¡¹a8§ÀøæÁŸò:7>Xa&7º  /ÎlÐú#çŘQ4.ØÌ|’v”ãjrŸ”x)tg¾–?È©û“ÍJÕÝZU7ú§,¥ 0¢Ò¢.?â>v½?s7þ¹í/Ž“ta,Kñ_TPåG¢À,¹Ç¾½ÌÂ~2$?&·Ï™$ I¢®±ê 4Øy¶;˜WCYÝXuDÙuPg%ÊY@ÖU8;‡óÉäŽA8„/Q«»ÞŸ–0gH¿£p8öY A›@—ÿºÌ æ(V¡¹vŽV¥ñ$°ïŽä,z‹N!ݹ—J6fW 2] I. ÞàþË×ý7û§=\MZ<4¤àB±#µ‘e¢c3ßÒMy;’%ôNÄÊ0HVÁ•öÑŒÕJ²¼/¤àV½Hñ+FYkòì¥@·ºá<úѬá´J_3e °]’‚E|ó0š—P0_¼R;kE·EJ·ÆÂ/•„ìRE[Ô½µÓÈÆ‹…?dŠ3Ëy!4Q—N(“^©Ä(Ü^Û××"…Vó„+¥˜]˜* (-³ôý!RbßÚ•D÷êÜpi „ŒÓ‘Žh JWñ0ZŒ2nîžû—ç¯á‚yrÐÞëvŽÎœ[k-ýG}ñpý£î;íp¹Ó8…‹zª¾Â»(¢rò¶¯©ÆÕ+¶ž™³¬wÏ©7.…ÜÝØ­]×»¼²L5u¹ãüü¥h¼¿þÕ¼`¾;eÍ‚•w|Ø-ž-u)¢ÞÙéþùI-­çîé¢2GT(3¨êžæ‡´¬Õýó£½ãƒƒÎÞYûåA‡úðÃÊ‚c¹ÂÍwiÍ¿§ÊûÖÕ}}t|Úé¿zbÖëûÖ–“U«Žê﫶LR.¯­cµi=#âN³äu·‡¹WÝ£öðÈÓÚ´á%-‚ÿ M#ó˜"f$¹BK*QƒÑë¼ú¨ Õ@`Ζ{W~tÜ?>ÝÿÈ®ö£¸'Ãèóù°£½7´Â?ªæy¤3Ê,®\^ïìüåËãÓ£B6dn¯åK{ôºcèØ«){qÈ,¬ÎѾ.'tœâE… ‰×£ÎiûÀ å~·×>9é´O»G¯QúM ˜žÊβ“ÅØÁ¾áÄ< õ±Œüá>·IBH®Qª1Ѳ‚!·š6¡^²Ž7W7­fvó~O¥0VúC°%€@Qù›9˲§Ø‚£KZËN*猺ßÁ´LïûŠ§MiRš|š#¤ôðø¤'Ʋ³¢ô€øGßx(ü3ŽƒÆAðyæ_…ã4¯ÿÁå±à'æÌå$ ø»x¨´Ü®•Î'„|r3Xa:{s<š‘¥Hh(4eëFó»m}'“5%[EeÊoÎq°&f±ÎYƒÊ ++Åʲ'z`\b"ã™8?1Ô4çk"K"B³FB€€µgÇÝ30´2ÕŸªÏ#RÏí}þ9§5ÄÀ…æ¦%Uã[¸i Ÿb”1}f‡§‚þÈrÕ:꼭ͲXµÚl­nÝ£_R U97ƒÔØÆô—Åê쪀E©âjòZüÂz?órZÏb(<ÞŽ@ªËêDl+-¬ŠÑ·ä`øNn‚ÿye¥)Ã:œTvÚÁd5 :‡×¿™ÄiŠÞM×ÐÊcîó¾ÀM|V¼OØÿ|€ŽÚã7ÂA(¨¸¨ŠfA<¬áHî×h0ŽSV_ÆÃùØon7¼¿Áb¤['{ÁÐwó­µ²­B™ª=“€b¼ÑÍlBøäÀk9ߪhyÉ¡ ø÷`NìÊi)IÛc?òöµ£ÏÍ>üû5ˆTQÐðöüdì½AŽ -~é'ÉüºCÃ{þzï*Á02(þ7_„<0§P©×ž½£”:ÑU€ƒè(I¹@ à{¦Ê;5Š/âá-Ï¿LÐaZ 0ê?J›ky/ãàjâyÛë›Ûë_låÐãèÒ‘‡³ÇLFN«KïžTfwÃ>…ç°Ætˆ«@«·¤¨'XnÄÉ­æ ïO‡[àâGDìþ&±{[åþoe3}‹øØaöN–ä|>å¸ÀÀ†ä,Ïw™ãµQDWoà?ZÛENÂ9Í&g$1‹„o¹´^x5“µ¥W2̤VŽ— FôŠM©º w“7—ŸÝÊ“PkaH ÷$E'2ò«·>Á‘cû\üëÔ©äøéà±­îÇýÃÎáñéwÞ+«8—¶Â¹ãÕ^ -÷¾êz|(äÑ£(À닃?Dˬ0³{Û>SŒ#”™J•Îþ°8t˜6£¬ åÜA[ÒµIj{{cb*ÀƒTc.eÜ`2~:ÖŽE•.ËS>ËuNQ9Á *"ðù¼ŠLǦ';œ0WK]Pž0PF«dªǿ„eÁ0X+ÿ°¤«. JÃä3â$i·X³deîÎ)e:ÌÅψšK ÕJ̹¬´òbf+ÔëPF…qd®*˜IAŽ¼ì¼:>íHvr•!M¶¥"âyw µb¨^/Ð_(?ߤÊ@S[¹Z%N‘*q—¼à9æÌ‘>‹Ip°š­‚&q1Eoa)¥º@URŸª!$#-(w¤ô²Lß‹~ò‚Ñ«i¿ >O”‘)J”u I¨0—ñ®`yñr±T9ØuÈšÁYLh`¹in-7·$Á#†Žr´kô@e‘õ%­ºXâòf8a/H¬¡ÒNa(,T÷H3§¬úôå|¦ºgïæ ߤl*ÀÖH61ƒ´ÄI®#Á­?¡¸VàX Ñáì®eÐÚÐoèüä »×>ë Yá6 Ê-8fû–±™‘ûPï|o¯ÓëaA~“›t‚Á†{¾ñí_²—Ž(CŸm¦j:í Ñ2Ž'ý3K¦ÌyNT ƒÔ*ÐÌ£ðHéµÎeÝq¨¾R}çm¹½í¥crÅ“^iæè’xã•°ãÛfH-¶¦…:orˆl9E‹óÞ ,&W³Ÿ†èŸPhóG¦†78pæl±Ž*mc+èˆÂ ¦ë—ó[c¥$ç#«Ö¶qÆrÖoµ‚ýªuW¬ë¬®¡UÏÚÔ ØJ#Ódïʬo 1KÏØÌÝœ¼æȯÒöÝ(a„(êivKÜ\[Íé2FWVòŠ€'ÜFv,ÐäšG%:žX”Ü¡mÊÙV`%u¶àkŸÎZ‹¼‰²¤°sˆ¸Øt­ÂcÛ÷Žþ·ø*ò:pÖßc]< ¢ÐÁc…ý„Éi'Ó—%l¤HÛús3¢)øö¢2tïäXïmÀ@ö¤$óIöPÐnÃ@cX I~¢üD x©Êòm·PÌ$r"Góâá„ÆDÞ\áè iUôŠ°“Z•rA`wÈ[<ÍÎÈÈÝ\âBÞ. é‚gœí‘Øâ¸h›iÅ‚V¡•ùHP¾±¢Ž”@Œ×ê|Õîа¤bgºí£¥A?ÚÏs†(.à(ª1q^¢`åY˜{ ö¤qD¬¦ËqvÊyD®¶¾Ë[@0§'Ç[¼Eî_§v†yÍý8œÐ%ƒjøb¬:¼Y/“­–é¶L¼ÜÇr¨?þâÔ 'áØ'®ÏAé7ã˜IÏIš&±ü­ôûµUoÕÛÿ[}·ÊåàŸ|]UÈ.:Ð9kÑâxº©òTSdòâ&é"º =¯Û(ãÈKƒYÿÆOÄŸ༠ŒŒÐŒ¸ð[Ê®bf¦i©}¢ÕQ¤z³ÓÃDMR1ŸÂ2FJúɬ¨3–P-Ö@Ö¡DÊÍÒÙÄiÏÕµ¢ÅtÆŒGfö°Ù.H½ÍM£ªk¹É¹Ýç&E©…þˆŽd@kbÉsDãˆÜgµžï`vk/ëpUÈ¥ò1)˜ß̸p›1µyèóXp£G”Ѥ—«pLì/ð#’_)M³éŒägsm©í¹áqÂ}FLÒŽ³ nƒAkÉj¥>`;q{b^·nû+Lî¤pdÔ¢ ÂÊuOöQm_ QðǵKšúi›¥sÊwP‘Zx2‘Sî,¼öùO+úŒÚ"eFP9ì{„iV#À½»bǺuc²Iÿ]+´³ôµ±ŠÐÕ =;Vª* ÂÒ¤Zh0KÃ1{;!?¦*"?PèP%³NÁRf gþTÝ;lSÙ0Ê.Œõç˪¦žŸ:½ñ-Õ‚ws§"z#ܱß…j4}é% °Ëˆ%ö̳°g-#%/¨bâD>)'|‡ã°úÂL B»ˆÄBár ÿ*£¬µHÅEü‹¢Ñü)ÝgÏ¥'T£~jæ5‹A¬*G,Ž—‚YƼ T ÃZ̼›ÅMžÓ(¶–Ra¹JÑP¸oô áÛÜL»žëÅÀ˜¡Ë ´.ÖÊv>Ì3 X»)Å)›ƒž¶Œ„ªò¨cs”còÓÈZW†Tíæ*\¡Jˆ5Nì!#©äu=uµŽT4|üQn]eùùîDèý;&¯]õÝ8ÿ|j´xVÉjÒðDPõÞ¨ÇáKuœÔ1ÆB´;¢‡)ˆÈ·Öp§"ŽB.îÆÿ Õqpm‹É뽦Ql‘²QàÂp:KÊj ÄjU>_6Ey0¯ Oo¥c,è‹%eËhꑧœxÍ9nË£±°ÌÚƒP2>åÃ7šMÓn²×¨ üÐR£93¨c;È_+63i5[ÕǪ-³ëºêPŒ ²œÙmUk Ît6Ik‡>qVX[šDá]ʼÚÙéy‡V&‹åÆnk¶u>ÝâzIë£*']¶>V”{c˜öM=îáy®‡¿àø¤\dm ½’—?¦Wsª21,É… ÔíÃS…I P‹·NLÓ'¿:+È‹"/ml&«U dD˜F¡½‡™:Fnâ‘7w‡Á: ZuëlѦvÒ ßËNe/Nܱ2ÜÈafåg³ˆäÿ½e6”a®·\1qï5$úÆ8pÉc‚À¾Ú¢ì¶jO&óˆÄ¤| ¢´«™iêï­ w1AvsC3Ç’ëÞ«—GÃ+T°kkð§Ô¿fßq²B{—cx5f7)­ÇUzmwÈÈÐ*åz|DGZ ¯†á–0¹2¥h½Yê­ßyw+W“"mPºE±a¼MP×–0,µ:´0z4ŒšÌвïjÖÀIÂñr¬È µÀD/XËBªxI×V¸ÎP°oñÒ6¢KŒ)‹Ô[òë$¥²ÇÄ㳑½¾€(ä‡úƒ^¯bpFU¯’W‘,è.—ß¡I%rs¬¸MûqpDË€Gt4´IñgR¹_þ?õV1T3º„ö®êˆ^=/¶Ë¬"•k±‚íHAþÊÛuí•bfðFa”Gšu:+÷rÐçê`áÖÈ'¦bž¤ˆŽá‹ªƒˆ¸L¦1J´„./µ`©'{? 4bتô¥µÌÀ0Œû´$äŸe“ÎZ…Rrç§ÅãN„ʇãZ¾”è$x8L$cë ¬Ã‡&Dâô™”k X¶Áò;ËöÂMÖòÊ'½Éìé“_\ëâ4œ¶?Rf†ˆÉéÕ×Íù„$<Ù1ΦTÖã“'jÙBcçDÐA5#Fú§58>3®s½Ù€ØzgµÚû w8FØ¢_ØÁEƒfly–/“§º1ï÷ãL»þ¤=Óžá°’ÖHÜæÅjÉÜƘªEZËÔª!°hÊÐÙAÉšt¯f[‘B Ó·'´ 6 ÇÝ(‡éó>y;êbýÁÕ¯¨3YPÈD×aGl'D<Õ¨ïjI‰T¸®ë›P$­HéiS‰›óz;›G0ýcôUKrH&®ƒ«y¶“* «MrVA5„† 4A`ñ:ús×ÕÖG™Š‹ôðFúS®dew<‰˜PŒ™€v8•‡Fqȸn óY õ dÅ ™¥’´PHïi èÏ®0$dÐʸÌÜi½#Åöãž ÝÎuüÞž¶ÃAŸ<¾-'vìö¨JöÅ$¶ù‹®¡ ækÐV‰"Rìë4ÌY·Æ·TR`=šµ–;„žZN÷¬¶ò:Vó)í1 Cjga˜Rþ…_¬ÔEX¨$ó$0À]À åzË ŠÒqÓ%ÅEÁ-e¬8ˆ}øÖr¯›füJ~±¼JpJ, X9M¶6Ã…¥‰ ¼„w7瘨ñ©Ídis34!äï œ#dŸÙ‹»º—!OšÌdzpŠf[Iò(‹”tSñQ‡Ê`_Ú·]2 LüÆÅÅ:’ÆåG¼nc§vX!5/w*^4Þ0b}&Š Äî6£þŒ!—núLeò1`…UáGÝÁÌýSZ”Ûâ0m*¾î#`teÙÈg´KAAV+ÖFôÉ›Ää±Þ±0—ƒ´îÓ*›{˜eή{¨ÂL¼ÿDs(µÏsÈÍ|Šªb5¥“w˜<áÉ^¬´b÷ùVÍ#òLË™:™% Ô¶g)ëÞA"Y9‡ÁÔ ÈpÈIx|ÑV‘ÆIãMë  ÔLi«žo•È/˜“*%5†ˆ 5.8¸í½0íËËp»üjD{/5Vhž˜ý[²³…3‹;þè†lVŽbš RßX ºµt •a¦‡|vvgòÌ!d[«”Ôy¤`¢)|ûô<Œ“¾ÿ´°Um¶(fH&‡ÊçbÅÉÂ!tÓ<ΛeÎ'SåwAw"ËvEJ5u•q­c–O3nD»B\Ä;ê$þýóÃLN}~Ð>=øΑ®¯A"b|z'ÑŒ1‡¦êþ‹hX¹$.£`Ñrèldáý*áQ¹¸¨£cN…ûº{ôºµ¤Í)êaVØu€··ú†ÃP8¦F"—Ž¡úX¡à9ûÀ.¡Ü9®ãxG-^tN:kªáìNu7g l¸ð2T–¯ÀW"ßW]R˜K‰^Ø^HZJˆu”Wf„CÙM:æ½,^yp*9ØJ¿}ßgA÷¿fÿ„H%æfY^Æ™2-Ê`ûéRÃx0×ÙI£E䀀n/"?Á:hUj•Þ`¥œÀÞÞß÷8„ÝU$sK©Î˜qrÑÜ*I3EsçB¼ˆi©q»v ‚`ƒëúñ¨ÏùÓìxîZ-óÎnk·õÏkQ½áÁ?ê™ N;ýîÑÞéÇÕ Å9%=ÕkÅ: ¦¨¾&IÀ×ò•÷Î~O­Zf»gµ<˜Tg½dt¡àmÉYå ­¨ ê&¼Éw{sq¹ýNI¹f¦ ¥b†•úµ¬Ð…ö/j9iëÅ[4„ H§ì2 á¼j6Brÿmõº‚á7ÔàO¶›­æâ]‰Š{¡R4".$ú¶Š–Sbí*=‘ÉÞþªûî°³ã^\ ¤ò¼Þûüó[lÓ›ÚZ¯•›jµÎ+~ä}¾ë忳§‘H}¾`¾ðƒf³nÙlÊ'FŸ6â¿ÃwÇQVì±cuZVfgÆ’IüîŽBïìø´S›6¼_œmµ¦·Ž+NëÞn¹üñ‹Zp «âDF>×0¯´ÄøÃÀñˆ³«ï'(ƒâiF©@Óì©]B"<ÎÒ¢Ô³—ù¹·åîÿ‹›Q8\mªDˆ§¢¸´5ß'Ž;õ+Dvw£/ØB,EdRBªø4\Zê'oÖW")Áp{Ì;ü!™£A²¯¬kÂÄ¡)ðV/Ú¡]Au¤­«U{mÐîWâ4âT‘°jOP„¹”Ðí j  )·åha BŸö—èãBj\ÊSHzPÁMDÑ@!©Û™ âj5€«Ã5{*H‚R厂ܶÓ*  =FìïHý âÛGJ5<ÆX1¾à%httÞQL®ÚÇ°80×vÌ’0¸ñvæ¢x®Ðá`Ê™øœ–VA ][Á®hE4Jú1æ‡d)’L™â1:¼‹| #Ï:탉niX>”p§_ÛaÌÏг k5åh¥Ê×QåÆzrN‰º-A[‰á„«Ieœö.–MfŠ½ÖïEÃltMž˜û½övf_eí»RóÉÐÜDn×¹¡ìÁzvïÙ±ŒK¶ái@‡WZî^/8$Vàg7¼ûQD±4½7ÍûyDwQe†*Š­Éí^çøn'Ü ÝÖÑ$†óî`õVå$\¹%£úP}Õ”.¼¹À67tMd/¸ðÕþb}tR÷öò¼{°ï<rйz^ -—ÔÎâ{wy²'ÿ Fs5§Ê½J†§ïCrâ.:H7JªG(<Œoàf +ãÚSÝ“s§…Û]Óa(”ôËy‹4ýþ`:ž§ø?iÙN€ Ü¢­F±u—ÀݼսU>Óog–‡¥”“dÏS¡hT™… Æ“ôv¯“EVÛë¼Þ“Û8þQ¢Ì—¢Ìi]}¥„.70¯áõ¡.¦WP½¢¤{óÕâA°zùk¾/" žíwN{{ ƒƒ$¾+%‡Ñ?¦-= oQUCÉØ×à ÿÃãÕåAÇÓÙ·E]ckèu" ¼GýG\5„{Ü–ípÅèUê¢<Š^¿]¿}þT2 [ž Ϻ;ØŒ^?ó ÷uç6œYßšŸ¥Ó…›ì~§¿Ÿ¼s€<¡âA•™e$Õ¤|Ñò¬Ö/õÏdKXqÊRGßü[¾âöLÀËãã5æûÚèÆYûh¯#IEè€ñÎŽ^³K1‰%Uƒ“o»û\ë`(ò¥j“ŽgUc';<³yλGgx÷;Ëlývþ«îQgߺyÚªïÛï[+@î™ÃæšÎ’þLÈèƒöÇú‹¢ÏiŒ?sf„7}¯û_þ™SdeE¥Áµ_ˆŽÖwyv"Ê.ݸ°œÇ1à bIk9X+/½¼ ¨MŠ£Õ§Eþ¢ŠAË/FÕà°Æ&5¤”ãÖŽòKf)ÓÉù Ÿ¡¤_Ù‰’œ:=ÊåZ™ËhgÍÃñPY%”ÕUn¬daHÊ/ã¼X<¡M& Ã"¥G’]ËÜ Vî»~GtìÁup.7CÊæ\ +qj± —”ü¦{ªòUÃ.3è( ZªŸÖÉng‰ËòN«Ò¸È_UgŸ1Ë£Ì^/¤„ñ¼iít,Öc¯î¼|tpÒëìŸvϾ£m÷åùY§GwÕ)iÏà £L‰Vòl)» qòoz¨ãê±ìÛ(¨RÄ à„§gýÓãó3à-\g…î¶\¬Š +–7žžø訋52Ñý·Ç§û\ÿž„E½û—edô窣]ažÂ#dH$ðœtP:휟™³Çä£R è—FÑ eªì™#Ä)Œ¦³»ŒdaÍd¾ ÄffÍŠªÝ[3f’Ù‹‡Óý{‰VÎÉgóa[zw˜gyƒ‹Ø< i„˜ûˆmZ 9HÝ­ÊOJ]ÄC¨\ \£B üä’ôWÙ ìÖVµê×D7D… rFâÏ0 ñWh~E1Þ„ÅMQ „NZ> õíÞ矟"‰Mð®R:/nö#BÈÙÅ}«0OXÉíËn¢=Ðœk\ xüŬ;MzæZ¡ï"5@ÙÃv÷¨ÚÙïžvöÎV´ä ·!uˆ´FÇÄ6;+Å{-©ÓìBZ`5Fã1%± ©‡ª®VÖz‚ç­[ËŽ_õH†ÝÌŠøžÝ0GT*òå;K¾Ï‹÷sªÌevá BJ–wØ4¬EéP°¯nîÚE=Ågy¿z_y«'œ†µÎ™VXÙ>í7«Þ—p»5xYùÕ­Ç‘W¸-—;š¥‚=™_`2æ<À,ªL Ãê<š`lʵè­dDµU­Aã?, ÄÍ¥èÆѨ¶·<D4Doš,VjE·HYÒZ“÷ŠeÅ‘ä]Þ?ªU”TÐlµ$6Záþ«ãÓ½\ÆÛ'ýã#¸gÀȉVÖd w%ÝEÖ¢lÄ{zïd`V`ÔAŸ“\J×k¥Ü•º¬œåŸòj>&¾„dsvž½®bE‚D䆿«¬ Ý$Æ•~ ¸¨¯Í> ð.ƒpGÞaìk3žšð-%c¶—¦‰Q¸ÿÓS –a!²˜Çäÿ׺ÇôaBFC‡Gëø‚p”\Á«Ê,ç6(ÊvÞ—Ç0]}6à(NõZºikÍMTöÌqÖÔÆ-è‹í‡1vkõ*P ™{ß½fÖÁõ“,r™d+èÒÍ›7ŒŒup²…P”gÐAlo1+ªÕ,,ÂÖ W¼v÷ݽ¼à´’ 7…¤øKÿûòq~øçEš:¯ñ·¼uÓ ì·ÏÚtYðLr‡:0aóÂ"ë}])AYÎEt í˜çz®9£ý\c¨ípŠ¸M᧥ q›ÁgAÝ&àN ¨p¸>ÃÑ‚îÃ!ë±köˆ5¬×_”†s£Ó̪®d Ìiˆ²0ùó¹Hy§j#ªhTÑ/xW¤@âšB)ôjžÌXV Æö‡åV/XC´8`- ¯ZmŽjcÍzÙ´e?ÚõO1¾ÒŸšêÐÉAû δÃ>ÜÉOáÚšÙÍòæÖèÕì–àýÁøa㦉9ñ9VßZ´™³Þ¸ãæ”PÉž'šÆ}ÎA™!JŸ9ë$›ÕKëP|2&9ËlŠ—1ÓBåuœ¹!‹=ô55=Gûßx«—1Z©WòTÜ^8³P|" ÏÌP7“2]´%ø #†V8¾b©„@KrÁõv¯Uºˆ1å£Á>¾ŽýÑi ÉóZòÔ[ …•‘UƒD:Ø ¬GÒ°K~IƵqÊœ<š”:´Ì5±ÃG+‰sñH êìë­¥àØ«>Ï-X|±ŸÝF› ÓŠYÀnÐ~–ùØ.nø×K¸VÍÙœvQ^þp ÜÀÌ7å'Aaoþ²ëmÜ¿n]Þ­{£ÈÝ*;ÜŽJ(‡¹¸|tÖï¼;®!§0ãØ×hÖ‡³^T­ˆgbCДϱEP »-¸4,l²]zqÃK¤zæ \‹hÁußjQæõÞ*ßj*õ°¤æ‚9]"ì/‹²z*Lèë= ü*L3±/ä¿R3¶¸"Gýh>Ü„Øm ¶ý ôtâœÝ|¡2l(ð%JxrqlÊÖ2¾pØ~Ú³Ón§§xZ‚—o×Û¬gÎtxk•©;+wâßöòoÒƒèºNI ™W™d»I2á\Í£MjÉš>ítú½“6Lû~÷ÛnïøÔéÙ( ‚~:õˆ¡{¦qò;:˜¯kÁÎU\+lí’õœ¯qÉpœ`©ÿçŽÜo±E¿üžÎ+ʺ‡ŠhÍ®wI4‘ÅÝ8ëvúÝÃî™Ótìá®5û1´5€«&[sê^Ü‹NIgì½×ë¾î÷Î{'(ÚA ~¦Lî•RHá¨]†ž›©aaÃ3+6Z [’Dí{vÀ*©ê,Ý6X«õ/ž—|u‹0›îáùaÿMN ´žñš;àu&AÔäSV¼êÔ±àœ*_¼½âe«ñ¤Qã›p²‰)Ë£Ò)é…|qçesSIíZtyŒdŠKšpB…•™G_rƒæQ{¦}M ë^9]² ÜÓò)Ç3G˜ìHµ¢ùXzVdªZ<Ý°$нäm›ŒˆZòÜDr6/©)Üè´qéXµfíËf—[ÜG›Ú’ÞA™nû »˜‘.YÆ•˜gŽ|Á¼þªü/õ¬r*cÍD—è@ðÖnÊñM$Wi½^r`Ií $:÷¯¦µb^Ó´Zòañèç:]4h1Ðdt”Ȥã-Ùäèð¥ð‚à#&3`˜ øSÃÕ‰§ÁhbRM¼c[jE…ÆNàRj¨ÐÖGšÅܱ©Õa¦Ën"/$ié©¡pÉ|UÞ_T)k Œ•¾Ï VÕŠ)ù¥Ò×FB¨ô¹{.W«!wÖU-—e.(…ˆ›•âÆy&XqvéfÍË¡=î±.,æW©w¹íŠû{EY¬{:]-ŠèÄóU&cB™wTÊsÙrã,÷²a  ýÒ2œ•Eö,¶ÓKj[”k}è}wø²ÛfóƒÊW$3ÒgÀFÇmº K„¥Ñ=ì¾n׳ZMz Ëá›îÑëƒîK¹¶±§­1õ“=°PÓ2 /}NvÃh‰}ÎÝN²kuõg •({r:äÓG~ã¢îåŠâSkø%É‹1öpä—¸”Ô)¯»¥4Õòw2Œyµ¾æÖÖÊzX—"f£b(P…-½ÊtK,R¾)XNßoèBõBÊ–õ1ô¤l!YûXÁ‚§×ÇQwHV’Îæq}}UzÁ°|ŠnQ*¬R8ûˆßñqµeˆ,êÛ'©¯˜–ZË,øDž?( iÞ­þã“oƒí_o˨¶ÃÅ|óoÿúóÏûs9h>k=nm­KøÄzÜ".”ÖÕ'©cþ<}úÿÞ|ödÃþþl?Ý|¶õo›[Û··žnonlýÛÆæöÖ“'ÿæý¯Hî̆þûÉŸõµ“ïNﶠ6¨{›_|ñ´ ÿyŽJƒ^Âæ1^rÐÍøéëTÇ9´€ :{Óíy‡í³Î)ˆ^üûäôøÛî~gßk÷àgÃ{Û={ãµ_öŽÎÏ:ßyGÇHt§í£³ï<¸3€Ûëì#¥ãSñ»„ÅØ>úÎ;ïu`ûÌûîøüÔ;~{äv{ߨšOÐœPRPm;h<Ü®(¶MRG‘“ÞôNƒáå ËŽTÞ—yR)Bíè髉™2(›ê@´ûI€`_sGnðñãü2í`¸“‚u(ÿû!f®!/nþƒ é=´KÚÜ@b›Á~ý¾¼³Ác1W¶Ÿ")]wfÂQ‰ö@/¦„B'8}×µE31c$}ŒÚÏ° ÅÞë®×;;PX©÷•·ÝÚÀâçA‹~—âD@q hi9b©!ÆC¬ íU¤`yü%NÉÈå­LûÒq<…9†Í-}XDÒsN#+¾¸WœbymV˜ #±fÊ }S­rB1N°8ý%ÊÔi £ù¦w¨bd%¯¹ß>;>ìbð“\yÛ/:-&&ÐÇ¢H ¦bœmˆ­iî+—F‰ߥ(Kr‘s¿´0Ep”ÎY&‚qhò~(ñž‹Ð2ã$=ªg½Xb“Ë (2G~Ê®¹nî }AbubðhG„æc?!0IcÇln$½%&IádH*-:Gtgë|Þ¾¥Q•€Î<ÀØ1ä6?ÆîÍ@OÊ!b Ï\ÊéŠ4öº )úþòóϽ­Ö³Ö})«YU&kÑ¢¦˜U†Ñ©$D””3襩"R,BÔ&Ò8«m_ „s¯iBhbË%+]÷Le¾áé'D̈́߆Á]¢!ùóñÌdCç•t¥#xqâ…ú&L¯ˆÁÅ^3˜ Pè_ú¡‡Ž;S) oC"ÙS h"_ÌÛ³j:×HK¡Nˆƒª®—žKG¥yä<ÅÔ)Ò$â4‚Þ"f2¬;ïs÷\ÅÈdéÌ( ·´ñ­:Ž9JÊÊ››¶gÿ >3ÈÞè–®¡ª¼/½íº…óñ%EX|Âõ:f„A¡öR½!4oô¼…µ<Ö̸¥U™šÈ¬Ëu뛯Œ£y¿L»ÿ²óº{Ô?jvH%fn!…¯ ÓƒŠ‡Bë|Ž:,óñ‡Úcþ3§R8Ö1Æ“‡8àiOkË?BFåÚ®Ê0ùÈqd«pølrJ±»xÎnÉ)çÀÚÂdiX*WüRø¬IýÊj3â ¡€i•4§'5z3³¤zá ›™m8#ÑÍ<ØÝ…'è‘#O»Gǧø!ômÏ8â'²¿a¸ìŸæÂe®’ùå+kïi1XÏ(ÆOËác¡ÖÍÄŸŸ6‡š›2„UŒ¥(#\M^·® , "´Î £µh)ËýѨ¥Yx¿ê‚“¤Çhº p¬ÈÊŸ¢jÄ“ºµ²â„zgcjÖÖ³ÂQƒg -ýé,y±ðcÿ^_ÏïG;ÿùÊ‚` më®1ÏþP¡Üгú‹Še±Â\Q»¬Àz8¾õQ„¥Z@¿­´Ÿâ/E5H÷>Œ†Ò– :‚@•í‹øÜb˜—ÁY6ÕZ’Ç,´ ¹ôÇüòz<9;E•~®§ 5ß­¼-„Ž½Ç x‘÷Ñ}ÈUŸÞâ~ðpVè†ìŽ¢^4ï[ºòk[V˜,›#XVŠœœY2<¥D³M•q±ªÖ˜â++Ž³d7¾’G/è@o“N«!J) Q½Q_åÖÃz? Ú$)N&Á0äüEèßs“„³Y)Í–¢m¸ 4 :ñ9&”•UŠÉcéìÇ&GáU0žz Ó¡‘èÙ‹$€bí“-àè©@”OWÇ%ÆhÇ°•>ž&–Iµ¼e. ê–4_½ð⩆r0nd‘÷U^Ü®[‹GxR¶2¨„›“¹ˆôÅ}‘«joîµx åÖ x½žé«»ha¥•ñGµhõ#Ó¶ί5»©,–ÇÓL «¾RÖ*s°–¿z¸´TöÓ©yü¡d êù[ü¯[ÊÇ¢tYøÿÜu!wÓÿ È£rœ6¼?laT]“"¡#µì } ´´‚÷dR‡žB÷^Ë-gübvÌj¹›5ëðbm®…f~ÞF)"Nþ®¿æÉ £Ûd¦FÔ´°%ËH‹r{‚™_Hð~›í¬Š?«5fÅ÷- äÄÏgX”…ýÿÿ‡Ãàrðó'Šü¯ÿ¿¹µµù4ÿ¿µñøé¿âÿÿñÿ›_<ÞÀÿ~á½ñ£´ù·–÷2®& ¯=ö#~î“ I Q65à ¢¼ ’ø>H¦qBª¡rاrøâ~À.*ü&¸³YóļÇ@rŒ5ñ£»üß/Ô.ŠÙ¿W@>W¯÷þÖŸžµ„6ç­Îß­O¼›+|Ûݳé`¸3¢°2OI"™a` U+ ÅG‘D¥`¡Ì"• 8Æ”—~òÞP›â#ŒëÒ`«ùô›þ~§·wÚ?~õª×9£ ¡òÇ’C]:ACÍ9¥%Ù †Rš2NÃùÒ%Û ã ~]½ »ôŒƒøÆVÚò;eÅëÁÏÞû ˜bô‘Ó‘³ÎÅ¡¢øZåÍ”ò¼Lö ³‹‘ª*¥?üyžâ^ÂÍ¢‚ÍØ*JÝ(¤0~UcùkŸnZžÏÏ#Œ³Dðb§”ýiÒvÓh¡€Žé´!ƘlÀ "ŽªÇ¬<×A)#Ò^'9Ps’ŽiaN˜l«BÎ3ÛW……tI]3åAšRž)‰~s± pƒLL)Yz*‘çý`*3kï/¡ö°TÀÊÍ mâË3Fu@¢c ŒA†9åp(ܲÃl"&éÇ—ãVOú£¨&q¶÷îf®Y·WgÖõ9™—J^‹Ø?Û­·š5€.˜TÍ™6OÒœM)`Ž6\‹“)cˆP'ý¦˜ðn½ZP\8>i]Õ³¤™]üUÑæ%~¯CٔןçjŠ*Ì"Kj.,Ëd͵ ñYªy,œÌ¤LBâë#¸C‰al’k†Ê}-‡-ñ àU²+ÏÂX•-«jSèKòldÒƒ«8Nm¬X‘f*Õ´…2Õ l ‚“P¸ Ç"c7㶘…¡ ªŠ"ô°aéû Œ(«Ê¬°µÐ w¬ftªÜ-ðtâDÎ~!ÿÉTÀˆ ¼N«l]N9Ï•bA8)M/9K–ÉýªÐ{«òm*RÊÒªxõ–ì¡8VÙb ›k® 0SNŸ—iÕ 0=^ fá³eÕà+—ÜÖ™Ó²V·I#§ÎplM¦Ð_æ!ˆóK<·/ó@%ä©A±@“JAä'aŒ2ƒ2¿2nJ;Ðó÷pgIRͦ´<ùa—Õ"Ø)Ã;I¤â‘ƒ`ªÎåC5´2¤¬ìA(NR‡/¡a_z ;wN¿íì÷IbÁ{¯×ÈÚ»y¿‚™ÁCJTSem_hJ› BŒcŠ±Rlª¶3쑤Å"èÜíR¾AÇb5ÖWñ&ß~÷h¿óÎY˜4¥xr\\‡ñ<d™ÖÀØìêA¯›áVIToÒéÊN2|bm©IR\ƒp3‘U5— æ„et¦ÎKÊe†©ç<0È ^%8ˆŸ—eã³`wýá3ž– ?[€&-á™2Éè€Ì<«eFÿ:;;”,ý“uRˆŒ‰9M<+úŠ“…íçLü*f«¾X0èf¨)ûrÜçaè‹<;ªO¼×Œ÷™æ…Ú;Bß4´˜É,}DèNdæÏ4²ñ—þž3ý“ uê#†ðÞ¹˜&¿}wvÚOÛ‡=u<ÏÓHIg¯/þ̽ÌE¸¬Ì”øSeJ“… Üd>ž3k^0Ç#ß[Ш›®ä€cï5þ¿˜évÃøtåa©ž8¯s”H—ÝùçœSƒò.éÄžäS"丫x´–-^ÁÆáÀ½X)xÁ+T^[Y¡:/Ï_;€¼Èßy>jicX/^ÝaC­µLFS\AšÃÍÖãëNur¹,mr‹ß» ‹–‘[túp?`RüË&ð?EÿÜê®?2ÀbýÿƳ§›ÛYýÿ³'ÿ¥ÿÿ'âÿ~ÑÜÚØx’S£ïp§ä>**õ†wÐ:ù—ýÿÇtKvÖ=ú®ÿêÀU皇j1‘Ý5)xÊ»À€4Ø«ÈaVmWZ<¬B$FQÕ2èF“á¦,l 猚cήÕYD¥ãƒ”,¨RFÛH7ß Maá†té¡”;¢vA)–ÖRê³÷&¾ (ñN–;^#uÍy½ tõ,Ó!¤‚Ÿ^ø©\x^Ž¼¨¹+rX«&¤á'øc,t7Ø1¢² %U­7Ã7ƒfò‰.ñ"­–W¢•)Ð$ÙG±øm{ìP ËlB“li°ÔØ¿æŒ'Bgœ—éD‚x•_“Àzv5OiÛP,é<¬õÚ‡«9Cí’’]nŠxáž#’´0{=`8¨±­’+IùqÛIHµqG›cH¢N9Aàk`(çþËïÎ:=ñÞÐË ºÄ)I^T5 üHÉùcgÁaÊ¥@Í?E9ÁXΧj6#ÌÞŒ» E}l*ªìž"{xú¸y¹dp¢"Œö,ßçør{+ÿÒ´s7ø‰6aˆŠKïMb`4˜šyvƒ¶«fŽ†Á– ˵i´qìI›Å:¢‘<„Å´us­ÌGjÃq`z {@ÚDQuëË&3ÕæÓ&R¢Úî\Ƚg[—êuÀÜQ•¯SwÜŒW Z—-ïöùÓ: þ¸Ôh[$©ÔhªSŒ}$È%ó…ÕöÖ»±ðмklä4&2ô8·¦QŠUˆl D#%”;—M UOCJ*,h+KÐTƒðuÄ)¦>wg¬§PKøµ·£€·L<®àqbÁ†Z¸Ð’¨ôˆLŒ”ïÈU(Ó#RüɨH§©«\í ö8OõŠ J¸ZTÛ£ØììA" Î+n«Í{öfãÌA¹-(êcW7é!&¤î<å)–¦óŽÃ‹× µY¬“é•Ÿaƒ×¾¥×K´,®žÑˆ†"“7ñ"ŒžVÝ«M,µª(E9ÙJÑtpòô1‚ûštò^ºæßvð‘‰lpÒϧÛ_lÜ"ç}Í|K¿ÏõØù›úýîÁ %‡*¥ì§W¾Û>x:…S.™˜bYIØ€ôôؾ?:³»ù´øíÛãÓýž·…ÀÏ|_-¥ð|) ðçñ/9"©ä‹ïî‹<={µ¨Ž¸šõ¯¾²KW)°&¡'¬!üM§Uu£:+÷¨|ھϢÔi§sÐíõ È©¶©(í>Ÿý”P~(’ ìË´ll4ØÄ”ÍüJØqì~Z}£‹‡$„Î1•5ìO,Ï`—F´ä¸1Ÿ;alY#Î+Iêò"NÕ ƒYS o»ÜÔà óô²B©É­'Ö*,ÿl{×9ëÈYRƱÙzò”GÞýEë1CË2Ñ⸛I7 Wibiȵ\¯Ì¸vYHIÊû£aVÅ‚;`X]‘î…Äéñù\Ãúç'z ÃÌtna:QÙDFbáÍU@¶«”Ö±½¿OÍë·ÏД¼ÐëàB„H±O ¿GR-Û^½‡Gf‚ZT3Üxé˜?@tokAÛS1MbÙ†5A ±ËrÎMÀ0³‚ÑêGÍ86"Õâ2]~Z÷YŸfýœ¶ßòtÁIJ§"s€ÿäÂzFñ¥¯Nÿ4å—Öÿ ÃËd€´RÚ Y ÿÙ~¶më6ÿmcss{{ë_úŸ?ãÏgÞ¡ÿ> ç8펟ìõYànÆ pßìÊ™Áf=„UóïÀµ™™2ÏÞÜÜ´†ü-+x‹½e°K¼¶¾õÑÍ{I*‡_ÁÿÛï¼êuz»Íý#Ò»{Í}šößöàŸ¨?8ÀD9°ÕPËt|Ú?9¦âð)B’‡üßWö^´_±®²ò?¬Iu¯ysë5/ÿ}倿YŸøë(»‡ëƒJîí¦lPkдóï+Ööö Øˆ0ݺ÷p?™N|ÔlûòáñË¿õvüŸÇ\]Œßc1ùÔ‹±?x?Ngê÷à*¼Oç“T=^\ö'cýý(ÿÃþ=¼‹úãØê÷ îb(¹ú}9èK‹ñK šöÄ\õ‡ÁÔü¶›Æ¿nÍÏä½ýï~23„ÂTCÓ¼Ý]„Ó˜øºŽ8µkDãÒàj ?N‚ÁØ'ê§Êÿ¨~Ïî¦C»÷œR•õFÔùzÖÍÒïrРþ‚™†¿à<Ÿµ‚Û?âw;0u8Quú6@AÊðE¬à5c!£¾l<¬ÈtK©ïá` ÆÛ[T¦Ç᪊‚ÑN–r0¸Š½ƒîËÓöéwxÿùŠ¿Soȉ³{rÖ=>òV­úZvèžÚ¡«ÞW™¢w³ïN:ÞÑÙƒü+ômí加¯AÚÇ4_2M@esɇ¨ðéÃÓrÑý·¸Ì¿¯ ó@„[eŒ=M Èh2#0Sãí¨éÂ'éôœæUÍ…þÒý@ŠÑü»/vì/ö¶m^z Y®°Šì‡¿Õ¬Ç®ZíË¿¯Ø+Ño˜ÄSZØîf0Dó]"¨LñJGƒ‹¦Ëap™¢ä—¤þfybþAáB¤#AÍÚ|p…ˆ(Û ï”g=äòŠ&²!þQ “Ä1)àºC^ð°ÂYŒG4<âPkR+*í HhïL–LvÜ Îä†ÚBY·³˜Ì;03}` »1ŠÂ‡ío:ý—í½oPròÆ$¤;l¿1Êó67tèÇ¡Næ3Bäáƒ×Óag&ÚiD—dòÕÍ#£aëê+­ÖÊñý—¯ûoöO{è1GêïZû ûúè°st†ÈE{''¬Üý¯õçul|¡Ëžußõºßtê¢óKXggl…—sŽl´LFì––ë±¥~ˆÃ,‡aÓ’1j^ÝEI£Êê¯G©_õa·!N!ìàñ°¥ƒ#£Œˆ)âŒX3Ž63^»7ªæ_¼ß<¼¬ô©Ú‰oˆÔ/¬ÙuBÖ°•}^ØL®µÜg·C 3c2Åê¨c¸ $† G’ñÆ8«¦ ŽEMš£Œ;h– „+²Ó6Kª΢n°‰Uí«ÀœŸ—ð¶Á•oP¾_äÃÆ ZÍg#Ÿ ÁíŒ5îÓÚ«OBDG‰â¤…°ýøï+LÈŒ˜Œ—\Hbnðy8+o4Å£¤ZqÏñ PÀ~(é–ï¼…ËHq4Ÿ˜µ‹iÉ¡gšJH1¯ž]g83§6GÑÆã¡ Bcq¯B8J( 2zßø×âá3¯M ­6ÎSài©!ÕDr "ëóïè‚~Ñ.2ê önA«˜Ô=-UDŠW §Màþ.‘´œÃ N}’³8œl™͇+Y?H,󬤭JÜ¡÷‰¨aáΉ¦% :N4Ö¶ Â!ÍV{Óé¾~sÖ??úæÅçZÍêF½Öܢܲٯ»GÀò%ó\‰Í:âw’C8ó™ïùTÿñ”0¬5d<…ãubŽ‡9iôB!´ŽtœI)Äð\PÇ‚M²µ,¨Õ"En&$.ú©e¹BókkÑ2ù`õ=OCùäéøÇצƒ@°w¥’™Ó¡žÆSX³ƒšŒKâ‡oðÔž’ ÇYÖa }Œ5 'Ž„–Îþkr9=ß;ëp†VßÇ:W×ô¿û,ùQ^®ÞYû¬»§Üꣾõu0åÏ–5 c2ðZ™²Ï—pRÏIJÀ"eKSŽÕ,‰‚Nú×~8î[Oª6ßZÈfÁ ]ÞJÄøÍ/=‰q£´ŸYæCˆÆFÐÏÌ£ÚÎOoÍ&\Ý9ëvk¥= “óù E`¤J¿ûªxØ>©.´•—ð§iW]%­ÁÞuPªj¿<>=«­v£t>…Ž«e'1<˜ôÖLWMB:¸šaäK…NóÙfÀ>Rt%3ñúX`ˆž˜¤ÞbÉ(/»´ ¯©’xœäHWcäu:û=ÔAžÛAA«Â)Ú=êžuێдi¡,+¡JŸAšÚ¨›C×ù}b ¾‰úÖW’Ó3Ÿ§Wö'̱¼©9\ °g³Õª­Šç›Ušì -.= ÆjÅûÈ?ú0`~\_~°º^µ_|2gúÌËu2[»¢¶èÈÈÕ´0³b•™Ôj±¡«ïEÙ”­íz[êeaI{L–ô'´Âæ|Š“PØ[à¶(K˜®¾Ü;>ù®–o‡W©yîv+mNÁ /œÆ 3£sUÓæž®„_;?XçwAm¸­]Q)£×ÜñŽ9^ø·îÞqh8¢ßÌ/Q¦xi—Ë~Íu®þïQúüóõ©$¼ sŸ :f˜–37ÅE±”$j!ñG/ô¾tgá…÷ùça)—£ö„?âLu†+3:ãUû ×¡6¾F¸‡ƒîQGXp<-j¤ç>?:ïuö¹Íͦ۲Úí^¯S°d˜¤‰Ôí¤ÛïøMÿåkÌZspõÕYzèÎØù¶ Y|jµZ|[JÕQˆÐZ躦Þs©7~A×Ç’RœzçMw¿£+ø5)‹oƒÚRVSòzŒãš& b <ø—ÚT]åó–!%f(çSŠ™¹H@èPVÃeHÂÁ ýÕÝ­eªØãÓ~§½÷Ž¨Î~í—†‡ø²<ŠÃXRI(Fû v13Þ/ä \U©ÕHoò‹÷W£âżezRð«_Ƚßút>Isó†^ÇÎGâë!:ôI˜ê¤¨k“dG¤´@ œóBS·…Ï8 /ûA?w÷³ªýoÓ…D¸¼"e¾AÅõYÏH›6‹gù‡¢ÙFRH–•Öu«ïhƒsaÜå ¡Î;^ž© áŽçð/~mO„š EdWÌUÙo¨»Õ.½sŸØm±ß}p~ýbÈ°2‹ýøšþzæ(Ñ…¾ÈF‚Û¬Á^A¨¿ØbÝbXŸµ²7–€hɵÈe¬üξ6Èæήü•wÙ;ßgvÀJ~ÝÈgÝ–äp„W0BdL0WS­Ï°k1r)—‰²ZœŒ¼”ýjó…ó‚'eÏ"»–+&Û(fÝŒÂõEî1Àsõš6"àUY+ äàñB ¬Ë¿3J.‘eÏž.hÙå¦Ì¾6Ÿ½l'´Á×Y=IÚt ‹øE¹ê++½fÀ/cXGSsµú…nfv ‹ÔsÁÈb-Gì/Ð`yÕ*TËÑšDÁ¤–cCq^¹;WY™¿¨edëM. 5È«Œ„øNøÂNT£ç(ñ£a<é3® ®“íN`ÉñYÿà|ï›ïúGç‡/;§x&~þ¹S¨`ãöÙ¨îZ%„¦d2žrAOQzo¤x0ðS ;D·£Qv4¢%ŠÃ3«žHü´U€«I¨šXn†~¼’`J¨„‡3¯Ü¤§Q6êÆ æZ5¸ÂP'Ë’K@avI–Xr!¥À2WËVÒ°–6)[ŽfvàS•¸Î0¦´ˆ¢»¯¦8(YÂêDY â_ìG¿ØúEŒùyÓî1B  ¯Žá=yä_L­ì¤ ÐÊ`ÙžÖÆÆ`UêßdÆ cª×%¡óûσі7 âÆ…³¿”B¸ÖÍá¦U|zØà3 ÄÚªg}†ÌU0†_51·¢#³·v%ÅGŸ•WÃÒð/SöOkWÔ\©2ý<¥—(«\ôÓ¼P^&Œòå¼¥GøA¦+ÞˆTE™þ"¾òÏÔú»o¥ê©] ñ‹6ûç^X‡ñøGÃS}çõõù.^ÖgunŸ‡y»ÁkìÈ—»Çè³·WíÍ˃oPY¯]×Q5ŽïP…×Pi|-×9Hûs`çý 8ߧµÜt(ékT·õT#zTÌÌ6+[…ÁbÌ6g­ªÐÊú>œ’ç«{âÀRC°µ$žNу:Ä,U¶ZéñVñf ví’‹̳7ƒb¯ê:b_ þ*þGNúðcM`m÷œh½av»ºTؼA$ Ž—a¶úKmê"§:ÙIâ³­/$/ ”‚rnåP´÷ƒq@ÛÁDüco8L7 & ”xx²tÕZŒíÝC±LáS`-ËzЖŠžUæÈ(¼…Ù9Ýÿ¢?6l¹IœËæEïÚæÍ‹l]î?7oÅçDüÊ(ã*+[bŠfG)0"gá$h-Y~»Þó4g…µ†œršñEý%Mî +ŠliôA¬ÇƒKáÛ˜ÚKíuÌ^¶¬a®x*­hwÄ5±N=¹¥’Vy2k¼ã+ãu†~¡%: oXݹ«Ç‚§&0¢ ¹–ä-{lC894»û+A7ǧ ¼¿ìÊσÎÑë³7fUéïwUoÌp8'‰îÉ—ÂÄ©ºÏŠ"'~ào1S¸*†Â £Ýwhí§¼µØ¡*ª¯õÐl˜\ÌQ>öçŒGâL tò¯zQ©‚_Z/É'¼¸¬µ±xZ9DÒ3W…iá6ÒÞ¦\ÄÙ¢æzÞP¯u¹îBCP‚À`±˜«©8Ì…ãpvg4¾8òÁný ^Á5À|·'À~Ób¼ÐîÑÜØ• @-ä]@ÕZ4eb‚»m´3Á) ü(“3Y¡Ïh`*ú%~ƒ‚|Ev#¡>"boÊ*nò¦Ô®…~j1|³cÚò~磤¡  ã7ú\›«;¤OŒ ¿[",¸Ç¿V,ÿ%º™Š†”v¶Þq¡Î‘.CR]ÓÚ _êýW=ã…"Z«uE€%UÁK_×#V¨ÙÎùúF[Í£M‘Âm2OدbGALåÏœ¼ý¿î8ùìæçKéç¢Í°ê üÊå³rÙ gÁQÜ077WYš×–*eiÝQf8…_ð9Óåa2>E¨FÀùÕ§H¦!»»¾$ÖúX±2ÓoãkW¼#ªÜb%±E?*2"iæ|Ö‰gù°‰âP%Xvƒ©œ÷¦Çè“ÖPküÀìØÝ`ò‚ì+ j²s61©ÌŒ:<ʨ¦ZKe’fæSÄä´š÷IÔ U 9ÖĪõEz":u–¬V§™åê¼t­r9ÅÁ†Üê8~ç&Ð÷aôîWÓCn“x‰kͱSÒÒG8‰­ Z'G¼°“#ŒÕIq6{­cŠ½KØÂÌ4$‰!…œdw™IÔ%‘…mÅd+˜5tÏ—é_ø¾­å¿zUD¦;â O׿dM¤u{Ò³ç·bºåG£±ÌdÏÁ"c}w¡÷‹>Qõó_*ÚsCŸº®ÃêÛ/ý|ØPv]ÿb^~pµÖNM¥Ž‘é4¯è1Ñp¬¡°Y™×›3o™:*–¥kì÷-ÓmWiòÛ®çêLrGé47º÷>RíÞc‡ÁglÎ!›oBî˜uæ;£ˆ)8¿³gxþ¶:K|‚¶+½°fI”ßbs§…–Ó7DŸbµ½®ì¨¨Æ&œ¸z×2ß¼ Uù ;gƒ£/#ÿÅã› 'Ê:¯úÃÓ6î¸]RF;nÐÌÉŸ¿&ûxT{ÿ1ž£þBÖ9çÌÒÀ»x]u6²oÜñÂwÖX•ŸBµtŠæÖ)¬}?, •ë]éš«òJì"hˆ­T te5a¬ ” –¥+oåÊβÜ‹.ã1A©=®pjþchpÄM!ÍM†¿§ d£¾h!gl+êÛœñÁÆf̸ºþÿ77‰ÆÿQ0€-!øñžn>Ëá?>{òì_ø?þ£òE!ç¬$¼ ΊS»PRýÛò‹¦ù0Å÷h•LŽW” 8-o§3 0…Û4M*Ç2ë”o2ÝÉ(C™IÏÀÈ4ËŸïï?}Lr§$È×[ô>Þ›“õów°D¼f´½Õ€ÿ>} ÿ··¨Hïuwý°{ÒÃ&Q¿z}ݵ‡5õÏ:÷’ûC®mi ’ï˜R‰KÜvøÿÏÛº=„wÿ™Õ"¬coow€ž†úÞ»w»—0/ö³vo®„ðÄ´ˆbçÏ4–’Ø î=ûØ^úh,# õ–‡yXtŸÛ=¼lþt @DÂ[Ó›&RiÂçTnÑF÷ŸävH<ÉØ7§^ÖÀ*„y¤rçFqt²wj/fg³Ê.¬}B‚çÃØ׶ëµV¾=iŸ½Ù…áàGsìµgñ$ô1…àýÇcËw*/'FÞÉp·„êŒR!¯ð{ƺFƹØ*Øʾ!¯Á´¯©}Üïîõ÷»§»º=ëNü¤{öÁÁ¢ÏšÒì$ë5½f×|­ˆð™KÒz·ß>;>ìîÁývïøà ³wÖ~yÐA”Éã~ç]gïü¬Ó?éœv{=Dö,—Äñ<³¹ëÔOК5¶˜ íAÍo X/܆ayÐ=:§*›û˜Út@YJá7¿‘m¯}À9³õJBž?UÚ>DŠts4ûÂŒ°)”V‰±MÔ†ó^§¿p|Ò9ê¿Ñ ¾{ #évMÏæh*täZQu©¦(Þ‚|ºt@Þœ8ã‘ï?¢€ž÷ºïú{ýÞñùé^gwó‹/žl<=ðšär厤‰½Hâ÷Aä0º¢ñÄŒîTž%sä„…-Ÿr)îÂqïÕ¦ê.“7ǽ³½=:r蟴tMV%}F[LÏr+A—`I>N ôLb© ¢¹i*0‰ûåWÛF’;wI-´.¬¼ÔÀݤܸ´— Oã 3¤ÉXÒÌ0¬Ó8~&Õ?9ÛÔ®C¦æ¾h 8d™rÈx+¤®Ö Ö.À®z»¿‡}$í±^^| SnlÉIb2Ú mæMj5/E1®ôȡϘ̦9Âjç7ﳟ'Ó>‰(HùŽLЉ槳pBX ¢êO]H ·QÃ3‚ò8ѧÿ`¬$|ÇïqoÆÀmë¸^;-˜6o}:(Û‰u4¬ŠO;Èms‚õ[E¦à|JÇn–®†§é»wÂ<ͶOwÜÊiûè ûrÝÜaTWV [0nc0ܘÑZc+äÕØÀ»Æ£Ñf 6ÖÈ­±Ë ¢ml _c {DJÁÐlÖØÂÕ=Ù}µª¬'³xŠP9ã¡´jè'pIwŸ”Wk`[”–×"¦ „êÜÇñ4ÀöøÖ8ƒk·Æ§ÖaYyÄFªÓ&ÑÞ®Á©µ ‰3W¡[½×Ûufc ؼG×›’¾–xá·3¶ð†‰ˆå%Çù¾‚¶‹ ª± ¶u‰Š…ˆœ›¹AÑÌ fID^ è×@뙘™X³ÆD,àÝ,†ofæE³6°°—aÖŽO÷û˜ ‹ $ª»Ì6ÜîÆ™îÆ™îÂçQ®„ÿ¨; ¿XÝ„¨è¯y¤r¤f öE²¶¾V€©ðòj˜¤ÅoðŸbæ-3Õ’‚œK>Û Î÷ç¶Y¾´ž€äÌÛ›ËÏâxœ®ó"–¬6/?G}Üè¸ Õo¸Æö €’—5!}lúøÄ&}9€S4°–ÐMà¿WnŠ…Ý#×ãL÷À+^ÿNt.ÈL‰Ÿýkÿv4Èn>غ.ضÑx·…“¤7¸)ˆP¨À g¬ÉU­övð(ÍÂóÞçCº IYöUÜ´–VÐ;aq0å«8 Jhå9ažT“bbpoZý§ûhë‡~_’Ûã¤ô6™sÐ×çIOãQ0»H‡æ½](GqúØ~[[qCãö÷ú¯ºÚŽHöùçݽo¼³ãýc[":ôöÏãÞ–ÄzëG ^úöÖâàJÜ}‰º«Ùd¬ Ê9Æ2½Á§¢w2PÈÃÜŸna©dø³ýëjjÿ£ôh?HÒ§YéeèüŒÇ~¦[ö³ù,Í•º›\„~d?¢cJ ãdèµÏÏÞŸöèàø:CÄ’áéñ, ÓñË ž…ýöç³÷AÔjÓ¿I?Ï÷xÿõù»íçOz 3xÇ ‡WìT›ÂªušfdýPM mS’|5ûè:翆OŸ>^Y9ëôÎ` òQ&ªù¡x¨‘ñÄZ“Çò}+_¨^Î1tÓf4ò7’§ Ìþ‰_ŒgŽ}¨bò^êÆ™"î^<]‡ûˆ!H<ÂftSü‰ ndHˆÄ¯áMÖìtÐ õ= ®"go:§}´É Ð?½£3óoZïï‰Ô˽=ó¼søÎüxk¿1––Ÿ©ØÉÞiS'aêYŒl†—•(ÆËØi°-l*VJS–…×ï€ã–}"¯ ‹²ë³Ñ‡áˆ•Ë¬ÐµDŒR¶­Ã=îÉ ÕOúØEõü™¯dߢwA4,)ITûZpâÚÑ3›d-Á[Kf™N-ÂïÖ9÷sŸª€ _JÛ Ë‡Q8ë›ïàÎÞg@ö5M€Fwx÷õöúœ­pÍvžL†ËmbW×ÆeBÈ¿'é5Èu—–¥fýŠWþÃñ¢:ü#³çñQfÔEØîíœïwÔ4甡,;çË]ë; ÊËðýaeåü¬{õ‰êÙ§gVÒs†m››) ðó\S;’$×>ºŸ²ÁÄKïÒY0Qù…)Ÿ1””{Y†` n9áŠÐB@걫=Ńê,ÔÇËޛÎÁ­ó®¡‹Ž·Bïv½õ‹0ZOa¤z'½nû@c»÷ÕX£æ~Li!1ÆÆ(±°{VŽ7J"­îý¨—;´´”¶X)õÇ!öÖRG5KñjцÎHÍA"ÆíX'„&]˜çvÒüa’‰ùõÉ´ãÞ‰0ÿyks%í°a‘óB­pÊP·¯æ?Mç•*&´oÞ,–IPùŸURp¢ÅêJndwV(#ùÀ?ñ¯ºµâ ØêÊÊA§ýMFé5÷_uÑ©^­¬¼ìí7§ï/›ÔiŒ›Ì|õonü•ëÕ&»âÚEÓ¹ª‰¯z”œ MÍÙʃɵg#;äŠCÙ"Öå&C_wÄ©"Êס¬:&ÇüŽgõêüuïäƒÓ_Õöî²ÐügijôuÕ|¬¶„Uà°}ôÁ–sÍÇð ÿ·o¶WV¦ƒdÇ=ÚKnýðÏ…Ê‚V\‹ 5Šƒ¬,[°îøNdÏžÓRø Ž½Ò÷++*ó%ÅÆF gþÉ·²'Û­xG`‹ò\¾X ²äK›…ßت¯úIµàj¾¸Qz° i*Rykr×}=9–"'ÏS ÈÜeš:ú0öíÊðB %bÒë§:-:8’h§’Ä¿K¤Ý§|~ìB>ø¤(׆"8ð¨>=a++ªê,Xy0˜æ8ƒYG¢š·4à–BÞ(ÃwŠÇKk¾àŸ%K‹?^Y±tèy½}¡V<£NÇ•ü ¼.KTØh­˜[H¥H‡²bò÷›À΂nkÕÊŠ½Q%ý¡UоŒªlˆÖ™3(ýø·l~»©Ž‡É{tG _pvøiÐç¼›pvèì™ÛxX#1¯.¹%¿òT‘•É¹Ð0Žf°Pû›´®ò2 æoulø$àÉÐRúK(Ú§{^ïø }ÚEbNîšnÙ‡PÙiÝKæ)ŸXùÖÛEŸ>ÿÆkv_·U`}ÅÔ›×Ëé±WÓÔmû¨¢l†«sÙß~ó@¸ñÖ‡Áõz4‡Óö³XÈV:oä‡cJÃ@¬@ ¼Þ$À„¤á,+Y‘œG˜!­¬®lGé渡ú¶NFO³Ü9ß®:‰Û÷˜DÓŠJÓ·]}úr”󣿛¸Š…O™NÀió£ž/>zXò)>#5¿FÖðîJp,–ÝzQ-ÌðÇN!ó¨ÐÕ‹²Vý Q.ÂT²ËFÕbÏØ¡öÐéÓžØÝhƺÐÂ6놱ãx8z?µ,³ÉO¹É³è~¢j3®Ð¾ƒ‚5V® nò›H½úOb¬«çpë´¿Ò™ô8ݯüV©üÎâÉ 3#înÜÇU7îãÊW5§Ò¦}\uÓf¨æ÷Þã̆­T`ñfu'K{8W+EB´±tœÓû½ó£ãÞ“í~ïMû´·ÄîK÷ð¶ìä°êþ'ù›Ì#(ã¥W~G®Rÿ@n ô%óG¸i©Î©ük² -(Sñ<Ç ·ò`9Tù¢—Æäx8ž^ùëǽW•;…U`!·[PÉÐk &Õa¾*_šã5ÌýÐnZ÷´ûî>­ “ð¶d¬qŒ­öY¾©ÒV]vISÍwvKÉ!é>M%Ô‚¶’?«3˜¦Dqç¢ÌGvó^’Óëxع6ã E»ßîl”X•t¬0Š~37Ê$[7Æc”ÌÇ•˜tJ°¨š“ Δ`cr »H·bšÓÏÌu Uiä9N˜7DS{\£ ¶1»8<¬MýY:¿€†ÿG+nÀÆð_»:ºÙ·zç¯^ußuz;¼Ã‹¾üæ·x¸"]v@à_''jpÈ% ÙÆ—Â$Ð}?7ÁÒ(kÊƨ's§ùí¸ÑLc4ùïªÁmmÈì«_e¤0w*^±´¶\a9 ™‡%öäîõ{‘¹ðãröÚyÃuV\1[tª4õÆnË9“‹úœ§‡Î·/{ûä½^¯B,74yšG³{‘ÌHžäêja7Yƒe«…ë…k¡"²ÌÄ&×r)[í¶Ëw1hŠç|þ‘TÙ’ˆ«.¢š>Y×Áe=/íENºqT‰ÒÊjÍZ1NšîþÕ΂ù}¡ ¬{ð6NÞ7ý„ÀQ‡ïwö”™ƒ®±ò$@#91áyÄÍóË–Š¡Ž4•ÒˆrdX:I0‰1Sfˆ1G•÷ší1iŠ<Ïø–­Õ/øƒYþq;ôØêZÖ]P.£Ž½¯^¨² LåôHWTäžÇ¿q8((Šr©³ :¡Óè µMVAâYbõ…}ûÊû"®ŽŸ¬/LO÷%ëZÈ¿­ö±¯ayûÄõò“µééöqõy×GGᲓ%”ó÷t”5¢©pw©C0Ïw÷O{Gï¼1,«ù¹o;šãùà¢ü†ÿé«+½ëç/—™ÚÏ_¡M½{ôš.g¿¿IKYòŸ|HrzŽS,YTäX¼ÌS·|…¡)î~kküþ†°G@Û‚Ù¯°ö>ms/Æ“ã·Ó“=¯Ýý#Û£Ü$ŠjÞoŸ¾íýq•;RºùQ|ÛŸÐ٣΂Éÿ€†Ø÷? Ë?ùÒÌ0E¢ÿÇïÒ,”aq´â÷ú*6f8v ;`×ø>"C_ZÅÊŠiS¾%Žÿ%ƒ·m (m•!»°F"=W…ãd…,3éKè¬cÊŽ:nh×`:×ZÁ­Äô¯¯µ´âˆÿê“Æji®(*›Ü—µÿF“‹zŽÃFáA+ª®ê笌Hé{Jg‹}r¹«¼²%•¬¤S,±Õ|†qïˆþ*—Å¡³XT´(Î¥ÁåDc"“÷úgÄv½wˆ©]òàvÈáÆ-Ï{=ФŒÒ(}œÜI  0þ¹óH7§µbµ'¿­B¥N5¼¦ WŠ”±vïË+c“âŽç}÷ÁS³Ò͵ÃýI>2qª98Æ=-)éŒ}žZ^;+šöŽ;'zSXOmÅ°ãYœ²¬ãq¡ÍÜß•ñ„âˆMÁedq›ã9_¿Ž»ª\1—(%£ûÖòšdÕ÷E€kjˆpøÙÂòàà "5àž˜ùÉŽrCƒ¿ulŽq<–Ÿnÿ¹öÅ>EC^vQá)76¬}åAȶa¯õÁÛÍ^Lh0Ä“áfí¼vµ.ü÷Þ þúèÝ^þ‘ÿ"cÒ‚[—ÿàbE» ø‚¢£P±ðŸZ2O?‘¥™z-çYk=»¬–O„;F_yë³Étg²I¾a0HÐâÁõèJ&Øû‰,Ùï~¢éSŸèVáÏ•—ÿ§¹‡Ð)«õ+\´õ_;B÷ýdJ9Àäúäò梬Þï#¾&¡Ÿ®O¾ôšû :ŸâýæaþŸ©×¼FDcA¼QÀÈþ8¼díiËÉoþEœÌ~ nÃÙoéEòþ7hlŒA¿¥wl4þmpE ¸aäµzÝßBü`j“Z%“×ÙÁŽdßPÖúróœ¾äíi8 ä)§± ÝšXáÀ8 ~™ÃN"ìWÌËMhù²)xA€Ð>UÆ!vý¯[+í—=ôªÞõ~šÞ ZÉÈF¡C[ñ¯9@ÓeöRóÔúw\(di:Íñå€tЧÓUI9}´h.¨^< › «u¨dëf++½ïûìÌÎÈ»¯÷VVq.¹†}\±’YûÜ¢¦XÜõÆ[ ö“#¡“#âw¤ë0Aë}üÏ¥÷¥÷ð!ÑúʃmF\7ü[^ð#äÈ++shÔÓ"jÍý[ôoÿúó?ÿÏŽÈû ñž=yRŒÿ·¹½¹ ïÿïñÖ“'O7ÿoûÙÖ¿ðÿþü¿¿èÈ!„ìš! aÖPd¦è¬qDa9Öä‘üGxu{ñô.!”½Í/¾ØjnÁTz¯0X/Ínð~B‰$V¦ Z ‡Àfþdºû¿onn6·¾xIJ:HÊ}²‘¥BæÞs&ýñê‹A¹£á:Æ!ÅÃptç–k­ b¸ª¼>:÷^ÓÅjìÌ/ÆáÀ;A”ÑŸ¤W”W@‚}Ê:ò BJF©ÛmU…Ðk0œ_ dºž±×} ‰ÆþÌ”d\Dê6åÕð'ØsÓÁ¡Â©¿a@G&ÝÈÅÑ|L.&@åm÷ìÍñù™‡IÞ¶OOÛGgß½ÐP@tá!ü´ÉtŒqe7èëÍî éèˆÒ9Ý{%Ú/»ݳï0óÛ«îÙQ§×C m¯àVgݽóƒö©wr~zrÜë€ÀÐ 5²@£dl)J •CLš5N¹ÏßÁtŠ“ÍA€ÂkÂ_ÀšZ>géE‰^é7³†ðšJá²Þ€ë[à}y5›MwÖ×onnZ—Ѽ'— @‰tý+nL›îÙh…jˆÊÊÊSÞ†Ö3 $¬E9Ó«—•hùz‚i1Á¿3®£…—ä1ú’¾wqçµ%¾AÛoô*ŠP”a¹Ë’%p- O¶UŠeç©ÁL‚TÀ½|‚xä*?¦ŽÌ¡ØÎ(ã0fx¤HkxÇ{-9=CÍÄh騙}S[}}rp½½Zç‰8ìQS“p†„Ðû¨K1³x`¶*òV¥W®k4ZFXÄL“…pÎZ©íG‘¥W<¼ .Ö¿žîª30œ½ðw/Æñ¦Î ££]ût|qu±û¦ÓÞg\SLÏcDCÌÒ4¸ R¥[ Ð›à ¾ô@TfX0&Ó”ÿSZ|qeìþľ¹7VᆒU3ð¥ÖÚz£ñè'àüË`wõ‡•süpÞ÷Ç'gÝã£WVŽç³é|&nyö’¢k¼Ì‹°ð~z8 Qþá9bÓAýÇÓ@¾fŠÀž×¼jxÍ&¦®4øôÓMã‹Ï%o6øý ¿§PNâðú{ÄÇ5ñêp`£¬ªò×X^Í£UŸzÄy°íB+§î CEJ±j`¨¿,ë¯Zp™Š8–¸T0‚ÚC}FÕa\–/Ê9•³`æœK…§Šâ„—:jU˜ñCÅ-Ÿ±®8õŽŽW/ÁéÏTvïaê028­»«+¨%¤U"+à‘áäJn‹î¥'~’⢛LpÐe…Sç±–å3¯y9ó6<¼3 2î–‡›ÚŒ3ì,˜ßäçþkæé|Ʋ/ô¼¬1œïÅ !¢–Èox'Ï–“—ùR´¶±Ò+ªñ*W’vÜj¶˜W§o>óz³x*绂FÄH;¡‘^…£Ù qùT…½úƒÏ<ô¾OgC„;DlTØ·-UÈýz-×"TîIxžªùáæCìȪ÷Õ_·ô×ØàMEÇ"cÑR°ÂWC­û ¡ý7^Ð[q*Åè-2ŒÆtjå WF!ˆx‰?õñƒGЈ-oó ®“½½>æí ˜E­·V ,¾Ý²PqCàÉ…)˜R QC’„­1Ô’Zˆl»æoH£Œa‹¬á üç ð T™HX#AÞ2äìIË(©wåE0Æ䔎Í@@;pE͘•”™>!X"K"tÔ‘k@Ðß„˜ÎžÕ( ï'{0d΀ØõÐû -Yý½½G-LäG|”maô?šq¨³Å„„†âöƒª=QmÁ¸VÄrWi¤¢t&jü-lÀ4°‚†€þ`Ї-Ï™wñü®âü¢ög÷‡‡_¿ðj¬xüá!TÃCºõ•Žqxá%ôC£·ö ÊËB 凇ŠÞ*² ©ã£ˆÊnÝ\奷 «ÂiùëÙá ¢ý¢Fò<ò~ÅAÙý©6Ÿøé{oãÙ3lÎä=.¯9„uÏÖ—ïèÏjÝ®ç'üšÄ#dNÈ–ô“¡zòÂûàýöÕ¥?é|ÿø¿†˜j>lÊKÊÄ“iö‰Öm¢NùæÇ‹ âpÓ–~ë'ˆ½# ÀÏSôU ho˜•BûÛªÐâ°5ðÄá]ƒ9oõ¦2ë 5JÜPìýÔx({¤é i4ꆇ¢HqûÚãé^°l@éÃäj9xþ…7øâ >¶pN‡ñÇͶhP÷Ì€EòWì ñP¶âÚ­ƒŽ Võ±€ŒBü›Ì&/ŒyâvÕéÔª·ëÝZT’QÜWl¶*ú£¾`{2úFc­žm ½[£—î;=üÏå’ ð^˜;»Ž6Güh÷’9‘žÜÁ­¸ôqï–‘jQâ”{-ú‹Ï£Ö F¡vyåÿ#üÏ(´’ùìáBƒá¥ªÇÍçÍ­ÇõʶGiä­·üÙ UT]ù 4ùCüïŽ*Bë$G|L§ÖùQû°Ó?lï½éu)Pš“Ìžÿí7Ïýr½â›HÊŸv:ížU>)+¯¾tË÷¾ëuMñ4SÜ”—/ÝâßvNEÜ”¿.«^}©Êó6Z}ø«MýÃ*îŠrù ädüßúZ}åÁgŒÛ®ïØJº"Yƒ"¢ÿ<‡‰š†ƒ÷Þå8¼± ¾EIqÎPÒp0Á©“`Ú´dˆ¢ôƒƒî˽]ÔWV äx³+o啾ü²Ù9~eí` ­.Å_Ž€#K[W_ác}JÖúýó=¬ ß¯KMó6 ¾ ÆÎwÃ0˜áó¥zBߦÕÒœ4få´HZýÓCWÖéNc͈œdEzôw¤¼²áVäz„ö!Ûõ1ß]›Ð4Å—<œ¯ ü龃· Î~ ƒÂ–jegTÖë‡Ìëß² ÍY"¼HŒÜ9 f°iwÖvxðO¯]¤ÃºÊì¡4;µº¤âˆ ug˜Ë1Â<#Xžîr5ͧÀõw¼µæZ“cC‚ñh­aýöãùl­å¬oñh´FW?óp nHÙ­$ 2aùdµÁ3¬ÎÁ+»’5ï†ZŸc† ‡âªûL%SP[Ð¥,¥|Â¥Ù»€+!¾ÃìSX÷œ®’µéSsÑx6 Ð𦎣P»¤BxLãN‹CF_EÜ£²)ÄÄ—ˆ>Àá_Ä¢€Kᇜ0'M)s)Y´?¾ñïRäô(HÂÀ¬ kX…ZÑP9ï®òß(Å\Ý´ñ½ï'ƒ«Õ•Î2ë·áö lh=EýPÊ9‹ÿ7åã´>O“…ßѱ-­©£ù¸haS¼V‰ªŸL‚‹º‚¥ß¥ŸM!‚'›úhÍù&÷EzµŒÍ'éÕ¸ð“ û“‚/ž¸DžŒƒÜGVC »æ 6ñ€A`Du §Çì˜9¡I*«‡–!&“Lõ@¼ ôAý5k™å˜Í‘¶ªûÚoáöó§¿Mž>ÿ[”no½ÿ †hí7ŠûúíÚ¿ÞQÊÝQü¡ùî÷¡Qý>0É3m: „Ð_„•6Qåà!Ÿþøª~  .™Ïp7":œ¤íì¿z<Ìð“:Ž;èÕ ë©·41ÉäÎïhó²MùN÷Ý×ò]œîòØ]:3ÜÇÀßàJiÌ€v¹Ü\÷}5Žød? `V<–…È JY¯î[‰[Ðú;æ›mÄÓ~5O ]æ“Ö– l|¸}`moâLîÛà»Ã˜Žü˾’„p¥uq'¥±ä-åø¥)hq •(1ßy(7Rÿ²¡ÖX:»³Ž…&êê²ëÍ9Žh´¸û4f2(»°è£ìˆª·¬`Íx¿iUëú÷Íþ­µõZëx;£ß qíœ÷Ͼ;é4ÛGç¯Ú{gç§Óæ7Ó£ÎAóø¤sÚ>ë½–³u‡ÏQöÃ%µ€˜æ0“gŠsO2¦Þ„ W“¥oÂÁȵìW™ÿ͇¿Æ采¿JÏ?¶uXk;/C˜éK9É‹X7ruQCÃÀðç­ug yæy‚ï³#mp®ÈÈË[!ßWo¢ìÃFZÖŽàýûØ´£ˆ®!‰ßV Ù‹Çá°*Í?^Jæv:ì†I†î¶j2hr“0©ÐÂ<ÒöU!H€;)$ù^î¡»ö¸µ›2sa2R@Já“Ík˜wÿæ½÷èW¶<Üþ 7åÚ“ÖÚGÑxü!·±Ûôe GÊvîÿÒ°d’išà~¥Só"€[í‡cÉ^†å¡Ëë›$ÜQÊ…þ‰RápŽ¬/%ÎYƒ0ᕱæ2w@êÀ†â 9âæ ý;%cÐå4œJ†6`ÄÃïøAÏ/¯H%‰²Ù&1ᛀý¼X+Ê26|ŽLJ{À5(V¥¯˜=~ª×4‚Ä#a‘—g8ÝÞµÖÚu¥ûŽ“ÖÚÃõ6ק ”n‘ØÜú #_í|ûØ«mmn<}\_5óª®Ø«TÙª–”ðóÖ“û8ØkKO×ñ¿Ï+VC•l.ª$¸~â–h=•2í……ž–”:Ù+/6ø¹rÏ*–{攣ڶ÷Ë­é)×´µ¤_O3õ´žï½”r{ Ë=Ï–kH¹—÷+·÷NÊíß«Üm)¶¿¾XÜÇ/œ²4.Û‹ÇÒ•g­/¤ÌÂzžI=šQy'Q+2Bj\ظ94.%ôÝ·¹ïDÈ~xVþáˆÒNÙ¦u)ó.[&¢ŒÁR,¸…ÛHH1 cŠ]ƒ9¦¢›­-WRoþµJb³R’µÊN È›q:*Ül+ùúß¿?ùöìÝ ÀãYâ=j¿ÜÛï¼zý¦û·oŽOþßiïìüÛ·ï¾û¯GÞ#ÿb0 F—WáÏïÇ“(žþ’¤³ùõÍíÝ?ð|@ /ÂwÝ3LÁuxàÉIáSŠêt:OÂxžt 91ë·Ù-ö¶‘<„;›Åyrnj‹‡:A ¶è8™ß†p[¿IûGgJÑÂ8ŠàÀÒñ@&äd¯‹ÞÆá­w¿+òxòY”&ß‘pàQÖ:Ñbè\ùš„XVÍ`zEv9v†Û¤%µ;PBhœ%É8Iš Ñþ)Ðj99Œ¿–™¤5Ü¡$äfºÂqn«Ÿ;O6v¶ëNQœù›0ŠfÛ­'na<_Û9?ê¾ëó·ÿíFÁ›§®îÒëÇYáçû¶ÿ#’ùþ8þñû^úc%1ˆùã4GëpòcœL¯îEk‚%ò´Ž{ëÛ_lØÂígÍðbB²lÀ.ÙRÿXÿöÐ.“ *óëIäëx¼±Q$?R-)¼ÌHvp)9íööÖv6[ßolnýEÇI˜Â[ë©žÁdÒôAªŠšüÉÉ1™¬­8ÝÒkTáqo'CTí’én}½±¹ó¦Û<·~xr‚eôNŸo@wÇŠäÕtêo¶6›Wp#…{ü=¿ ~MW,8n·kBô°ÛËÿîžô÷÷šê1m\ÿ}üçÍ®×Û­›©?ºhù£Ö${µŽŸ€ ùªåµßuº&*·? FòäQ÷ Ó2¡ÕŸjëlî`“‰«ÚGû?›i«‡L-7¾©þÆÍ°½¢Ô…Ÿâµö `S¨W;Cø[½r²ä¯“ÌVÛ?í}©hv Õ·´KŸšeŠ ¡f87£Û§%Åx—ãþÞZÛy†c­_…i˜ªçê¾Á"¬6 yÍéOZʤêê^®êgÆ¿ãÛ»¸ ¸‹nw(@bá–Æm£Ré,×0ü½õãšÜ_­þ¦óèñ© î6;™1ºòÇŸ¤Š5» <'ýá4kå5C©ß]søü)Ü[Ûó$Nüówºrx|D™ç†í=ŠÇ‡OoçKX×àöMÈgzV¢vì±Æa+^5&.v³²M[è ŠTº–Iœ¡ášÕ®iKéêKoNæ¡ÊNzÄ~ÿàäéã~Ÿ“snr¾„Kù¬Åª?ÌÏNPwÀƒu‘±ACå0ŸøÞËÿ²ë=ÊY‡y?Úæi4ªÒ ?ú,X ò'ç½àÍÒíõA ïžÑɳGlõzT÷Hÿ ¶·w|‚ykkÕ礭uèZæ[n•°133·ÏŸÂ÷«ü1)^’꫸f>åNyª8¹£&0‰Œ:ø‘RsÜÖÏΞÊu>ü©k‰âS¸Ñ¿ñ“¡ñ±nýÅfá"áo´—7.öñ~ð‹}–`À4Z.=î3‹Däq«l#oŠ±”<«†ë’¾®ùþ's·ï˜Šeí·Þã"2Sg•2ó§~„i„@Lû—IŸ"šm×)”á§Ç­ÍÖvóo úŽvK;Þ\ïõz{-©)/æOð žpX‘ÊM+;»6aóo=˜ Ö'ñl˜Q\ècR{ø¤±ÙØ®xäžýp¹ !Ç%Q(X½%O#·Âm3ujÚ¬9Ãו|°¬ŸZÕŽ«C—Ê |I1žnGœ§WÓü`39x9 n« 8[KÒp6—Ðyôˆ Θ™ÃÙlÌ~ÒsôØdZeÍ·Ú5«XU«^ ›†>Èô«zÅÎΪ|¦âÕ³ãÞª7  — OÀïtï‘ñ0™aÀæH&$5pé‹ÐD®íãcò¢Ú¤¸d7P¡n‘± §eWYÏï¸n!]ÄíÇا‚ÇgÛ˜Þ7±À’« ~·–¯qí©mmäaºõ™‡Væáï©®%~¦6õÈ®K=+ªŠÞU¨êÊ¡àT¥ÙU©gEUÑ»*£èŸ[A1ic÷X:dðùòˆš¹qŸNÇASÞ.¦#Wð"Rêv~j|[Ç|\N›ÂiJjÂã„kÞãÖvQ¹óƒ³Óî»Â’ó1\R—Èâ߶ß)k6‘kÿ¶2­­½nÌÓÖãmó[ŒÃ)H[¬a¢ÚMxt»lOIË°s~Ø=éÑ —Øù8]pG#äß ŽñË/=ò@ÓhZtLÇpLÁÿVŒK:ûÇ­«¯}Ý9ë¿ìµO¿ëwÎ:§¯Ú{·Xú} Æ£[&¯±×––½ÅÚ,e…Èáe‰æ÷Å!XêWûë‹AZ\€4TH‡1„Ož?-¯%«¿=|þ|mg?Oá¶"kgO=öøí鶳†ü®h!1Z;jã™ïA)u!P. Hµêòz·Ïd‘(Þß‚÷³$†mB/²„Ïáõ·­ž©RE5@™ÇÛÄ)é?;H$_ˆEÕy5> Œ|g*#¹+tv³òqÎô2l"tL%EÄeVñµüÙiwß}½óýæÖ­Í­:Ý‘åu«µÕÚÄë&ÿØ„p•:=[gX¥kã”´Ö>t—oX*ÚÁ» ¯²é>÷®àªMöIt M=÷¥âÜ‘cä‘Òë¤?=Z’°MX[»öü)va'«ï•6et»þÓÇÖ×´£›·žfqJ&fغÚôÑ}ycú­Åa䣟´éC}’õ.l•ì¥RÍ¿§PËÝ<°Ù[dÙDwÔy^ÄéöÖn½B`é0Àb,9e¾²Z"-IXA° ×yQF—oQ|¬¡ÆæÁ¯øTÿ¥ß§ó©?ÔêôŠzT#æÁƒé|–ÖVm{!tVÝ“Uþ€>Þà‹Äƒt+H=E¢ÊOÆ‹÷A€büje]§hrš%¶ÞaÆÿñ=Ç¿˜øc׎–û Ï…×dÿøÉÓg?ÂðâºAw¨î¾í|5N¡^“’°hµ×ìY®g,ýmþ¢Õ„*ÿpÓ#7è®MÏŸÍ€@Vѯ¦Ê:…›•–!<÷ÑÙDô\V÷øŸºCU“*nN‹¹ó—áA“dècRßþ¦èŽÒæºl•®Ö‹(¬–w¹©¸2×FŸnò×ÎÕs†Á² "³§5ó_Wƺ³Œîج—&ì«Ì˜íŸ¼[ßúzccçeë¸Õkå´#T¬à”þh®¿ýøG8ç nèêÎf+§ü™æÏÜ«)œÜz’HoP@k«„VnÆT٧Ϟcñ7'ÍsÕ{°åå[ÉÒú~ã¥2§eÕ;Õº½ùµç¬Š7'¼ÏX%¬}ɬîYß[¿Ï|Š}1P™³»Y/ƒÅk !ëö1ÑÝ\…ZÛV}ÞÛ#®"›4cP$8l ÎÒbìH²öY¯ˆ„<·52z"³?Ù‚Û½‚UöðØ@G:ÝêOÚ}Ôôlö7¬"ÏsE6‹Šlš"Û[õ²]dÙ¢ZXí¶†@µH"5§[­ˆ½ÿðõÓÇù×7æõ£Gù׫¼Û?óhÝz›­-jŠrpàŽ°ý…cPÄ|ü«PbÛÑjf”Š"Œx½PAy„u.^ŸvPïøüt¯ãŠ)3ÄH¦ÈMë)Ü–á…H-Fñ…ë÷WúЊÝtWQ]šF`Q8èÐ) 2ƒõ–ûEénL!Xhž)äQ)k¥C)Õ{ ©òjPÀÈT4óî²ÛñPŠòjzmÖ%üEqÍLÍÅ`Éí,§Å8.,ëQ›™$Ýv½´âœŠù³í­ìgQæ3hâVg?Ë|õÁü 'iJÿRÖR–r'PÕ“Y؆ÜÐPkܨô´ ‹ÏË\òÒlâBmNK¬%¥²ÿ6|°jŒm¤½i9‹:CmQÜ¡†8Š’º"lª~WÓùíÅ7øÊEâ»TĪ®*BÜ™í-úœÜ]=" ’—¬¤¢c(«IDgÂ"oNüÄ„³Eñ$ö@‘Þ;BFQ{èâ ^ËA·Tßí~•‡ÍÍÖÖv U ôù~›{!E3LOë¢$²QÜ}~óª{Í(ŸŠpäòŽæ)<8ª&çu™ZVªñø„WòO$ñíß²ÒZ·7žl¬±#çÎbo®Å–šÂƒ••ú\ùHóÿ…ìÿ±*4Ñs´þ.[ ˜4¼‹`àÏ…9w{päõ÷0OA$qÄót|§4§¢pœ%sýrO ØBCži…ë NiEŠ'A Lj¾âØM(‡|’¼2蘪‹ö_§¬p°_‰OU8ÂÚ›`Ëá«ErgÚ=)leÚ°µ´ E'ÀÂ"¢y¥¿è@²QO¥=ŠB˜¯9šŒ|¦LÌ%_š#¨ºÝ¨PƒB&ž•ì;%M*¸=3×)ëžõüëïŸ}ñ£ý"çg]pk“¢6A·ØFa±µ/¾þzmçð¤³*#ñ\ÿ6ìgt&Ó {·¿šbwTà":"L¥'úYA?ât”%óÜ"SPu®©A­ÎUŒ£áv,;?:€B‹c  ¦ÍÉûœÅ`á÷yeÕXk;áŒ|0 Üæ§Í1¾tËím®íìÅÑupˆÑý4OñcÆßlòûü$ïm-'µ¥±>îR[yˆ¬ï'}0ì \H,Nm¸%ùû";{Û—·¿1ýÚ~\Þ±íç¨=w¨=/§V¡iNË4ì´ýÝÚwÍÓgÆï&Óæ ñï`É„–_'ë‡ñ×[ïÖPÿ¾Ýü¯9ÆeSý¢Ú~Xy`WˆT[k?Ô„ðu4?2V<øên½<l½<lÝ!R¡og=·[³/6>Ù¸mw\â*”Ô®aòþwÕÑûvÓ­#½Þü h­½ãÞúdêxðåèÚiÿôc«xµ½ñýÆæ™°0Þ ¯žéHë´âÕùßà:yNvdíŒ<ùý„Š.·šìôw’ub¥gUŒÖn… IO¹7‹S‰ÝÿÍÑüçp–Λæ9´ÿƒù$³@O6r#û¸åŽíÿŒ1ødµºCÈ~É1ptø¿ìí¯oÃß°¢i.¾¶ÓNA4üÁëL.Tæ¯/‰Eš§‡K¼Ñ±ÑkVU®—µÆðXJ¨ˆF©”Q…ú/gA–8Œ0Ìį™o?<"ŒdÑnéC¢Û„®ÏЮ ¸05Ä…‰÷`§œ©ü÷ÒϻŇpÂ÷úm÷hÉäî.oÂ\|èa÷èõÛ§—”„ÑåÍÓÇ……«ÝÞʵùöÁ²¢ ³åÊÝpdðö–ò0ѬY®î©· …W9VÝʼnû”†‘—µïdYǦ¹Rk;xm£œdJêÅËM/rØ1Ñ: ‘!PjżK ¹ ¢yX;‡OŸ•­êŠ5`‚XÓ:ÿ~ì@Éï·?ùx—Šçþâ q¯Üãç…Ñ5[{®÷™òü©<®‹Ë8• 3aõÐÞù䌷ïbBû”ãÅÆá`&©¦IÐÜjm˜˜¦xäµÏþzæÃo™(}$qÿ}|€î4*?³ðrãr¾œ­ÌsL…تáI4 <üöÃÌĨõUÄ¥¦NÜ X^qÉ$˜F°æ‹ÿÞÈÀµ×GçÚùQeºà —J*DCºñ}sxýCLé ÛõðW„ý°¬Yu)XЪutÓUpB´â°™_JÊt·ìÄv›#x¡«ñ÷ïÿ¾þ#å¦ùŠ.` J}ï7ÿñ㣟îqê©(‘C _~þd¶Þ§° ½¶’€ÂÐs…-bý‹À¡ç⶘~OM£eWÂqíÊÙ{ýï¨&¨õtýï°Ü„Ip—¾ôÖÑeh¾BMˆŠ~ï|ûíÕ™ËRNøæi½ì›§òÑÉ^¿*øˆÐ‰¬¯ž-ýªóíÓÒFYß<+kÔÓgæ£çkõ’ž["U|ñópŽèîMIbÝD”*t·‘Xž’[iÜÚ´ð~6ñ ÑÄy„¼zÍqc¡¿€Wî)Xeæ“™wôëJÁÅ'Z¾ˆ¨áP*1œUûô°ßi¿ìVDàÄZl NSÜ1JÞ«Z{é¶êd¯×ÿöÕI5`Ðl›¤pÞi»Z«ÿ"Ì»pW/{5ÊÞìIºNPÞý$>€C®%ÿ6L—‘¹ÞÞú”FÉõ§éÙUpë_Æѧ!FÌrJpÀ,"âªSf²½•|¢0†ø‰(a|œÍ—ðA¶Çi‡Åüa#Á2äg[Xú"g±Ý)hí ßwb»Ôc÷aÁ3y´òZ³[Xïø‚:_×ù² Î—ù:_–Ô©kÄ—¹à²Çšr`ÀíêÃ_á÷‚ ¹E¢6Òóâõae‘ÄÉæûO³Ü⤿©@iê“ OÊÕq-,ö/{¥“mpZ¸ÝÅë£2ÙQ‡ägÞA¿Wž9F+AP¦ä»ïÿŽröÚÎ#WäËLû`Žéh@*÷š£-%ž´Ÿ­ ’2æ6]‰síçöçhm_ôùšI¶BföòoóŠ®étP4¾r•«8ÄÓA)…ŠåŸ> Za])ÓY@¥ ¡r £R-ß!è&¾ˆîê?ÉFK¯>¡iV¦'Ÿêx…ˆtõIH]ûU¦£ÝuÉ'iÐí,ˆRíŠEûßuß­Og·;S‚ÞãÖ£W©/僄‰HÕ  ¶;¥øÌ üdšä·œ²d¤(#̧œ¼Q²UDp»…¡\jü]Ê! ðzß²cÇÒà—yÍŠÂ]©?Üá FP—Σð–R42i<¥WqL:5ŒC׉ծ(…\êaþéð¡”0Ž¼t†)8TVÚ­V‹:Þõü a}Mã4œ…ׂÆJ¬ÄhjbÌãÁIRP«Ýàâ”F‡Pbf1¡G·( a2al0J&ˆnmÍo N†PñgüpéØüÖWSȆÛú¬¬o铪;B5é ¥z ÊÅ&¿G’ ¨søŽÆÚM‰B V©I„ L<6ˆöE-Ó­f0¹-h×»³^s› -{gÇ'ËQ×gñ´€ ªw‰r9 (}Z@#½SœÖ²k…ú®èZr¡ãÆVË2ʳmÜü1ÿü1½G½“$¾Ñò<ˆÝé\¾ï· ‚{áÒaL0ÁÎl<9‡³uèí8öl Ûe@Ïý¿½>9Qy¸M´ô!A`s”×K t€°Jú0ûw^êLéê§é|Bé=a®Z&wbM¢‹¸B¯¤Ì¶‡ç½3ÄZÓ1 ôÜHÂz»$1Ð4¿\¥c`ÕC,!ÊE>•¯÷_jpÔ;†³q8šÔ 7Ó÷Iœ¦MÒµ26˲s±cF¸Ú.@E„«íܽ›‡Ž]2|þtƒì¢cq‚Í€Ên¨³ !"ècØÌaÔ›aâBXßn<ù]º>÷‡0îù rË×´ 2…|’òLK5߆é,ñí–Ð`浇C‘(õ;Iú–rêbcqîHì¦ÜÈ0û$hÙ Yį1¾å\RY Èn4Å­íìußáÁ¿öD6†£VÕª‰½ÝØÜ`OÔäRõ>Cl€øj¨ÃÇÄ8žlNœøÝ…¡–¯7vö›HãIk;û; ý‹æ0g<<|*'ß~ÿ„În*ÆGNâáûô¹¥/{Äàw6ºÉ#­%Óñ+äùðõ×´¦6 #pžosøn»èac­èéºûô1ƒ¹[ž?qô¾i?Î<Ùïm¹޼ΘµàZñUK¹+r²_ r4õE0»Á¤u(6Îæ© É÷µ×þ<ÉuÉ—ÅíÅÿs›˜~4úÏôf8hIIlVË–¯P¤ký·ZÝ$4Oüù¸õ:vÿgÍüšú×ùt:÷$ƒEd‡k;íõów%`¿K3UDÁMº¶sÔyÛkšìÖŽ‹£»&~§™Œ(§(. ó[SëE¹]ž>6AßõTÌËéš>ÅŽ0òm% ¸‡i™xAÕ”dãÁ"K2òØÙÔí̾—±¬PWÏ 1ó¬’ñ®—M„ú0PeppÎ86À™ŠÏ¼6¥j nƒÁœ„¢Á¹)ðlÂÅú¢á‘q×K¯àL“Då 0¡²SeÁðgŒÛ€†j æ1­çÃ,¢v&T¥…¦*:D×Ê 4‹ãqÚò¼vt—E—ųHµæNªðØǤà5Þ<Þ&'¦‡uTœ&Á/ó0!€?•D„ÁsTy“–—H…’s QF$…cûôPçG\•Óï6ntÎÛ @|@2óBÇÂe§*ÚR<ßЩVŒs!Õ¸Œ`O¢Y¼¦ã"ÿßÑ»Ì:¸HšÏ¿øqgYÂ&0·ÔjæŽbÈà’Ê]]Ã(ë^ŽcBû›¿D·ËºŠ=C@ï¬JŠfpÇ;ÇͯwŽŽÐØ-èX6ËŽ‚¸9ƒLšQú~qµG½ÜæÐJƒ{Ð:]Ü®4©L ÚG½Y<Íœ$}’ôK3Š#´äÏ3Ãó²·…0Ee97Û‹_4Ó0˜À…­@e¼ß[_+Œ/> 3vÌ沌ýè }+YU– Uµ=ÐÌÍÈ¢ƒBÀ}0G„Dxµü}þν !þo¾”퓹íÕø®’';ïî4–SN|{Ø+ Ì*×2-Ccm+·W““øz’zVÂP2Fª¯(ˆ¶ä£oÕG*Næ; vmç]‡“Hú6{ÜQXäþ”¾¿[â·„Ökü¨xrqZkèySPO2\^ ~SP´}ºÜµÈO²Eåûí!cVZP GLRäJÉbBŽJð¾ü]ë•øÝëü¿óÎÑYå3ÏARG®–"l\æ9Ȉ䘈oØQ_!Êýºâd£A=OÝ}¤¢Nîå«}ïÆG3ûêE:\µC{WY=´ ²äI@0úZ²É]¨ÔÞÃ×õ†äVˆÃÒB÷@Ä„Ë&¹!µ'·qrÚp‚‹"†ô öÐ&B9îê?RL“£†µ]Ç=W¯ªôE««:#Q¦Fz(¹#ÔïûÉÄÍT0Ïtö!¦W©Û Ìf¤Îw´ >”&Ò±žÍ]Ê„t%¢GÁ»3žù¿X ÆûV÷¬³wv~Úé÷á½Êͼñ¨>=v%|7‹h¦ÔN`' j­aõxá¸òòIƒ\îˆäðBª®_zëo-]ÿTÞÎè?°<§ÿÁÉ‘²mn¨VÕ‘$M!ÔlW'³x”Ïκ‡íwv¼W‹6Ÿf6Ý9|ó­3ŸlJÁ)NØîR¶',*{‡çå4Ð¥˜FY‰ò¥´xwÀùð²·ËÇ¢¬NªëSü¨3ãD×úYås=¼‹J·”C»‰9-ó]¯Dª°ÛŠGóâLáv;˜yˆ½9ì zN@í¯s\=+*é1| &SZ²¶Þê·[°ø¶êÞî®·ùÖ÷y:»Ýʶ“#Sßt¨#¯÷î òßn*Wú¯ ¶³´ÚÍòjKËd‹%ˆ&u<ÒlÞÄéúð±W| |F½ÕßS’œÏx0}tô1'°š§d NB˜›n_û™çÐÙü⋧‹i%AÑ3|§¸hq^vö¿òìk1U°¼p¾è‚5ïÉÐëžzhks·(ßäÓEÛ_1SÌñÂh£+÷A¸^ˆ<ºxºÙžÆãqœêàÑÉu—Ñu˜Ä\×g­•öL#–O¥-ω‡¿v{'¨\Âçp—ä~œ:Ñ„¢°‚/ †þ,S6&þÅ«·•„ñYYq0:DqÝÂüq…®ÊZIú“‹I‰I °cäµMmVÁlý—ƒíÇ•°+ÛÏ+¡RWœ$ÑšÂbø_·D¸±ƒ!%œ'ÝZ++¤ÐLI85¼1¦SžÄ°šCØ gáÖˆ?™6(ngä‡cVs/#ÌÆNð9-ˆwÏÉ=RrBwgäž:¼Q€¢5_¬`öâqìiiN@ÊB­0§ÅcéRñ5{ÀJ;9a3î·«Ùlº³¾~ÎZ©íG‘ÕºŒæ­8¹Ä‡7ÁÅú×Ó]0ËÖß½Çýén/F»6ôø‹«‹Ý7öþ º|2ÒéüB^érgTßp˜’9ÜjnÚ'p5¹³†¡áMÉ}%CeG¸op¬á½Ï(ðüÀ=lÂ)º‘,ú7¿÷&˜Qn2+0A0?èø „¿ä¦5§ÏôŸÒ«¯K0òöŒrD_³“qàEA0 †+v¤)†°ª ¶D£†­ØêéåãíZkieEûlïzZ£0©»n^¿y6”òOªLb—Iª•Ií2iµ2×v™ë%eVrpzT:÷4£4q#𕲟fJ¬è»ˆûË©WÅ•„¸æ·„ó*[Lµý\¼æ{»XæUQ…ô*×Dýª¬2•ßª 2yUT2zè’¹WÙuAÁvó° ŽfÇú@këlµg} Zì'Çz¯ÃsHN N¾‰GêAŒ±k? ‘i§;(À\ûãV†Ã憳?ºIÂYÐ7¦©÷wW“¶ÊŒæyÄÏv¼U½ýv­º_ð¦†Oþcç®ù[üÏ0ó°ø‚ŠvàŸ+ÿö¯?Ù?—ƒæ³ÖãÖ,¯)ZTþˆ:àÊ·ñìÉü{óÙ“ ûoøóäéÆæÓC[Þöã­'OžnýÛÆæÆãíÍóþW $wfCÿý¿äÏgQØW+h®¦5à5U†ÏÇ#õ®zvŽø vV 0ê$¬ŽÜf0ÁÝ5]YaiGi¢¶66·›OšÛ­g˜Qëüleðé]B}m¯ŽW»/šø©‡°^/ÍÈìºHÐÙÝðºÑ …%IôS­ Qª‚©”xArJï Îc´Lx1¹ ØœûëqÂbâÞrAp‹HlYaöÿ±÷®íiIÃðý5ü…÷Ëk-:ø°»R”–°ÍF§Pì¬%#!b`È HVb?¿ý­CŸ§­ìÞ»Oœ+6Ó‡êîêîêêê:DÉ(•\:Ë{I£g³‹á  ºÑ8%‹¨ ¦¤WÀ^ ¬×g¸t èÝM²NÛd UbN2 ØèI2CüÜ/ŠzGªÔ“w#´gÞÆCfVôZ9®4 {Ýh¿:=oµ“‚×µf³vÒþa—^QcŽ'†4M†È>ø1Þ6Àq½yð jÔž7Ží°û/í“z«À1¨gµf»qp~TkgçͳÓV½­ˆX0¨?——4hŽMEOiÈ?Àì Q6é4ËÁQÏAƒ&·‹§‘I[èÙsj`úœì8ÆwUèß7‚U¾¹¹Qòa¤ßRgjh–N¢îš‰>t£‰ä"ç÷a…xWx`L÷å’6UŠæhäe@ﯩ°´\ w„Âe?Ǽ+o+¹ iùµÙ4ÆRë´êGá­’ÑÈÕ-V(™ó©¾Ð hÅË[ Ýu¥E_‚7lB4]‹yˆSØ°ƒq8Þx–Oaå`'†ÑØ\0‘§ÃÁu|ã?û½n·ŠNÝá®^$ˆPÖÚâËïê* ì„|î{'è'u4P0Síä6X]Ù *•«h8YÕ‹Å`ç«Å` ®Œ´k‹ï”tµ¬ /?¨½V×ñ)\-ß!×rž†ýhGѺ·ÜÄøCl¾ƒ³æéËfí8x[k¾lýX(4á¾#ÒZ¦á"Ð4gu=B ˜¨k‰†É3a˜š úv$FòP¸ ¦IØ}p1³ åR ]Á·ø7­,¼‰áœ¬Z]Å*ñÅÏÐ:W9åßTEx‘õW:¬Ÿ6š\©7@ádŒæœdÙ H§¼õ`«<‚ì ‚Ò 7ˆ§£‰*ÛŽF“8 ]—ä Ê5¸B¯a8¸@Å*jêõUDÄV¦Án›áͽt z—ïM p T±ŸÒ•~TBØC£ð}¤.”UâmÕ¢Zù›±¨®iQ]¯™kW.¤ëà+ú ðC$Pň…]¥!¦«® p5{ dbzµN×å©!cº0úpm7YnØ.nöŽŠÇÍ$Çמxæ'‹šž ™-ÓÔ±©{«_­R‰qtC³ld‡{«Ì=iA‚s—*§Ä@î┤R”y Q¾BÛ£M3MÏ>òY ûR-Ì€ &{ù1N „¹½ü8'…pwÓtO«ÕHíioå7‚ýiå7ñ‰žAtðRÁ³Q¨S™Cqy¶õŽ°Ðà{u–qíuÉ´à‚•¬ÑW=ïuÅÿ 9¾#<Ð,ÞN‘oLgaRóãâç úÚ¸ ­ ðSÊ9‹«1é0tñ«"É¿Bð± |ûÏwïèøZ]ù¦ Aû´ºñðãnúñ]õ]‰Ž…wå•Õ³w[˜x€Vào8ñ>ô*„õ‡jT.QÃ3’s£ÚƈW§à[Ö©OÈ<°ñcDöy­ßí^Ãþ^Ð Ó«ýD-¤åˆ~ôR–¼gÒ3¼„b)e±¿;N+B@µ÷×xüЛq„Q~È; ×àc .ÕSñ¦Òcesü¸ô™™ /xÂ|áî4ª:zDa:`ñ?I-N͵n8†[ßõ,$hF4/bt껊ÐL^ňPRÒ)œTŒ%­,«ÿ^p5QëÃnëã…”ç+ÇÂw,Vôá&}$ß•cÍýïA"­eo381oFé´ÂhPrfzfh¹œdçô¼@ó3K`LuåƒÙ ?ÑÝö‘ŸêÌöŠâgP™áz«ý]¥×]Œï2·›PhÂñÛLh5Ülk#À¢Æ)Ú*Uÿ;y¬òÌë.FP"½ªDi7dFP¤D)pãþÎØ›0é3`§—·z1!惘¹Š›-]Ö7Öû«nŒ^çOŽÿÏË  ûçÿ¬¡wÿœ?èî1ÜÆóãà`ãàÑ£à@l‡Kl|ðVãÛ'¬ø /ZÍl™7}s§ü‚ÛÊá6Y¯¿ðl¡×«z×Èz\.„€—8Ø3LJð?Q ¢^N…$„ÆG——Ы°PÐTmÐgc ?èfSDÉ ºù+°®(• ¢#7IÔV ­•â1V¼îˆÌ‡)‘›ŸßMwÑÌ ì‰‡Z‚ .øWÑ-Öáôñ:" oWI˜f^3:yî‘o qw– Y ê,öPT•dZ€3€7÷8:þô¢ÖjÃéù'ÿ%Ó.š[!UÆ©GìBŸq¢c­\±Iò‚Yé–‘!.Ç0$˜ù}` ÛÆq-Ñ赎Gø8E¥z]\@vº‰²ÛÛÁåV8•´RVd_ÇÈ5" äàôØ#I€Ü5+˜T`>6+‚Ÿ1•’¬Âœ(ð¨×™‘5 »¸æiÉ»± ùþ@RgË\¤1Œ<¢èD«‚—ê Ki"¢xFdèVÁƒS`ZÖ8~®¶w(Þþá(Ô€N)eù0®†1±hL7Ã>‹ÄüŠØîè×à:*Sµ6­J±ã%0žÁ:E‡ ¨ 3flcATˆÃ8¸“ æjJû÷ê–¼¤ ºï"ž Ö-º¤^Ž,Z{â ÷»Há:’LÃM´ÚãaóÈ`;¡4| õ"`©‡Èeö(Dy^ kÁ„EpñGµ’XõÑê•^Gâf€Z¥3i"_µ·0v"ãÀ›£L‹ù0=_eÆ%‡]U?9¬Ÿ4ê­Îéyûì¼m2}úJÛ1% 4OÑ+Ø]ÇÇëd›LL ˜³ pYìŽwStQFëFXäKŽ;Žu.ÑQ-çpz,.˜ÌÁ…º±* {•sN²è‹´ðÂÁ)© )­KýôfD±DïÀ³¦¢·‹ð5ÊÖ½o(bÙ™—vÍ¢®Ë½Çæõd]Õp6ìýowYÒ¼®šW’`'x÷®èÞti×EÆ÷äèlX& O[•tz;"d\‘BhÔK×Ûý”¨@`˜ˆüóí?wà&ln× ”ûÏ·«+ty\ýqç݆YιŸßZ~ $T‡=ñ±6 ûp!&iC*|²¼!ò¥¤L+ä7n+¾  094ëˆ5Ç\ÊÛ´zFYtR§R°±noq8ÇBâêé&‚ZOXjú2‘Gi:{o'h* K8±e“ˆ,OøýŽ:S¦’’§@»è»±‡’X¢|ö½6BY’1”ÏÆ1p=ÚÃ’ÌÙù@¸[ÄZ³TmÂ]íÌHtXÉ'>}…]¼y]Ɖؔ;(_>å«:?Nn¶d¨oJd‡È_å:Ò[ä/$@ñ~&¨tÈd9«E]Ýóé jbò¨êº>‚`_>)á÷gµö+ê‰M;ñóÓ ùµ©QHäÇÒDÏ >½ÎÉ0{{“V>ð¬«SiY-|X*1-QîСõçÀ ;IÍMYˆ—Òã­¬"\`â¥:Lðá˜ÞE’6WÆÃŒ\Ll4ÓTëŸïÞ¡À™¾6þ¹²Ñ[e‘ÙÇêš  +?²”lc‡²³0V6‚ñ­C>üä y‹«IYßgˆ’•J6Æ:Tg2ÞÑ{1ùOÇqâ;ì”~á2gòÇ„'±Œ¦¸û ÿJÉS¾=PKôÎ=&ÿ¥R–ÉÂéÐå7(wuá–À¬#²U-&â¤ýAÙ ÏÅÁ³ãæ6J Í\ R{8fÒpÌ ÖSË`Ž(ù¿àlX(ŽF|Ý"ßMÛ–¤mDyÆÐ?ÏÄ›µóz0LÐ>ë ˆßÎù®”L*:EªÇÖ4¹e ¾ÒÒä"OvHDgŸN%Ú†@!ÈoC£‰A7Qmñ™& à]GÔ1 ÇôXûÊ ×ý°Ê”ˆ6 JO6ÿúLÞ)0ðgÕml`=øËÖ_·‘jˆÔ§’h#5J¢¬1ºeá8©åÝ‚t£qä«ž‰R‚e^}°÷£UIºû„½‚t!¡Ë2õ%(„C#PzïH2‘n<`ûNE4‚ÞªQà3llåÛÌ4ÓZøÖ3û³ê'UÏT0p|ãõ_¿ãÈ$‘Û18·ÿ …ÿóÈ!\zþÃéaÈ&“<‡T°‹öÀ'ÅäC3ÍÜ{¨>sQ3É’4€” {FäuS†½]Ï”"_‚A"„ñT¿]«»y-ÁÍ$ûEY•I«gŒ€©Ð²‰ä«Û®|Sܽ¦ê'rGèô ¾âŸ1ìW{ „fA0ÇÆ[¸’>ˆ ý®læ,qé嶵‡üôX]9yÛ{þôÇT§ Ða%Äehæê_º±Ü¼Ç™·íÏÇþóQH m˜·;B‚'æGÈêi¡OÞ´ØkÓ® ð#(µã[Øqr§•Ys+E')Á* ®^üÌÍ[ZªnVÿZÝ~F€^4Þ×w`ï†ÊX¼«°’£pDD§S(ßYFBߟMÐä¥À¯¿ôç˜n6Jf¤?ð¨# 5r#D‡ ?É-Ð:ä’åGÏ%7>Ão=Å›$œˆ#º$7#l<”FÝHMÔãCà(,‹G Æ[†H!Wß­²ÿ¦1¾S?ÍÒ[:ò(²˜Ðµ?¯øÓê_{Là¬)n“v™UJ¨ ^ø`ÈtU#šƒ÷”ÔŠ.²ñÕ8%åODÑT‘gf`Én>þë“nxùg‚S¬c’€††…P$y…d1³²Ì•ÜA¨1Œãq…õ†òpVqI–ƒH_åeœ“Rda^ Ä6@ð# A EÞEu¥WœŠ'ý˜å2âÚ¸§¹ê·hQ°-Ø$ÝXeï"œ‡0X¥îï¬çB~»¾¬6„0ŪCA°ÆÁ›áßw+ßmí|œ,’ÌcB„܃­¡$¿ÀJÆòºk¿d✠FäÔ‹Ü ÑŠ$U!XÈWgm¬«äö¼ê‘‡# 2òXyv¯z·¥> |Ö•êÊâÔdz< ƒ3"o«²‹7Òƒ… qL²ÂQ8¾å›µÊH¤ €Nwq=pßRH’‰rUôøÆ^ª…I_ß37ÆA_M µA|SîžX¯8lÁ®É¾ñÓê¤A—ÉÏ&|Â0«`01C-I„¡°ÉÔ™zîDq`÷ …NTIM ²`ˆ¯ÊœÔ½[¡°ƒ_^ØÎP[žJŽûA€! O­RR”2Þ! ¦¡ò×UAjÔé5oc²¡$º“ ½‘(’¬;éFmcÅÐô-–ÕZD[³‡J#Üìüpš2BÄŠ/Hgw«(Çî‰Ç>Æ G.Á¸êaã„–‹¥Ë*Ø°^æ˜ÀÏôFç©þ‘V¶¹XfM¢"ýTÏã `â­Œâ¾Ðâžh± ã˜µÆ ×Ä RKß[IBYÞ‘*±[?¸‡Ñû†úç¤+1Œù9”"Gý[Mæ`wÂ’%¿´yÉ¥ád‰tjq œTð›$\°\Œ»ä**€CßðÑŸÂá: BëÏ&°V©êŒ Ô W ýo<ƒ­`;Øzl=…/¸åO16ßÞÖæ&ž‰{+2¾n®çtH‚JŠ'dOªÐ8Kç”×C,[5_!ECဠeŠžàcÌiƒ†]é¿Y ¨\åä/UàÔ‘Î@Dt¨L5Æ‹î‡H–œ©åAé@baäE„˜’O$×ÔÝ…31LUõÙ˜K‚p3àÇ¥ ™Œg>Ðh4Æ‹gSÙGå•ž‰3`¡ýAFÑ„f—ÿ ö~Âw *lý$Òë-Ø_)Q‚_ÅZ'ŠY7W“SÒ Ú\Lcϵ°äa+J‹jÅjt —›ÂXÃFY¹ùâòûsq>Þí'GuZ½Ze™̪‘¹ÔþÙ&¾Žl›~ÂïÇœüÄ`÷î¤Áú ø)£¾Š]ð(®þdäï(ÞÕEùÑi]1‡ëK0‡_þ@‹{x`5?9Š€ÙÄ•õw[ë»Rà¿K²þ]!Ò_üLð"þm-*^MŠHŠÆ¿†,@Òliòåìà (à2KG…¹k¸>Áô“8RÞÌ©C¹*õ‘[ ɘ 2B&pÙêVçuì«úóÀPq}ºð Uq™¼niT]øFÑ“íxöû|qxg’ÿý¢Wpnd|ü÷¿`1Áë¼k¸Ç®ŒàòPZ&/xù åñ%õ.`OÝ4ØN1Ý£™6SÌ9·K:¥´ÂÞŠ™C§jžðœ¢aT®ƒÕ²~7›K"°ìN°š©û¿AÍ…æ)ñÒìT€c¿’ÅIWc†’2él;À/·¦ýy‘gsÁ‹ ¹ Þ|“ü€eMD¢~ø0´¶Ânw6BÓ9l}8Tî ˆ›ÀW1J"f(„°|‰óŠ‚°"dñš±Û’x‡üŒÎoêJiDéü BÎB© Ä7{(7ªTÝ{:Ò-lä, )ÏßëJ7Я.ýx÷nM)6(O À,} V”±ÞÒP…·23œõ€¶Cª@u†ºZD£Çâê»-XȨŠ÷„¿LګŠhºº¦Šc^ʆ3|YF•e_øø'äê09Iا×ùL‘Ô—,ŠÔ’™{“T†0ÿá:Æ1²Ì1šcz?|1–ŽP&œ ÐßS GG»G;yˆP$2HGÂH/¥ò$è;°Êâ4ä^ÆÙ®Bm©NX±Ò”æ”×ðeùü²A—gW\ÞÆ#Â%7‹¯¼ý0Aåa’Tbõ,‰Næ„˃Ë*I/Š_žðÝ(–œbu¹3Àß í=QzS©¹Ȫ!,$Œ‚%”I|Žª>­¢[S¦©Ä¿7^´öŠ$“^ÂÜ$.gÚ ¤…ˆ:§ÄšÊóYš˜õ,û’Œ…‰R˜¥Ð  i+ûè7LýŽ2X’©^¥‰ÝÕqBù7(r$:|ËÏ â­oŠt“ß ä e"5¶Ž9>ü.d™×§(?ËÙjwŸ‚Ðw€ˆWÁYbsnnµ»Ê:Š’Ÿä#^,t¥8ðã?¥½øÛîð/”¬±tMf}TBÇEwà9™É«Ìï$T´…„÷&X¼Ýâ{Ô#6ÍYÝÓŽqDø,ùT skÃAA ÏAïå#ûr¨Ê¬ò¤/] ³D_˜B“e™3( :ñ’÷`¤vÿ ‡Ýyè.t.Þõ€cßCdàsÇq>©E%¹Ç&Á*w-¢&á°2FrŠ+F¥{wäîÁ‰ÇÓÁxf½áCN2À“´÷píc¥1Ÿ„ŠÊîÀD714AB×€x?&ò…²lýú‹‹çÕ¸G &r]Ó k…è´µFHΤßwùÖ[!_¢ ÄU*ßåÈpÆkäø©ÃÞrö2N ¤;EnTÑk ˆé°»YW~;®}Wg[²Šò'8  h8äKW„·_Ì{rf™é2˜l:´—ó™œn¶©A;‰É9 ÛØô£Â0ZžÈëäÃ-E«)f@ŒW««HàÄ!?£_гϻ’¼u­í¼+|·õ±ø{P{¡Yö{=#m­o÷Vs(½uü+É¿ýU½ Ù’Ûîdòoâkÿàbÿ—q±,v«Ûël,ダâ×p› ˆîPŠè¥7ß ÝÙ è–¼3Ñ ÿ¶P„êôî}7‚\®@¤¯ìì¬.Ç&.!Àñr’NŸ8‚w%¾ »ô†³B?î̈-þØ‹öߢmæ°,_¶ÑŠ•—£âÇâý]y9 ßøwå ü —µ®Œµu²Öýr÷óü½,›‘ûØrG¯µaíFÚ‹ï¶pæˆÍîkæüèlûSð§wï‚?õåa(T2¨s–`û镲q¡¥¶õ2¾Ûz·ãkk¾î¿@ 7†UU¦Ä¨+W9¦ÓfLŸ‹¸ßÒ˜X»‚±=†^9)eSû²ÿÞôeuwX%ºÂÃ* †te@ÏïÄíÛ÷äôÞv ½”ßû*üõÊ)I?\Aáóö×5¾pÈý‡ƒü?üÿKß ÕÁø÷pÿìÙ¿ÿÿÇ[ŸmnþÿŸþÏæÖÖÖöþÿÿ5þÿcâmïâêñb«ºõ¤ºÅwqU}‚?ö•aHg0žÌ¦û^ßþOîäÛßìPÖ¿ÿ<‡ûèÙ—LIgãá`4 ­BTüg‡',‘¾•‘¬ðäa—e'Ê5>G”·k&’ƒ*WLÚú¨Ñ¥Qr:6¿«×þue$þaJªÙ8¶©˜­ax£¼úÓA”ïסW¨ïñë_(ì·êíŠÜi[Ø™&4ø*œòÄ5 D½‰©ˆªWVp\k×›ÚQ¿Ïš§ß7ë‡A­Ÿë„… ö¼uztÞ®ýœœ*dõ7gMèqý=Ó7ƒÆñÙQ£~ˆÆE€²óVáÕÚÁ§çÍàôõIÐl´¾ãfÏôš@ÑO”DÐå>b‡…G¨CAÔ'·V¨J\Éø6˜Ì’IŒžþeÈ)Zñ ¯ ©…^$#r©’AÕ„|—[½@Ÿ–—B¸0B÷'lùf,Rà¬+¤Ù¢Ç¸b–ìÛ-†ré*¿-ñ=±èVH¯™^ç{JÙV€îª‰g@¸ìÿ˜Í?fóÙüc6ÿ˜Íßy6 ~Ù öÓ¤Û$û…pÔé ÒN<뿶'ÞÿÇÁêJ ë£zç¨Ñj—W•¥•Î=ª_?*¯ÒÎþô:Ø™Žx0Û#(ËW~ã7x‘Wù„|”²þ­ wjõµV7òyÀwØ55z¤˜ø ÷èA¯èÊnƒ¢xý½ZÍöe•_y³dUµkÂab8 ïýüë*L±þÞ8æï4GÔ[r‡º·²BH<ª½lqþà2X)9X/ ÇJÜZ‚Qb²¾3„ò¾‰ÉµwïÞ¾ Þ}õ# Qá"Ý{÷ΔÓÔO"ðêŸÒwc|ÙÑÀmt~]++)þÿÿ ð/hrc£_üIM¤FÕå@ èý`ÒAs4|cíóÀePâNÿ& \ûž®AjÑìÈVumeecZ¦jŸD›@  $éu¯ØÃE¡­hšWTÇX ̱íÞÊ—æ]Ù€šÑŠš½µ•  _Õ0_Yk”ÝQ¯6VwÖP ­«@…¿­y«Ø`O³eNç‚=õ=uÁ³e†sÁ}`‡&ØÊÛ^ýpôc9ÈÛ¿·s³õªÊ€•k{Cä^% ?)-{à¡à™‰U!jñšÐ”®—Üb(Û½ d5³7ÞÍrØán âQ³õ·´^ÉàŸªŸVJ˜ÑiÕášXkŸ6ˤ]ÖÅh»éßNzÕ9¬µk¢³2­TºA÷Ù“'fIm+[Ø,Õ:h6ÎÚ¾B“V»vtÔÁpÅõ&•I؉rœ©“e+æ ££R;¨PP.œœ6kGQŠî€ï±¿O[m+AÔ9?qk9)XÏN"Sûn.”·ÃiN û,×LÆïý‚XVF:§ìH^ÞQ¡»öPo ‡«~¥TS¯¿i—ƒ~×þ¦±SÞ¾ z=´#1“ÓQ˜^ÙIW³~”© »p8Œ»§6 Æ»è µ3xKðWg‹ XIÛN‘ÇÎ÷“r¡]oµÿ3«Gö¢½Î–Lxâ&<Ë¢†¼ßjœ¼>îåAçôùß;/jG­ú¾Y ÐAšþýn•ÂŒà3)ÆTÛ j¨¾9ºSTê–RPNTYôÇßîþëÆÉãíNûUö\«Ónž[}Ù†¾Ü ÆPbz…V)thÿÌ*½ ØÌÜ ƒìÐsIµ«¿ùM[:¬5Ý»ûhþ ÅßH`dÐz<éÜÄÉ°çiP@»‡ŸZ6›D®®óHv6þÙ«9màž8TÙú7¹B(õ“Ús(ØhÕÇËAù3@¹팆r¥=z4(¼LØÜUUØ?8;:oáÿ™…ò‡P¿ÛLªÃp^Ñ¿BQqîÁ ï`…«yå·6 rcˆj0Þvçàôø˜ƒ[—ø&UÞÅÅ¿Õpdd"­¡¿0™6¨ÌÁŸòßv•^ÜÅÿ3L·'UÇ ×­KLL´àý•³äXDpû+»­‹ÞMèĤ[%vë+Å°„áŽ`Jøü”‰ã^q̶ "%š’9¸œ™×Ì‹“ µÉŸ yO‚ÚyûÕi³…ѱÆýè(îíÓÃSdSŒ¢?C•9¨*¾ÓÙE ¸JzÐ5MÑI]5…’G¢¶¶hæ9ûðè¨ñ¼4ö»zýŒwÕY»é©„„ 5ìcaq½Çf½9B ÃÛÝwnÙõ¾â‚ï£Û΂‚€%.Ë1G·½líg‡ >Îxsð43€Àîær½ òú0wÇ?¢ÜåFgçÔø³Q#‡šÅ‘\ÁVèÃÁˆû©¾.¢q÷j ý<¹ßÞô¬cöÕBíàèôXÔã'TΤa—ÂÊaìÈŸÑ")™â£'H@ÑR\©=É’(%ô°0;›7•žØò*OÓY?Lr*/jyú1Ž ²vYŠbVÃn!KBi¼< !;8=yÑxy|½LCP@a¾ra¢rGõÚIÅo̬2ÍVq–ʯnؽRämdn­º§¨5Žíš"±0z/(Œ.ÍÞ‹zÑãZ„è {†÷„ì^«“ÂÎ&)¤,Dã¾&½¬°÷3®‘Ùª2æI‚ tÏå ¤µÏ?Vá¿þêO»6D &Z$ °µrp©€®L´éã?WVŒ†7>~4YT Š›"@j–żi$\lÙëUtT"{~€:O6)q“†&Ñ@Ò±¥P±ñöÇê[èÿ»wk$“ч€™ hc‹¡ŸE†iŒì²#®†»Ì fLÈOn‚ì@Ê»‹Û ¬vßieúÀi9ø¸[\ 6‚êÚ»¯SüÿoìḇR@Ö®˜|­ `°×^WVŸ×_6N‚ßØløm±Züú],ŸTÚÊÊ6¦EøoeeK.„ÁePzôh, ÊQsZÖB×ß\Bõíuän «£­·Õ.õå“ôûx+‘K¹1—- ¨&¡ÂσO,‰7§D"rueåë“Ýù¥ïƬcVç¤æfc9vê ùÛá7-H#“Â*¡Ì>BÊüš}º­XݾfeÄLb"wž/¥ t©Ûè «‘R#N [ŠËEK®/Xâ^ÙlŠ!E%ëýdn^A9a+Ö[íÃF³¬äfE;UKéÊ8ò¯ÜL¦¡žŠ†¨Î[ÑÌ/µáünÖš ¢¼Ô—Ž‘V.@Þ@:ÃÐ:‰<ÄnUx¥ÂáÒÆ Gµ½…OâN/ž–e&–4àÃÕ¯~ „,:§‚ÿ^¤]8ˆbfųٓd<Ål_^Å ¯àm‹º—Í)jÇï;CM ®á£³©û|ìRB6û°þ¢v~Ô¶‹!ÏT©¤h‹:Õ©x#0{uÔ8ùŽÂ´OOÝ€óµ2 û{œ&JÐ3‹` ì$¡lG÷{ä'Ž´QÍÚf7UõÍ>XPkE÷ÚG1M>Ömž7ê|å‚¡À’ï^] ßW» ±àß‹aØ}?LQ’B¢Ät6JÉWöW½‹>ßðƒÞí¸3ŒÃü¼ŒÃáà×~B ½a L(ýþY”…Šì÷¡Œ€¹A&Š~ŠùÇú•¼ÿt’©h®pXjÝtDOѸl"Œ8À&ݤ3ò®7™&îU+ „®£ÚK"â®Ñw-? bb:]\ÄɘëŠû³}²ÞôvÒcrDYÜÜ)”OPdW4Ò ™Œ!Y1Åyw’ ‡K´ ñ¾µlݯìÂý"–ìÆvFjG„ã³aå";zï2?ÙûÇ^¡Ÿ§É{úÉ6ŸøÅ~ØèÝä~àS±–¯ý•^“ØìÝ…²Ùg¢Ùåk¥–?¶š_‘7}n(ÊK‹w0¯1ÿÐ$ÍÆуIòæÔU´Ê(b¿55œSY’I("‰ä0ÖTrNÍ‘”¤Ÿô3y/ÿ% :ÒÕa¬ ë0V”¦‹z`Ó\(¨(îœJ&)ÆŠÃOEŒçÔVTz=§¦"ÞP†E˹•ì‚êF‚ek>qk>]¶æ³Ì3¤éž%¯N‡¥ÆÈþ3†è«¸Ô}q€'õúa§Ö>=n@¹³V§Ö:–tñ¼…ï­ízó¤v„<•QŠ cD{Iá4 ºx’nÀ]sC)ñµú0;émŠÒ!ÁȺU%k¥#ÒrZ+k ÿf®St"—çt¥©òõÆs%©Ú—³¤Ã—Š‡™n×'¬5ëi ‹*ý™|=vVÙ*¿ ²ß¼ùÖñT í¦%—Ìé,+ ”ØΈ{hrŸí2¹:áÈ…fíÒLz›ÐÈÉ…H(òçæ͹SÚAb~sÏœŽµl f}Ü9kaiÔ9Ë*ž8{-û0láâñܸ½¿ýÇÿ‚éò-ù;ÎÖŠ?¦Ée-¿Ì)å`9SŠàÙ©>¢k5øÄÏØlQ?¤†`¦'˜áNº§0vÓ’Ë2X<Úì®{Ídyjàp‘‘ ØÞÎ ”Û‚ÆÆr€y ,*ëNbnyÏB]¸Ô-Ù3ÿò4ÎÌ?f¸óï)ÌÌ‘“n”\vþµBk¦'œetÃ[– gs¬ÒËvÆÔÍtÇÌ4:•S‡Úðå95–íšRòÍ2¸˜ãöÊWœ`g2̲KwÆÖö^…œ2çÛìk.4î±?;[o™Þcÿüœ1269·äjÜÆþ%¬½Û¨ÏGèž›Ô×Om>vÙÏW¨’.ê#¬^h‹‰j´±æCäe0§ŒKE½evä¥ÀI™›#R•}œÕÓèñ”¥^¹é€†Ú÷§ÃÎÁÙ.9)œtZWÕ<Y¦þW†ÞóÒurù§Ï­½•-s†KVHáâl¼`–íÿÒ•å²n¼9+É*ãÛ‘”Å{Ñi,µ3TlÎœ³N&3«~sFÚ7—!o‘)[dGð_ÖO ðå´)žÙv0[Ú*eB&r8ÏwB¤öCm‡¦zQ誅–zQ˜§^²zѾþ¤dÁÆÉÁÑù!a¹ .jëUýˆØSeY`q;óK;£ðöüe[¢^C üU¹,­µNÏGu}pP#®º ÿµºR&ƒIù[ICÏÎ4ŸdüÆ,¨óÔGá¨iÛÇ×Ýé5E€¸Ã óG2gj9#¡¾Ò`Œ)§ogQpš·Pvipžµ(¹ {Qr1Z5ö4.?‰ÎÐùÕÉ™D— Æé[0sŸ÷ühNá½O`fA–ƒ%ŸÁ”b<½yc­é7oî—2/«ê7.l»Ù{|í5·9–{ZÝÞáð,BGzóÆCHñðÌ äØ3…äüÉ…Ã¥ÏûúK^õZ '»è)Í[È‹´Ìº§62hS ÿÀ(Ï?N~÷ÓÔnŸq랃ö1x=œCð ÿ <Èt:Cž€‚Í–êðR)Z$+ +F,r³ÖÉffupìz5ïC°~bÏÔÏy16 ©ÇB»®ÿÁOàf³D-ñ a”VïvÁE4NçF(ªb`£°%ƒµ+hq¨QÞ•Ä9UæÈ׈3v$EÒèÙ{ù§ Þ;®¬æÞäÊl¾xÁåjØ/\yóÔ «rÜß:[ð¸ì+•¹ó"xwåQµœÅ·ô+•_fÚü« û¢wzEÂÙ®.öe½"L3?_<•)å•È˜¥¼ˆr¡Y?8o¶ß×;íZóe]*EW’¨;KÒÁµˆm~§  MÌŒD´ç#;5’z×ãëj:2Æ—±]]šã£¹”UP$[ÐŒòèˆÈSÞiϨà4-“'½KùIê)Iq±¤ ”‘a·cÇׇʼN§± r8F·PÒ ‡d»Úƒ3ôüì°ÖF½Ø§0×Mm ;þ8Ž?žœ–Y˜bÚ¸–LÁÙ/̦ËaûÛ‡¦'¼‚ò×äu¡LÜ„K¥<·¹>72ÉÕ«ÂÿgF|м¨´ûÃiœXÅ:hÃ0™&™âb(£H@jW‘/S§ßýÙ.9£!¶FùnMiÉ‘DÝiq:ßv.‡™jÓÛIÔ³‹Jówøsx~¸tB²Õ^4¥HðFáHŸÄ¤Äo¤’ÆÑUA`_/×݇²et<€dgФFl-®iÒ(N§Ã[ ¿›¶Î0øDVe€ïµ)EíG7¸¢+i4 Ù jtœ|W_a Œ{1F‡Ó. M…^(*úisȹ wH“(Ʀ_ɳF>¬ÑÇõ4¦àMQW€1›¸"9žÈ)V…½a„q(g^RqÞ=ò¤#ÂŒ ©­TJºèLNM F}”€¤Åê4I‹årí¦tÒñ›ò$j£óì|Yƾ­¡’º¬ÿ¯NÙËMËë„p?k$}R¿‰Þa;ÔÆÿ 6S –TùíøäÇ·§ñùýü¾ýáÇ·QýÇ·ik^ã¹m|Rû»$ J ÒMŠèmwC_ÌYó¤¾iÏ­þnËš¯ð´–y+èhI25Àaa!Ltöñ—½?% }¾œ»äˆüîJÃÒ(í#*ŒŒ"åì`¤[tL·²¿(G]ƒ>~ûp[¸2¾É&ä6QÑïÛ »Mp*FèÍþîO¯dqí·XÚiƒà*„¿àž< ¶¬)„C|OôJ~¿¿eç¸õ,ñÒû8KÑÍJóü¤øûîs1€u€/"KSîcœ•(Ù{ÅKÑËs¶J:»(çÕ-®Eø›)ïf«Q_YÉ/åE'–» ðž6L‡âS›xçV!ƒd f§Ê\ž‘wxjŒ1/³<˜PÛËÞ˜œ%²ÌQTIÖá­f£ü“þ©·IÑAÒgÁ& '™‘¯Þ^ÐFWöÓÁÇ!G÷ÐøI,¨p†Þ³‚à!ü¿±{µ ß{ýÝÉî K.õá£Ož”¾®€¡ª‡pEHƒ­Í`ïUZ‘bxF ‘àÔzœ9HáRQ*ɸ‡)EÅÓ4(V¢"bSê²0¸³ÓVãM°½¹ùŽI•DÀÙÃÌS¼¸#½Ž“÷G¬†KF¿ºÅ+.Üo^VE3ré‰ÄûM«Á±¯(–GÔ>ŠŠeœèÁt5Ÿ¥Œ¤ôª)÷kB’VÁ‹ËZ„.í©Þî.˽‡Ñeˆ ‘" ÐXxY°wFrO*8œâq‡Ó:\žo• q¸æsŠ¦·(JEc¼¹Uà^׫P° U˜s:˜ÓáUçÃvO×+Þ:eyJíˆT áØ&Æl0†k4‹€æ‹°¹âPèWø? .'' ¨b¸©âyA÷[ØúƒK ¬Wó hA.^sሲ ,¢*P¤„p@¬\®S±i:U r °býCÔ]€e‚Ž4’JÀ×ÖOO'Ü~èÞÓ©Ÿ|ßhžž×OÚp®]b¬^qb9¼LAì>Ì=€N(Õ(ot§™×A¡à0dÙl¬ú-‚™¦A‰+ÀÈ¡¸; ^äèôeG<Ó6a„—jóê6¸ ¯‡b.1`“$¢%#^ÔB-ï~…d†ãLQ>©ä²QVß>¾bï©»6¬õ±™¿w©U¼Š¿ƒ` ]+’Ï„ |V7(0³ôØ(ó‘7Äݯ”ÜYU«ÂîÉÇâW>_\&"8mQ,§Î—„ÂŽ÷€ºT£êz€çÖuˆㆷë~ظR–z ˆ‚U<ÚW³@Ë$Ä3±@-9¼Ö"y8RΰVWÐdº*…ŠWñ QÓ7I2@~ØŽ€ˆÀ_ N-¤|a:ŽÄ èÇñ”Âo¥ñ(‚£j¦t°'H¢¯ãá5&±Œ²Èh'@;8 =`h 2l3ÉXbI²MBB§GŒ_V•D™ém:»¼|¨ Ñ“7ûLGf$Š‚p˜ÆÁ*IJ`M!¿Bô®"ªWÓ«U—fªXt1]œûÑT,B—8›é7Ê7Õ(¤`“sL¹&¥h§¦$¢4ܨ¯õ1€,ÕêOQž¾~ÂWõƒï¨5vЬڦàÖy£]Ç¡;^Ig8D€Íùõ7íú †[Áêûl¾UôçÍa³ñ½ðêëU6|«Œó‰ÕˆŒóJ*A’V¡R «æ³$Ò9ý I†d„EþÚªÆG”¹ØÃŒ]ûjCéŒ<›ç@Åø1^:e†›ø:õ0›rKÍAkg—íümõl£«ìH¬Ó’çJj³å·wªlå–)|§¹R•Ì s嬩tS}ËIZ-çÏáðän‹ßœ#Ý<Ó%ƒ"”å§ù„TƒOÐô›5\Xñ@¾R!B¨\Y)‰`AåÔ,#~—…ˆÉ¡‘oJŽ‰På‹–ÄC;7¨à{iÐCç²7À`´iÝ«QÜ fn‚ß>«»«jÕ/±É¥ Jf“GÚtE“àiNYåW–¸…døY;¦ ®3:)‹3“%"†pºü $@ÎæÞO“›žXý)=Ê$øP“®ÿó]‰8°wåªô‘¬‹Á¡Â¥¨ÌÆÚº™9 E&Ü” ˆ‹ÙTÜX“ž˜e¾Kî†=în× î§rÎMÙ†ê•5˜âO»Î ùƼØ_hͺ¯–Ê#üm[]ØÌv‡Xüiƒó·-—ÂŒþùÕ’Š}2Bû)DØÝØ^ˆ ß0·iœrÌ™Áz†ëi×…ÝŒÓ]ð¹áA‰|Ø1$Q³atMÑÅõ/\ ‹Ö…ÙKÇ ö³âÜ/&jµæÁ+ ¬-‹®T§aRíÿê¦\üº]xùÆòŽäý÷OR£_îé‘ýâ×Ád›öá'8¥¿Ã—8>ËT¢DUA~.ø (H: ™W‘;˜W€6uãúç»êÆGŒ]WâåxPö L•k¼_ ž[ !§¾ZPºËöW1@^CüDÕiÀ ¥àR¥fSL{y >8]¨® â•FN´•ãÄ©Qþ }Ò¤£`j×›ÏO[µœ:–M‡þp§±Ç.,Êp­r@Ã)…IPæ¼}Š(SüæT`a_qº[•é7½öú;JxýÝ~ŒTöö BÃzÿå¯ÃúÙñéa]&ŠOÎS#QûÒîò­šºž®$Æ SFŸggô[ç‹ßû61؇è·¬@¿(ÅlJ}QŽ†&~ﳩÀs™È8=øá%…‘xM©òcå¨ þ‹_g¨÷Fßø RŽŽP·’ø'¤µ~8>o78Qü†Ôóã³çJäŸû`ÍO;„{þ%RNTŠ,ÓV)mHyÙ¬è|sh0ç折ý#u’ö /$” Em#gOÁOÁA‰ ñ9××!÷ÅO•�î›ß:WG]Üw’tsqßN1J´áÛËÊØ/ùÅþÑ!þRã?!­ñüôùß9RšLà/9ãâ'¦rÂÙ)|t¸<ü»Ïžô̶‚z\kœÐ€è~WG¶–“ø7¦ž4^à¤É6­ÈgIåðÏý ÿäÕmþÂ_ûhW&‰Ÿ”&Öÿ‚ÙÚ)·Bÿ<{¢Rž=Ù/ÓT¼Nñ£óü×Äi³mäêD]î¤vl o‹wòÒÌç]„HÒeΛGf>|ê_ežŠ¿ÍsYæ›iº” C§@‰n§;íðI+ËT>×äo•Ê§‰úé…¶ ¿×C#Ê។_ü,Óð義‹Léú“óŒ`2ßHâ2¿Ì⩪MûB¿2‘©ðs_¨&©ô±_¸®Š1Å¿ö9À«Ø•¾†ÃA˜ªTþ”yÝÉLçÀ‡L ±*}{q¢sø[äʾ¨Õ!†÷ÅONC#]|B^,gžAÊõ@¦Ð¯ýÞ­;Ì‘’=—þÄ<Ô™öèŒm^¸L&™CÞêP·W¡I‰$ù[¤Æºp,KjŸ7 Å@ÄÏý‚^y_a1ÖœL?÷ Äœ,¿ö *üò>ÿ¢py_Az2—Mª‘Žö)VžLØ/ „›3ø¤¼‡:JâŸû…f ÊJØ/Lz—"ƒAŠšH9‡þ@É\—5R 4%˜©Þ©Ü¬ÓjÐNÙ/hª#© dz£9?!í6E5~YR}É`Éfd>Y­*óÛÈZyC•#ÖœþR9± .Ö°ôÚ³ö ŠÎÇM3J‰ÑÙÔÙ¦Ì&U.<^GAw–$ôLA~zOÐÊÅ©x®…\Òx°œœããepƒ²& àã¿4=ÐZÍ$ç7 dDéxu* ˆh€ë¢è`Š!܃1i] ©‰ßñ-úùlÊÏ iR|ÆA€C•zØÁ Ñ€uÔ =|‹y1F€h¨@?€>Ïè}9‰lz,—Ý€¿RT£¬£b>jeÎ(å«7´ù}×·ð‰ïJþºOþ;:°}|xB‡(FAL‚sYÐUU0ÇÚ±ä¡+`ôç½1LBë‡Ã¼3>ùÉ'èaø…D®¢+Cè>Ô~Ñxs\ß —Á÷ƒtÁˆ¾€jØsˆp#2í:)néU<Üôc\!1¾¹g¬@øH>¬“Öò 0ÃÀ½ÔŽ¿’îLù)NÊÍ å—´ícøø”k˜:'Be Ü±{E*¨øx%è.=Ú•`ROð^\Y£8‰Ê…Ž²™R\àP=߆†%Yùe$†Šö;/OÛ¯j;ØK â¨„+Û‹f@V%®Vcz†Bœ‹[ O*×\Á¤¸…¶µd]Ç£‘CËÊMþd çx\¯þŸóÆÁw)÷ùÁñ¡(ÐLJ€“¶þñEÒ´ÂuzŠa¡äôyv˜ €Âɨve·”ŽXæ$Bly@®zIꩆ®âîû4·ÞD̸/ ~æÕS4Å“ë‰À6¿œG—í„ vå­ï muUà‡› ‰Èq¹ëóÇ«½îšñI¥_ z{QÛ¾Û ûì \åz·X\2/–tÒq2¯â‘(ý— O™ŠÍ [™Y™Ww©X–9ñ׸̣–ø2'vÚ‚h˜óC™É°ôeûÔXJ‚9á¨ð"KÆOÄ„"ÉàPĆ’s¡ÉÍê°=˜¼ù 9Š*VŒѧ+s¨vœƒtkKÁZ2WÁu¹å âÒÕ…¼}(d=“¹Xºf?Œ·2_t’®QÌÆuÀæ JÔÕ…ü0|Õü1\ºvÙœ‘ùý­ù ÊAzƒvà=dÁ_óô´Ý‚µ³ *â]%ó.OAΟ9wªÂBÿ{y±»sC>÷¡oaÂeHלqšD Ñq|ƒÜÙ¼.½Áú4¼®¶ïŒ,7|¦w-¡y8Î"yþ Y\g@×õïȹQ2Í- áÔÏ£ÓÛ=?Þ…¿ ¹á;œÚŸÓy—ìã…ò9ÝYä+Sui™@n¹À–ìY^8ßq­îwŠ¢#;bFÅq;%ôFï²FBV±jòÁ.êÐñr!$m~¤/ˆ‚(Å›KFÐÌíèü@¡?ñ°¬WU)š6ýGZ¼oí¼ýê´Ù2RÄSæÈ$žsC¤¾<óø/Ïü™ÇaןqÚÚögÈ×J_V2ªâå'ÍÉžMc¼$ùs»äÉŸ„ø¯¯Ä4‰8½P€½½c;.ª­ó/oê­ãgPmpSŠÞ“؃Ùj|ñsPMÙb•ÿÖ¡›ÑJ!Uøe¥W;Jµ ðÕþNAÛÛ+%ƒÁxGèlÃÿõf- ˜`žÒáÈHõè…èLu­¶“õi–Ú´vâ.'²›Ì’EfiúO.£ ÙÿMXÅ}¥,c}•„±,9[[Y´5å|,`CäÕ ÛÓÝ@cÄ•’´*AïþèêcГ…ž¨'š¢#nQ=¬õz‡AO ›á•J¤°™>ü”†Y_™3¬zòRê1»Ú§5÷Ñ©N ·Q¨ž5ëÓó–±€äÀ»Œ2·!‚Cæ–Âô‰yú›ž”5«ˆž1veÔ[µaé¹È+!Ñš©Ð©ºÉõƒ VöÅdÛ1¢Êº÷;L« ð»o°Baî\í8VÔjS!KǺüxÉ~м§–qÑå é»Ö-䀞C„¼Ä`îÄN–Ñ×…Ðê;~R^?ì²ìuôdq ´¬J­ÁrÁ ð­X,­EÖ€¡Ñ¤rµDºMEòñ#ÙD_..¶RâML‚RRÉb‹õLÅ‚›âN³ÛÇeöt^'ï¸-ܦ {v·õ¾*Í¡ˆ¼jXÛ£ sŸ7ªi<ë^aìmZ¹ê%;…¯*v•Ì냂¡^ÿwæãÖظª ûΘÅÎrGiÿjØk^J¿¢á}F-¢\ԫЗ ³/Ýg3™@Â6N@&ŽscáÓc¢|€¨sQšåJGHÕ»é ¿àß4¦çzŸ$£] Ý1Ufdéü•á ö¦È®øÌÅ>ˆñ­ü†¹ŸY÷$~*Hë„ \¤M4òû”‹š•ÒÉióhƒ0Û3ÑåGEÊæ_ªPO©£r€öî»™ÔgÃíáU²ÅÒV¬\ä*Û˜_”|‡r®`s&Úd%ïà­hºB?LõV¾Êªÿ«² ˽T¶œö3µµëÀ·ƒ2-£ZÌ…c¼ëŸÂr+”‰‹]ÿWtÁ‹¹èt| gÙ™kìüäžVYîêNÕ¦É}Ž$å/Ÿ)50±Û|Nƾl2ÜVŠ9­Õò—ä2ƒn“Xº¸µH¥‡Ì™“ÿ62Il© q”йWæŪÈÁëhðmà+-A°Mzy `º° 67 Ÿ’+êÅxïx»¤Ôï“Þšï&½RÌ‚~{Þ±qIå ;Õbñ#—¿€ˆ¯ÈÁ0Ë$ŒgX–4j÷-Ó~›6k–Í_TF,oye¹uæ”v ça[éÀáŒy»±ªÍï”Ýñ”õ—¤UÖ‚9¯wyšS8fOp‘.ê(\Ý,WCë@ºŠ]Ÿ 2«å7¢2åÅd-„ãmi¹Å1§æœÖ—±Gsñ)T°ç+¯Ðç´N­Þ{‹ùh¿ãSh3Ór)®/ÛCo¥vf>µÍoÛ¥´ãÕPu\¨ºõEòœî{KèPPZ‚pi&Ó¨ÊËõÇ Èæ/u*#µ·¼‚²ÜÖqJ;ó–ŒÐ•ÊÕŸ¨8:r·x{¼°µB¾NÎÎü0­6âóJ宋å*xz¾ú .šûè³íxÐîG¹1Ëc}.Ò—êÿ]Qþ¹_áwëo†ú’+áðˆ.¾¶ÜIæØ7\ºDiá¦~T)òÅ¥¨.Zï¤Ä,Ç×úrD×fñÎæÂ¥åßàŠ,q±ÝÝ*`Úërý+Ú¨KÜLZ–_Óz‡«—Ÿ´-­àÓª])±Ó¦òÎœÎ:V¡sv—„«½cÆî5¥Jól%Ï´ãnyÍm›tB\j㨗ú|¢cô㨩Ýtrüˆš[H¡+§ý<¤-ݧùtØ=à/³¶l}$_O笲ye²¸[j½-Ù/âî_¬7n!J¨’=ò(—kÔx3NøyÈÈmÓ;|­Ô}/8zᔲ¸Ñ'•æÇDN¶ÂE¦h9z¸>uãûKÇ÷–”Ž?¬{#SýgwèjËö?oªçi¿h¥âø9MØ@MÙÏèΣspv?wâ]€úuö€ù6ﬖúÜ°¥õïcˆÇ´{è·õòtðŒ‡™û€vÿ¨[ô>r½vîæ}õMÉÑï–+=½7˜J¤}µ€Ò†V¨¶ªñN’.Ãt ä#‹*ïC,<;«µÊ…îe´û} Vštéö~ÜM?¾«ÆhçµúÓî»ü¶ððY*Çm„\9>„ÿÏàÿùÄÀ†«íITºA…_ù&xøp\L]—êúë,ÎbÒ„£MàPJ{«+߬ŠC{·^„9ÚÇÃDl­£ZëÕþR0ÖöúЉüJªPÑeü%:NeÆ1”Ø/g0®Ê‹áâçßo9\üüû-ˆŸ ªŒ"‹ö¾ß¬þôÇ ¹×âÁ0,™n–~8Ëåà>I‡^'÷D3îg=¸H=¸ç¥0w!|Æ2Èô×Y~òÐõ‘‡{™í\Êð%ó½Iøc,µòvÿðwÙþÃ…ûÿ¨ý¯§Ãû]·Qú¿x ˜6©ÀbÓtíÞ|ÑÊp=&|ßNÑ3Â4ìïÜÁ‹‚x&%T`!Œ/þ­µ;“ƒ£óC~7{\º>ßèÝ]gÈfaÉÍA„µ—³éE:èOÒ}ʪƒæU2ö!ÿaÚ)ÏêOw™ŒpZÖ`É/'?ü¬-“ Ü?sðó³±þC—üï¾>—ðP¡ã#ü?GZ"î@Z¨Æ|Ò"z¦ŽÑ¼hê–˜Œ;ÕãåÞ¾Œ´ÈÎ#-?–i¹¯õ¹„£#ÀÊÿk¤E ⤅jÌ'-¨gêÍ‹¦n‰É¸iQ=^îñËH‹à<Ò"ðóiù7‘–ûZŸŸå#'âÉÿvÂcFºr°¿0ôŠKˆîŽ6‹>}þã£&[ŸÑ½ZüS˜³h>c¾-Úöe£ý¢‡ÚÏ¢„yÈ‘ñî˜ÿƒNþkwèÿŽ ²¤AŸ¢Ê ,‹Hê½á׶ÌOöh.­[TÛ¥p‹[›3kŒÇe§m ¬Ï%lË íîê ÷CÃ$&l"¶¹ÿ)"ÿá>ø·®ÍeiÊÅÏÿuTåâç-]ö~2Ü~çN pn?1å&ŸàÎ{”^ÂWírðÓ„Éš?HÓ‘¦ÿ}Ë»Píf2Þ¼qÔ›7÷¨’a@‡ß÷ô(ký’gyã¬,ú½>Ìë|{áÍ›»o_Ÿí`¢ÙVÐðihÜ×ôçéh|ñXJOãqב£±áQÙ¸§2\L!ŽÚÿ1¼ï%q7!Ä¿cM8¨¶èDŠg„>mk­2+æGª²Tïª3} šíhòîÍL.ƒ*'—°:‘d°œC?l6Áá|þíÈZÀpálºSQõdòÑÌÙü› æü™Á‹„@ÄDNU3–*†R¾íøª‹ùd+ØAVD–'Њâk´«Z3dÏ‚;Ü…avÜ>¡vDПeB ¶ÔÃÞž`¢z{EÍ9U¡@9½í©HCÂõ-Ó$lªÌñHn®P‡ZùÅÄÓ=PxñsÉÐQ*· RücHúþå0: OfÝ,ŒÃóù‹„úºd`<=*…„©®mÐ9AÝ${¹XÚó¡F×á„—I<¢(?j·@-ÞBr«¨„¥ö‰S:3~Îü=¶‰†¼ÌFqúñß¼U¼ˆYn³ø°”·]ì…³p¯|öBù¶Š¥å7‹0âp‚-ö\J)‘´h»¸Åm4ˆÜ{ß-Ü…{ÅíÃöNý{Å–¼ª‹±”·SœU³p«|î"ù=vŠ‰£;*Ù­¢—Ý-žºñ{íô2GÌÿC;'9Kmž<\Í9i¾låüNGÎÝöRáAо¤|À%:NnWSô£)?€Õ0‰¾!B/áöÁ_cèçm< ºá8èöÈ`—ƒo7zÑõÆxôdûÛ‡[&å9O0ÒêžD.”Ñdz Ýù°Wu¶l¦z^Es/göG‡Îß-ÞMPÃØÙµ2üšƒqá Ä®#-Á’;CXYA$oX•m –ê‚ᯗS›c£H¼4kZ¦neeM®Ÿ¢oPŸ'Jáhø'ôW!Ù!++‚JŸ"=™´B-ñÃT”µŒ.jÜ1ÞdO<”ä á;%o9(tyku½U8àÝEé\èŽÛk™Y4&îÀœ89’°‰ì²üai![ žÁ+*RxIƒ’Þ º%tBw1 {h/R†@„Ø.)¸j•ßGü•d¿4:PäU_,tÓn<‰›ôo•0 F{*µÒÍA·NÏPÜT~£¥$=\óÚ·Élî žÆ]ÑÎ}Í.™Ð[£‚(ÇñÆÔÏ#Ù\ˆ7Ü<ŒŒ 9 `QÆÉ"õfó´™ BR¸Ÿà4N„%x?¨{ô‹Zù‰W²IðÒY·Á¦‰¸b$Cd]†d‹dou/ûÖ0äÀMÌÿ… ;b6žâ I¿É=*;ÿÏÖ=øQ©ŒÂÛ `£p9|kPï®Á¯‘%âÎÝm/JÈ’>ˆ¼RßëpÌت9¤Õ`–†ýH"O¤K}hë»?ÝQÚtm~mïº8YY±{ãÁCB¼•ƨçVT‡]žìÇâ;÷ö¦õrFjÖ2ªøF#©êoFOH.íʾ©l€ò‰Ï&µF«t'(œ…èúÜ^ÖºATÛ§íÚÑî d,~¸HúÅݼò¸õvð©g…¶–ï'ãüòH1¸<†?œå—'ò@ý!jBooý9ð©8Á§â‚U›ŸPT{yQy"Tžv<–Éþ0âûJü1ŸÔJgµƒïj/ëV»Ù8y)£§‰›§ÃÀñò•î“N;ÓÁt•w Ðy3¬÷ã®Õ]OǪUTy›Fãiº³ìô¢Éôj'Ø.Ϋ9÷ðäƒS• Ôã¡èm_„Cä³ÄXoÁ·T§£‰Áˆ’£ëÀ_2“ºË,–$BËØD`<Ü“ëÕ nXkÀ¢­ 3]ÂïëÍ秭:‘Cìt7œz{Ä$Þ€mnñOLÑÚÙ[¤-çÑ(Lni22«KAY²ü•dœ»N‡ ‘¡°¢^—YŒKF9³)¸K­(š·ôX¾²¥.cs[=?Ù¬Ÿ6Û墚fýt6ŒP|$ÆŒ·„…>"ɾ-íC@f‚*ôZ.è]!^uÇxenÖ^Õ¾ãË3öúñ†BŠÄ~Š‹ Þü@Œ›ýêî2@ ©k–$©ÒnTDÿ£h.']!Ýœ›{Þ:¿T5‡g×­‰2²5H‘'~ 97DwÜu u ðQ 4 RdàyºR¢ÎQû¨ñ¼Yk !9'ž5O_6kÇ$8ù=gbžEËAHòh C$!ÇAJÙ“ŒòOÎÝí3çzÞ¤ÝibŒngÄY{i–Y|‰)-¨¨ÏN‹œ¸}ûv5c%ó ôBç¬OZŒÌI‘#‚Ó—Ãfã{Ôx©Tèª2G½ ’¤R–+—ä—`å‚îãP.Iu’àñh;½dp%ËaØOuKí!“V©ˆdee ñÙ‰Áá%öâ°Ó¬6€ú]"þí ÈITèáôÿnäÈ0–ŒOtLDP&Y¡Hæüw#I*g4y#Ÿ#¢< U:ï¿Y*7ãÊ×Q•MW˜RYÿ݈Âh0OòËAS&YaIæüw#ÉŠÄBˆ2Sdy³ÂÌÜÿò-èØ‚óFÌ OÛ1'WoJ»À7U cF/"2"-›®Ð¥²þËeÅÂØÊ ´M(ógj¼Yùÿ/ OEõ1ç ô®‘—Ét'óÿËiœ 'eHŒ¡óä¸Ôn^Mò<¥þ»‘ê‰)g 6/×AîÂb Áy%ÿË·½ 6Æ^|¹[ÝMÖ›\äüw#ÉŽ½H˜²’tùóάìÿGÇa0mÌQZêìÌ,î(ÿ¿yUµÚ7+ߘãEæE9R^÷/‚Ó\Ç–@æàCåÝ)äD„W;2©Z›ŒÑ•)dâ/›é"4¯ÄÝ1œ…´,ÊsûðûÏA¶éE“BŠ¶½A‚¯·hªô µ”F{âë¨#Ê”¥âP…ø2‘¤÷£÷hwa¦¢àž´Ói‚j7JyXê-K¯?o¬¾ýçÊÊ»wk?n¼ƒ?7úÂFpO¼0 µô¥à˜¶X<ÀÕ]mÇÕ1¬i*½¬÷+lYÙ… ‹éGhÕèçÆÇ»SC»O•±‡³ñÑÕ€Æj†ÁÙÊŠîÒ_ÛX+›6¶?)WU¶Èüê«€û¸ºñncãëÞ.ôᣞ h-]ß—Ö×WÍJôP:ûɧ6®¤ôê3ÆpmÈ5#q(,w«ÊtW- ÃnWAÂz½ «®T†$rIˆü¢injšŒ½†e}W!ær0ö– *ÓÛ t-&>]ýysšýuƒîÕ(î³GÉ͇à·OÁ»]Ÿ"Œ9 ¶,B>J–¨íPÏå*a“T =Œ°ÿƒôŠá$†Âx`Ø•&åY|þªôLÔŠ#Ów6Ss¢ ÿ }a¼üGã òñŸNýäûr€°ùou¥*”­ö•Ìâ$&- ›c¤Ö/ îöšínÃŽÿ~T*ý_.~ÝžÛîÃð®ŠC'Ž §gmê‡Ûüð×%ZÿðëÚ~ólÇÏ¿*•èSðáWßè?,Ó<ü‡Ñ}"c¯kÍ“ÆÉË ØšMHyŒ¼«0¡’Éàb†æÌA˜t¯àÊNßf˜Jàøö,a”>ÝwŸÓ[·½ìH¦·®èït£º±·Ñ§ßúû㕕ɪøñaµÎ¥´?„/çìª(¯òLk3’U¶'~é–ÜæÅäQneŸ=:„cöú°j,:è@>ti˜¢‚OæãY¯ü9Ýë†cീL°xìf>§lE+eëãT±«e+lÃyü†±¹èËû‡Ñå4/§Àì+ˆ;ÅÀræ`Û IOŠ!¶)·b» I‚”ï8†Še¹v;^ij «½Mw{oíè½kKv_‡ YE ju® 0ãlTtà‡·´¾ÈU‹dÎé¬WÈâÚ_N™ oÑTÍ)Ø–Ì`(g”bòTÎäÍkÝ,g£“ͬÐͺý Gó®GË™åÌeØ « 掓´ç#îÂŽò*‰ïävk—vIy³+ŸÀvãÀj¦t~u"xËIêppÁ¿|‡öó¼wç{+žçŠU‹ÿ Û3ù a çW”$Ä™r ËQgGLâ>_žB88]¿ŒBšRh¢aºª’IæÚ_ÀèqG‘Ý&Ô,Xg…ÅzúMOž;–;tß×n6ÎÊ«Ë8e”ŽsÅÚÅ™DPdFY±3ZnºL%;Ý«.G0ÇßÁÿÊÎÖñ–ºG%1aO£½h H£L…<ú;J¯-÷Èš3k´'<$y‹v›þŠFˆ%m N× /bþáðý­spT¯tX3ÀjÀ“/TÑ¡¨©Îð1ÈL‡ÒBðf)íÀÌ)/ÙŒ¦m4É›“é\ª°¿ǽY J–óçfâ,†è«ã/¹¼y–E˜W…ŒK`½YÔ[$¡£t”<@ )º§î£¯«“¯æ\XUE`Ø']*83ŽB`„¢_fÀé$êÂa€ñ¨~wR-ò‘îM/†”€ƒð„ˆtÜ8ÎÍdÉ>ÖÈHoE†"ÊÖ”áˆLƒ§ˆf §ÊºcZÊŒ†0öž”1ôŒ9{Ç» ܵ|00Ù1I:©·JjÕP·†,YÚÉú.ÿì½géåm„ø>õdU»!´ÿ¿r‡f†Ž ÆܶA·âÎíX4͘›ÔÙÅäæ÷°\¸[œÆ}œâhúóhB6´¤nÑÊÂäÂŒcŒ ˜\ñÒ13…^ûÒɸs\ôWV1,è]g¥„ã/ dUà4õ0e †1àR”‚Öe”¥wXØá4z×ïvðgõÊ—Œ{jäÀaè+&Ï]Áª~Ô›µV=h¿ªÀÃ/ÍV;¨à¹ûX€pÈz"TxjÊ?‰+À“a•è°¤Pƒ© /8ŽÔ|TE¿F—l]a¥`=wWƒo. Ó ‚“ˆæ$ g¾Ó)ÊKô®ÙÑ{¨[ÐoãœF¼ül˜¥ zšvÔd¸íg@+’k¼ ùÀyGw8¾Í‡ƒ Ú¯­à¸†‹`8Raz€‡)Œ¡O6 =ñ¸ˆ§kÆʇ²°YÁºÈÚÀÐ‚É Žñ_1óz€Ï”x³/ð  ï +¢í&‘°i@C >Ox»µû­ŽâÞà’(Ó&±VŠŒ¸Ä@Q>ôKôy-Ù y›à2RfQ°EŠ¯*bîeÀ1{¥£ÆÉù²aúZ&¾®7ÏìÄ“ÓN«ñÑ6úpxU¦øÄÜÆ7på™}Øw„êÕ·˜w0èÎ÷À¡6NO€‡=¬ß움àmn2O´±œ÷ù¼ Q¢hèxžuáŸAŸÜå˜vD ue öW“Ÿ”{èy@‚"3±xÁm 9Ú­êãêÀ8ù!ÇÝô9´«x]Ά߃ðØà4&ˆ j0fHï8G8@ ƒ6tÿªWÄMãE Ç8 ."={‚?¯wù PŒ œ‰ Óù®Þ<©u:”ª&Aô n><hÈUìò(›’ýú.JÆð +vxƒŽoW·ª[raäOƒqÇЃ̔®¢ÆðE÷YPêã¿Ûå€ä\ÅLA *hc öÐ4FËS@uËK.vQŽVHÏ*Ãè:ÖTð h`šgÇJ°D€ úMŒ”Ån.$á,ÞpÌÀôWå(T_Fá¦ÑP~—v§óxö13"}ÏHǵi¦7Nà"×Q,ô—Ð…s;îîã>tè*L­Ab¸½!‘¦ÛZ*(¬Fùˆ@ôð*ÎçíÕPuÞª Ì›}øVdGc RØšo` ÉD¡ŒÆÄ7€Õ[ÈÁÎ<¥h|(Ì ù¶›ÛÁýÊZ¬°w|O«Ø:‹Ç0kÁÉÉ=T&<€Ìr(òHÆKL¢K8ƒÆ]=ãÙíå _ >3°œWx ŠPGˆ¦ +(õ¥&²§­m‡4í„ÚqãeÍN:®œ’5°±Ð­×“ƒº]ºÓ98èÔšÇOoÓ ÚoŠxÛ@o—í0ã[—6Çiœ<ßàcYLEŒãFõéãG•Ö:Ö’³ÖclHP:8oZõ—ßÃÂìQ8w: ¤Ã×p⚉¢=°–¨$ªGºùó“Æ›ÎQã;»?¼äAš‰'µƒ#‰U³³??oÔN,ô]vÇÓÜ&Åk€àI7Ÿç§íö©=]œ þ9&–˶ÐFõ±`üI<›D ’(mŸ°Iðô ø!f(˜áÀ#¬Ç@!+#%•1EͼÛa$iŽZzÎ^Ââ”Îaý…1ª"kKÔFƒ~xÚªv‹ÇÇ“]Áƒ?¹M úV‘šDZÀ›¾;¤R;9ìÃó$õd[zAËb'§­zóûÆAÝœ¥›Á¸ßÐ~!ŠÓ˜®RQz-O˜]e1Ò5â`æÞÇéMôàïƒÛ>@d|0Õ´@¡\ñ&…ãR2D!I‡Q, È‚ OÕ}OÖbÕ|ŽA£QADÂÀYc¬±åíÂfãÍS—>ÌÄfÖ©Bfzõ­æ¾à›:jw@ÏÛqí¬Ó:?Ã× ú¡5}µÃÃΫ:d¿<¯5;gµ—¨ÃC´HmÞV½s|~0l’Fé˜Ê$™cEÉàf, *®-ÕÓ@Ö,³žKÍtz’ñÅÀI†îŒcŽkMX…9œ×º\&(žòAb ¼{U‰7ySÐôï/ÏÎfm2íO4cáLËF½Ÿû“ çã¹ |+½@:y­ÉÏòñ3È……ÈÄ^"SƒæÇ@©‰%†MözIgºëŽŽ?“ˆ †Òiá-ÆHŸ^QzûêÉ°•5QÖñ1¥KÒ¼ØÔßÔànÛ9«7-äðvºÝ8À=wÏñðï$ìGi•(fS| ötf·+N¡%«¼¨µêj¨•i¼†©Îë^t¨öü¨)§xwKÅžÖÐ%<2ÞU›hŸÔ뇨…|Zí¬…ÇÂk¸¦FÌ ÃºAf DwýlŒÂ 1~=Šù-Z?w]$!z X—' ¬ßXäˆÐüÒ\„LÒi gR° Ô¨={R†ÆH c|Ö’ P&ðYë-sX ,7ëµC²t¤cµ ')Ž°G&Q‚W µôðÖeUŠé`Hý¿˜]^â½€›1Œ,Œ{Ü#pŒ³òë§/ªwì™X1i:ø5êLqêT»Q½qÙ[º¨µ½Àw?*HM– ¿ÑêiãÙˆªÁÛÜå ‘Ã:»J¬µà«ÎŒ³€A K•vKm<`¸…Ôô©3çôÔFLJ[D{¢N…MF_xØ(@}ãä¤Þ$Û\.b© Å¿Ç(UO­5$±{ÁÉùÑ‘UBÔ•E:é¯PjËZ]”‡¿£Ã^G}ò.—b²¶uÌáÍN?"=ÜIâøÅ{4K§¬l&taºCàV§U¹ñJGgL©ÑyuztØ9:=ø®T.ëÆN⩸¢x ë”¼ð@"üfТՎVÕ†XÏêáU2¿‡ýp;î^%ñ8ž¥Š|ôl}˜PØzLHmÉ hˆ;KEë 4<PFö¤à;4H,t£‡ætQŒcÒ÷ P¸LFN!³AØá$r„¼•ÉrC}|y “þ ¸8è8î{!t”›ÄÁ±Z­ò>Dƒ­ä’wÙbÖHÀhI}¢^Œ¸‹æôZÈL%úûI|ã?jøâjáOI!YKaaÑ3GÌzÆ~t§$âÝYš¥ê”DB@\?š°’¢U!ÖÅ' ¼q©ñû Ü] OM2ÁäÖþÓÿˆ©7òz‰ÆÈ[‹'¦2xÌ;A„ 1p˜…®*n·¢Ëöz¹šÃ­Ò9`s+Šç·yz ‡<Î,M®zåÂzû1~¥ÔÅ ëJ•—?@Ü®>«n=­š L➇ÎMBaUÞ<¢¥XØ õÉæææ®îðËR–Ì—8‘ÕÄ5¹¬àJÅõ£H'ŒE]ƒÝéÖè¸aEZœ&’màÔÁº¹Æq{ò¤g–þôj–â$âR`ÑçÒŒšðnc2D+®ñòížIèËNqÆnQZºÀ¼Nâ\¼8‰†Â Æ‚;scèºá°(È~Z5ú²dÌcgm/ØÞu'¬“´›„ÓîU‡P[2íª§¹r|‹ßf3BÉ>ÆÊ ÀÌ»1L9½ª×(f"¤ËŽ«p¬òëÑ q)^ •·Äù øâ=¯‰w`Õ=h[¼¿–ßg†¿Ú<Ùúz¦ö,ÖÓ*úÉúÒǼ¹ ¾5ºwÂ-§¿w`ŽÍîU¶°c—yãš·^\žGý¶Adã0J–#ª8³÷löÛ¼ÄÃEF"hÝÜ1•­œ¹”×cœ ôǹ g»ë\wÔìÉý\bÆ°¬/Oóze_–ìçݧI-B&4ö´•=è®=?m¢#ª—Û¥â¹bó,&$sCÁcòbaÎ~,–fc)¯"5œÄ¿•a}ٙϟ†3<ÙáŸâú<@%%âDgÙÐ]*j,¸“þiÎ þ´ˆzSt •÷ƒð]}kŒO…\…1ƒj0!*àPź‚%C"e—…Ã4Êò(Pmý[fõÝ檸ˆ¶j“ ãKÁéáB«Z´R¬0 ŽD<¬ÞÅ‚Ð$p88º“[–i¦ä䋾i"ÝÕÁªpqü£ ð&°8•lôÒ¨?¢+0± À(ÇìM ­£žˆ’nÝ«P²’š?Fé`>¥ë»nRÒKTÇN¹ )ø̦ï€Ë˜†v(éøS‘?‚¤òa}¼ÍàñæÎæÓ`ûÙæÓÇfƦa¤|ô«Vßñ8ÿ)þØ?ô¼ÿóŸT n:ÉT,3Î@- “üüÜéE×BµËà©ø@¦Áá¬wÇíÍÍÇâá^\óºñp6§–ÊÃuD.Pàzy™¢ÎF<ž=© Ñ„¨«âU$Ž|];Á7”˜• \8¾½Á{ÚºxþG§·!Þz1#¼úS¸SÜ„d…¤DLŽ¸}ñ-fHô°uÙ™LIä]Z#DÁUÅS”ÖiTZCœÑ®2M>~Ò¬tp–ðV`~K*AÁµeU ËWŸÞ}ÃTÐIL÷Á”%–t["dÐGC ÁÿU?Wä¯)%ùšrøÃIí¸qWþÚaãä%=Ô™ïtôèðâ´ÙÑþ¸<ìô$`%œÖ;ütÎ'Hç°ÞBõˆLmD¨ƒ¶§x69b™,…();Îä:™zLžLõ³8—pë3“€Ñ ­Û/]râïÇš]%käLêaGô{¨~‹–ø{ר21? ÆDP^œG¹”÷XÖ„h]3ÒNÛOD…µXꃚMÕ¬g…AJâ?X¼0íM”,KŽê‰DÍ^Ò=XªÓ’9ز8¢ÖdµMR9&Óx6,Yxyˆ£\¶ž•w©k¨Pñ­aÑ•¯3}Y¶“}‰6«/f»ëZ_ ¶>Z7§Ï싵IæÏ°UTͲH…ªrŠ­rë´7x–õ.³È;߸äž½…ʹ6yôC-­¾Ë©ûĺt9ÅeaãkÃüx »`JînÍîˆý½0_&îãC€q:ç&!‘ÇQšpŸsˆ÷·Ä–µz^š}L_Õ½‰“pA½L×2Ö§¾âÚ„çØ`—ÙÚ]º¨‹®@ ƒµRë±xJ÷â*«óåºW¤=@V is:ë^)În¨A…†–0PpËÃ… €0Õ¢¾Úgád¹ƒ‹ÎuhNÜC i /$.4º•»~AγN±«Ì£‹˜vKB"¥#Öa.îüÆöSÂ)O(VEeT’)íîê-©áxøÅ1<ÔƒxÈ£X U™Ix(ùz‹,è;±s + ˆÐ"ÑÎÛ­‰ÐßОW¤É"0²|é&Nzeî)Ü·ù'œ|ËL¦‹pÅ×ùîe\, Dó­Él¨|\œ«¦ÖáX‹&+hú”%6jÜ&Á‘¤$ŸJd(Œ‡I@/¤Æ jb•ði±¬6;+WFâ‚w {-‘r® ŸºÖ~%¿#áóÁp¿;¡%Bxï ãQõŽû•ÔñåVåÅ>¹Õ¿¥®È¥‰|j¡Xq<²¶ŽÞ j«ÁÊŸ^ý±iý›ö¡DЗlÞÍ%ˆñ)Œí\Ñ)ÛœòaÕÞ…bÖkÆL)qJ ب iwáu0ø¯áÄb ñ¯þ¾Z'»4sDÒšøšo¹¼F`eMW FËŒ™¦-P Â#±‰A*ìú@D,áqw4)ÑXK»ì!{ÿ+h•ËjyHÆ êiŸw™àc:ÄÇÎoù˜²1Žòɼm‰xúÚ{ÒãÃLxu’¨ŸvcV..•}{£l¢êœžR¤ß³fã¤ý¢T|¢§¥ú7—{7.RFûÁÁ¢9SŸ´§B¨­Ì˜!ô­:+ ™:*B½ûf[2@™ÿòŒD˜ôtOÃãÞPXÚ‘Ð*H#Œ’À¾v‚Úprr“ÜÏReI$@ÿÈ dʺ7Ñp(\€\±o¢÷í¸õì“ã’Þ»»øRͪa†ê-½V±Km¶…éÍ¥…¾ª‹ÎØ¡Ïçªïòƒô\ƒ†WçÍCeÏ×B³9î·HÕ,Y HS6d}yv¡_TÓ|UÅt!Dcˆ ßéíè"Š9‘v[€”¨{5fM Û/‰ßGcù<ˆHƒ Óïz(bË´¶Ž²=æàMP4õøŽ“^íI<ÆØg0›é:&£xù"Æ§È %¸¬‘jP¯IN7¡ë‡.ùƒŒIöGaºŒÇÅbqFŒÙT&ÓÈb'þ€¶1Õfµ·?®æ×®¡‘pvTkÃ^:F“‰æiãP6 {ˆúóó—4-9¬uš§§í–û„=Œûh=ž^–2œ_Ñê÷&ñ¸¿°n’Ù¶¼Æ3_ÏGۃܷe-]âqÛ£S—-:rMVƒDòÉ4Á4¸I«÷_g¸¡98UÉVó÷ÓíOÙŽ~V7çN>XrÙKÈ^1¨G$ý˜kBÒ²ÀCÍ·€Çq§7L5:XW‰ 5Hý i •¤©$ÙòPÜFg›n¬Ù¤NœkdŸ6À‡ÎT{ŠªÚUs&€xKºèÂÕ‚Ö>*¹±"ñ›€‰Zñ>à´ɰZ‰ül¦ïy&íåëLnºŽoÚ?;ÐÎqýø´ùC§ÕøGÝTg÷d¥'Oþ¬[›ÛOÊæÑã+ËS‡"„Æ›ãúŽVâd•äˆ˜3Ô)eµ$RN‹F1ÉÄ;dFäg0$(Àv…oëÁ¹( ¤£8‰,iD<¹"ç^d :ŠÂqêïÍk/Š~‹ÛˆmŸuâD2³Pv,PLŽ*”ö ‰Nq%k;`ÃÔqŽºqÚéw;܉·ÿ¸ëTY“u.’÷øzbA “[”¦s{ Æ÷(‹‹ 9óÎTwè;ž¡Šx2Ú{´§+ë “³œ”«•ìîhŸÄ—NzÙ¸a™`*™æ¼Oo™¼\Þ8ò@áÀØF´¦Ü;ÓI½ý¼uh=Þv:õ£Nycµ<_%˜6ñįp¸ÎḀ˾H{hxé\{M=>ÒÞŒÔML@]Ww9büÑ7íƨ€ PV?–<|î…I+Á/¦pUý4ŽçÁ$j§gõHÒ«[ûÓùÑõxÒ¨Ýï]Ó|¥¾ÿPź"~vP°ºËtÒÔβÌýɶõ6Åk[<«é°@ÿ;xJ¿ÌÂÎvµZ¥Oéë¢òr,Udm|”a¶Ø¢taÊR8<µÎ»IÑÈÐ_\¶8ò*ô¢’’Ý ^1‘JÛÃÁÅ:R¦k¤u•§'V€ßÀ„¿0Ä&éŽ6ØÝÉ:õš}ÎÒi<"]Òp1A!±K+‚½&m¸ßEéBõ´É-@¼¹`69mdÃx ¦§ÝnvÎOÎ[õCckØÌÎúºÐÎüTȼ{±~Ë8WÄs={ñYkìÛ`‚JùDâ«ö#•°¬¦—®¡ª€váÕåMÖ<4D™ó”x›ú`ˆ·%Í¿x‘¦B>uHšxÒü½¦l\H<+ǃ©R¿ˆ²ººä«FøÓ Ân§DèíZ _=ªÃrJ¦Ráº?èvƳÑE”ìæ–š„äPþíö_äB¤­îüAéØ «Ûí>íjõÎqíeã ô¡,Œ>”«fÓº •Ó@7?<­=94ཨÔ_K@ÇnWýñ6&»c§›bvìo·ÜÍ-xq;ðI/ƒ"£ ®&oUØKÖâïËÁ|„w'³üÌ8ÍoBÌÔÖÛ­Ç?æ—Š/~ŽºpßÂSDÍׂÂäcaÃÛooýèÌýãmžý-ž5wîßnþh–å¢2vúÑjÎvœ­,œm ç çùió°ÞÔpô ›ÅŽêÏOõJ´¼vèé·¼Îppvní˜q3²·ÿòLÔܲjž>ÿ{»ö\7í™L·üÁI;SžæSí– ¢ãõßr'˜ÝòrñY>?—NÂykŽÓp’_væ6/¯OöÊ;…A‘—pi=uE—xþwræ£É :Ú>2ó_7íº•¿må7N¾¯5uþ_6¬ bÒ+‰Uày­e@\„›U¶˜²BŠ(Ó’à=üNÞX\pC>û&“(Läë~("_4³¾ð&üÛÁR¶ÚÁ·CwLÇf\éЭuhWùÑR%@¬¿©£¢Ä–yîýÂè:<ûAAqò1Ê2ù(©ôzurpÔ9&Дµg%Îg6w²Ë©ö¬,Zè™ ŸF cR 2q"iGLصÖä3áø‡ê¼G1äˆ.YtÀîr7׃5ú¾@BÜuõã1öÆ|øÉúÒR14ØÇä,PÍIué§:!2“g9ê¥K¼tØ­ˆ+3£.3¢%uOÕÀ6èèkÓAqº¾i:o”$Lî”금˜{¼­?T. ád€ßZöaøcøzÏ*!€×Ñš²¨W(Z@h2X ‡'FË•\µ¦pþQ kŠ`a,u&>QE«”œúyÉžœÔ^ÕíÎínP¨_Κš–6Ë>E"l´5E{}è:LEçàôø¸Ñ.gk‰¬Ð¤EÓÒî´rJí¬ArMTr®e/—Äí •¬¥öªàåEÇÝN:ÉÈè 6©ò}€ÌR™Ðe±5•Àù;º%7šØÄc©W‡@ó¢ )‰ˆÈÓm öÙÆÞóJÒ¦÷Lÿù,Æ0è9Ã<@(ZÀ¶¯wóÈák‘›)Õ¥º´àd^zT¾E}”ŽX€ Œ»¬RuP­ó¼"ÈY| â È“À 5Œÿ‚o׸Zd\C|NaŸÜ€Œ^8™J\¢Ÿ°ïâd¼šf P¿ÛU¶bè J¿[¾››Î{Zp¦ÂÚ›¿<ë)ABK¥“v§Ýx¾V>™ð‰ßŽ.JåråÛN2¡¬fúèbõ˜ 3¦,7P9N˜ŽàzW*Žâëað§?]¦;OÖƒ?mzœ­ìŽ¤”$˜²ÁŠfúªÛÊ*;Î[ò6g.u|UûˆR½Í^øé_`/ÎXåkqes °æßYÜ›\[ÛhæñýásëšG– n¢va®¶‡u¹©·å«HɦšfAEêûºƒ³ï8\“NëÃ.† &í60ZÊ`Zu5ÍÞ¼z~ôve×aÀ´ÐÜD Ô\y^·гÿŽÓ]¿ïa0Íe>¶C!Ê¥1ÒK¤UÀ %²ËZH–[¼þ*ßš¤çªÊ-)Kïšû4iiÌ ,}žÖöýý ¶49ƒ‹]íÞ’BУà‰Ô)ˆy=;ÃÒ(­Þ†ãnŠÈ¿?Ç’ié!B¾‹ÑËzKG±‹>™Åšs«:·ÌO>ä"ðÊ·ðWgBC"EûÀ2`Õz°‘A*‚L˜ŠÖsKÓɧ"p#UPÕ¥e­dÈ*éE ¤ĉ˜»]E!aú)ã)­e^0_€¥QÞ-¸D¦u~rÚzŠ\¶±<Æo°RN[/¶ÊúnáÚ"˜ /šõ:)ÿ™±PXPé¥tÏèk¡µ`Ù¤ŸÒ»××dðáYõ ϾöÌëžTMôôØ:hæuñb–Ú=4²5²³¡‡)’v­Ã¦ãùyËÅUìŠÅÑ/Ø’9ãê„èLm÷,È%OSW6—p/‹è^VRžª€Q ó•·@ïkxÝâWùjßyÄÁ•v¼6}ç׊‡a,õvõ1=Ú_ãåh0œcr똜DS|¾˜õ—Ôìs@dÕ „f«ˆÞ["“ › "+81ê1¿²H B«•}¡~ƒ;M¸ŠaYuò¤cÞh„}ô†ôê!£ ½ƒˆÔ8•+Öì Qߢ)‹4”’¨²˜¢·“wß(0W›`3«¡±\ŇJû`Îô.ªî6m»Yt7±©ÇmR`$ÀÁÓê‡uš@)¾/r¬Â•$ªQ”;:Û8³.ý©gÕë@œI}^é³8ú0H§"ª’»òóƒ`)©t ÷×äVº!—À»Fh¥ ßÔ@—­™'LÙçcÔÙžt:ÃÜ;ÎÒpÏz)@Mh½B®Ê^iJ’qüX€h怺«ñ‡erÚ;ç q” Zõ¶}ùÝñdU—…nï¤\^à‡ ßJ¬ƒÛ´ŽÈµ‘0ûˆ[à7o+Z£Ùja×[øNæÞÁgL-–ðöžuÇïÕ™ö´Wù¼Q}óY£ *Ë4æû#-:9Œ jÐEãŸlò·ÂP—³„¢ŠÞ)cZStGP‰-Å@ùoƒâlR$ÑD…ïJnþ`Dº/0’R|q™aí—uq°V¿¦kåêB\ÝmqeRjä»-£! æ*8e÷è½ùÉ}16ûµâ<#eû rÏ-•Î9ËÖéôšM‚¿)’ƨÁðt;êsáÉ{é1ß ^Ù!¤­ÀÛ·éÆ$LÂ߶’e„Zó]K!dèóåÁVÌ;Õ¹a±é, Ô/iÿ{k ­D„×7j›Á[Çõ¨ôPUSZ *¥L"–Á£Gttléu@ZF²T»òsRˆiuš­:aÅã¤ZLH`×½FÈkA‚—¸ §Z¬#e„2%ü\ÄS4Vø̆Jú‘ß,[ žCÿ'/aúÐåÏa£uvT;¨×OÚôà_È9íìjµ£ÆËUGZé'½@:¼BÌÕ“‰@^X6ð±Z?:J;pyÖw³`ûÏB:ª´„Ó|”F=ö‡n/I·`1§`^èq®ž†Û^ìÂ\Oe8BÜA°qÐ5Ý÷µv½åñ“5\t;êuÏ´jçá–صÕj•Ç>mÖèoÕÛî |öDo¶¬—?Û?–Õ¡EUws–Þ鮋 k>tdGkÒîM|.|x·Ñ*÷PTyɺ Ó—X-Ø®nWŸî ‹ÉG2Ý…( 6‡/&ƒRrxÕój˜êPÊé²Ý‘ž\\P2R3úL™ IyЛ‘8 PG¤ºGúœþó÷¶ xÑ%ãK2 EG²ñ˜fJUZzˇ³¨ê¿Azµô²šçwJó}óVZÊ äÑUœÎ~#dû€ÎõTi:‚5<%ÝhG‰¤&u‘—@òpCÈáê ÒÉ0ì27˜ƒï«fç°"-£gÕ7¶WFåƒP5é…¯â4aÛÕgF“; Ë>ÙÚ/vøcƒ± ¯È–7 µÿÙ}Ý(”Xôó,DPÕ™jÓ §5•q§NGC€uzBŠh Øg»A§AJÊýBsÃÅ¢ Å%¦s?¼ÝZ  0ù`t=©Òëm²Å®&˜fÓ»>`(AÖŠ1µa« ;K/"¿¹Ú5^·Ìcb£ùÉæ_Ÿyòuøñ·p(«`¹+ õ‚"Rrf;ÂaÀÁµarY±ýÑ¡l¶g¾–a#±YdÉê•0+4BÏfR‰m£èË Y8ô›2ÖÁ[_Pkjú#ÄÀ9Ò7)€6®ó¾$Æ™›¸hæCd.Åï")#†xÕ4âÙ‘W•#ÏnœÐ¢âU \‡{nãèZzç¶|‚ •ãëA:êO3¹›E$«)¹UEŸ.ÒHËÔ ÒÏ œ£–༃4sŒê!9g¤Î(û…×PÁYk¦—#ÄOU*]yˆl=“JãqœG ‡@k™Å7b’~e™©˜Â|'3ÒéžgB@Ré Òq°ùáòò²<‚[›"þÙôÈ”ÌCM×çj–çfzs6Ä€«¬“Ž"<"D½ž=ž¥7¨N2çÍO>^DH¸ˆ2Vï²XØm¾8œÕšά9oäjÚp¯‰ÈXTMÊ)x:Mb¬@)±…ØA"foãlQµ8ˆ$6á0Ü >öTý³–A÷×J¨çƳƒi(/3c»y/‹Ë„õ“Cj½(‘^fPêP춪ÛR8|CNœØ³FTfïúŠêcHI•×íÃ"œÝŠƒÃÄŸñ=ÃŽƒoV’èŠtøuc»œ±÷cÓg±dw„ÜW1ûhVYs‰™E"U¾×Ãõþ}ùÛ =d¢ØçÈ7„ [2:£t¡G~´Tþ‘7ÜkÖgü¯ï¡OÖ¸ÔZøŸ7>³q³S»v£Êæ÷‘°€3ŒT¨+ü؉hí¦š7IFÑŒáQÎR•ßlë Žräé5VÄžÂÂOV¼0þ·{ùÞ7w »AÅ y{%¯Q;0¤~, ¢Õn¶OÏŽJ}˜Vq—6Í,EÙâäØ$7'2õ!;£‰/<‹UØ0ÁÞþµ‹t–H !Ô!Þ£h9‘äO³W¦†tFcŠgÄ‹°% Ñ|ÓLD²n$îÎp뢽Æm œøEvË©üpâ=FGMlGu"À{ŠÿfäÆs[½+cŠ‡àR›N{™Q®,‰ú,¤‘™ÇÂ$ŠÐßãü; ò«ãEÅ~;hu¾«7OÖü»sÞj?™AKôEV8"QPxæyÆ4+LJ1ÔK .±XìôáÉó³V˜Zúõ$AîW¨ á(Œ”³Rd§ÌâY7è»Ó~ƒ?mýв\tr•y(}0ÚqT­QËú¸Ö8]©³Ú:«4jGh1a²+??oÔÈtÚðÈnuâvt1³Ùý¬.‹éZÐ@ù®ÃQvᨫo[Š“®·tÚÚÖºf†2ûÏ$ºöçÊðß †'|Ií0«\É,Ø:=ª5-]ÐX0ÞfãæÊeL'X§Ò¯',á["®lûwcÞßÖz8¬5a\öXON;g".“‚^; Îí´]øu­yR*f§4Ž|è•öAæ؊ĺÒYÉUÞ‹Z7Lk^XRÜ‘Å!Z‡™2ëpåq²ˆ~KëoIµ9µ~”3>”&é–!jY0qyª.Ž ð£ÜŽÍUˆyüßÜzsîÑ^ÇY£äe@jqú RáÉO’}€ô ÿýbjO ×Ï9ûžrØË9°µþ°iïp¤adämcðŽû;çñͧÑ/FF×ßîë©(‰;Ô‚zV¬Ù79Õ|Ú@jnaWÝäÓ|y×0bzä3Зãç›ÏÃÏ·ÿü8®Qòvරs× qQÞ3.¿^‚Áb½ŽPq±.QyÁN 9AZL’ó 6n½ \,_s^æ9ì\Š½WöÄȯ_#‹ÿµà’÷õkXXñMª.\%ƒÇ6c‹Ú¶tIE¶_Ì‚YiƒçÐê25‡Ï¡0õ?µVÞÏ_`_|ar›9ìšÅ•éZ„3Ä?‡G¤TŠ³Ò®gîƹ1‚ryf1‘Õâ:?iŸ‘êMýÐmÍç K–Ÿ‚²â ÝÎ qÀ\Ȳ‘^È).Ø¿_‚Gt:lqŠ.keÌœy£Ðvsž÷e@˜_RèÅõ:B:΀Üq,Ãê¦ä‡è""C½ôvܽJâqx)ž(®Á›0éáë1†´Uêe"ºEX‡º¯^èÉË 'ŸÚe‰±™J¡z˜ë&¢|.4áEå¾y³*KŸŸÈåfŸ­_æ9Á=à22G(ÀrŽ÷®?W¾ã?ãîí|BSd%“ ?ÙU9¢K¤æ¦*Äš0Âx.ø]]! ÓRØ8»Uåªç>ü¨pºp‚¸›aÌ–3, onçÉÈWk”ÀñBÅ«iÚ‘‡ÂO¦3_¾Ý‘![®RM!²Å´z'uÑü«(̤TÆÚÌH•]Œr ¤ÚYœ°CÞdľ7‡Æ«–è–H—Cèûáó#A"U*TwÅ)Àw3ØBÓ›AWÂdÅMT5ú‚¿~GJ¤ž<~ºý×ÍgË3ÌbÓ…âxHéñ4†u`†SðêAoŠ}n]/ø28N£iÕjÖ£ºÕŒX¸÷CÕ¶ÙµYÔA¡!Ú{Å ”Cù{>Ìdýð²IRü.ìHƒ0Ûß²æ ¶Î1_ž¢{ÔŸgéTî-Œ‹.£:;—p¹nÆw=wv=):öÝU,gÊHÑç,ê‡iÙ ZëvqŸ › l`$uúM 9¡lºˆÞ,I_‹ÛµìPó2 êµ—p»¦åˆ ‹¬ð¥]L ¿žá5À$增Žìc‚’Þ©¸øm4åX¤Ñ­'MíhèÑ€‚ï†tFÇ}ÃÀª[Õ°]gd¹®$æÏ¢ Ö6:½w4d˜.WñPÄ`•Re#ƒÃ¨šžþît ‹fÌÝòµ€‘Æ~cBÉÖZ°vΑS¿:o–®JjšÕãµÐCÝ¡½.Â4 ú™ ®hQ–Z rhSZuöŒŸlâ?ΖÈlÅ{=AãÑᇚíúqKrÀ­{äHlÆ ™F£Ô„B«¬t_,Ÿ= 9DzúôÖRÇÍ°‡G‡=æ’«~ε Ȥò¶o3–N8QËt¾Ï×cÑ NÇ$åà Ñ‡iϺµrû³}ó¢¿à$n¢hlYd»7…øÒò…!8We.&ä&ÉM¿ÆÞI©o–21`äÊ÷HÑ—IZ²MZ Ã=/{X¤nEOfFd^e‹Æ! ˜ w%DÄáÆ™qÿLng¼6”/ÁZA]¸šöÀ´Í%²_îçÔñ«»„DÅ9ze4sÅ(4öãŒùgcå2ìoK‹Ò]J”1g1hæu'#‰[,PYh ã}­3_XîÖc¬ù±Œ C 0–rç»ü Zh7³Är¼ó›+ûH‡Ã¼ŽÊ0•¢œH™×àshÛ 8„¼‚ZŒ)ØÚ\¬¤Qô^£~]·TÈhÕëÀyÖÛ9Â÷щìÔÀŽu§†“N [rj(:Ú]fF‘ Ñä¨p‘?šñ!=E¶çazó9è3bIÚmRèHÑ©×þ¯Oçu í…5óÀÝkKu LÊ&÷ötLɼF_à 'HP³¿lbJÃwÁÂm¾hAÌ–r]9Œörk¾M%¢`– ‚.1wdÜDÇE°gÉ}Úå£$øŸèg¥b˜:¡hD AŠ(bL¥îñ¸žyT„E›ºnILt±Û~œjÔ4%ÍùŒâ¸%ÇN×¾—/F—Q8ÅGnã™ù"‰ßGãjþÒáÎè hÏR‰mÍÈXË¡×å>R êÍïëË°£•:ú˜ÔW¯ lÄ™½Ýzöã®ÍÑ风ÂËÃp·ž™EøÜRƒuœmÉÐÇáëÃ.⠃Ϣç&Žƒt2˜Ò»ÍoÞN&ÿªlÔ.Ô hʵÇ|€Ü×ÛßUç€"šH.|F™WÖU®V«KÐg6^ÉÏš-1‡ˆÅ;¯š¸%Ê=¤ù[¦ 8îksæ ‡“âzòÛ”9C¼„‰Œø'Îã…‚=w³X Œßbc¾H¢¨Ä¸Ý¤•tÓâxíëbÕkKèÛƒ&ߤ†±¥q/1j;\±ö:†Æ°ƒÓ“—…ù M2-™[ÔF_Ý/ÑoÔIûE©x8à+'¾Ù!ô™nœ6ûW¶oeø óËû|Hžw@óT–¾UhkLÉçæ­€MëQJò2™kš2µ7Œq”¥½‘¦ íµOQµ âÓ\Æ°’02(úBº‰T”!X¹Á»PÊñ¡ W—ʳQ oò'íu­=Èw1+Ú.º¢´kE…p%î 9ÁÌÝÙ0LÖ EDŽm#š³q¿‘’;9ƒãÓŠyRš2@Éë9k@£‘{žû¾Au°ª*ñÄ…×GlœÓqZ¡tqkã'tÖ”„É€ép³m]Ü\ÕúÅCÛy}JÓ¸; @P$m†`5­š½zmh\¨§DÈ"e°À‰ù)ïDäêºC=íôPßp¥ »÷¼‘š«ñ°ä¯Û]מ {€1ÜL4ï‰##@ÐsÊ _ТÈ@áH+‘ìÒtFÈ|ç nßðrÍòT°ÌÈ™ *öA7È=#œÔ z_ì*17Ä$8H°^wiF·{˜ïÁ5é×@œU˜\sp|¯oÎðÎD‰U·9ùò†šeŒü¬ÊV4ÝáWË›h¸<álÎÚ<ëVDŒq¥¦ÔCÒz|}$»£àjv,ÈøWv:Å:U‰0xŠy¥k¾|ϬlI¿3æ¾.]“O»¿lòo/´®÷k®Fú¢ºÂûf/xlY…QÙó“ãÚ™q©pA:Ì{Ÿ—ãËKAAk¸hÑ~kz‹N‘’É´Óo"@/_{©½Æ‚A.‰u ô˜:CAZST±45¤?9qg nØ:E9Â5¼ÿZôÓÓ%‰§ô,Éä2eã1º¥J1,ä€sèݺjªÑŠKݸë6|S–P¯áHP®¨É…æÝdpõ:¢K‰=лdqlzaÁiº=âû‚“U8È·²¶¬‡Ç¶f·)¨:œþÍFµÉd8à%â:*àe\P¿ç†A÷ÄôøÁpwÊ¥ ¶b"Û·#næe©=Qì%ú°\Û Á($­Àile7X‚2†6§¶ô ºˆBâ‰CŸ8}¿Þ3Ë`»“¾¦b¹<'E âË–M¼eëX¯%Byd"5@3eh–<©ã¨E©xŠNCòÔ*Ü´év8Ý%Mâ”÷IïñL26­÷tBŽUcéÙ÷* 'ènUºZ¨ñ(30Ž%´ŽC˜lq*ÕMº`¢DííýNª#ÁÝí“$î'áˆtFè@ÏBúÊŒâtšé¥ï”DË„± „í‘?Í’É]D¬OƒÞme°í¸Û ñlà»r8|oÛŸDŠˆÞ¾‚_¯±`Ì õ„r–PxPîñ¯6Î’qʾlYë?Fί‚’ýž<ª«óùA…µ ½œôl#Cƒ³[=ÀÁ®‡4TQç4ŽÙ@¼šõÓ‚½Þ2( ¥¶)óq’)x QôÈ£8ŠMŠ©Õ¾™DU‡Ö/“!ãÑA” gçs*¯¡ª.m«`ÍÍçÃJ ' ؉ç…ðS…Œ„Pÿõí\…áß oåþQÓxϦ ¾ä‰ƒ—¤ÖH÷MP{Ÿ]¿0é·2ÄÉ \e’·â_l¯“¿ Âƒx$y“²$\úâÈtžjHÌ;DN±¢ŸŒ¥Ê³+Ôôœ¦Jœ9ùìƒÒ%þ“|âŸKø3Ô_Gƒ¤çò X±è£ìYú¯0á¢ñµËÔÕœ©\=Ißš¿ÁÕ•-qQé@3„D‡ØtpÝë zÕIi¼ºsDMšæ/¢t0š’zÁéú–²jÆ6ŒjjñD›N‡xÓ—þçéòilÍ%ž ÔªøÅ"„úȆ+—)a Ê ÄÉšÖs¹2¯ÏABïE 3óŸ.L9ÙèžX©;Iqm/Ø6ÅHbŸ/œ‚‚Ï…Ž‚úMæTÙØÚtJ<5ïKŸ1õs0èâÏt싽 ŸðG†3ëÆá‹àDþÓýäIeu7¹m^ä>ꨋ:%‘*z©°è»{BQÅ _hžÇâ Ö87à‚ÅP,¼jjì§ìƒXyìˆèI[gW-ÖI”| €#R8wNJR Öçh<Ó‚$ë ýÛÝFŸ˜Õœ31P®Íâq:—•6Wªf™¾Í¬÷²¯2ë¨Wp/µxKLÊÎñú cbˆp]ßÎ ;¾¤u˺È[täœs¨ êä9Á¸òY'¾²’/2^xÒõõw:èRŽ1UKœîÞ‹°zûJbÔ¦‰â¬,…ƒ)G$Ñýq=Xã-Ç÷iS-++Ÿ±ÉЄ¢êÐæ7®Ùys𻶻tyç•[û²~ð_ÖíPjwä{>÷ÒkJ(æîDϽ7sOVè6¼ M‚GÔ$ZBÄã–õ’)&± %ÎìéVîΫ­) ü:upzìú…#ð›d@ú~%5£KBâÕ«=1·>Wqr Æò±Tò‚~R‡…Y¹îÑ´c‡Öbf#) ã$á½d÷Îóx¹Ñ‚í2OÏ>Þ_+yŒ_ø!¤=™6?îaä¦M)& ‚¥ A¤É˜K¿Ä1ì§[BœóPˆ®ÒŽVÞ-Ï™JO1·¬ïðƒ>‰`ul¾%_P%)Vþ á©£‰j–û»Àô×ú¾ùÄzR«¡‹aãûð%&Hƒ7Ó5pÖÅ4‡7)ÛFsh­cvµnÓï_FÓCÀt ƒ’ ÐxBêçsQ>š¢%¤„šî_BéNaO.½’QVøB³\ÿrܬfƒXO@5 PAü DÍ“#¨PÉ›e Ì"PBÁ¤TRý|$ö…5ÌüŽq×òª”hO”£b;鋪‹ÓLÞÖÞ ¥ê´Ë#³QŸb²M…TNÈöHOõ—Ùà:âãà‹|qÀ¬˜’:óÆîTxÈ(‡U*‘©s(,·æeÀëeCY/ÆZÜ#‘Ü.6Äa\µn‰k ckn¸òùáp3~qô\Üöc~ð ®!^uU¤ò¶àI¸à@‘“Žo¿ëÈ'=Hù=œ·bëø„c=8“3 j¡† c4ÏX¾ ËWG²2@eö„m@-¥ö‡µv­~r˜QI7¼›ZÑCÊÖ=ÍÑ~>³dÔrçÞ sƒR¿ù˳γ'Ž/wï£Ò$¾‰’I×,ЩÆÀ«ÜµM»À¡&JÐpÍ‚âZveÐE'#bÇ\Äø6›qÚðIVT‡óKT†•ÇÞÆñ¸ƒ¤{5@k–D~6ƒz'´0È4 ù¬ +9Áœsd ¢"¼5(¹(QÞŽ=ðÅ¡K^†“UYCm€!¾·C"¾T%(ÚZ!Ç„XÌÇEÜ™ÙÓê¤Hd‚»¤:ÕÕ‰ZP°>ë̼ÿóžLuødÏÎÏ?:—9BwíæÍÀ ú5Nva÷wMòhúgÓrEÄ?Yò4A¸‰3‘òrLMvÚ„Ò:ä]QyÑ+Ž’p£6ôÃÓVµ[ÄLŽNbÖp"ô÷L¥£ vÖ*%¤à9èùæÕÐ Çôp ½LPHNtIÓAI¡­v­Ù&â$0+§Õ%§]F~µ*³¥qO«lE!ô"¡«ù²ö–6Η[wXƸ§;¶ë– m\È(èÜŒËW4­¾H{%³‰õ@m‹BŽ¥›]\÷דé¢^õàÛ=wóÉ­e\š#Uz?˜tp*Ý.S«f‡}FræÓZ£_buÑz^rZDÈš Û¢&Õ0ÆUÖ®È)cÞ+=N,}_Lëcö„'˜ì¥Ž¿?5Òy>÷Ý÷iéPM8³“ž¡”ÚŸÃ_ ÍÎ…P¨¡ÎRðòê©öylêHF=áhßúmPŠÁÁˆ’Ìœù¹ìoÏékšw\åì“B*¸8¼3ª×‘úll|t'JáS¤7@ ö]òv;¥Á¢ç¦²áÑZ»JQ›Ò ×ÙH† Û̼{ƒÁ©ÃjbAž]©*›äqRísµ3óÛÈ?L<±|U½íra¹AlgZØ^äʉÚàÄ–ÛR;H2òÚ¯'ßuŒ¸µbòqÏ“½×qص¸SNûè&!rÀ}Ô:ÂSÚpê¤oøO«ŽÎ`Ž±§Éò\ûQïèêu¤ÚS×á•RÈ|§süºÞü®w!sê¾îtÎN!ãì Ó1Z¾#f؉K­Ý~U½¼€+‘&­Ÿþø§—w¥ƒ×ÁYËf|aêM?‰/C&Ìå¥úT÷dòÃK}æìÝëü-1ƒ~”¾Ê¢qiÜ!C&jð—ñ%Ø@ÿÿÏ¡LÜYvÄ™~/5ÚÌd•}1qì2Ža§¤ÓȈwÄ™ïtÞþ¸.S~ï.5”‡6˜åFòÐl)‡P!Â]¥'ÊÈ•{Ñ{'#ˆ”œOv6‘7%1D^Yú¥’F d3Ï>°`1Gd×Ñ…)gyþºOKªÓf(f`GÃôÉ¡ÜšBêdæ˜Ù>&ÐJ:=³Ë·N:p¢‡´³Öc'=7Qãô ¯œXÅ<¶fÞÂJ²ú@ÐCáýňþìêZ 6Ía±‹Ü:Î?²]f»:5¤q³ì¢DDÐ-X„xMêjMÈ„&ê Ÿ˜œTîÚ`¨¢èJp®µÀl<øСAùIŒF%–±ÝÂÕEJýX'Í|˜Pžëʵ DØI=áòAŒÜžQ¯o Ó³·²2•!êoÎàZW2Ê Ï¨eåŠSù]UØ2}I¬‘­á6k ×Ý^`x[;í4_7a#žvà& œúæ³gÏ<:rìº'çTu@7zÑõ&¹…Ó“£2|¸}—Q ö`cØ·—L¬uòñ¦Û0/YÐÝîx:”ààhE‡M/áÇaçàè´þ¦~`ߣ¬ù2Õq?ù‚xъ·Ĭý†ì'ºÈ"O•õc8Dû:¶²á2-©Õ¶Î‹î/迬Þa6è7[¿/e1ÿQuÈ|YþÆ€pÐÁN°ée³lröÑÚüëÂã&ª-ð«êÚ†˜KÇ5^ž '\4ÚoQSçmôåR(dƒíQ;µÆœRt(oµæö³ž†PŸ…þ(pqž[SÜŒuNžÅ+žá7|c»À³âêÓx’’Ä€Þ!ñà@Þ_è¾Ë×Çt’Çé¶~öœRÂ’ùâ–ÌÅ`ŠÂôà€ %«£ÊzSÁ6„+þÔŠE#hA"– Ò.ºúð F9 ûÀóTç ÓGd¡&fo=o,åRÅ2?LÊ+†aŽ*ÇQ„œˆU~xâsWv”ý:%Ñ$ §UGF-ÝüfI=SygÛj¥Åz2É€XŠD*V˜Ì?¯ž}‡¾•ì¼Ó ʉˆè•èÐNpÌŒ¤Š1ÓŠ=V±#†¬R ü„_-Ú±Ý×Qƒ!&þÝbÁ2Qnä9e)š˜]´ŽG'êüb‚økÙuÀ{&£ä*÷Lv£{ àÍÆ›§ò2ñ¯!$:ä­#dŒh» älˆn/n¥ô/™ Õ©¾ *€¡‚!ý­õb¯X°*v<4 Óa7úÞýçy~\Lî~s®]ÎmVž[i{HϧÖ‚xÆ@šªê“rO8ew¨UËÝ´u- :Èh· 8í›V]©l½ÒfI«‹u2«x1–¦Ý “Û ² 䲟5#žòWÈi¢ºìÒĽˆºèZ…RªsŽÛ2Ó‡Š:¬²g¦çÐóB— a-\²?ÓÂädíeª}¬ nw´)ÆCÍ^QUçMݤ |Eé¡dÈÔ½3ñµ~Ò­Aüfåí/½B fëët‰ðƒËñ îpùŸ¬ˆ+;Ák¥Ka™fÉ$N…é(ƹ.c‰¿0F àÐÛuD‡s¾ÈQŽÄƒ¹©q+ž ¦¬A¹qÁeßõ”ñ\åé¶E–ÊÛª¡%}P7Ù±äêçòcÒÀnô}•Câ1wp&cÒØ3Uo»J¾Û$;®ÙÄ°· ¤‚©Ò~ÔSÎæo"º'ñ{òæk_€’g®VšuT@Z¢ÂJrÌþlÜG£Át*œù¤²±»Úâ{©bk—:Àòõ§Wh¢ã,[f¸¤uHïFÛZ¼LÂ1º(Loñ¤²ª}»'&)ßÉ= ²]±y"Gÿ_2DjMp9:˜pˆm“QËøFÕZ€v|s¹…¹údKØu‚Š¬ZÎ&“8™Ú¾+ñ¹}]ù*˜ˆ¯"odî»Ñ8%BËQµÀ¦É ‹úˆßJZ)5 „q°€qà¹k GÉz#’)4tO¿cg)¦k¶ƒ0é“¿?¬Iü¦*/½ZgTÇ7Õ¼K¹Ë~ù|6*$,ö‘g¸fŽÛ§gãiqÝÜÓ¢. íÃ1Ø)|Þ[Ð\Wxy>l´ÎŽ$7Cgyé´ÍÌí%Ù`7æ¤æb9h>lðì¡s‰ž߀2ð»P8„¾É{=¬½gOÞ1Gi Ò$FB»íQ®–¾ŒLÓoQjö†Ùñl‘–^;F#ã[ûþRôÛ¥){‚ß±]øÙTËéÂÁ^àQç·hš§Ê¦UÚÌ}ôhפqè]“Ž›rÍ_é¤-Õ­ÛÁªÍ¬Ù»ËJ=þMïgÁg#Ôa%,Z“âr7lIeéZÚÏ™ó½’ä£Óçµ£ÛñšïiFz§]o±ï÷Ì«[¦”kUšc= ü/›´ÍR¦³†ax7C#åhԙƓNBö,ò8×fM˜nxZ&ú.^3Ÿ=©\ ¦YïÌ.(ôïÊƧJa;éšFìph!¨ˆy@Š@‘#üäåóõàj@:²³~ZµÝÛ{^>-”8Þ+=Ãe “ç…ÉZ–çÝ5<7eŒÀ3÷BÏ¥Mvßg©H´Ö]S[eí¥^‘£UæЋªOÌ%ð4@Îw ¸/“Ì€]#UM–@æ©(Jé•’æǽ>‡¸%‰ÕEJñBj8±+m®«×%êÞÍ­êˆÇuzO!~P¦T¶´…ô'=Zڎ˯æk^¤KÞŒÎUéÔI²N–d=̪šÂzFöô¡{-x”<±¢(yYð ´Ï…c¶õÜ(_·FQBj£0y‚+ íf¢IˆŽØ5ËG b¨N>XÉ°'´ ®cµ%¢ºgpƒNPˆJÒ]ÑœªÇâ&LqŽCv„#ò€ ç{2w Ëz”ࢠ¼QJ þ¡Ìƒ5 ‡¹`¦]bqÃcîKtC»PCÈÐL;ظ&Ø n¯åÛ‘Ž™G^5¡ãÔß!+ñ–Pâ4K#Ÿ/m ú2FvÀ¬V*#4jBî\8h#uãé}|» 8X ÛRq _}]'”yãD›ÚwdÞÀ^€tE€¿o4ÛçŠbÕ‰_tChü-Ø vÐÈ o°À­ùštCØÌyç…,‡É8‰§]ŽÑLGÉÂs›½’3¬›Æ“¥Û^­/¥î¨'°·)oÔG*^8q› Ñ‹gI–1¬¢Iœ¦¼~Ú xYÅ7(Å,ç±eÈŽƒä8 ZgÛ_äBt™› $í™IZâv—㲺°„Qsã¶÷ÿò•ãë5T.ñùl½|[Éõ>tŒýçÜb=Q%>çkŒã¾n¯ü¶ðµ~[˜{C}ôȽ£z¯/*º²´Ý‘á•™-E='×_œ¡û%o5sùG‡ÇùÍvOãt»RÁ(nYµ/§%[bÞHQãô;¤7HƒÐHÎRÒ*Ó)÷7óPqµ˜õ£8óïü¹ÚZ E›¶¯’O£7Ž}#>Bâ, gc-üa¾·ôêý¨•ˆõ‡P°ÇP©¸£X6ó"*Ünhí“äŸ ÀZ¢Å|<`“ɃÉÚ1ÞæØK:æ’XÞ£¡ÊÞ´ rA"lΛ¢¤mÀßuvlÐ9\¼*t!’“B‚=•ßÆ3öØ®Unqž×…Š’kÆ®;õ:äRæëLèKßZÄN0ð÷ \"Ói¯zõ­™ÃÙ™ò$ã¯'c¥”.PÍâ­É Ù}al/ÔÈb€LÅ •4¨#Å+)ñ$J˜’óO— 6ƒO5|ÌkpÓ¬ƒmí?|Iùk%h¤˜/ä´ø}Äó‰ñõä«,€Èê÷àû0µdzå^|/›ö½Þz”bÃMôw€fò–SGFš½ŽòÓCÈê–çzÚ6,èÔ}ÖVm“¾›TâP Q7w}OΟ¬9'k c~e {FÙŒ²7`ÛEi|Œô¹v¹Z<]vLö’ ¹Èep “lÜPl*ô– #evGÉ$ê]ÙZ±âw–fŽ¬jPtvø‚ÁéÛŸ*÷èί€ÜëAÊ/ $|¹f0ê*< {‘Õ ¼óâY:ôö„¬]å•F>¥ £\5@  Ý×Iö _²J½¨,FJiô6D*LÐV"M5a5z½ËÆëäÔà†÷ØÞtUèx‡°O¿BüËÿt2„.ÌØ9%‹B C/I©ø¢mz!h¡Ù(îÇ1†»ìßH?jx0PÙ DH¤²|z,×'?µáë]xI¯ÓèH-¬É»·A¾4¤Â-éÂ’›RÐ!Ÿ< üEd<³ªë’TŒ-½„ƱCEeS/Ex!÷2Up+z*\fŠªZ£UC1„ôotŽv¬ø`žûLÁ3aÙ¸X¹N$ñZ†ï¼3D½%ÞàYšøØAË¢îèzðP‚SNeBFÁDûTÌ-²¬kimÑÐa¾Qc3Ü&¢3w|™®%ö×&{iS6Åüäa]hääôß|LvuôÌ°!“¨'ž¹í¸×%šS‡VÉfe´§yÏF£¨7 °QØðSSý„¼`LQìÁ†tX‚ÌèÌ&îýn—#‘ï ~^\Èè…D'\ù\ñÇonCKe*knaN ͆R¢Ì0v]ÂLMš¬Y9µsÍ&ü.C…£ö²±“ ™ÅA1”?³Jœs M±¾„À¡4¯ÿ94p! tTÍ„és<›VâËŠ`-”X$(ÁiFg‰K#¶¥lËhÿ…ä”ÅmÎŽužÆþè¬ÆýZ×7/K:ÍÁªï¢ðïÖdÉø6Ö²ëóVÄO<‚uZO’8)‘">i]Uhwê'§ç/_uxÑ?¼‚]oõÓóöé ®èóÑ«æþ$ÆŒÎ%Nç;u!‚¶Š3 \/¾îé'%œ*V—ç tÿš{HÂ9çÝQö)é-"ŽÉLžïœl ¦6)æÈP~ŠpWÍSÌüÔŽl¡ßIx0¤—g¼FHCVªñ³Ù3µf\lqTÇ)>_H¡{ÁÁøï2C¼ç8ç4rŽcawaàgá©lËx©ñXWäHa-û™%1ï„KAóÇ09ŠÌÌEu‘Ã?‰‡[eð§á¬¼DI‚æ‹{ÁŸæT5_R¡Ðk™p@ÆqÙ÷‘q’ñ5î½Þe‰ÅO39´"Ë+áþ&öôgàKÝoþ$Û”Ûý"ŠŒ¥=4‰8¤‘P[ÕNåH€0ž“,àtX¦d>Ùùv‚D‰ç¦—óÔ½ÒK°,R’ïûâ5Ezž zÈùpÙI‰!Ô T×{3ºw+_yìÊ6Áiiu±ÔÉ·îômÞrËf.·ÖM¾r~ w³Þ¶‡+ݚǖn 6sËeL·ò9Sî鼶¶×e'wó8gÕp›l4b…gÒWmmÝÊ}•â¹-Åo—}Ìò–à02òjô²Þ¶€7—Ç_–ÃÈËs8÷*ð‡°ãaǽ;È"Ö³P¹ËH@Bá^ÕzŽtÄH#–”FØ/¢üü'eÎMöÖDóÉ,¥wDÔ@'úSŠ.IÑEŒqáÓ>'£ñõ ‰•ëW¿529^'=tQ£0y¯BÚG-[ž£Ÿ·ô®¯2(Bߢ¬€Ãéú§p-†)_¿++Ë{9HÓÌðì Y€ÿ;õ& Y‚à^w¨×諪Ӿ괃5À~Ô‹½Ùht+QØŽ L‡vhA3ššª6l3E¤Ó´ôþ(¾î ¯úY\íÝÜH±•tê!<åJ–†è¿|Ž²Û*kßV›s õP @wÜÍ”‚¯Ç—(ÆÄPÌñÅÏÀAUQð9ô‰`a*œüÉA.Fé•\ª‹…/¨¤¤‘Äë `Ó)­,A>ëŠ@0ŸõÊ 2ó Ýï@÷eäGÅe Óq9çäÖï·ùhž(¼N„7t¡²íNü>¼e¼ §NÆ*:>îœÁ’Nq ‘Ž%vPãaç2DýˆÏ‘09 `Ýu @œ…=eYŒ í§j ²“¸ÛsFÊ ŽžólRéX8©N4Òz’”2ƒÕ„CuݶãÚpHjšmv\\òѶu×.ùãÇÀihIDW” }Jn–‡RgÍ—>(2hùäØCÚ“ a–r&7›Æ3N +¶gçÏ_ÚækIf«§ÊÁ¼Ù_· "<Ù™ïбÜÞcWÆçT’Ît”k= †IvÁžuézn£þ*s›4h!EØÀÜñ°Ÿ3ð]ƒY2§$G¹£džÛ›Ë±{.ØýºïŠÇ#lkÞ dûýhÙÕ²#ý$}w6Ma…͸ùzp‡€ãw0%5©ÊAb0tßi˜ß¤ƒ>!'î9Á19•D·ƒuë/jçGdd°Ô "Î6³I®ÏtŽ¬‚,B*\¤bÓÄúœƒÒ#§K` 3íb5Œ! ›¥¾¤0dw†,žÑHE²Þ0‡O£ Ž9h#‹‘ë×<à1¡‘²e f*zg§ Q+ÁýñJ¡gÀL#-mJé¸è_ŽqLà0NFÛ¤aÑS6«õtÉ «t‡“S¶v· ÜÜŬ·¦Á†ÙÚŽ´á$”§rÌ>Ìú´žÞGpiš&´.½cH*"âs"”¼N» ‰,g Aǯý+Ä+ÇøîQà¨"Ï©YÊѾ×M1dÙXõ’u&"üˆ cΊŽ²·L©5Dú†ÄQçãÝÝ‹É¿[¬´5ÞS-Âá…:Ín=RjÖ›Óôø'zÌ,ÂhÄðVw:{T$bpt6šHt†¦ZØîéí‡Ù¤L’cŸ–’G#e‘¶îë=¡ÈÚr áL‹I6ÙäHÚÆñÆs\Â(“ŒÆÚ:í¯O×mK5Ü#€ˆA”à[­{Ò™ÎZ„7Ey7'ÝN¸Ä/pÕâ«Ñ4êß²'u)²uØhá#\§qrЬ×OÚµ£œèä4ìŽdØLçi†)ƒºWGg¯Ú4µ>Ž6:gø¸G…Ó Oú╱…½6p׿¹aåì›0'…Ì\] ßô^•¥•¼`ø3è_¢ºå S —ýOÁ|Ð<¯›¥+÷­`¹uÕŽè¨ J¯j­W¥+KèÐmâ ƒÐM1ÜІUÁM–vÿ–'k!• ¬iÿ¯êßµÎí‹·Z;í¡§ SyUme0Aò‚iÀ[B>2]¿µùó±NÆ-wjr'Ç3=s&h©)ÜevŽœ´š"’㈙Q‚‡±÷øHÓ“Rj9ÊÁof,U-ˆ’ˆD/hÓÎLž[¦f˜øüüEç¨~”Žko^!Í (ÓÐàÉæ_Ÿ!xŒUjú·E—Òt–ván@ï,èV¾×…5’¸¥Óš.i¦ÁÃ:Ï“¦GmÀAÞ§ïhC-î¿f=Àz1»|k÷ÇÝ9ÔÖ·9 ŸWhõï‘/õ"\M‹(¹Û'kÐoì ­– ö ÚõŸ²s»¡c°˜¼€)Ì;ždW$]cÆ}ž7@_aëè±<>ÿG½yš=Ä˺“^– í3ùkÓëªÔ¤»Á£Gƒ²)N=?:=yÙ9k7áv7kµÜ^lÈy‘­¢⇎£ª})S*Cµ€•=¹HujQÏ”Xµ–E¸ÍsânFá̪ñŠÃ„VÄøJ̼ýÀsX-{²­Ë¥oœèÃd8è¦tE»`· Ëç „œ% ;9ÞÌ.¢«_XvµrAÁZ¬N—Vý¾qà2@Ú‘ø¾&ÒÃz ”¹Ég él½Þþ¥HSŒÃ\·ãk… /á¾:¼5bI})ý¤ ¾ Í$ž$¨àâŠÍ¿¤«j´ñŠÇB2–õ1bØNe˜^Å ¢“E4‡"ØŠ”ýŒbØ·ÒžÂçÆE<˜‘sÅt0d“*Ò Ù¢*aTÂá,a1@——¸¬è%Ò=+³=¿&ÞU4Ö>Š\Vòå†W:ÜÐƼ.S).‚…%úé§$ë-GKrÔvq¬$œb“8±àÅ»G€Ï€Æñe›¬`P Z‚¢·NÐÊ%µx‹ ~R$^…ôÌ Â™Ñë2 :™˜ÑÂé2Ìl˜!á=…H'ÎNºVïtìYZ䆼Ž– ‡, „Ì«ÏKƒx"‘pQ©^¥"ØëçÔ\Îq%cqQ©‡4É‹‹&¿Y1#R:ÙíH²ky¶W·»ŸmÅ$“g”jmV²œ‹¾Ýl'¬šÍ»DçµÕñè/ùÌ=Ø`×Ä°ý£”‹órFÏÀM´œ7Û’& ˜®1òè\bŸºoÊv3à ‚×µæ‰û\Ìð€_8ZH"#¤P«ëO“ èÖ~;‰Ú¡‚^{ø¡Vßú æ»qq{äyѪsÈüÌüÀÏ0áŬ\Íâtiñ²+ÕrU•(j¢¹rÚÖŽžÞÄ:Ð+ŽZ›Ó EÐ…Æ`Ézô÷ªø‘kËQœŠ'{–LõþöÞ¼»ãJžƒsæ;´([$\$Ëi*HHBL|Ò’ciz@l @#Ý):Ö|ö÷nµõ€²dæ—œ‹è®ª®õÖ]Ÿ›Í•['3÷¥É`æ4 ‹„Ç)ö„4q«{aE¶’êl¦·.¡½fpâ„ ³”Œ•œ®7üÛ¾ÔXª)8cJÉj`¸‘rã^º†£ŒŸO›²I墠' vÂÅV0è9®æŸr*Õ»i¯ ÖÜVa»ë^ª4Öô°)ø"@š÷î¦ ÄóXc2Sö¯€{,,`¬½*¶«"®+CmLßÀÌ…Ò„Q'{t†QÇt ³Ùa¦SŠæ¦ðëì+ ß Ù§5˜k·!q'‡èÙ8˜c¤þb>d~§Òi†2ìssÊŽŠVjô1_¬žs#Õz~ (`AùëÂdŒ)HR™na¡òWu7ÚU<J;p1#ñ½5´qC—œ‚:¡µ®7#rÚy",)¼7ÙQD:ÁÄ‹ÄštnEͼšÖ9JçAbµTqEÛ£f÷MûÔxra³×E•¦&p@&KäF |KõEïȼSIß*:í'Ã`®)ú ÈUµ}O±9*å0û~(ë`Èh0ve ú†Ø—WÏm_ |ãc~<†oéŸÎ=Ç› B‰ªQ>§öµ†3òªÝNÞˆ4†ÏR¨7?UÉÞ±µz9A¾˜uïû߀ּ«|&HjÅI6ZаQßµº§~ïâð°Õëá½ÅôKâ·¬áÊ̘ðt{Ú.NÿéWufî=Œøó/5•z¶¬É$mÛM¦åìsJÛ~¦Á8ÿ1¶ùâ»ÒýWª°Œ½Dk­ÏÊͼ6ÜÒs¶'[í¸œZ²A‘–MýÞ/näÝJVvc1ÝÔsfÕ¥Iæpf¶ªª“‹£”³ÉKÕéÕ6`w싳~+’ý™¤ÔÙ| V‚•2ø¾¸Ýžqñ´\Ä‘Œ{åÿ´˜~Ø¿ÓÑqSMUõnZAÏÖÜ–Ã'vNXÑ‘öðkå»!Ïv4Í™»’Ë¿±±gζ?~ùvÃÂ/«¹‹w=Ò¿ÿ å¯Zjã7Z‡*ž¤âU¨-Ëžãºõ«Lô LÀ§èø s·¾oöÎÝÉÙ>>éÿõéÑq=8í4øâèå±½pòÈ«.k±Vu’PoîÔÔ ™Ë<át²súÊ«âÈÎÚÞ#§W5%[ß:ë´Oác ¦ÖÖí´Û¦W-è³ÌnLj3¯>ò2]2Ù×(M Hx„aÖÀÈ>ª F’HàÙÚgÇÍöi¦>¯ ·§ï¿:n¿8ô}á5.=ýÄûÖÛE]›y¼Î.ú,©''m Ï\Ð` â‘õFã¨? àC‰þdZÓ !ÒZΖݻ‚;IÃѵÏnIÖS+‡rÒDP"¡‘íì5‰3ó¿owŽšì2ByPI;ëf:±äŠÂNö©ÛG™PÕÐËn«‚‘2óú¢›ypvñ¶V“ùŒ¿Há ¤‘Òå®7`OfQ –ozOgÒ1ºœ{¼b:OŒê¹FÛ`¼se'#ÿÀ¤èGs„þZ̆è£)ºsKâ©)|Ÿ(¡M1QJʘqL‚i€Í²,¬” îàO…é|ZßDgÓt)çR2|@íÊ9Éy6¹Õ»ÂÞ\…¤^¸ Ó2ðÉ@Pµ±qw¸˜ôI`š¢, :à/b˜Œ« ‰Ãá|®üîXk%Ó3’3º“‚‘€˜PaR¢S@H 3²Ê~*˜–Óh² …÷Ô8­ãK}îŒÙE ˜:þëæ÷-—À‡¯‘¶8Pб«} ç=–ÚÃCmXZ²yß>mŸ·›Çí¿¶ºû&$…vÉ ¥´þP6øpØ¿#xxŠ²VÛhÌÙ' ºY4äêƒÂq‘}ƒGÖkY©tQÑ?™ÍoŸ—«Qf6XhÒ¸•Ù§†âonÇاÅDxÏ&`(@ õ^f¬¶‹öRŠ›¶É 3фͨ’¿‰5l ̆îœ.::Â2û¯ÁõËœ:{æR‚zôfGw%gAz>;j‚ œa÷¼(Ö†ÂqÐa¼&òQ—Š­Ó#<ðÒr!ÕÓx.– ·)gºØTÅ´À0Øa”ÂÔ’Ï4ºQ#lŠ²^ʇÇÒ)Çñ/Òâx7±·HÙ†®E<}TÒ2 )1¥ihäü¬]—éÕw“¾Å,¸±´/‚Ýaˆ.o®6¦x¸]†|;ç¢ä÷‰†£÷ù ÇíÓÜñrjèíߚ̢D¼Ç ÜÀÝA_vžÖ‘Çj7Ÿì²…=R ]ó§,G7nµíAAèY¢4]þœ@Æq"×À~Eu©°–Ÿ!áææð¬tFªË¶Péæ+Úz¸o›GÝÏ©vqúÝiçÍéêQ7?§"~°óâ/ú„83Õ»8íô¾BŠø9óUËQK¢‰§ÿUëü°szÞz{žµý,ˆÍü8w­?è ¤‘rÅRÔ£â áèbÓHic“àÆO‚á~þ¾?(1©õ‘°<âi—®XçÑ!Žµd’q  §¸ú­¦c$Ѹî7ÛÂóÇí÷¥KŒç•œßX;9O2ƒ¤ŠM|ÉD®”Q–iìÕˆ»†ÒT‚{¥òÏßEÇK²Dª"jš\N:".ìIiL¹lîWÎ@ÙÚ쨼òfçÚ¸XZ‚‘=ƒ”­`Ë+Úõ6WZÚ¯L̨DkÒ³IŒ7wìOí49eøî¡O.˜û™Ä]®³¤®ê0 Wv>(eË°1ô¤’µ P¡NÊ¡&@”)¬?™]ݦx=)”½4r/; £6· eÉœÐq+¼–qÊŠÔ‘·3¥åš*î‡0eþ×Áêò´oN:(7ÇVÑW¨gœ[†º–]'ÉI¦zv–»)ÆÏòžÁ¼AÁuüAÄÞìr Süx¨5í…À" f/YQÔÀ‡[ @«Ò<Å—èvËŽÄBôš>l*LnÓ°|N6ÔWœ‹Ñ’Ї#6e°¥)aôÚYÙÑ;Ó ×¢„fÔ¾Ùä¶]S2KØÉ2ºhZdÀ›¬%hßùLn+ØGYlF™žý:[—»ÿÁ¬8—bñˆ,ãX¡Ð˜»Ê­iùŠŸ\¡¢hÃ[[dý À]ÖanÙð úí®©ñt±çÚéÑAÖÐ-öïš•iѪ|Ç[5—)AÜG.46©èñQ÷ŽŒw-Ý+õ›’Jo£N÷qm?×í­mù¶žyHoZ~¯Õì¾.j+·Jst²‡zFzP€äßM,nšmÈÐÈ»E ùc‡&Mq;°ª3 tzŸt~;‘5¡rœƒ1}ÊHèÚµ•2±Çû “5óÕGÖ^¬iö©v—EÄ-ç¡L!SÍlqû£DzÁ¯{ÂÏ»”~߆™Pk¤x'pÌj8¢P«›p˜[ îÁÜVêHo=Kd~+è@Ñtë¢U¤gqÛ¦fŒ’\¤žß œ|®Ã©a²+ðc¼É z…€ty7 1sFÜÅ1Âjê×ȶ±Î •Iaß½Ø?;$/K Ĥ͇ m˸GàýK?G>*„ 3Ü(˜E63cl[øáéH}@Ù½¼Fc̨÷ÅeS~½³c'ªPöËe¡,M5´ôSVW¿F—©´”×Èi~;v©AR£±Â³9ŒŠAEq‹©xòª½p~1(#­ÚxIžxÕb=Q6塀 ï" ¾*Âb¯0ž0м+qÂõ¡¸H̯`Ÿä3+\#9ËPÝPSÒŽ¤¦)D.·‹+‰O£Ì̘¥ÅŠRk_Ú!¥úM`3öëQÙM_(t‹í´‹>Ë®„o©<û&üT€7oS¼à„ÓCzÐüR{cEÞš˜×Ñ ,Èû°Ð@/Ñ'w<¬ÖTSHÌÀR+¨>K…~×`àKìhÞµ|òÁ»™Œ$ ~Nû’“ þ$$*Œd´$xíŠU€°¶/ÄîÌ)o€gx"ÓP؆ØýEº¶ó~ A™ƒ®9„Ê)RÈ@H¸9‚eðyŒ8Ñ÷]-Qö• ËU°bËiì—Ç^¦‘¥KXþQ–|ø@÷þ±·r¨nq´î-h.TnÈÍa‡ü„8xÚðºzE ~,†Åáëí)þdp’UéÙt—Mè{~à,i–YùM8þ¯%ð<é´š¼ô›æ'¯e=»oë'Œkþzp/Ÿc5}\uÀ’O@LîxÿªÁŸ4ð‘›DPÑ^bÉçK˘)mZ<(±¨¨ <(Oî¢0ùÕÒÆ$H?hö¦ÀkÛ|¤sÖ:}Ñ;ò/tË$”)ëf[tÞž6köj& :qdx:Ÿ‘{ {¬ÃÐ^{A"âÒMÞФ»B< Q”ñ­d…sœ°ç1ŽÝ4’ƼQ€0,€xW#¸vŒ`Ñ»q÷zþµÊÎ~]¥ò#¤Hô¢!WzÃò(rÁ/‡ ÊO“HGØ­ÂEZgP_>š"{_°œ¬ÍB”ÎtÄ;‰¹ïv&È»?‰£ÙNÀˆ¤Øa8©”A­ž›U2؃~hÀ…^çN‹nû­›I”©®ɪøóÔ½íº÷€»EÆ Ê= ²`L'Ž¤aÓP47'\_ÚJþƒ:¹,ƒL~O“¢d«÷sÚ!Q ;äêE¡ìõ-ŽÑ1µuï÷—U±"QlSVNŸZüµ¼JO>žÓª¯ãJÁ²ÙóŸ-Ô–·_Ú³CðÌg’úÁÈékèJkðrLÝû¡*o×öï6bÑÓ¯Ûõ{ËýÖ‡‹ðκ!‰þCñ¬QmÒ´¡!’1Y|l±˜Ý‡òV"}Ù ÷‘3*(p!Ñ÷°}Z^\ôÊ å–^¾É³¤¬0Ò«p§ß/0’ˆ¯”#“”Gtñ)(2¯– ·[«Ä¯ï£u–ëd~:ýûUgG«=¬ãò™£Yr”JtA[Šš‘” d|éß–ði G‹U°¦%³µÖq½ÃEw×Òóª™<­xiñ<›t"å$âA´ ãÀJÜ‹wÒýÔÄæ¯h39€jµJ‘ ®ÐIÖ‰_.#œŸ­‡ZJMO/Ž³´ó°sz´lÊzá¬HÞœX2ª,ýÏ9ÛåÙ%'õ™O%&dö÷M4=ly„º¦œË2ë>)–.*ÉšÃZÆ«9ã7oiñ$62=Vêk+É‹¥ òÑðä¦ÀÆê½^‹q1@ȵX»šååð¬@ƒëézG©,R2?=å}æ¿n5Ï„GÍ.ÌŠZÞ/î«ó.ž!»AYï‹÷ÅX™U=TŸ¶ZG½Š.ÚÖmU¯®Ð-§Êÿn>¿êû„œ$ éTrvn¥mU?§ô3ð÷ƒÌmz;pü*×HI€À]Î0l •¢BtãPX¿EWé+Éâ!9ÐDÓÊê3VsæÕ-n;ãhɲÙ#•>PU¢¶û[u›¨îª=ˆ“V¶°JI•µùärbel=*ÍÉyM`jK RFWùc Õ½7”z…s΢Æ~e‰Gƒ9lÎnÂzŽ(RRŽS†8%‡ÕXF˜K€BK\ vTiCÜÁxn¶‰¬æ‹Ëj²à8¡j÷j˜ñÍa4©üÝyUsÆ:W2/Je—±ê¿jûèv'¯ëÔ•L\^ /;]à™ŽÚ§¯üæÑQ×ïtýÓö1S„¼Õ– b.í+4L-Ô=2ÚÎ pIÆÛK©Ïù,l1ŽŸjTîs>«é í÷–§}QSoB¶oH\:Y=¸© u,.(Û‡Ãó½åÛGlÜÝ(‘3È’e¶ªÞ«9_ŒìžÖêÛ\Áx:¦‹p¿Rî¥I^¡pYù¸ÊšÚç×´dkaiô)†K!ý¹–ë*ïb'Ë‘[#[ÁR#‹¤’ GD(šâ²sYâ!¥»Ðyñ¿÷Wÿ¼ã¿8î~×»KO²·áªµŒA…~¸•…üÖU‡y'*zêTÔJkEt63ü|*¥|¯óÛJ›È$æ2ìNx®Zùd}ªüêiùͦäSÎDðI™€í¬òaD<¶Ñçb*' FPÙyêu¾c|’Ô¸}°Y“Ü,§ò‹Aòˆ„¦ GaÂZc•Y3„þ÷Ï´ñ9rF&¨5[¶ÝÉ‘îþ5Ñ×½wÉ–œÏ_’Kû󦼀Ï/H~å¸S¬“Žû76§ý9æ›p¬ÌÙL”@5âhIâEªüØpcudú¡J¤I½&ßƧ>þd—~‚è¨kW=iÁ´¬ƒ¨æ§Œ¢iŒžzSC@9RÄ7Þ4LQÈä+{’Ÿj]÷…Ï#õÆɇ>ë¨X>i°îõ€3Â;ÂÝ9>‚ýÝŽ7ï£[b4g€B^olJ‹¶+‚¹ ö•€eªÈí¡ïÄxˆU_»¤‘–G|L°Iuʉ]ò¥-G@2s7Lv«¥¼ÙŸP08¼Ëè£ÉEj€0È\…*àš¥³E"ú1+Ûx£”©!;p›æŒfÏ%(üIJ`”̉QÒVƒ'ÃVÁÐÉ«¿¨)GðY:ÿ–ƒªÝIçóÚï“™Qì(ˆŠ…~tӨؤük—õ²8‚êjß’ƒãþOJZ»ƒ†®Åb]?Hêøii»Œ)Bêi»ºP/] äQœÕU ìs³Ç¦Ú>a»0P ÃH׌¥NË«&DhýH1V0pSz‚K›È h½æ8¾&[ÚN ¥-ùüJe×”eV¾Þ·ÊÝÁlïÊØ×HeQù ü"²ÞVw³.PUá£Ì4hÖʪ…~8ZF‰oÓ~j„“Î è·*e–¹8н7@RbbôŸNJax7Øs’yµ+›Êˆ /øÂxcy‘ë´ÛZv½Âz³àÜ¥bz9»b&ל÷$eÌw"ÃpŠnãzWßÓy!\|C]"ëÙ¨³.ˆÃ ä÷M·yF€y¢&*nÇ‹ÓöÛ5ÆS4:ò4~^!ò ùc)\ƒÃ©Ô’i4‰ÆA¢áÞ¸)ƒìÂH$G9å»Æàê*í$\*ÂpÙ£•fé=2õòp$Ê}P’˜ ŒÓ¥„ûü¸¹©tØd7nÌŠ)¹dPðl‡I„¼¢T|T¬¦DJ€­­‚ È \òLPÞ–é¦ 9¬SÂ(LC qPMÁ»YL)·¼žóQÑtÆàÁus ç¢Q²‚’µ n–|ƒÒ ’“›rÖ>sj(×AЯÃZcµãµ ¡Ÿ­r½5¾ˆ£%­/.…Ì_Uˆ|qY7™•oçÚS\`a÷u S—2Bö’¢F™Bs›9àMÆÆ°ÌÐ µòŽ”H (0®¬¼M¹¾ã›à6¥ÄpAŠ@n™ÕtýŠÞP–t6Ã6HJSY$ð`Ò+Îo‚̹_- @Gý™„.P 1áa1Þök¨³¶ˆ‘>Ž¦‹„Åq1sþ "n˜~Œ±”‚¤*ASÊô§ñyJ¶ÂtÇlÍþ7£>…' øâràž… °_øž•ã´)ö3¾ü¸ÕàvÿºŠôT¨ûu‹±?s0)¹æ|Zajv¥½3fd‰«@¬ŸA“˜°¹ÐÃ!Ó@L;aÜQ‚JX¼e1Š—Ðnn>{êéS’MIÂiÇH2\¿4úH³c ¦á…®KÂRiBzÊÖG wÆ»U†¯zÑû¡'[Ý ò‘ÚvÝÝÈ HvåŒÐËJ®ØÌ%¦å~Þ[o[…gÏ{¼6s%;×µC#øP+8×W§ž:ÝÈ"áe0ˆÆÑü¶±bß#©y8a¬1˹oµjØ&ª¢‚9uIUªÎ¼ÓéñÇÀ:ŠÉ1“!KC±ØKe£6ŠÂk è<I!Û¾}ò×#îîÉÎùe„~}b_| Ç%GÑj»`sm0¦ÖâgCtijU$ò4¾ì~øS/­H°P­23”Ÿ¯› ŒÙÖ¨îyTß6gXÞYÒU¤­V¥•*Ó¬¾\e¼c5ºs2ÛáÁ‚¾ƒÇ‡”„ì®)È$ü¨(ë+£hÖJKL@¨ÞlA ï7KÃÅ0Þ¼ŒÆá¦ð¬‰#u§GæÃOá(“†á¡æ©ò„VÑ9B‡8¢HÝÇÐ÷I0öª”7Y‡°R¿àI$ÁÖàÐ…¹E³ œI2÷ ioJf,`³Ex3 ²É< ,ý™›=;W6÷iá:)"ã§Ïí Î o‹*˜,:™7¸”—…߀} Yw”«ƒUû/.^ú½¿z;Ïž|óÔàÞ“ê€õßH–¸¨djí› 3dÕðØ É*"Î4TàrÈ@³•Õ†'¿ ô+~ >ñã“í÷®7 ¹Ì ¹K"›yîs¨?d*'á½äÅëjN•Öcûã¥\&ñe5rk¬—ë:Ã7Yî„SòåxáQÏö¬ˆ>dísYÑ­0×’ÎOBÚ‘ZnüËG^so ˜r^Uß1ý jƒvÖÖ—cL£R¥ÏÁÙœEêj —ê‚ê¬÷°Äßm?µ®x< §Ü|ÇïRæK“%¾-ôÕg …u3þâŸ,3ì)›ë‹âÁ|ÌlßY»sˆA$gGÆ›y€Æ6øªü´k^¦XÓ´\÷^"úK¨þòÈ?<î`”nÍ>>dÆÀ^£<êPÕô¥frÓl—Ê>UÖŠ€pHø䕯fOrAÏ©¦xVœéoƒly H1F$–h1 ‰ÿ†„8)ÒBIðEe-££:ÞÓ °—÷(ÜjÞ”NFæ =ƒ¡ØJîkÉÁcü¬„y˜%AŠyÁñšYDäî[y€]P˜el5̹dƒgž[G`Æ“¯&ÔÌ2NIÕÞNX¸ž£°5Ôïngâü0‰6c„ypu£ÔÊ“mI>ìÞ(Z½ë=Ê}`?‡Å©£…û•nvÞ¢{E·Á—TiÝ¢6òtÊÉŸS² Éá‚;R´yÕ2ÁƒªF(™{daôXKJªQ©ïüªµ4Ó»òHåÂ.Tïb:ß+q 2÷—»kíëË+¿¿~“K°ÈÒo|#L¢ˆÙ­“þv Ì^6ý¼5B¢ h‰©êóŒe®PåŠà†¸5tÊ™%þ”Nø}ÂwÔzqñÊ?jwÏð_´Ï{æ¶Ç#‰9G¯~˜xd°qò÷T;°ÃuúŸ;À »ð&Ö}¬/ïâæsÕV6‘öèã5Á”¸o2ÕÌ:m"±3–+Mþj†Üáÿ®H$ÛbªX†gñÚ²òÑèxMbz†wÝ\åV‹ùTA©ë¡²!(Á¹ÒMÈZl:‹§C6xg?¶ý¾È{Ø… U„V.7ÝHhÌZû*‘ÝÄä:&(ï’UóÆILN¦ÁQ8 ÒMŽŒÝZ̬=afÍ;ØÎ(ˆ°£ËÇ…¿ g¤²}Ä]‘Û’¦HªšÅºÕ¥ºì”GÚ©A xV¬Þê‚ln :rd¢âUðPP2ýÉqI\!e¡á.ø9"ƒ4gè1<´ Œ/*‡Ce“¥™TsíD„¨\Bñô*uS ’$G³%öWUýËòßyÚ*3LàÞâèÖ¢~Cv»ëMš-P¿K Ò™xµþÕZûÃq$Õ%+^ÏÈÏÜ–V¼îwuE5nÓæ¢3èäÀV®,˜ë =Îíp3Œ"¥¸õÙ6¹¶rDÛ¶àD¨+è±ø¨4^$˜Šîmÿ7 ¹`ƒœ>OhCw^s6‡Q¡9¸Úú8E¦ÁB[$¤ÜnÃ;&ñüêÖûKÃ{ÇC¨±qU à¼÷šãJSog{gƒ€ZćÄ,^<™Fp9,füÁ8ý¸9 ¯É^mÆÞÜÜ4tÉÆ žlÁÝ4žÓ-J¼qn™º[»ÛÛÛ›YLíí§;_Ó¸šOÆÒÖ“†úÊ4˜7lÌP~ëÁ³ISÒ¨h» \r Á²%óùô¾4¥sèRd ‚ Ýès‹72»ˆÑìšÄÅXקTp°á‡x¦±µQZX®ø]kù¢Ûù®uje1xÝ<=:nŸ¾’Ýc'ÍÁ‰¸";Bþ±O±î/Ù7 î|‘¼×Û¦¨n~p‹ Y-xöÒP`ëæj;(ÏôÖc 1ê2žzÓQ¦š ðòa2õð4‡ÁÔŸWÕ—¼î’* m’Ž|nŒS×êžãû}ó¸}„8¼Í 9âÏÙ†zUÜ°þ~ȯÜ,eÏÕ¿÷Õ?g_éÕþŒ ¦øÉ“æ['%V÷¼çí<«¨06»°{¥ ±àðsÓE„&ôçŠ§Ò ¾òÞ­£€ °n­uêôëà:Š©’ú»¼^áu){¥¬Ö'ƒ,&u˨ü¬©!±µúHçPŽS nìƒ?>y_cõÍ~Å=\zûœÅ´Ð7Ô®„³ñí¾F®¦¾QŸ¼ê…VK„1b&$g`g# G 7*sø…© ³ÈêUt¼V¸ëëå9¿s½½⧮mìðíº'˜Ñu%s»¶+Ÿ`ÍpÏbekѼ¹ÿU§nÕ aÇ{Z)zræŸvº'Íãºõä¨ äš 2짽óÎÙYëHZU¾§B3öµîÚ Ë„tîPøé.¥>jÊ,Œ9R¹zzsrf8j¿9•{\@ÄŒK}!¾Æ"àŠeJJ˜[+–§ó]C¹ñ*³#·ã<ê¶z@[¼ÝJÅlÀë`¼uv4”uÞsØÈtÊÙ¶›‡ßyO*Æݬ`ÊòÏÄ M{À[ú ú(YqÈ”|º(Œß:€"ýA¡"˜îãòÖˆ›Ñ“‡&ß¹³Ñ<½¡p±”JÒÔµ‚¸ÿä/…¥tQÅxɾ¶¹ î=áÑ#m¬Î0Tm@…îèíRÁ?|íŸô^½&ƒOUýôÏ8kù'Íï0]À©å`•oH ÄÆQ —–æÞ1¿q IVâ~Åõh4ªõ‰²o¬*ù*Ú&¢¡ÌLBFlž·ê»tÛÃqâн_øw÷ðûìÏc¸4[¢AfìG;=HÚèÕͤ·OZ Uç´UÏŒÒrï"88]©wAi:3^j¨¢b@‰â}»aµ]8ð9>Œ9/28Õð>ÀR+?ðIΤäÖ%:`Naÿ–©—BfsÓGójAkŸ°ÂCSvf¸Æoq`–sPÖ:$rãç˯<ƒ´ðp”ŒºÝmŠ´q?õ/µ³i®¬}—³)XwF<+Ø<Å^î»uÚÅðŽIx—–ùÚTmßW醡ÎiGÅWÑù¾Õý¡8[Ê0Hàªó•ë‚O³¥¹iúb5/ÓÕ Y¹/Qdr{âÉ /!uy’{?îâà&¸%EmþÆ: ¶ ¤Î•ž/j3Ovœ•FeÿGùdòQŒXp*9èZý‚q:¥“N·ÂÁ³$ºÆn¡ˆŽ=”F9½ËÂ{=ÍG©ÄdÁ“5Ñ<Ä—Èh¥1§Í¢h`F¡ÁS– é™…vR*‚†Ç¾Ph…ÉËux©É#Ú\l;„í5¸3«ÝDqh?î~õŒ„¡Ož¦-k·¢ßõãá-Ú+ú;ût¨¯1ÎòID…ŒýV’Ð{éÇæŽÂŸ@ï8Ó§¸g½1ÉåV%­Ì;Pt–jÚ»aÝã£ÄÇp|)øúÚó…LáûÊjº”´–ñÞ/yZZ-`tr¢†÷'Ó”]o.£â¼!èyf¬ ÒºØÎWÝ»Ûu€—A‹fïh=wŸíy›;yà¥Lìut¹ÞÚv{¨c:¡&õȇÎ瀑sRˆ#ðí—vx±2Ú÷©¸[öÜÀf¯F”«F‰f¿üâérÃØrr«vyÈÙ³L†ö†é¼ÆÙ&Ö˯r=g:ÛØnîF/L)¶‡hÜHò¼/‡^õË´†Q+Ñt^KDIL5ÓQ5ÉDä7Ñ|p3S+Š+ÌÅè£ö]MàžMW°ƒî8·˜›hH¦÷™\‡é`Á“Û¸ ÷bŠI®Æµýµv–Ù±vùLBn5^úõ#Ûv­Ñ0«S0¤×OàÝOŠ 9ômíJUPàeö\¬õ× Ä̼8 ½*#]ª£j®÷Lã=Ëäl‘øÔUúQ+œGS­ iËJ¡àŸ±’Äù°{³˜oåØvóÊ!È¿—Ùô2l} Ù^¯v&qÈ*²àÂÆÈ ÎŒè¢=FèÊ(¡#)ºÈ¬Ä±â>„ hLË$fM[© E÷HŒö‚ÍŠ!ˤéK옆ìÁ¹±ÔtŠ{€ˆ|¡WP´ ÔK$$·?Æ £e¤ûK¼®ÅOŽæ“ˆ(Oô'Ñ´§O"³©\_$€•pšøáÐNnŠ…K'`²]b ô(fu¢@hb¬!謯ã4§Ö‰ 0Pˆ‰"%¤LÕh¬Pˆé_L?Lã zN_¤…ðL:‡V‹¤r­P@M€üü˜9ÿ¡ÖÂròÞg«6WÅrNÙ÷)J5å’2[œGòÁ5P÷;†x~ë%A6lI‚:]ºXJp½ Ï EüÀ”rèƒJ¯Í(PHZ Gå"ñ½i4ÂddÜÑêÕŒVFXg.JÈ ÓÅY̆z£—MÍ”ò6áǹŒ)úk1AêÀƒÍHý¯‡À’ø*—ÈEòP¶ÃFͨC/FWxôi¡iòÜÅ’9V°b”,‰o ö®µ†2®FnN0›qˆ)~qS…¸G3•štC ËLÌ6ùüÀû&Ã/ñ4ÐÎ$¬¼od®RÝï{Ú—Ô…äÍ4þø±"Ë»†sGÛk8¡jŸ29–ûœ­çJY>·µbzÅ[Lk)ìgÁœqáŸBk#þ³oÁT4¥›-D0ÿΞt^ ÎBŠÄ(&ùÝ“ŒˆÄiñ".›Jàùåb:`Q}‘Ji'‡e>)£ãh1Ð3 |n™XÈ0‚»“¹̦øR~“ ËÅ9¾¼,tÍ—ÃAßÌgÖ%Áј`“WÌâ&pÇ7@‡h+Ãw.R‘³ÕHÊúõ’ În(€|[8‹xèÌ¥ÝÔDàñp^ª5ã‰J'ŒÄ£,f`¶Fa¯ŠÒ£-¡ôg(ˆƒüÙ%wö†é’îOÅ ô¶Ô%©sÜé8¼­——oŽªµb£t^9êÏ ïÓ~ûÍîÉ“]ãðÆ¡ùÈÏɼj¶´{âg&µ¼–ع8=/®Åï–Ô=Wia’‰%`Š÷ü’zð€êÉíüòø¨z$5ô´t5g7­îÙa}¯ÏÎü7îQﯸih"¼SqvvX0ÞŠ©(¨¥'Â[1³Ù p"4ÿ;üìéçuùÙÓ_Ói¨=תÕ;­ã0¿Ží'߈Õã(œÇµ²dÖÉÇü@ ¹¶öÉ*èÎZ'«°ÞÚ'«`Ÿ²èRg@;q¤¾ï‘ÇpѾE#6ã-8Ò[ðq±¨( }öWï˜}@fÇ€]ÆMcx&Ž$i“ÃÀôó(j ’©Î4J¾È”…‡ÁÄ͸Àd“Η—œ‰4ÒÝF†HÏÁU'ׂ†WìU_õŒ ÕÙ׉dE×g;]d§×Èä?ýÍ  CzW ”hÖlj‰Â¡hàNPR`\ /`8A…¤˜Ï<˜W:,SO˜=3KTä çèŠ;6Qp”uu-›=~-.Æ؂΂é)FSЕ„¼l¶/º-å+jƒ#–º‰I‚`öß¡ôd®SÒt·A'Î’…WšÒØöjdQ#%íÖ©wˆ@Lü'ý‡ "`ƒ7RøÚ ÃªüJ¼mïOzôè8]\Û©²£ªìp•Ö­°ÖÄLk!c-ýAu@Õ`Œè ô*–Jl2ûD ƒ­½Q—‰âfAé[ÓŒCûÉÍò˜Í§£ÖM'ÃQšRã冢Hcyª³u}3>‡Kô#…Ô.ï—àÌоá7ÖUÃ~f#³>Ùq¿Qê¤ó°²È-†„dš_\ŒDèQÍèFÑÅ«Tv˜Ü˜®[üÑø}‘Ï çÑ~tÊÕSÓY~7!yËe×<ðúñh‘–‘ ÄîJPÕ-±Óo$Žº Tð5{¡yK>Í.¦ƒ+ãsÆ©à¾&'u£[7·›Ùé’¡Ü‚ñ†Ì"áÉăÁ"A‚ó¾D£ÿ†3.ÍÅXˆîbÓ”~vb­«h.ÉÙâXœ ÿ¶ˆÆ%)§î´©K‚ïšqÎ}êÜ~%‡Di^ú‚+a"9h·À‘7elÓŒy ;ÊEÎ6jC]~2í?~œ+ø­‡É7Ø|cÞŽíëñ¯+ÛBp( 9Ò]xlUg ©„®jÆ,ýî>î±w‡Ü&n'Ü=@¦n²€28Èe檫,3ù;æ]Å"×ÕPê§|Z(Ñ•¡¤ÄqQâÜâAê4%U%ØN’ÇQêPôçäô¡È4Îó /º ë¦ZoÛçÕš¡†+ tÑŒ ºtþ{ š2-‰±“ÆÈs±ÿôZ¯¾· ÜkÕ º¹·¢‹Ÿ*kZ‘)E*i™˜C*¶Óp° „ –eºÀ›”Oåê&Ƙ²H+‰“ñþNZÔx2‰ïJ5ŸE÷^žâÙ@Y›¼ÅWu'#s Ìþ0º&G±¿VÝÂ.ð¾F'ž7þ8ÒåW&^—Ý“—SƒI<Žt Vå,Á~— ï4Fowh×ÌNÍ8LâäVíL ß OMq¾=]¶úƒeQ2Mc¥‰ÔµÃÔ—‹ÓÝqr>LY&!–‹²ÆÀ£Œ!p­‘m¼?X›Ïæ‰Ê(3sYHÃåÖbû©rŸ}V (©yéÇiÇ?jõýÃæùákëdu›í^ËŽ6No'ýx¬“S¨nëe«Û:=lùG?œ6OÚ(¾þàU·?î Ó'~„<Ç”cÿ8Ì# &zJKˆ>K ¾©)ßÒ‰ïW7˜fÎóKÄxìÏÓZ”Fÿ³ªiYßÔ¿¯#Ñ­c5ˆE öhA^7¿oùíÓÃn Q­šÇöž8mµJ‡Õ*¨tð¯ålA ûáfÂ÷M6Ai½G±Pûù{+;cÃÔ·;‚ós1Âií“ãsrŽ`ÊxKüïB|m늀 ÔÐ:¨Y¢\¯s<ÊÚ1üˆtœ¼®ùÄ7r*í­¯&…¨Ò)ßÔ¦ ú+°j¯×‘ÓŸF©oyìÔöÝ”ö+ ú-Ÿ ¥}L´uqŽÉÙ ˆtšdÛŸÄ÷êÌãú”1+`Y&ü&HЛjù!(ú̧š‹ãq­ÊÓIaûârÓ¥u·&XâÑ^n:õÏ­GXʪá†Vy!8vÁœZà—xÍ(ß7r"Jmoù’†h‡DÅ€ÿf©3Û¿¨1©¡8ˆ’å³Åξä1`>lÙîcD.%wJ} }+X âŒÖƒOQH|ðR$¦Újö£//“AµÏA™T˜¤‰†³ÆÀÊ™­ó'aœŒ‚©`ô/ÛStY‘0˜K´‡ÂœB~”=è'rýö›gÞ£iô‘üéƒé3Å™n3°Ü|™K“F‰÷Öl ¢9F±¡®u[â<‡Îm4€ñˆÎV öÑ㜜›—1v›Ôô¦4]ƒéƒ&¨è†}Fžk#Ƥ÷s¦" œ;OzHÿpƒù‡¯›Mîäý½ ‚Þ hË‘Çjç$°?ºL|Xo;ÕÍòuôf6(|$£O›ÝW½÷û²=ùxÁsB@KÏ!’Ò0‚Ê'ë²Þ;kvÉÒi›¾xðl.)aÙ­ŽˆÏß¼/Å3ëÕݧÆ$k¢knèdpõì©ïÛˆ(’sss8•ÙIÅý:sß}üq[½ûÄó–ÍÑ«u{§¹¹£Ô¦3èÝŽŸ:«˜iñEï(7ëeå_v[-,oÛ7O[çM E€×™O+ƒœ›ÉÕ."–"Ü´Ù¼çÞ3®ÃÖŸ7â+IìÛ²p&îe”axfv¤Õ¢f)hïÙ\²tÄÐÉúKä¼%âk6`M”´HÉv“I M§èœ{§/»Í“VIÆäÖËXzÂ>).B|Í[ [ܪü°±$ƒ.÷•ÎHYîï<·ç ­(‘:±W/.ÚÇçíSÿEóð»ónó°UÓ·•Ò#×\Z•ùG }¶&éõÀöG˜È˜&M¦_¸xpºxeíeÐÃÉP7î/;*!‘ª©ýÒÛåg8,`Y@‚ÅKáÑ–˜Å-š¹d\êÃÝÖQ»‹Ì/ˆÏÇCf‹ŽÐGž¢ÏgqšFtÏÒåˉqK òè£ý0piÿœãù4gÅù˜‘} a“Û¹HR ãRKÕÙy$N_üë®òöõu¤‚“‘cÝÊA”å5‚êPeáBGÕ†ò²j”ôº3£®Æû7ºŒ Ý3+î Û_ðÕÞ=ð^6{-Cês‘«vq¥ÀŸ”ºÿó£,ó{æ‡9´Ù›Of¾ýÖ{ìí¤˜èÙEÿ} æ’Y+)»#ºó7ü2°¸j3=ÞÁsMÜ©  £t€ÆZMEêÅÙPUtÃSˆ9.º/;¶«V9¿µ¾'3ÃF…B³±ý¾1ˆ|Î:ó 3ÇZ‘¢5;¬¨‘ Ø÷?ŽjÜZdZÛ.½]A~Ù9ÚÐÙìt®¤7õŸZq²0È+^iÖ;áŠbBRuTªòöQMm„ºgv‚³ÚTÿÅaç쇪*ûØ)P÷¸~•>²™©í=*êž¼¢:kÎç²Å^z” §~_iRìõÌís4nÈ4_³FˆÈh5{ÇÜÙö#uµ»ì§fÔ”_×¢ýò Ù’ËYîÅÙ!¾˜ ´ËFQ=â°Jªµ„g$X&õÈ°^ÎH|Ÿ¸žë?Öj¶×Ê‹v³çín?ýÚtÎyµýÛѯ,Sp~æñL“2z’º;…ƒŠeWißÄ瓉¢[ ¤%ì¨ëAëæƒtRݘÄ×cïË/Ãþ¬þåö†·çm$Uú¸ÒüR2Dé°%Yr—2Y†PSs“„£”63J“U»­l*§M”ß›ÏÍÎxLË`i­LÂÏ{¢¶†_wÎÏ[]ÿüuóT¨÷ߺíÐ=®ªÓvQ—úñ|OŠ*Ï25ÕZ˜³­Þ/άh,uÕ\¹ÜXâpIqCB.g›ÏÕùØ7x[Š5ÞvS£Z*y*‘Ë|[ðˆ"ÌFÿ?Uü˜ˆHÑ{'Ã[J^Hv$;wµ’QmguQ6&d†mwYÅrÙî³$^/k`AvPè“Þiç‡1_ö¢\Avs‰‰rÇ=ý¤ ¿Ëñ÷ŒWc…MB6ed¬¥*ƒA™éßûp[|§\~tjH†1·Ü%Œ‚»šKŠV›Ó°H5B:™›0cüî‡tÁáf‰( ì%ü7ÐœÌ$5ŠÐ+°›Kìñcg¬Êª¤ )¯Wu›£­·ØQãÝœ Ò´¯šnìYiRÓEaUÅÑ/ ¬º–ÇsHú†ÔW&w–(ÎɽñÉqÂÁP+9­î‰œ{?Y9æ òng2z퀀QâÿdŽüOù\‘ØÕŸø!Óx=Óhîë¸ýñË·ø?ö€‘Lüô¾¶~DHQmçÛŸ–ÌÁt£€ eõ)ðà²çÞN&º“„Æ!r¸HØQÄÞéò°0™<¹² Öœ€<²$‚šÝ÷f Q%ÓDÁß¿vxÿ>¥äSNn—¡Ì,Ó2PË¿[@dk üÆ·<ïaþêÐô{?œ¼è÷|6„»X|ì‡ò(½PZï ³34i÷Å”güê÷(ÕàêÜɘšç–=õR‹Ý/‡r£JýÅåO·ß/iN'Ю¤·O§²>ð>ƒE¿á¬ÖŠµÂXµA–ØÁ÷á»í‡Nï•ò+¿tF3¬×¥wB·açôeûU-‡ú—Ü}@´Ÿ*g„Fvæ³u¿l·¼G³hV¬\˜åÖ[Øõv¶óÈ´¶CRø1äâòïKÛ;<9Âöv Ú£†“¡ÈåÊÛA\Îãó²¦ì®¡ñ|<§Fu¥÷ù”Ò¸bþ\•‡Óýâ>ÂHR ã‘µJzwÖmwšËG*mPÇLù¢žñ`ãp‰àB¾šp—…XR = |…,­Á\ ºd Ãý"…î3ÑÀ‚z°ãàÂMnIÁ‰^SÓý^ÒÁU¨5%ź©—¤½—>åª*Uö:RV¬½bì,÷²ÓC«y£˜ô5óý‚÷ܹ+N`¯fq”Ãü?T7¶€ãl!ÜÑÔÞ¨ë _—R˜Ôžo(iî[` AnÕ¿ŸHÕ’+ÊêSÅþÖ·wÙsV—5<ËGì‚ „%²èåÓæÞÓÆEZ:¦Fc\¾pnÚÄçË¿ÃÎ è\C|î,ž…SfñƒdNÎv»Dï6YÿüÜûŸ=/Ùqçì — ó,Iddoe„´Y7xap·%ŠU¡Tíƒ$‚SŒë(sØäî½#´Oß=ò{5Óµ±µH“­~4ݲ&åçåËT]Y«Slª ]Õá $í.»êˆ˜ ÅÎtÚ½ö²•,"Šñù­óÖé÷Õã#_(áF­øoã9°*Ÿ¡åX92óþ¨ÚËΫªÇÓPåµÝorºXµiu¶n_u=®Ç9®‰ÿëÎÃéµ·jFóG^ÆBGÍìÇdÝõ(?ð1T®¨W™¡m׊§šý_²C=Ì&£†šväÍåC$À#æ¡UJˆoÕ°¤%Æ—Žõ.è$¿ç¢Nó\sïKzyï@°–fƒqŒ¡ëX³hÕ×Ù‹å;±xž,ÞÉš >Ùx´§p!mn.ã™ [xo›J¿¸ÍùÓÃU+ä6¾¹Ëõö–®lÈâª2®í‡µ²¿jî6Çèàû8¹XŸØö!FÔLäáuJd>E¿³ó0eÜ D€Ü(ºL ûË,«73\%Φ,iøÆj÷UÊ'’5«Pô[eŸ2 e&·tJA.ÃîÁ‚öäSY÷`<ÓÁdæ ˆ§§ŽÞ´ÖxÙI#V™tq¥üÓÝŽ ž‘o¿ûUñ·Ñ±fHBWáGìSȤex…Åk š$÷´=9›Ö2­Ñ†÷#1ï7îÌ,8¡°'K˜†ü¤ CiZÈWZ~`áœî¹O?eEtrGÜ]—•Î—)]C$ZìÿS”2pK…U¥-©±çÖIÀŽ'„Õï÷I7ü0õ:ß¹Èþ®ví“evÕ½Hð—¨{?­ï“’÷€óýÖñK´ð-Ó} `³˜Ìt,ã Í$;,jàÌNÚÔÿó^„#Ôf Y€*žyit¤4öå“Š¿ÔZ©–܉¥„œc* ü¹çY, âðôži¸¼c-ô’ZÚ-Û¯›O¬(¬-ÎÕ|ÖÿFƒÍ¯O»[ì¦ó±1øßüÛð¿gÏžâ¿;_µmÿ ÿûjggw÷?vvŸ<}²ûìÉÎöîlïl?{ºýÞüoúf[ÿû¿ä[*ÀÉƳ[FÞùã7ßÔñ¿ÄL4éæ_Þ‹8¼šÔ½æ8˜zðó(œ„IêÖªjPç;›ðŸ§è×õ6LbŒOfq¢<–ÑÙ•Šsz‚ä:6 ›y†-ô¢q4ÀììI0»ŠéÚ ìÂìc¯Ý çóͳ`ðý’ãɌپ’v°©ó×ížwÒëv¾oµŽ¼f~Ö½7íó×^óE¯s|qÞ:þÁ;í ÕmžžÿàµÞ‚ÜÔ뵎°¥N×kŸœ·[GøÅÓ¼‹^ lž{?t.º^çÍ©×m÷¾S_>Cç“‚ìE˜„0†Q`Zd•T9F§µ™(Q€LÃë Ö%-õôÖ›- &¯{øò:JX3EcxN„>ü¨«IB;É^ƒ­FaÚÈô“ÛÅ@mß^å@åN„!>ýÅ<ä¦Ð9¥ÏullÍnÔ%T™ß±•Uò& Í¦¿ƒÎì)ynLÛ½¸%]ŽY·ËÑéï5z]Vøp|v*ü8OÛŠ¥ó‘s¨$–A_¿ñ­D;!\.­AðOç*£4eŘ_Åœ ›ékcÀ˜'1•†³ Á°ö”ÅFPSf& {—9†î´} åS()ë¢)c êSÃ!6`´¼Æš5n“m•·\Ý—‹Ýë³3õ-Ü÷»ZКG^äâ5pÒ{Ó>=l™ì ðóÉ.Þô§~>Á¶PÁkJÖÁ¶9íôZÝïÛÜ°úúM4Æ7);é²ï‘q“M’il»ï¢³šäa-ijì\G쎊êÈÅ4^‡É<Âe¢Øœ.Ê ‰‘*&ǼmÑÊ⚧ˆ‚MÇ#Û$NRmëç>!_¤÷˜O“ÓJ,5 ïa:€ó‡§‘â0†‘VLfPoÜBó©•cSì~K14qÿ'ì(öÓŸÍB§y¸Ÿ¯Ö –WZVZ8•”Vó¼sÒ>ô/N;ÇÇ­C§“ïJq³A¶]Ya7+³iÓ0‰>f©B×Û`ìó™«Šârܯ“1æÃt¨|LªŸX©øÈ­úüâÅ‹N6ªö5Ôè•êÝ^%cáX$SŠ–¥Ï˼è÷cx$¨û&m–+P³gç]t \Ñ*gcÊ´é´ÃÍË›YVßY¬½YLñx8P«h Þª`}¹y—OóD¬ÕÍ3ubEJ>ûËj‹É†££¦%$ Èþ(8‚Ÿµõ­O¾QàÄh/p_SBIù $éÜD^õ¡ÌœÈ8†6Ã9À€®I@dU¼1ÿ¶ˆæú2’;¢7åµ ºã†°6ˆjC‰¸â‰«)0””B) E:‡9% Š†€„>(7’‘ +åxO+á ÞÍá¸À~“ ò|dÿQö/˜Wy3«{úäêk£@yW<óWCÔÆ]])` ©•þ,öºÃEBn\´è‡³êÚ”m¸ŸëqÕN‚À§?gkêtYÐ2¬3¼oRŽÎD9–;y´5耂û(ƒPó´×¶! Bu&» G‡ºÕ+y]:àç›ÏaF°ßô\uÆ}kºHex ¨¿üÙê4÷ÏZ]æ8ëÍ$.ÿVƒÑôšÆ{àQ*f¿}ú=›Å—øë6D§ÕçÕyð Di•Ÿ³AjµÞ¾g$™ýRµÏd»çRÖªšÍ¹ÌMã©LŸ¡Ç´öÞ¦Ú‰Ù\£-æÂ$ m Æh(ºåô_|`7 {€GäЧ·ÚÿIïêæÑ‘ß;îœáÑó¾ÅåËú ©}ÎzŽÞn5ÇûkKà˜9õÑ;ÐÅiìº K0[‘èRš“Sú)`NÕ” G ì,Â`FE´àcâd¾*Ÿ%ZʈQ*n7§Ç «$,‹U_ÏöŽW&4¤d–2TéLÚ¸›ÿÅ_[ÝNµZaf½Ú¬æ=&þMÍÈ&ÎHVÅ\piÏlG7 ¡Aî¡[-ß ¹†X žóÄsÎ[9ïÉÖêº: tî±]¨êÇe'‰Žð‰$^=V÷Ï6Lö r<ŽÒò)æ¼{ѵ zrþ:…Z€Û(š`ö”Ó䥄±RØ[Ögu™ª:¯Íý̧Vè>ò¹•‚y$Mû,W9:ôó'kYÎÜZSŠAíœÎgVø×­äz«˜›+"}÷קâ9ÊÎOÑÜ{z߶šdâ©\ë€~Ùmñ[[ŽÏ¾´˜7#¡å¶¤0çæe‰Y´"u¡Só›xàkX:2ÜÒÀq£*&ÞJWÇ¡Ô÷)#w0 &§ ç;;IŽSšKØÇÑ ÄÓ<ï6{µJEoŒ% © Ã’›0ù¸ÂŸTˆ)ËúkçÞÉM± ;4’…|¤‹Á•°îSÊG4žtS¼tŽÃÅ÷Ñþ¡ÎøÜHo âx4 “Rìnƒ©hR0D²t:1 xòmá;5l@ÁòÌH• m±3åúñå%sä„{%)pc|±`mƒàÐíYïð  ›K¶–™;Ûèªé¾p.Ké°°>uE”;/_öŒ5Ëäˆ%ä6ÃZªX0>ùX†9ÿ:fvÔ gý‘NZÄÅäT;æ½€MD P "Ò”«4¿È³½:ôŒœ”òw zƒÊ{TW°¢#Ò´ÒI“v¾÷¨&³F~IEîK¹‚;ë´Oå À“±ù+«ï¾W!¦Þ&~¤(îð¾¢Ô“¥7¼}Š¶%<•‹éÀãã)ç‹þ6C0^¹ÃÍEí3ãŒòµ9* N32¿ùþ­¬äRÖ¹<£,½ÔU fCÓWß)H’]/îr_¹êÉߧs¢*®iL°¶‚Ëm92X!½Âº è?uSæ¹ÛÙß#H’à6½›(äL›l€2qt¦í5šZ̆dÜ¥jÊP;2ªßãxÍi×Q@Úš)Z’p¶¨#CBÛRRíx —(i UÂðq‘Úl?‡u±4[²Àü î³Ñ•…E©¬©ÖGP õU Ø¯ƒé< QRM!¢ë@ïŠ"Ë%‹ç d‡4…Œ0%.Á ú(¶ù„\æä™2Ñ”¶‚J;šÇ>¿áÊ3„Ýâe×YK]@„\\¾ rUÑÛeˆ<á\áñšKKÒ¡ŸG8¹|#Vež+l|“p×KzQ—Ô$ãqfnêŒë2‰`”);òÏÆá4J¯ª½ÊQûh¡!Þõ÷¶Išå?ìsª¶> ÞzõSÙ sIyÄv+‚Ó Ï»M‰ø æ*â‡æ£¶þå‘ìw6à`"Ù ÈÃñC¨±ôÓ(iJôdŒb†›4ïý[ü\°B%Ðà¯õ2 »(r`/qSÔqΕî­î±UM u¢Dߤe–y©ÛMñØÏ…,˜ s³o îÁœ'j«\bŸ(òÚj*š^Çøm¢Âç{5ê5»ÜÔi<·=pX)(>$‹tA´Ïõ8f8õaÆ^X~ãf˜Ü<9¾®¼„5t$úX€ù—óÞÍ\ÙþÆXòŽÃéhNù <¥ëßxTTý™ìM£‹£k¶Odnrë2+úVK¥¶ÀÙøoT3rm?oØ„kv|µDÓ`,<ã>APÈü ÿuN‘³6Ò÷\…ÅÊ“»~¡™ÛûDˆç@¥Yœük®×4’Â<ãYÍeviÁ;žee0k|Eh– Ö·Õ$úe^Iò¯¥j ‰7Ýqá‰Õô1GÍU% 5%œ´ô •sÈÉäê¦!w±£µèWŸ?Ø«Ü:EüžW‡¶Ä‡*¦A~‹6ŸCh vAÕŽ…ÃÔNÅO'î8 0µ~ÁûÆA4A”¼QµY*¥4$‚æÞ-©±Œ•_¥b€sƒÛêZ1É‚K-úì<¤µôPH€å^•oAßÚ›¶‡Ù°Ð ô#SŽÕžÕ*T†n<‚5 qfۚߟe̸IKD.U+0ôOBþÅHª=¾vñß#rÏ2°ÙæÈ™u„e_„lÑçÆŠ—9ÍÒmë«ûÅ€¬ÿ'E¬Ø§Êç±,+Ü:Œ½`ÜØy骾•ÖR¯|‰¤x%*Ø2>a}‰‹›‚Ó{UÀzÍ~`M&=¶¨QZeÇog‚ &G­”·iþü’–úþÚD|% _€¯Ç—ñÅeÔ8SL1½ô øæÚß”3 U‡µE´“Bó6/^e}i½)YïFûMî³õn³u¹‘"NäÓÿÃ’e¹Ûô/cMÔ£Žxm¨Ü.~NfpMÌ¡”ÔPÝ>[)£èvî :øÈôÏ“h4BÔ\¥žG»GŒ Œ3ÎÁ%÷D‘:Uôj®RÕ€>©Ì+N+ ©Q)Þ†î*_S¶ »úý –z6¼ë0¡˜_Eún”X´˜¢¹£nY+L€t2µL˜ù/ 1JƵj4ÖóX×ßõ”ûû•XPOþØ#WOV’ï¬Ò|™C)?3å—Š<ìIB´ãé")Õa½8œ*vNùÚaV)Z4¡h9lØvš#<6zÙИ ýÀ˜‘x>B¹ù‡’g©¨YʨÌY¡Ö^f2MÕôÓ¢0-q£o|Åg¨«ËË4”"¯;=Z=Kbœ†3Ë5+ß¡‰¤ÚÏÔ²¸•­]$0ÙažeÝó¤Z £²Áå$;§¯`žÞnîlï>­í“QÂ,Æ9ëéäôǧ¾ù'sYïåÕ·ÈKø·.F½¶ôäNÈ óÍ# ¼Ï$ø€ æëø£²'îh›ÀB[–`‹$æ,®ôy²ésC)qBîD¦úêòô¼#?#m²Ëv¾SIGW!0rÒòÇȤlZ§,ïi‘£ŒÒe[ËB¥\½3˜êm~ ,û—ÜaŠœÜÖqF¼£u"郔5ûSŠey@][Í…}@´åˆùKŸ ÊQœøÊÍ»¤\Z„]ÿ}ó¸}„Ö9Á-æöažæ8Â?ŒRãPÏmç£-2î´âËæ©ðyóØsêm|ÑÌÙfËBZIê;T~‡)2Ÿœv”A¥+Å$TÑG³¼¸1àRĈùƒ4Ê3QºUÊö™‹DS¼búGAÀ¸é5 ð³Dïd|«¤ ’·ªzÿcà£ì-p Ì&ÕÇ_Á¡2­n·ÓE»%­>òù'­óV7õ¯ŠSIÉÿ“Ê›]•Ë™T“!Ã&óñ1¤­Õ±Óιß:í\¼zퟴN:ÝJ;vÚÙŽé×’ÿbip¹/¡¢©³®uàpQ}ˆ)V‘"Á3Vç’7fŠÙëP‰B~Oð/ú]c\g•‡þÎÎDa~dxCLè¾ +è–)jepÂ%WêdÂò쩦©µýR }SÝÐù‚Ж"‹¼“ÅhiLDÕsü ¼Œƒó º±ävM9<ˆïC þØÜ,·Û±‰ÕEW Þ·‚ái‰ßÅRý%Æ6™+„ý˜ÞÞ·;¨ŒÄ]RÕÿRpí¸o’[*%ðÂÑ#åuZ§´ŽsÆ åM\ª½‰‹Ô7ʇ%‘(Ö4ž€8JYÅo׋[S…Á—±å"×(Èý'^ãûyuCaPh±V‚fÛ„Šxɸø…NïæÒ#§h“¥à(%A=âtxò«+U/S®ã…> ¿¢Ï:0×ߊe,Š\àð±^ÕÒAe¼2ž4”Ò½ê^òÁ‡½â£;*êlÈÜf†»Cî "Ï[ ‹C™‡)ôš˜²†Mu´8+JQyŶ.ÁÈ/\ǯ “yÁÏöÛ’ÏÓy2\̪5fl©ŠßÕN„¶ž“`¥<† Sª„ãT.x º­¿ÈX=ü:eV‡`딜M]!ûÂ?¤†=kà[@<ÅèîU§J}=È]WÕbvcšç7 Z(â ¼lG>鬇i¦©®D0)ȃ+ )œ­inº,¦ÿY6{6¶:üÃ{þ„Û|±ï¦€'YÅp•„².ß ‹‡›ƒßøÒ¹µ€Ï±.÷;Î5·Ìv8­©®ý(0Ö ©6»ÂîA÷»­ÿï¢Ýmùo{GgPÎjãê9Î2ü7ƒg²&®/Å«H•`ò…„šfu \Í!éOò Ðdš”˜RY(€njÉN7‚cÑR”,Fñr¸´,³$ênÊ/Kß¾Ô.µIWn>‡ôßÿûçüOã¿'5c‚‚ßv9þëö×OŸ>Ëà¿îì<ýêßø¯ÿ ü×ßÉõë#¹þÉõˆäÊ:F_%pkx;%7a‚^m³hIJ⣢)rˉÕXxUC(]×â²N!/”ø ¸‚qÔŽêiüI¼YŤՔŠ>¤*¡²ž×¹D%}’Š“Œ¤º ÍÌÓ$™¦OL~: Pcóõ‹»;ËßwáóÏDXªeòO;þÑ1¦¿®Áìk““‹"“ôΡÛ:j½lŸ¶Ž¤¤Ó66×,!ÿøÈÓmž öüy쥋™9!²bRHöj†óña¼ùhиbxT<¤àÆ‘D8Ú5ú®ÖØÍ°Öf~baÚ˜…ýpß4¬¦^Ç7!ˆ^u¯Ãþ„úéã„FÂá1l…“E1Üõºuø½Hm[©Šœ+Å .Ç^Qbz!4ö ¦LBÄstˆSñ0UÃçá’y»„pŽ~PìNØÑÐ÷àa¿¬î5$F”דŸ::+Ö× ìžh›ÒMø0 ’£Ö&Ñp(æ"Ë‚®"7M5sHðˆH2NÏ" WÝ6CÛI5t:PúŒšÈºÛéà*‰§ÑÏâ Tp¡àÙížå$À¸ ´îéQ¯3¡Œzã±›€ãX¤ºÆãµfz•D釔QŠ öS5†Õý³Ba¡“KØj_ ë\b(ôã,e®Ìð‰<„ºÑ)+Ý&˜±pzÁ<ྪò𥤌øDF<Ä“Àw„ †³èÃL±„LÐ…é¯R,07¥~~Íÿ˜6ÑÆD"·6ºN×?n¿è6»íV¯¢“0Ò¢#6Y¢&.OµÅÝäYÕtVß$a;ù*s‚ÉÙéªÓ´jéS—OS³¥¬ÇMLVÞyã“}²ºbPk¹$ÝÈp¶óôàÀé‚§ë³ DؘñøÖðy¹#: ½ 2øU0Ã/QÏKû mWìFÃô+Å< qc¥¬Xv“4šDã€0Òý-D¶ò_^œ2œñ®õåh f;ȵc݆\á/ LÔÐeÍóýà3ýû÷-@qú’]i1Ñpv¹³…¦¢zP°Ç‹?}\öáK½À.®ÝJÑÇÑQ—ccwÝ‘ƒ]·_1쥧† ù¸X9Í‘¬B•uÎ-$\}ÎwNàö?Å›wŽ÷j>Íz-Ÿàšû¶LËEËijC3³¿Ö4`ÊaSeÝ\ƒÀ ÷ÃS¨ä!k•”½;y®õ}ê!†ßÐ)çÈŽ‚TƒÌÆécj2æJÜ¿¹ñ‰ï„3ö¢å"¨ú”ØT•š@qÇÈðE{ @ˆÅ<  YÝ$¤ôöF¾çð5ßã¼Ò”èã9ÉK„q~ÑÈÚyæbÙ¾u!óä¬_NÁdͪÊt´ê¹ôS÷PŸAùŒ|GqÀ*rV3¾ÿ·uZZÿÓÞl¾™ Ñô«ÿÙ~ºýêž|ýôÙÎÎÓmÒÿÿà ¹“6btõxøÛéWäÿzòÞýïœÿݯ¿Úý÷ùÿ'êÿÙI¼ o°—a‚Ðå¯1GN’Þ¡¨;ÞÜÝÞ)T !Æp<#Ï<¥LÆ&þ­Nþ]œBmµ²–“Ñ—,eh,¤ñX`ü³ÙàÙÓF.%':º5»oÚ§¾Ò³R³/›q£MËÞI0ð:=ï­·‰^mv¼îbJ0fÍdpÍCJµkÙG镤 ™ÍÆäàq†7åÓ?RŒÈ¡$Θ±>0ûLE‚(ßG5PJã88~u™ t™Šç`'Gl¯o4A°"0¨w’µÃl ?Sè& %˜°! °z°xPÍ÷dsµeÒšœµö&ÖÂd·$!å:E*UØgŸFPbgåt‰å=_mïÁì¢þq—¸~ƒp½y˜ên;poáǶ¾»û”]EëØì›C_Í!Ü{{àôt‰˜„ÇdŠ—s8@¬@Q/ wF¡qÖyÓêž2(ûáÙ#ýmýOvm¸õ³3´³ù휶|r­‚.¢T:ÎU|ötyÅ'»Û&ßš’ƒDb–zÔ9=G·a»zçÀXU*óÛ*£TØcÇþ’†Žâœ“ªØK š½³ýâ‡Ý’Ç/ þq÷}I­îyç„p«Gû¤ZiŸž¶º^B:ûéð<žu.©\5Ó>ãÐ3V¬XÃ{t)mj¸OY2/ÇTÖ¹°•F~I•ÞÃ÷ƒtâûð¯B …ÕñÍÏÞ—Ûõíj²SÛÀ,²ɆW¥.XyÃìl/e ×hG»„°#!m'iÚ¸ÉÙã#_[Ò—d3=¹x“÷d’´Âüm‰ìÏgæÀ«Úó\³>¤óyÊZ/.^)²Éýª“ãx¤Óèºk¬ÌpbÑòË¥æ)°õJ¢ø¥›Ïeï:1¨{QAê8˜ð[11Õ¹‚Ö)ᣚû‰}¹xCÈŒsÊ>Éø§7Í’ŠÝf‹áQC¤R[jôÃA ¬MÇ]­Sbã‘M¦Ä¤0Žã™ª+Y»„ªÁÅ®ùÆeap²\R¬Í¸6ŽHY@ó(=N7û/M§h¶€SW-3ÒápƒOWþŽÁ5E®ÎŸÇ¦.W”0%eûÍØÞ w3ª +jdÑþ+äê¾d?Iç” ˆ7ÑôÉ.ŘYVŽ>k]ã…Æe:›PâGâk)¯’Bõ…ÕëJ`!Sà›0±ó±Öm«$ÏG )+r“‡æ·i¸Ž­M•f{øN¥N¡Aƒ)5_—ŽùÁ`R7tÄ[ÃI]i‰4P<˜€ìâã’CÓ[i9+îÀ8VNÆò±ƒ« ÷÷ìöp? Ð?cAݘWÿÑOgUwÛ”ñ²2Y8Ŭ¡ ÎXGY˜Þê~HG©#3¸ãPoM/ãO;Œõî‚væº3Å=Ñ\ÉIóðuØz>lÙö;§çFXBœlm9ÝEF¼äöFÒ+½õœt ‹„`ª%ò€4/”›µ·ãÛºÓÌ 8ÆšN—Nšo½*ZÙ¨üÖá’›pŒkš¥À{Íçk¶‰ü2áü´±&éÈGqÄŸ:¾Þ¼¸Ùç¡BÊ ëÌOÁäèÐSçÕ9¹„†-{έ˗ßbz/¶¦CεLÇÅD)ÂpqªVµŽW®Ska¥UaÎ@³ðôÖP£kÕ{Ÿ}Jr ”!¨6󔌎Fò‡Lî—C⟬)¨eé.{Š€½þ®Õ=õ{‡‡­^Oqrµä¾ˆ~q|}H×õMÕ~òÍ3U›Î¡ ¶¡Š ™ç—ÇGÕ05 ÓÖ:KhDaã…y1ŠnAèwA­à£‰óZ^²¿vÉÁÚ%‡ë—ŒÖ-™®]²O3&¿ÖŠ¾ýæ™ÿìézkšüžkš|Öš&k¯i²öš&k¯i2\¿äº+•¬½¦Iߊ[d¦wY³XØÄt./üͺ]øãºw¶×.¹³vÉݵK>Y»äÓµK~U|¢DSx¤Šš©y›yµáïxÎv>瘭½zk/ÉÚ+²ö‚|µnÁgëüzÝ‚ÿ>/ëž—µJ®½@;k¯ÐÎÚK´³öí®*Ö^£Ýµ×hwí5Ú]{v×^£Ýµ×hwí5Ú]{v×^£'k¯Ñ“bzÞìž<Ù] ù ÿ¶Ô[\“Fû~òãöû%#Ä;« ì®*ðdU§« |µªÀ³U¾^Uà›Uþ¸r¢VOåʹܱ&³)ãÕ]Ɖùþ8YÕÆl°ªÁ,M̆&{“Ä+lj÷²ýö¤EŠ3 hÿøÍ3ÔGÎfÂAJ&ðÿÆžº€@ ÙHBú=KÄx%ç.9²@Î Ê·>ZB ǘ!‘" ŽZ…!G©:Û|N®fÞ朗­þîô'­œëÇóy<ñöX„j#—1BÜ/•Ó3R:«c÷<±p ˆfáK4qüøå¬þ嬆rz"9¥¥ÇuF‘1UwŸ, «ÒDÓj#@ "Õºg|£}K÷W÷®è7O-*ãf!ýäpˆBM"”¤çJµŽ/¹´ÒGr¾O81p/¦F9LP6”„dσ1aò¨Ç%Z&4Ë(åRµ¸LMÈ7xø½¿*-§•öºP”÷G-©z]­ÙþüËv¯`Åæw¤‰NY¡UólU0%ýDX3ø› Q }TNJ'o§Zb¡jXH™ÕÓªlº÷@}þÔóí@¤®¡E2z$Û `é,íˆÆçEÞ·˜ïv^Ó…gÛ€Iêr„ì“þþYPNJ3Õ¾?0j÷:¡/Hªº¥üÞ/ÂÖá á1Fòßt6uÏÌ~|g Ä7V°»¤XÎ*A«u0?v±Š´óý°Î[4Ö¸>¶ÃP¹ ™EÎŒô“Bé¨F°F£f¥¨¹ž¶Q…çÁpˆqXpìô®)T‰ ‡,à19²{Ë8@¬cÙ-ri¸Ëf²Œ,û• ž»1äâ–bhwê tw¸$Ð0^sVɾj^¶OÛ½×­£šöE1óP¼ƒ«öãšcÆ°¨¬ ƒµÖöžÕ‰,!=ÆF3&¢5T×EGâ‡bå±(8p•p8”œ:YcÐ*à|¤èä¬uv–œÔ,>‚̸ü„¹sãü¾Õ}ÑÁ(šÎ+ÿ¬Û>=YÝ8[á—CËÂ77éòÕ°4Ð=Ý[‰‰¦êþ`úU˜5Ç:,ý”o¯„ÅôÃ-I\gCõKÖˆ>Ì7°Y5Z5]æ¾ ¤“³nç¿?za'a¶9ÙŸWÁ˜¹Ä°l—wIXxzQa,LŽ@›GzyYÐDÕ=,"Qüe÷@.í¤ÙWŸlÚfÏ•æ’u\ó­m£êÙ΄¯½ Ë£9ƊΑ F"Ýâ#m—£Ù\@?]¤3tý¦×ŸöËÛu¦?t–îhYeÁzµ«hÛ!ítÎE¡dO2ÀJ #ˆÚñ-Û;®^éÚñ:üUYÌ ß¡ö%{˜š„˜\X1\ä8zZÆŽ‡üܘ÷­ *³£Î"¬.áæ8†¹nŠ¦‚ÖT—Öm¿‰uø»ËÜ´¬€ü+±¹c3öƒ+¼lÜã—½yóîšœ›#=8YÕå¤Ñ€nFÿ³Ô$/æ‡&³Ã¼²ä¾°Ð Iÿ½ìʈ…¢È^B)j%ˆ‡†} 4¤”«p8$¯þ€ò²R°GNnÑtú³,ïˆJ_šrÿ3‘9±’ÊêFÉSp4ºAùóx\Q‹#‚©¼œïbönr q¼”sf„jº&]Á9gõ&™(‘m­O©ÑÇ’,Z¦s¾Yb«¹ðDPîNUæ§}†™„¸çVÄ5Á¦pý­aøÑb©¡V/D}Šö5 @b®lñ0Ÿ7†.PäQjËtâ<ûøñOpòôwÙSE-~üé½Ù.gª†äòA¹AŸ¬Í ‰Ý BÂ_’[ ½ª ¦AÊT#&ŠWíÕ}n:£ËŽÒüÄþ³æìn“ÖãVñ&Yï¢,<3Ò·ª£ø÷&_oÁŠ?XÒü¾›VAÈa6Ôa…ßý!2` ¥ÂN³PZ 7Ó“+,›psËh ´~KÁ2†|m“K£TÐ @1NE<¢­“ÉZwòqi>p 7«É¤I°+(°à´_a¦„+HŒÁMèf$ Hiàø(…[:- ‚)¿WIÌ—rÉ (7‚U—²W²'u”5Ʀ£œtv®ôlSÒßH àR¾ ù[ÉLW¤\Xž’ϨKSíY&Ï7*Š;¡8íñ-ˆêÑ\bY#‰"Ä“Ðû9Lâ†IËdé_œåÆ|©Ç †(T„¹ùú¯´ïÔi(ô§*½ÊþÅU$q¡™¡CÌ5‡ìCÿA#žÃŒª¸$ÊÇáòæöbsÁÌRöº|O9ˆ?¤ âS(&ŸÂ/ì¦èDnãW ‰ßæN#ÆÓèº(ÂÂÞKeª"ó±ã8žñ©c²À£Çî±w/xëŒP’¦@0Õ©²û=¿Áhw¼PpF9+">[p>7[ÂåÅ L f“ÃØXf_¤®È‡©¸‡vw£^qN¥ºK/b“¬wC÷¦Ãø†ÃÈû·4Dà m (¢ œ’Ñ•¾¼–B¬ê >lʳØ]‚’<Øa½Ð‘çÍ(7ðÚ)ZŠå}>¼ 2Ý3‡ÀÎŒ;Ûˆi¿ÆâéH€NCe;‚Ý ùZæ8ßI¡çŽßµ7d$N3{÷ ~½+»ú;C[H‡—éÑr»‡þØÑûlöÖµ ‰kÍD=QwºV"ÇÓ>í†pvU–AæK3Émì=§–l¿R0÷˜FO[ó‚«RÐȾ0sb.?gÌ•·î²ÜiAþQ&]-]¬d\3AUÙQgý9–Øq?Ï›IEYnÊ%»[Î OÝù)³ß:žQøU«ÚR髬ÁZÖÞ¹–cF>ÈG)V{F™öÅÈéÂ£Ë v«³L“Y£ó ÕZÆ&v>¼²<·ò}£j^SˆxCrƒâÔ‰[YCp¸‹Xyk·O[Zè’ÙÇõš„Õ ‹aKä$'¨Ø¦J¬ M»s*á×[Uþ×éÞ ãÛhÌfßßÙ寋‹gMTM‘‚•UÅ:ªJ‘u.§µR›Œî,Ü!6ËHUáL;»I»¬œwV¸k^>­T/Îi€ÐXcæYÂK¯&ØÚˆërì>®ºX“ÒjN•±†òBÌžw&l®u.Ø>ŸK!es4ò7“Q•i·P¢Úÿ \וcõýÿŽgb‘Ñ+R˜²ÍK ‰Òr•¤Æ,Ê•©m‘Ñ~‹>‘œ§.¾‘¦„½t³;Ä#˜I×xr×QõÇw"^\jî<âfÆyã`wp…׌ù» 9›!–õS3]Elè½…¦¨/%{êߪ~’®y‘b¬¡ 9Q,#Y±‚nK!é"¾ä}‘ÿ¤ C‡ e¾ãÜ\R4êL/-èeÄæ‚ ûÛlâ~“èéìÔÆVlæ§Q©X nF•J8¸Šé?ÞF—'h#YL½‡-½66þMÚ?›þŸžûìa®9§“æw­—íãÖïÿãÙ³'_çðÿ¿Þù7ýÿ‡ÐM—‰5}CFÝÔ;=G¼·9¾Ô;‰IœÆ—sEƒ Ì„µ¹1%z:‡a1:ØA’²A º¹:G’Ía2Ç9Ê£H-Ã!Òz8ò'?ø‡go¿yVÁ¿¨òƒZåžÎí=ß $#ðžãMuâRóÆ` †G˜0£ÓõÏ:ôgž“x~îó%˜m‰0}Ü9lûP½s]©Í#ÿ° 7Uëð¢Û¢]­³në°yÞò¾xÔx[/cø—ÆÝ™üÏÒþ‰°FðEAV)}G ˆãQY.ÞIÒŠw:rÑ›«!ìwóF²èf‹)N½¨T%¤Å¯ftˆìÖýüÄ$¦Ã›oBoà«JzTbÏ“QWþ¿¼-9Ý‹ž|óÌÛŠó=.§‹Ý'n9N¢žV¸¸¼ÞÑwìÅžì‰E _?øuö23ëqÓ•ûÀ&/cL°§’{ðµAÑ£]4b7,M§Só˜@Péöñå%´I™L†èŽ(Ó~à™b•Š¾Ç©’9kª2×Í=÷ìzZ󣕕¬ïß™úþŸÏÔg¤ ëõ·é|Å«çÖ£q4‰@þwžA1¸˜ð™F™9齉¯EÚ}U*LA5M®4qr‚íÓ„Å·RLµÛt þà 3uµg$}ìÉ®ã-)¨yï* ÚA½:üá•”ðÀö®$ù²uú½zÚZÍ`¹Piÿ¸Õ<õ›§Gþ üac¹¼öv,/2)vÚ鵺߷ÝIá£ld§í·þqû»–363ëaíæiÍnýr0ó¬¹ó‰÷qZðý è´sÚ;ïœ9-ã4-(j- ûvÙŸMí¸h¼Ïüö1n5òŸ_ù'”†G™·ýÉx_%çÓ#=õÏ›ÝW­sÿ¬÷¤æ4ÿ­¤œÄž9«T”8¢À(û 㩉b(§œƒ9“IªN)ê:rŽY0¦²ÌF°ÉËùèm‰ÚÐ ‰Çãã®ÒˆO¦«8Éö†džÒ&xËð®¦üè‡ÓæIûÐ?î4Ú§¯**ÈN•v’“ÁdžÁ8Ëp„œ¤•N‡bu@Z%tN3„¹-çª|P0Ú E°Â-ÞNƒ °§¢‘v’D©!XÈGÝÖ«v®Ÿà<ÅPrÔö¹Z+ÈŸ…¨r¥ ÖÖþ®NÏE)•4J Èð!PçÖ ÃèðnXÞC\ÌFeZ3¨õ•¨PÇV‘E¦uoÜÁIvÝ‘Hn0÷·ZGþaâ1úðƒ ep©`ÞCÙx:RxpÅÁ‚ƒ`:ǨrÂ=kê©ææ¸ÙU~è>ž*t!M=óŒÿÀû»·í}‚AØ%-ì%­ìñÅ %-Ápt\H‰Î9õ†´HÌŠvPµå+Õ17‰“àÄrÀ¡ÌO»ùì©ÆUµ8WC\@¯ s4°p”ì˜qŒáÛ¬Nž¶(äÅñ‘š-c0üÔ› ¾ºpÀ½=Pžî£Þ ªO;§/Û¯Äç#+Л‡6cêvÕ\³Xç¿h~ç¿nµ_½>¯X$Òê7ÕGœ¾«øLȺµœ¤sf¤«}qñê¬Â=±˜Ìpã £W6RêãúJdnOª[ÊDl•CÄ2³ó]«uÆ3svÞíÙ}¢Ä¦Ø1A¦v˜¢óáS-‡Ï7„-cÕý©tÄŸ†Öûê°¨//ÛÀF?ñY\D?òÇa€^ï;f Þnçg»÷ºÓ=÷^¼ò_uÍÝŒ‡¾„‚Õ8nþà¿ì¶Zî½i-~¿§uÜúÃnrÃÙ¹èÖ¬ªö†“A—œÝÛ—]¡ÝÀLPÒ©‰âÄ—äÌiᔕ•ÌŸ˜£æqû¯-¿s Ót,ž3ñdÔòã)Œ¬w%ë“/–ÿÒ_šß7}ù\Ã|L ?×j†í›Eß)*e}f‹“²¼ÑxK"2€Î¹˜ÞNWI<%K3‚ o,q ´‡NĆTâ£p¢Ìc¼ÂWÞÁÚ±Õò¶kÉÆÝÛé¶ü‹Ó“æ.ΫÃÎñqëðœ/Ý×i÷ÃËK$¿ÂÕ€ÌéŸP…ƪ0æ\(ˆjîg“‘§ñª¡»Ô…-ê$c75Qxâdú‹é$˜án™ûa5-¯[Bf¡Î1rÊl/óA0?åÓó}óØá'JKy_©Fsôë(d.Ú¿ ’)§ë`Ìþ¸¥M–“ptºWmôÃùMN%é%ú5£x Ÿ*n¹ž+ GöâV‰<‘Ž3_AX~OüËiuí-ˆÒÀPÞr]ªÂW#ðÎÏ»°ã`qL’Âz¡l‡Ÿ~ë3F_LéPñ xrÝ™C,žÿº‰4ÇwšÔÛÏ"-„ƒÁqƒÉ³d‰P©Ì'æ{ÆÊ®tèzÃá[ówCág3÷ðú÷³ÿºù=yqµ ŸÐæbF·Rw  Éi*Ÿë@¹ëÅÓkuÄEÍ¢ô¯$î}@Æ d›PbÏ<”e‹¸NÖÞ›DFËl®V+ËBeõç k³¾®òKNfó[ »xy+ƒ«H‡Ï•5b]º™½C>ðöœ+x¢Îu˜$ÑP, c. GOƒÈr“uÂ2,RMEIPæøAø²›çW’û6î?X4i8··ÉÎÍŸduR²'HÃ?1¦¦•pÀŠ`v÷1â9B®z’_{E‡Šˆf¤pœ†#JÊÅ)r8›£­ ðÈ‹P[9X–0lÇ WÝüÃŽ¦Ëg@Ðâb%ꎉÖ)@ôøðÉÈK0j66^ÊŸÏŸ{OܹÅkÃ_³ê®[(™O&»}3sHÝÒ9¦Ã6å-ï u– WÝäå4U¾ú“…ÆnSw ïs™Uto1j4?èýl ¹Ý¶®û^p`õ•Q$½k.3½m~í³¾†ÿ[yˆt­Za¥Çö/ÜnV!ëå·ÙCW[ãHj²ü’cûSŒ”J;¡ý[WÙëƒ)¦¶ŸZ~FŠñiß©è IЂ@¼"JõPg¥'ˆ‹³qX7—@.wžáþÝ„­EÖÓ”Xè°~F,ÇäÉô7µðè²³ºS8ݼÿÙ104öÔ{'Í·Q goZgšÝb™Yn_â„b Äe4×±aÖ¬ÊäÇýŸÐŒ.9¯Ï¸,™Y"§ó9h+™©1ã+àñ¥½@…èëÇßé »•ÝA.W‘©ìÀ e&ÊmÖ­¸jqxBït‘ðe¯cí ¯jeéÑlSƾ«/…ÿ°Éôå}¦ª&чgE¿#*„E£B–Qj 6„ýDÅ÷ì%Ž¨ÂNG®“5yšŽ’nµ+Ìbˆ.*:ì&P¼.ó+¸ãð;Ø ð*û‚¢¸I£:dzÙ-*YsÎmBî\¡ Þhÿî5»‡ä4ó"-€¥Vjuœwàëл8I-¡PƒòA”2ú+¶xÇÓWÀoN€ZôÃA°`¤Û[½ -´…¸ŸtX¬®‘‹Œ¶/ç8$4\G$ôh_þ}AJ…)Äú*‰•b߸ý›«p"è(œåQÈII¢)[…¨@»NÙ´I9bEóÔÕûi¯J” ` È_„xD=¢$Ž§u(5H¦ê:3*Dvl£K²ñù¼£­qdëÜ­Å6ûW)x§‚Øcm¨}¶·ÆœD0][Ãeåê+2¾Hâa½©ùdoG µM¿ötb7 ¼Ù ]:ŠètO›ò(7…8zPŸ~»Ñh¬Çm]¤lö+HI•¥±Ú­'^³­ÁÕbú¡±zåÜ|!]‘|âŠÅ8îœyO··m¬–æ˜Sd¨£A¤—ž§”Ü Uæ/n܇@œ¯YeŒg3—g±“2i¦ù½$óët^"ÖáÀÕŸª{b€ÉÀ ×>_uäˆãxÈzýF!_…žÈ2ngà$:|3üá³®¬{*Ðý4¸É÷Fp’ç>†×;ߧ@¥"2"¹ˆ1§O¥:S§Õí-ïp<½×ã#o‡b%2ýF+’š5SèKLopiÆê+^Z˜µ‚Ó@¡6„‰G‹×èiȵø⧅ ÆЪ@SY$l´7ñdà†Ç“8—5…|@1êRBYPÁú3dÎS©ë–wFÉ6’6À[qzÒü|©™6S„ozU°žiŠjÑîý Î$&–#¡þu“=Àô´°W¢@šòYtú~ÝÄ[ýñcCú¾ô€ÍË©â”^lfÈ"b˜ø¯;çç­n•Þ×3BÍ#a"袴$ÕX•Ù»ªÅ2x¼ÿÙþx¹\ßK\ºQ öÄ b½¼ÒQ°Gš†qÁ^¡ÅTG-Ú±(ìZHê‡5Ù™¬¦Qx0—ãÊÞSe³—hæ¶Àü)*ÖÑWòy±—Éíׂ@æM¤Auñ¦hN%-¡ÐiÜš ¥Ö-ieÅ(Yv××ÑiaÑ©ê)”MÕÈ’e‚PæU†ólÉdíöÝ4m~æ{«N¡º÷¦Ó=²”O¶ˆUó«[¥æêny™aÐ| l^Úi¾–‡›t&×> Ÿ j¦·nwÔÑÔ‹À ŽºUÉéÿ²ÀÿóooR{ÊEXE\ ÈÞÞfùÖ}ž½ê3º+w|ö~gdžfLäB¼Š.DîóuƘÙL\¦žíÔÖÓÂn]µÑ39)W“„Ï8èŽÄfù|Th™Îj-Žè)ûΡô„°_`è£ NÉÀõÔÐEA!m*j}£­ØöâÆMãóÄ,ì“\'Þ̯'ã2¢ìx®øS^_ÒØöÅ v5B2å0b8üÜ/ höLÕ€{­·g­ÃójÎs¨NάµšººD´º½ÿÙy·šÈfÁ0®í*¢@)‹²Ó¬rÔõ_v;'X®սĢB™²týX™ÆðBùsK;‰†Ã1 è³Z²Hu`ß®‰ädMjO(èçÆg^,»b»‡®foš] ßò›G0ÜN×?m»£«enœM©×:¢jÕ«º[Ã!ªÖM|å¼(˜ïêU.}Î6m°»ÝV+×¹ü´eNŸæ¦O‰h<íÕ»/¼+ª™Ë–Ügvlvɽ.•OÃå%ÓÂQ»wv\ÍL«ÈžäNÈæs8DŽÁËn·ÿÆGÍÐéY¾ñ¥‡e Z€tQ·!u7&À)d?b¨(—z.t³z…jòêCÓ/ YÈ,³ñO¶*ùÒ ýÚœ{¼ ‡˜*¶6ÑÐBà(žZ¦*·Ok' rì†!ѳ&Y¨a‘=ñV4h –ðaSTÉ~,tQÓ¿œšYDH(W–öÌjdÕÌ t®üQL5 )¸%Pµ‡´»‘s ª¢ ž¼´ý—sÒK_!|ƒ}"~›ETøŠ¶³Õ-—Cv$u Ú.û¨ c¸øb"|í.J>Ùê¶c-zŒãŸ9üòžq€ŠùÀgöЭàô2óÑ\ë«g>•¶1H²+w™ÚUMÏãy0^Ýéœ ò8ÇZ³s>ôgËŠ.BÂùºÕ<ó/zÍW-‚îÃPãÖQ–:’šk‘â†C¬ûd¢T‰ EM¥¸ÜLƒKDÁ&|Ëšu0LÙE^%"¹Ä¬,Âùw/`Á8ÁÑÅ›ßj‹ŠfÆ¡DU»mÖ”>úÙ Î1kè#M£õq88ÅÔÆ£™>ìåY)La³uëÖSw‹­ÓŽ»É춬=ÂÛãèð!¿£˜òQnüYÕ9¨ÌtJê54‘Ù–Ðݘu83­Yo¼5³nÖ}œm:óö`ICîÌeʼ-<©kš³mدr ,;‹ØøÅ©ZÄ¿Ê%@€^Õ°Len×ò§† ‘Ìcé<¤.RÍ0D·Ö@ÙÓáH„Óx1º"Ê£"ªÄ¶FçFl^r3£i !€€Œú“ïÀ¨hÌS dSºç’Šì0„.vü¸ÀêèL­Ù¥E³Ë釞{ÛÞŸÖ!V]·›ØSjõõe§cÙá1éU 呾zN†$¸i€aQ°Z“49KïéµÉ]r +snágsÂJ>Aÿòô\ö%ànþ ŽbÂàcíýIææþ?â ÝÒªÝÈA¦#Ò ãâ¼Í©UMgÊš±Hû˜ ¬ÁI ‰ÝÜq“xÉrV åQMõØýBÝÛþxyY×s7”ÛƒýuÇ¡zúâ°söC•g®.SiÚϵ'Ï÷‹²¼Úö? ¢G¼– ´K$ [%vŽHŠ\qóD6,ç˜uv¶|«z—¬ØÞow σÑ-?VbÂÒnë]²Çcf¯p¾¥LCÖ¨î²ë*³·b.Ûˆ&Ìì°d‡µæn-Ù¯&ÕÕ}¯íÊÉIV*xäÜsI«²Iu;g­Ó½#ÿB¿×qV)y+Œ±=m;¶ªTMa€yÃ8dG4ôka <Ö€IÎfÔO “^oY¨:F7«ÄôÜ$8ß¹ð滇cãÌ/úõÈèòFùλê²I6wöW7TÐÑ¥-Ëh ›]m|&N]´³4"¦KöÏšç¯iõ«w€#,û_ÈŸ…a¦?è©? @žʉÉ1Àëo}z þ{Ø¢ßÓø†aN`‘†ÀI³&I ¶ŽÇ1$ (œ^£¬.ð!aƒ­ô˜>'ÿ,..º8ÐÒƒÓ|Ø¥#±Ü”{ü³[ƒë‚¾Û~¨Ñ¥A9ŽÒÕVa•; Cpÿºiš$âfz¦¨ÿÒ—õŒA2«Ú)ÑšX ]꜈3ÁÅØ–]”j„‰L§›$u²°f -¡~î=EâHãÇß›ÞSŠû¬Ò¼Ô6:Ž"XâÀ{JƒRÕÌF§ãLAÌÄ°êo}røåóÖÛóêBšãéúø{íåž)c˜"Ú0߇”©Ti*½W­ÓV·ÍÔuÉÄÒaéÁÈZTÒûÅ~ò¦Û>o-©¬r<ë¡'e4¿mÎV8¥UEVÅo½m÷ÎÛ§¯Võ/èö‹‹s䎺'ÍãºnÿêˆÜXÆ ;É·e¼öé÷Íãö‘BC­Z†‰Û÷$ ¼¢´A?%ÊÎÚx¦VGzÃ,ÛØøéZB¨Üa§sXçÛoO6í®ƒ<‘²÷Ey¿&Ln3džîshó5Ь!Bhî& ”Yˆ^)2–Ûyè?6—PÚ¯8fÒB×…›šaJ@Zn6pA‰ à™io#tDSALýPaäTÉUß“Ö TQ¶@Ê‹8˜okÙŒÌæZV2„ªM±Ègpæ_µÐnì·_ú''Í3šàǶ=œ,T;¢º¼û[â#nt ÈÍ!ÐWû¢3”ûOÔµ¶¹sœ¦8Æ@4,DGµ&æ>ñ"'wF«øzº '\‹P‰†nC¶žócìW ufHŠiµìšÃŒ€IcR/âYCjhõé^Æï– ñô«X è(tÁ–tßjË—ÛÅf1ó7ŒÎO¶EëF¸°E§x­Ó!~„ïbà*2Eûî¬Ã›ÍMTîYS`í8©‰U“‡ØçüóéCkR–|ð“nÉ1W²é÷óEÌ Ò\AÊKñ׊JÁ´˜ùªRÏ€¡Û 0¡R”ÄS4Ni´h¯Êò¡‰üµKNÎ^+ˆkÔ¶>ùv@d‚?Å~ϯ§p¯q‰Ÿ‰£ÿ@9 D‡7Ò\Ö&Nè¾AŸ9í Œ”YiŠ1r™?Lã›#¹UœOJÔ`C%éÜå&f®éÄ’ëÑ+\mÔ8z{"…dtάÕÍ,Šñ$›iòæªÕ88ÆzÅ\tU%1ÔTge2Ð…ržÀ2\ýýž>ÒF/ ¦èÍ0¸ ̘íqw!ÐD¨$ÍMfù°’î߬ÆÎDw]Ét0™¡G ö·®FeÒ£?ªRöó‡/7{üX³“`ÎÙjh¿îsFa(_àa_²˜¹û¶}I jYÈÊTÌ>f˜òÓ‚©¯Ø^Kf]§±tÍ9`¼¬HMT£Ò`-í@¡ÉEN<²)ðz­C„ˆ%c.f-ói”ÐÑô´ oû¼@ÈúLm¼ŒÊD\”5²°YY23±ÓHµf+›W$0@ ±T/[+ÎØæ‚z ªyHÄMËí1좼VŽÓ¿³‹§†Y\[;!®¾å‡uÝÆ#Ë侺د!ò¤ßFÍÙ;¨Y Pë\‡>£˜ªÉÈ´lx—%“Ψ¹¶ÅƒôÖ¨&Ö{ÏAÏ_¾5³‹ä¨õ²yqŒ):çþË#LïQøºÕíâëÝŒ¢°ÓÛu÷ÿIó°Ós¡zóô¨ÛicŽËWJQèTê™´%÷²¤ÃmQ¦ó!FÆ`¿¨8"3(_S#–•U3˜Á' €?NÏ$HF W» h†c6'Gtª/Áʸܶ”y Ú£TepEgw+6¦n‘šÖK lîwÏ;pàUü<®îí(/×2†V/„/½Ê6+¬rI¾IU‘ìÕ¶miVšè—ä}¨{'(,¿Òi•õ…˜ÞDx)Á'ͧ(±ÄÃïî9¿?èßz”ߢlé akdZ™·²»¼•W™VFÅ­<)kEàcs•,Að“uºõTr1vG³`¬;¯p#ú§Í“f줤v•2O-K±¨É¯Ø¥=J¦1A]•!ëM0½ £R>&%ЫE[Tî~ñç³ÈÕœvƒ®1I¨×C¸_3Æï5ã(ö-7Žnë¨ÝEׂخd}ßs÷V4/O®}°KØr¦À²vCN—Щ$Í‹°"ðɯé+¶¥Óýª¡Õlçó öˆgr p2ï¡r¢b³æÚF×äøþ×jQµZÎ[%ßÓ‚“öék ¢Ý¬È 3¥ð Ú«g‚,àÇ1#®ð"fÔ¡‰ «ÊDéì\9ˆ3eW÷®Âñ°^dqg$‹÷†'#D›ƒ¿-¢„°­! !PסJ*Ä™Ú?„Æ©Ýè ½áøk”d Q²ÈB™,¦Š÷ÈÂ0<Ñ92›˜wIÈ‚øègIÙŽ9´A+LíAˆ“\"`­…L>ÚÐ(/(‚0.þhÆÎûó˜2/i\T®æäŽ* q2EsŠšà¿ûK 1y@k¥%¥”›| nŸÕè胗ķùo|r°”õÎØÏ3f“¼E;Ëœ9âGZ¥wÓ¶ÿNçØ«Â3¤³f— Vϲ²J$µœðõIçè­1ß=ÙE¶B™D“ÅÚúa2 ÇOvÃñx£–ñ§Àš6ÕšR~Õí×ÒNÕrz<èÆYšÈGßXmSÙhë½|œwg¿ÇÀpÞzÀl¢§þF¦ÿ8eNÓð ¿QÐøfU$Òf->q½²4bŠmy¥ó²_Sßùän©œqÜì­_)âz壾))·–%ÓY»}MJW*D¹ÒºÛ 9WPÖ„žÑ Ìy®vÝ&=:ÿÒ÷­î‹ÈäÈ÷*Žmœ}áÅRªÉ\D™æ’:@†êi67»ÞÊ ­jÕqô!dc~­±žÜ'£vóJIçUµnWÞYQ°`È™HÆòohgüûŠÛ_¯ÝeDÓÝÂ%z‹Œæ¸s¬ ±èÖ--m/Ô©yyúmÅ åÛÚVøú¼ã³ÕïøMó‡^.¶¬æYrç|Ùå¤ío:ëí¬¹Õ²UÜÂ÷ÏÇf"K º¼a< §UÝFÝëø‡p ÏéøoºÓãàæÙYëô¨îm?{ö¬–”ä–¾uÍ)æìZ£—bºŽé«Þ—)‚‚¡D‹ß'U‘L&h2ëg¯^êòòa–”©sÙ·(¥:댵WÓ]ogͳE+¥0Ù“S Ú0\fac{£Ð«9L'Ù‡Êáq)JÝA«íÝ(vŒe²Rݓ昆 "òöCV$§Jn>Pr³;æÜž“¾"Ç\™¢ Z6<ŒÛWr£†NÈ úÏD¿•â&Œ° Ö¹l¡"E”ÐjW5JÑ+Õ ‰õ< WOQnŽ2-Ø4ŒŠ¨… w¤ç¨‚ ‹|*"þ´KzϾ óP”°ìJ9º89à ˜ÇÍîñ.Õ/JX&vš+?—üÏ>!Î&™ŸÏÿîáÅúçÝæa«—eîh¹Ú¹ËÊI0Ìãq5_Ç^ l:W‚²Q(U¶ÑÜóÚÊA}“õÃt›o[×hæ2!Íö%¯¶zÈžHuoçYîRÝoÉo{;ËTq/¦È{c`6žC ³ç}9£Þáo§YÌ£†%}Õ/FÁÀ_û¹UlÏy‹Adˆ~³TE(KW´j¹Ê…$­ˆŽ©”ÑÔ÷±óflëÛíÝÎͨT}îe¦Rä‹éñ~XéëoñËiœEžðÄŠ†µ­“Öéyó¸lšá’aÚ ÷ùYͬçí“–(˜ g,׈;y”ZÑ”Q×@¾Vvά:ßz_e`Þ†E,æ–ز‚IMb#¯ôØÙ0éít|4ÇOŸ·<3îq{œæÇ~ G±t) ’åãCñÚø[áú½„íˆÏÿwÑ:=ü!»x¹º÷ò®p,Ïè’¼xQ®jníL¢-o·§ÿ^}gȳ"æ…C/ÍÔY@¶3 ¹É[Èä®o ÚºÙòY›ƒ”þö +¶é=[žš´pï¢krn¿nh{á’Z°OWÜ‹êÏ¢åÈß”†à"Œ…?Œ®£4.¾4‘ò{gp‹…ú¾Ýët³²°ÒMé”V³¨‰ÜætknP ³Î~@!ÔœÙy²o,“™÷.÷çþÕt¹YZ6/b'¦6]Q 9ÒV†x¡3Hˆ¬©#=Â0Ji÷q9Á‚eD=dŽÁJaJ’LTG!ÄÕË×ãõ˯*[>·j%½ÉÌ’%ö.š¯ºÎDºWã  ý ìÁj&"a ’h†PœÏ ÑllÇmªyÜ~uŠ|%Có"p]óU'ØÊ”ñÇTÏýŸü ï¦?rèÆûFŒr¯þôk«nê/Ô¼_äÇ­ÓWç¯Ì äéG`>;øIÏSÁ)%4>|1=aZǹҿBÚZ è~«6ôÇ(Ók!ÅyËuÜyKoYXÖú^9ã([_Qjûwj,(h-p›Ëò›ÆµÎÜY·CÔÍ?n¿è6»íVϱo!ûÒ>½xëg ]Z2,l‚zŠÞ,LØÖ3‹cô<Éq/ì+Ö~AUG'„A0¸ Ù¥PŒ5æ›è¥.©M `ÇùŒÍoQ1ngªÀ9Dm«nº‰Æ ÑNVûy\ÐÔ$øM ÙêBXr@!vv”àýÙXš¯ 3ÿ½V³{øš¦î¨yÞDP÷¼–MG BÅtñÑÇëì‰R]¶¦§­ó½#g }¿uüÒ÷ó OÃy?úáø²°É{Ey™‹ ì– iUȹõ²×ƸÝËî,š›ásÈîÙ×*Ša0¾˜ÐeŒ²Æ2FûÒéÍë3xàÌY»ùìiÎ7—»\üm÷mîûŽ²C] ¿UçdÊŠ;x7'iɤ°FªÓƒ qEe£·JHÈÚXc¸aB µA¯eôç¹ %G+…AMœŠ¢‹E³ƒwæ‘ÊæF ðbqБdpp§&ÔÙ¢¦Ü¾ß1íÖ°/öbÕW΀ÝN•?|*š….c£ì—Öâeî\×0S]ÑêÄÉ”ú1øl{¾ 1´­D:µ¥¤Èo•Òë\t3ÁѾÿêôâйܘ·±SÓ´Ûvœ0cçê­¯#ƒrÈOœ”ĸVrÌ ùã“+æ#õfTyósb#ÑÃÛ>hxÁ…gãhÍÉÍŽs΋;¦¤¦Áܾ›#ŠçüЄQ‡UË×^xêÑ·îfØvWq©*Q %aäù1Î}VG/*o«ºk‘,­¯Þ¼ñ¿?zD€`êìªýõ)V¹ì¡^a^âžVSPÑïgظãÙF¥l”ÌoµOŒõ€î:˜vnVÐÌÌ,ñÕ|¹öµõF ÁdWŒ ¦IR6Š!S4í'ªÛ5ׇqB6I¥õ™Vœ5î¶^µ{x@OšíSµ§;“éÐ@æGÂŽ:­RBœ,ζºõ¸?v&X@Ùœgy9ñg?ç`s’ÍIŠ\©D“”uŸ-öêç6rª¤lõo<åx ½-C°æÛöE`Öœ¶.!K~™Úq¨Ñœ¹â‚ÏZ: ãFœyWË+¬Öžé“æÛöÉÅÉçÍ40`œ?wªíªßæF¼Îd+®ý×N6é8½t dŠ˜‘Zæ7Œo7cK‰#ýh¡#[ƒ*Y T"Áo†FW3‘ö²Ëšá†Ý`2ô_f ¦ÅlOlŒäÕÍÔFm}ƒêªeIè¼ÿ (ÐU‡úø 8Rà“vWh‚®¹^Œì)é3ê¼M, ‘A´ù`@¤U¦bûX_\åRªÍ-gâ l9ã^iGÝkëü¸ç5_´‘ÈêœÀ›)ÅHJçÙÕq~ÍF²l$Š ö|m¿œ!ä(ɡ캇žv­Á/¿}ìǃô÷‹8û—Á1€ð7 ¶ÒèWŽ25>» ¢9ÜËÈjØBk|Ûê½nÝ“&1¼ÙÈ»³Ø>7²lVÏ.¦X¸Z»Kó‹iùäßLë– e6H”¦¬Zäw› yåË;¿ÁÎJÄXWƵ×A½òŽ¶rÐ9="' ­ª{ÒKŒH!af1C]Ãì+›»`Œ[ Gq®î{ÊOc†ÙYIËH`Víšú*»ÐÕk_¼€©?õm{»Ü‹~?&ëÑ×á|´îòH\Çix?Ì7§ÌA ¦sÂ`…; ùÊ>Çqai£˜-<çT€(hÎb œO\t?œñçÊœW¨ 'Õl´0T'ĸ¶Œ­#)LMª&äI)í˜B¥¤lE¸Ÿ%Є$Ø|HJ¨rM6.³e”\gÓò^E„Tࣚ˜Éy"à·çljÔeï&0{;.͵ˆ ëăÁŒP NGD™FaafD 9"ÇEEÀ§ãÆšœ½SÉÙµøgŠp†ò3#XcÎÌýpÚPöáÜÄR ˜C˜©cç¹SdºãˆHÁè®W^~òlÉÚF66-:dßÕº¡&Ö>B=9¾ÄŽÇÀ bô3_Ì÷­ÌÁô¾çaæø?Ù;m•i ¿ò‚wrÀ½Ü¦-«­qºép²ÞY©¾ØG¢Xð)›/’‹¡šyPZuÜÁÆA²(wQ¿5s5p½EnHI—/-?ËFNûX”mïy^¯ËwPŠÖ>Ûòqã—(š÷eŸ5ó|A™Ë´ŠÆº ÂÇ:ßyê–ÃB*+òG˜*dÔj*: Ìå•0´’Nû³—©…õ€t"ºut·Ä†C^½¢õUÿPoFÊEõ­8Ûê“ bËÕ{åW±~4WÁÓ½ìÀËÚ@[B‡%­‰\yìÓ˜òRÇj~ÕÕ'W9_âê1$èŸiìuzí·\[sP±YùÕf§`tNñyz2™â﯉eɘFc{Ò;Ĩ*×TEÞó%øt +ÀúA2ö°Þ†ò¼AÆÔ¡+œ(BÍç0,ÄãÌ«²•Ö³”À…c`HWDú u°æeé î+h¿$ŒhŒ˜¡¥øXSÔ Í<¿?ì}4aäk6WX_˜}ÝNi+6ö=»`…¦ò8t»¡ó§ Eú–õ,PQ!K:ãáy,à—⎑µhH/ßlSqœ…9¬VË ¾X\ÞUaEr—îŠÛÙ/ .€¨‚$Ø2nß+¯@¼R ÊîRq5úØbQ¸{º˜¡¼ÓȤØ#¶wváw$Rىث«.¯Çêâ°bbà 4Q@ìªÚ¬ú0I0¢…Oë’P•ÇRÝ«Ÿ*9t,ZOÝ .¸ºŠ Wåoà$L] qlb®05J‘–^3œíΩ¥F̓×EÃ{WäuY«"`£é%òq¨£ƒÈ cæ˜}/™çc[ÙÜg>fkÆ­\ 6É€<¸NËY­,ÛÔÂݱ”—¬ýº©ÖŽ›S2@Ö>êLoÖ3U´òÍ4Eƒ„¼§wŒƒä~i£ðÅéqìy/Öæò‹9C€Ûʪ£›]ƒã0¸×[Å:Düª;˜³R€>Q lt5lŒu”úµñ~ûqÿ¶H|ãMÉg1›)ÎŒœ(/‰qÄ*Ä2†Ó”Ùƒ%Á„¹­]¦Gg°opRhxÆQ©4B˜=8@â„h ôÜ^&æ"² =µLÁ­=?꺤þž'š2fHþ*RÖ¼!VÿòãÎöîÓ÷EÄ…°ï(Ÿæ¹œâw8%Hg1Ÿ-æG|Ò#ôj­ø¤ïœ,Æó‘¬Ïã7púÚVÏüæáÜø±áÍËq0ZÊ&Lm\šzl{uyå…kÞ–ýóÇí÷œ˜ü}YòŽÜ0ßp;ùxûûË|gÁüÃ.øªøÊmõÇÆ—G醌Ž¿“…éÈS•Ï:áÎYÀ½þ'fäe3çe%õA¯¦öÛ“Öž¶cÁ…3Ÿßz‹œWɺ£±;‰—©^ÖõBÕÌm«¨uF|ÓÖ¨ö¦¹³Ó×ÁFPèTE%¡´“Z~]DWm&ï« ¯]&&•©˜J…O­á¦EAÇä\ÒbÀ^5†¬[‰=<þ£Àí@ ¯¸2œÿ(¨,·F®&ÏH¶šIXzÜ>m¹ŒÏæ%ð¯æ °*“ÔKk'ìÈVWê’8í꥛Þ]Ø.Ò(•ï±ª3íµºé©],·ñ2`ANÆHØ ,ßLjᜄ%ÌL½£¿¼:;ó®wÛ'5u6 õÕ ó)‡ÿ¤?×Qƒ= æuÌf<Äu*NŒTÄy—¹˜´Ô í(¶h€”å:rcØÛaˆ^Qè'áˆ{è17{8¸úþŒšhX=œ ækš@+‚_TÜ*-ÔE Æ$é:E¼D¤Vü•˜ó1nˆF›#„-ÑR¦jV{P9­Nl»äLÆKÊMJ˜üú¤5gþß5¤±—ã8 p0¶ÐÂz,È雾Ϋ”Z¡ruè9Á&È—gF¥¬ÞS5NÜF(!›±)'~ñTm,uŸÀ9Ó ƒ9eÁàÁ”w7P ¼ƒÁ\™>Õ©æ2lô>7/ZŽ¡{/ÚÜÀ0öþî0×O®{¸]÷³o8n_é¶Ü2ø™Ú"~‘0¢I^w¾"uúhéem¹ÕˆƒÎ¯LC™Ã”ëìÂjÁÊäTܱ{ܳ,$"¥r¾ôã¸ßÔ™b€6œ/|R7ã6\§J:`s0ªó L) szR*“±ÇÐ'+7Ò½¿-¢pî°ñKÖvža*¬9E¡»’jg F•Ì˜Yÿ…q™ce;ˆbþd†h¹kö0×úÔbžVY`¶:Ìë?¢Δ-QÙ|fgóÕ¡Vžñl~2¹aÜÛÍ•éD6¡3劷3L©9‰¦—ñZãä™úì©áÓË“cË íÓ—™¦mv{!õ ¤9üTØu±¶ü ô^¬Kjìó±2”—•ì©•a9£ °ÖîŸ5Ö@©¨¼,„t–­rÎ68'3ˆ:Jöç´Ü ‡AŸÔ?Yóefê“ÎFbû¡Ã$û´p™¹x é'éˆe}‰KFVžˆóÎQgBÑ­ÏG“H2¢C¸I‰-PÚFœ²†çFÚëD_Â/(Q\J÷  I‚æáAaÿ÷‰'R5tiŸÏ1 ‡ìa‘ÄÃÅÀ`ýCîâ!û/øO©yâi]{š”s1ŸÖl§ƒ#rçV[Ú&)ÅJli¥jj„Ž¦–½pÁ¬ ÔÆ’Ô榢3Å3Õõ"ßYãÔ5cÄŽ}pÏ epdíHâ!¬†Š]Ui/˜ít½8MeÆ•ª‚»È¯Órº+„f­d]aKv›$4¾~fž³›ÕÎÐnæÛηâÔ°åÄ¢é·;§Eå¢^f{X$¹~Ê$h:;캪$P®ÆÒI3äõÇÑH·5/V;MƒQ¨ýËûƒA¨öF”q€VIÉlŠ¡=½Ž?(7}¾¼a'×Z¹:gÔtÄÆÉáí65•ÚŠ¦jJN†>eÀg¼ØÝs òO}ê¸Cœ±»vf6– Ìd„|¬`¾I3ãäó´£Å.¦PQÎ䥜$³¡:xþ¿ ñèøØ5¢{˜ÄûÐI‹Ž½ „?¤B³oÙ^èñÇf•-*Dr6^è^M7 Nô«Ãåz¢“~¶)X½_ðgç»rxREÅÓîÌšbFCr©ßÄS¯CoÃêÛ gÉbº‰€Š?å×íSXeÌ quAy6Žã`xõ“ ¹k2j¹¨R¬•U½lvÀFòm¸3¨BÝí^\Y.õ…šòê#ÒšôÕ×oÿýøì°wÞ5ÿ^—R«a3Õ5TtÚÓå %{üÜu\ºšù±¼LÂPM5Íãjh 1•¦±7\°…šIÅÖ °xF‘›&°™|Ó.t¼n3×’ªj”~§ŽØ?®¤N} ¸QR8ÙªíH£µÔ”igÕ^D¸æè•Ìã œ½˜ìž¼‰]åRÚÝC 4ê3/ª ˜](‰Õ·üïàâa áèx¾V“Ü…›q )Ь»9žs\¬Šd¥í(ü,×&9w|aJØ`Õ@uc”ë–S㧬&ß5Â0[Ýx´á±Š‰ÏE‘9fã˔¾±cÙ@¨O•"a“æsY" Ûÿ¤4dq¬¼Ò´NÐw ¯8Ìü0¥‘0á¸Çþbw5Å))â€D©0£|”D+£–òÖ›Fn$‡áŒIç}Ƀ[}JŠšš£ÛlüI2jU*.ö>áÌ.’]9á˜Þk²\Búôcú2E.Ü©"Óp)nâSó‰–ÿt9ˆž¢‰0ø¨Ù¶)…+”¨§û•%Á˜T·Uu[¾t¼åŠXC›O†{èž 0âƤ¸½¼œîÄ®|²:š£ÍÔZ=vMñÙ¹1ß)î½ÛG¾I­‰[_#Û ‹s)–‡ :,y¶ƒEr‘H´=Ï8ÇQìë4ÆË}ò¼ÜCÉ%&»4¢¯ÔÛÜ,—&²}ʺ´³}•/=~\þ%1묩¦âÎÇdº3£¦†`ܯÃñ,L˜´ 莀’ö4¼ñþãL>dVÊ~ôÈþ>ÔaL]Ô‡K4™Ý®bK@ˆ|Ú<ˆ†jõ¤ù¶óâ/¯ºM –­ÞãÚ#Ñ@3Öº†Ì³ó.[šHõUò0]£I¦£í =Ñ™Åú½øk«Û‘–àÒZÑל»†Êú¹æ–NÝÝÍ¢…©• ›Õ°X™ÞâôX+ ã¹ á~ÞÅøLf&/­Óß2˜¨9Ð}p†Æ – @ånõx}¾kŸ"e‘7©¢V¶”«l©Þ @oÇ« 'á`D_*l¯*ï`¢ÒÕ_ wT±”i¦VUCå‰àZ£+uæÔM-)^GíÞáq³}bëp ›¤XD¸€ßŠ6¬AÎ+»täQÊS%Š™í‚x 7XWÎëy3¯DMn80±ŸµsË÷¬½+ëîÜe»õó­u¼°Ò7uBø{¿É9Æ¥)„.V+ÂVœ?]¸ìR<#ÅfÏ¡©êFóXmTßiý؊͵­ÛìWn¥i]kJ>o‘­¹§¶ï´ ¼ƒí^£Pë£ _ ÿ Õ[S~;ƒ+nZ—ZìEN€nî=³t8¥a³ª¿Ù˜•¼üª9ìoî—6e_Àâ(Cט —SaRÒ/Åâªù° ‚€é÷ð?û×1=— D8£¢Z¦}ÀµÌHÄU†Iu’p”­ƒŸ ®C‘Be8÷¡j£V^ÀvAI0H"Š¢¹„A§Øæ^÷ 5Z„ÍÖ'IQ‰qW‹d¾ÇØYPLóŠ·­£4Oâ)º@# ê˜Ùe2~+ßb+%ñ ×Njic½9pg¤¡¹;t+AYijþIÝ,gÈîgM‹89F1$à,?å2£òsp: ƒijÒhÏ%´†™on†ãxd4»™}!úìÜ· άé„v Õ]6;—21 e§ðzŠž¯oËô6¥<ñ´<)æÖ ·á? Ac`Íûçp4ð¤à:Ì£»y'Ê ˆ×ò¡3²8ü] æìS$}ØÆ\ŸŽ¬,u•´„¬YìR¸úrX1eÕìß…ÚqB: )r¹ŸÄ ”>2èP*gní3T(äϳ&oõž§Z­R»-Ž]Öºû3Ç%«ùbÝUÇc­JºwÙ>ÄÖÚ3roý3‰, 6E$ƶӺôÚ“ŒÃúò>Glu”¦>éÔƒâ3’(7x#¥ƒ²Ñp—J©7€ÚÂ3Æè´'¶äJ±aÕÜ£[v%Ö²A¦ ¯„0>éçoJøWº›²]æYs;ž›=‹’f9 Ó†rµ5±Àm ¯…"ûÀ"A•5÷± Fœ?V¥ >mÛ¢nÝ&O4Š@Š+Û›Ö½Z4.wÎJ6féE¶rí Ày/=22Е'õÓ¯ºø2æg‹Œ)¦ž.rün]_^1ütUa¼qzÑkeî1Ý íGÞr¾«Qóë\lëí) ò¬Ùuð ©/%÷³álM…jÿ`Ș¿Æ`ð  dÏÈì§%;jy¯LÌöÐÛ|ž9ƒUz†‚JöeÍ‘|rÓR8¡÷œ ÍÎGÙ˜©©­ÚúLr5wïÚY¨QŽüâ88>ØÔ0:‰Ô5 g].añºÖZÒQô‘­?`]]pKAf Äb0à÷’UZšÊ·€ˆÂŒlƒ×úí3Î8œŽæWùLŽY_ðö”Ï*œ†±²T…C²§Õó|Eu7vEf¯\S*çEËZ«¹˜ë8  !f2ÉĤ4ä.ÃM‘G: øÅjÔ€Žc‚¹¹Êe ; ,».jžËæjíÙVU¾3ÝŸƒ¿œÙ·'»Pç°„owiÚä–I5UùÕ “2J©‡î¶é¼öÕµ$kH¤!õgÈ• «E»nø[ùBFt,ønþF¹_jM.7&bþïŒAÎ8Æo³þ!Ìö¯ô4f ®úOÁu ª‘càï2òÜWÖx¾wÅãΕ[5lòœäì\¿Ë€­öתݣ%Þž\bÕðàÐ Çéï22nzÍAI?ŠÇÃ/WÓÕs΄ª’q³ƒ² u­D6vÚ.ë¤)²’Œ Of:¾ÁF׈ò¥vVá¹–ßðç¹Ã€ zPB(rW ÎJ’·Þ¨`oý*YÛ¶óEÚÙöÖ™ýùâ!Y%Ö:ý&ÁÖïG¬$^w VÏ–PSjå¾\À¥+þ·Õ}~àìEUqÝ{J¨dש÷«zŒ¦M¢yUûä!îûÊUr‹×6w,“ªi´h8îw2³úS<2S`åbÄ :Ì€2ó‰¶,Ùƒ%em÷ßµ–¥ä“Ca ûÒ/ã‡þãßÿû×ÿßh°ùuãicwëÅ!f€ý®…H–¿ñ7¶áÏž=Åw¾þjÛþÿ÷ô«¯ŸýÇÎOvŸ=ÙÙÞùííg;ÏþÃû_5‘2ýïÿ’ÿݧô„+*Ÿq2FVôðñcï«ÆWrzþŸ•û˜`â6^pº45UAŒÄœôÇh=K zXmlaL»äMØ€ÊÿYéþ€~/{ï¤Þ;Øn_}…/úÑ”Þ}Qíjïà>G}ë!ü‡‚Žy OåçVþ³2Rïv<õv4xÖØ5et‰ÝL ±‡ØÄ{ˆ/ ÐÁàÉîV÷aB¹oúéœz‡!îöÓ`éÁ%B9xÞfg×Ûìz›×›ðÿ‘·ùþï`4h Ò‰·ÙÆŠÒÃÚþU3 ç×nÍÛ<Æ¢ðÍš÷î?+ð6o6gIŒÿ‹”~ þ3 ðŸdpåmOÿ³ÂIèÈæFÚQV»ÓõÏ:ôgÏsV ~éÄ ð÷_šß7ý—íÓæqû¯M A†g@û;g­nó9m½ñ›ÝnóœÉÆ ÷ÚƒÎ}Q jÞŸ<ø…Püh &‰'…þºúCúŒ¿xäm¼/5ÿYù…[œÍ~³6g3Õj2h$a z´Óhw3²ÂÛ„©¼ÄºP1`¥·o1¶¨wàÁŒ™ý¤~»šCÕïI”rÑwü9| ®@öž©"qjÿ¢¸ƒdžªß’`Ý~icnàV%(¹ì8«ßJâW¿1A÷д2ìüÉx`¾cRå„U¿‡·S³ôfÚwh7‚VõÁÕ@OˆI²¢æ3m\NÇ?«6pâyÖ¿¨ÊìÁ¿5|µ÷¼Ñ6¨èM†ï†!ýéSðË~Qź5zNJ!î¾›%Ñu0( úºqUôæj `ÞÀá-*6ˆ§—Ñ^©Û”)TÎìž'=€½; Ç?¥L'všÞÙö@×dÏšqîÑ Òwj(º-ÞÌî!‘£±ùÆÛ á%5é 4}\`È{Åy‚y"Ý™Ã×0XY9û©?‹qºòõ³Ï“!Ô_çÅÛãBøŸ~:HMWð?çI… {]ðã^­eX:oët‰òšshO¼!AÅ]´&†÷:A{Öv¤gîþ´ ÃÿãAá¿ÔÍÙ­yà™bXIªfvL¦zî…gWtÒ›Vþ¥=¿ë†Ö­:Û9$Á|p%D~Ý#*õˆ¦õ‘‰Gt Ó?2ËõÈLü#CY¨,mUæ¥]‰;æ'˜z™îÉûÏÊ¿ÿðp¿#k¼„ÿÿúë§O]þû믞|ýoþÿñ¿ƒôæAús…UèÀ¦[‡(GðgcþqθäÛhò»¥^5 ù’MÁ¤Ö¨T° D‡í^óüÄ« ~Ž¸-Ƴ0!{Ji'ƒë “§g5ŒÈ3SWtÈX²˜¢Â¤Žq×2,æÕ$“ ºŽ±3óør1_kkŸ?ìdz{E˜‡ÔO’qœ÷Þ$šF¦@Š“ðo‹ñk«ˆ?Æ!Tl Èñ0¾I7'"‡Ã=¯ËBŒ‡fŒÛŽÂ)Ž4ôNzÞ÷QŠv²Þ|1ŒbïYc»î}ÿù¦±]AaV[EJ¡u[_Õ²-´I<ÏY£Rí¡û:¾xc5X÷:½]ë×é¹ûƒÝÙ yWwoŸ=-}ïÉûü‹a4‚™–i|¨#ÿ6j•Šê{cø“=J^Y£4)ÛŽ)¡-ý”+Áboª©ê"5•3³á™)h¼Õ]Â÷Ñxè›õo¤W?6·#XÙ÷vo’< Ðô‹¹QÃaf}êNËÙÉ=;ìnªnÕÝe¨ôô‚I4 êÖr'mÏ£Þ äu{C²AAWŽbÒ#oÎ è: 0¨,&ÅœN*fM*ŠŽÑsr^` rÖ¨<ܼĴƒù&úR?4›ñ ö½²Ãáx ŸîqâQ/“É' %H„>CLšýCšX! “`xQ4w1>n9¯£éâ£÷ý %Htfá{ ÷Q±÷$Ô ]éh)AÂ¥@[Ìo®aÀi?Ù|Š¬3Pÿ^ûU¯õê{øJ…îpQÐMۨζk&öT×OÀ<£nu‡ZÙÜ´±Íô 6Þ¿@Í_ôŽ¼?6¶e±¼*ì×M,;›» Ðmód§¦·_Žj/õÒx"wJ‘UZ¨+ùï{››ÌÁÈ…˜ÌTxf¥Òƒ=¼=ùæÙž§ç‰·|=†«\ykM!ÿÓ©aï>â&÷*Úl賎©‰ÒVÖȆD~ìÇhþлŠãУÓp®:ôûÃ}ýÞúÔ+ô#´f*0S´gº/+APláœAH\AE\ôüæáa«×ó¿owŽI-oÕVô#ÈænE¦…ê„KBæã*BrˆÐÈ LÉÍæÍ“]ÓÎFo‘R¾dF„”ô ÖòÑaLÑ…—ñèøøñ+--êC?>ƒ[!6Œ÷ ÐÁí'Αx€ñ1E=&ýêÈd)pZÙ8 HZ²3‹Ÿfvp_‰³Â}P4p@x6ˆ¤lœÃ-8ä 4Åå'±¡~@ÙQæáɯ!»Œ*âffG‘à=ÝaŒŽYIDi<ýh¤©±ÊÏ´³½ '{L*°×ké–‹y¿§þçÙW;»û»»ÿÖÿüì¿oXÁB}ÃÓÙ–N¢A§ñåÜR2Ü'pò)q5Ó˜Ìp;ºA ‰ìç@+ä5f<éº:ø(Üå†wýþáÙÅAóäèÙÓ þõE•Õ*÷tfÄéœ"òQ<¦”¤!i‘|æQ-Û×QxƒÞôø‘../£ˆ^OJìà÷ÀêÀÅôäBCX0Du*¼aÅ Î1“ ÖU1¬.™ ¶<2«ÓÁm£Òè]¼F°ÕÛ³þôH«ŒqøöºiôO(®Ã¬ñiÖ¬|ù%t’ÆZç8çx¯aîa¬RoÝ„,¨NUܲBaÄ^¡õdur!ìà åSœ>˜^퇛Ì+§Z†6½? ÏÓ!æ§B¯x\Å1¦á™cÊv„/Žé#J³ã÷ºp´»ŽÖm+Mø²}zx|qÔ¢_TMéZE ~ÆühXëª6­:UËšê˜Rm;ª6¢Ú¦SÇnêM‹©m'µm•že1uÌ¥Ž­Ô±:æQË6jF] |¢ÉéÝ$½øÐn•Ùº}ÝÊÚ&ÒŠ²Ý+KØûúdÌt[Kt`p—³¶ÄÑ.ëÓÎ9òüC!lñ_×Ñ<öY´yD¢{­Ã‹n˧à³në°yÞ"s¾·õ2þ‚­6[7ç_oïÀ>=’Ü /†¹Ú1:w ³ó«ðöaB{W€(@d˜‡ «™A‚+°7ÑüVWUge1j2_L¡£‡p¿F¹(…÷xz€þQ€Ô"åèÿtžL³[¦J7*š á» †;T®6 RJfy‘×ÖÞÿ‹V Ÿ^§Šc†7Ö°ß×_ÐE¢¿ši°[÷óOžiAúX^U²¦ÿÊà—·uÒ<|Ý>míÏåmÁNÙãbºÔjS?B„v 'GBîÐÛxuÑÞÀm<6jS¼Q_@Ñ’bÀ ‹—äTBK¸ÏT~oC¾ß‰G ‡“Âôn«±Þj£E¤Ì°Øÿ/izbu•ŠAg¡”ôZÙøÙ´Ëî<üƒë9š^õi>ÀÛê\œïeÈÕÿl†_á¼V˜îòë·÷öÀÿ²;û"e[øä0áùÖ•ÕdÌà+ăå°÷Gã·p¹Xâka-“¬ÿª½DŠÃ½gO¾yÊ˾­þ´¶le}?‹J±—Eå~¹—Ee•ÅZ.¸ÖD”=ŒñßPG¶1×ò]g=À\^¨S'ÆN¬ *ÎWÉ“uÌØ9¸R°rðºv–K#s‰ s–eá”S8…BPt5Iù•n!wßFö‹FœuGNô°‹7$ܲ*V„yïãõåϞé6àqcôóþÿRww-ÿçh„j¤W¿“ÿÇÓbùg端¶¿ùÿéîWO¾þý¿û·üÿ‘ÿïy[ýhº•^!%íO2\õÕé…úQóvqƒ4žî|%ÎØCÈ ‡0‹T¿IFjT‰¥b4IÃäØY–?%sÿÖ{„„Ý“`þs4úµ÷íýy4]4‚¨1‰€í.ž×½?þñ_f³Û„TþÕÃ=ÝÜÝÞyâQ/¾œß HÀKLhM4©îµ§ƒ†¢Œ(ðcÁT î{ä¶bdjT ©Å®kl{‘ ØÞ{ÚÆ .Æôßî³®àZðZOZÝÃ×ÍÓóæ‹öqûüÔè½lŸŸ¶z=ïe§ë5QyÞ>¼8nv½³‹îY§×jà pŠe¾ó]Dg{T< b-ôýÅÕ~û+F—¨€G”®„Óõ„É„D üí¿âUòÎÅácš’ý›p Dø¿²Ù܇v‘ÙUŸöP‹ m ÃÌ-"沫ÚWn=„'Ó5aIPùA™â¼-¶@—•w»NÉ43Öœp¦z¼epT¨o…ÎÈ’`ⱿnOℱ‰Ôà óF í­e¨SÛ(3*‰É4®'õ.èC »@}§‰'V›@Ç AÒ[|©áM±W<™ `Æ4T—çðí’$ÄdI¡»\Œ•ÚêMûü50Å^óôï úàŸžÿ°Oš*?i“bK”Œõ벇¡G¨<ûŒ­ëy=9=ÐEñ»¤Mš`Ò(DÛMyÈ?ÀäˆÖŠ"I’pFר¥£¸zë"¯Bqw¢ºgñ‡æÔÃ8™u:Þß^Íç³½­­›››Ò•8m¹të9ÀÊY·óªÛ<92W9k~×|ÕÒ¿¿1¸Ý9=0Ô•dlM¼Žp;[¯à@ß÷6éÞýûøã ùaÞÀº‹©÷°±¥híææU8ž=¤ÿxh¼9i€œ/ÄxÇÝw”n ûÛ¥ÿÓ/™$²jCZšó«ÔííÒ¶ð“Eç8‰pHž!”c OyŸaeàÂH㶠^cR_†d5ŽÇœ.JË`*¹ÆÄ@H˜‹ý[qðS 0lyD¢L¶ tòökÃò#€Jœ†”ص˜·DPÓ¹œ#œ†Mh¦bÈ÷~ÓI²r7Fšwƒ0ŽsÔ1cm8ã Íÿ½yqÞÁ„Uè†ó°ñI¿@» ¿@9¼X±H2ó=¾ØBŒ…tEáK#«r‚ž0ÅH‡ÇñÍæHÀXO\ØsV“³P_]b»TßeN€¿¬$JeȺj6n}1û0 ‡QB×Yf=ÐW’2Ø¿Ú;‘÷p£ÂÿJ©¼Ä7·¿ÙÜ}ÒØÝÞ÷`žV,šÂ;Dö?&§4ÄCÇÔÓ!´(Ëf Ñÿ¾á}&½˜‚Ýíí§yvŸþ`'Î-Zø¿ŒŸxòùüįa'òÌuü.ìÄ2f[ƒX‹™€¦–³ëGvZ@¢÷û°K¸‰Ïd&~o^âN¬HE”º@bO1J=ÎZ?Ãkh†!(¤iE`ÞÛ?K#;q - à†ËùœÆ3.¡–ô-X÷`€X¡FÉkáªM‡ÊM¥‹¥+sx5Ïkxÿ®boã‹í ï¸Ùz­£M¸Ž?yÓ_~ü¯­÷¾øå—‡ÿ½Erß&Ü[Ø:œH“÷MÐ0ßì±bFƒüyì”êU†1®Ý5¦xP{Çuà½Ûx÷Åß¿àÖi3¼ÛàÕ¶’ò˜¾”9x÷…üePïQI*Q•‚'™ñ½ÛÐm½{÷5þNžì{ô—Uú݆´`ψiáPjXo±Æe´Cž†Äå5Ï_7*ˆôC柹-ŽGÀ.àú”´_öD’IÜÓ‘‚UIg½‡•éøàaåa l|‘ÎþðÅt¼Á×1òzLúì'ÀߦóPÝîtmaÆ“1>¢[è!܇èÓ€¢ …àÁÁÜé˜|À€õà¥EâIJ!_ôSŸH6²Ü!Ý%/ÒW ª ‡€\R–õ$T*ÅÑ0dÁ )Ž·ÛxöMn<ë&2Æ88Âð+G5åûüµ·µHÒ02 x£"]dù…D8Àxýa’-ÝñŒÞrª¦MqcŠïº Ò¹ˆSØ{©ÓŒ,ÆÏéUÃPùŸÊ¿h*ÿ…Eñ7$i<’|*½ñö¿©dYÜÔ[ç¿7€:l¼U?7 ©I„^D«‰‡æ¹?5o¦ô*#"¤óáKïËôW}x7-ú,¾y¨¾šøn•vãbÐߢS×"üŸú¦{p¬×6}TßëÇÃÛƒ‡D_s-o|±ƒÄà¡S:˜-ˆtŠ‚†®&83;Þüûî]µñèÝ»Z¶a«ŠPè |±£€4é*úžá]r¿*Om`Õ*PŸÀ~åØÚg 5Á[Ý£ÿÞWûRÿ]Ö0ò”sØ8C:AÅyPr•¸cËÎ#„ôp ©ØÜÕ¹¦¤!½2¸MàeÿOÒ­ÙX`ú–§c~Ø›RâDF­Ø%9çùfÑ5„c8|”þEí•Wy)¶c˜ª+9‚•æä³…'¹ —M4wƨ$Rì¡rÀ ÆèŽvk}Q½0U9!©Z ̾ñ¢&åÙáÙÁÆ`æm*eZëðunVuåá«n Ê@Þò6[òð¥ýð¥<4ÏäÁñ©7õ~*OXU'j:zðº#nL> £D=ú~_›^uO6’‰ù ‚ÑÁ,‰úùºu| ½þ;'´÷é÷¦ØÙ>-Óš½B¹‡‹œN#Øót¥œ‚±`Ðc\Ø׿liÞ`\•zõ_G[øœ´vC 4€ëe.Ê%x æYx`O0âß1^A쬦¹ÄGÿ È僫 œ…FebÞG¢%ñ6ƒõÆ ÞÀñãÄ7Ó¤g>õûù®úão|ñîÝûwµ_à"ßùeÄ}–NJèǺZIWDõÍq¡«5¶Ò<9ó•-øÊÆÓG¶ð#[£%ƒÐwÄ 2·7MLî5£ð#pa‚Ä,ª”^¹Ø˜œ%Æã[în5_žùTûãûÆÿƒ}ônë=ŒöÁ/Ëú¼cÄ]önžìŠ6§µ@nHØçrVJ<à ºëj&’ºOC·²~a:fˆƒmó„ž×ô(´hàRêì•âD„â7¾µ5ni áà¿¿ŒöaOª?à|!c솛ß=¤8 ØH@Œ»–eIä›Ø±í…‹¨hÔ rÜÐÐ&k¼¢)Ö5 jÙØB„¹˜†CË“…>ÍÊý!qË¿xèÔ/þjg £/50qsŽB†ó³ª1 ÅŒŽoÄ0" xÌá#48ö >‹_Q$i³Ÿ"×ýÿÜe\~=5ü8=Â@ÎzøöÙÑË{°ìdºõ×Þzðî]ekDþ‹Ÿí~¡›‘R¶è=Üÿ?J™÷È_äJÃ)´öSëáÝtkk´QBE…N¾Ç}„u0wb ýTú5Òk=ë(S×s "”›8Œ®LXvÎçõ€³ŽšZ­a“Ëîáá#ÿ!_ߥ[WkïD)`¿v®må·œ=îÃn(¦†ÿŸ½mhãÈ…áÏè/¼_:!¢‹Á™™³!Ê ÁØa6>€'ɶYH h,$E-ãóÛßu­[wKÂvf_ží™ØÐ]]—U«V­û‚K´{I±¢¥jl†à¹X]!©{‘FN`ª¨û'e¡¬ÒŒÌB¨j¦‹1m°0[!R䦈¸ÞtIW“öP©ìNWÕ`$üÐÆóË+Tá"à€ƒ©¤-kDÐ,mLÙdÈÐà[©Ò[ÒR ®r“á;¾@C«ÏA膙£~É›*o —ý†ª-»ÄMé&&ýi—Ò´ªe5»æ#d¯R^tËŠXÙá¤Qð¦³qHt£9y{S¾ #8.»å5¢½Q¿†Ç‹i£†PM8Tb ,ÈÊqp¢£PµÀLÎ×ï ³‡Še÷T‰¥ àºcèñ{˜ÒàçóÎéKŠˆk=ä_1PõåÉAk‹}vxúlïlÿÇÖŸ¡>¯üWžàÇAjJæ FýÕ¶S£Ïõ ¥“êé Ò”9ðP?|ÑúË_ÖLOùKnOp ¿EÞ¨Ï⢆Ø[ÂCyvÓDÉ%‡Àðþ‰y…®ÖÁª”íí@©Iì®”ÉÃ]s+\#‘Ð>´ ÆÒ~ÀÛºLð^"YÊŒc OqÈôTêÜ#3”Š¬ÿðäåóýç{Ï^=|ý1*oÆÑ÷_oW¸o¾ÎXVGŒ,Ù>ÊÌÏõx8OŒM¥7;£nES’†ô§ü¿77ü8*S¿8OéE:¶Ð$ {2‹œ6¸ôÑxTÿ=™ŽÕävÓÍܽ¤^àÔÞ ,sƒÅä£þœ([ E5"†’œw„Áôp&FŽõÄ“c^%g>­²‹Ð…ŸèðMÑ@ILÏ6‘@&s@Ð9WE‡'‡?Gnü©›_¾ý¦†zqÒc£Ú‡T7Wb*cýà(a8åqz›+ 7ŸNÍé̈‡;?¿xš+Ý©x÷F—¢­¶0%AR•016„"öb^ ²ù;œUùaMùð®‹5ããÛu4´M³]"oÙ*?§ÓÔ±QC5Þud\Ö¯Aè/ƒ´O\©$~ãë]oVŽbIÐótL–ö@W4@Å ŒÓFÕ†y?@Í«6ðÑ›w¯öêÿÑ­ÿþz¸ÐjDú‰M~%5Hð+šV˜«ÈV0UÿÃ^_>AqÕk“›¾Ó†A&ï›e7à ÉTàB5rþâôÛŽ;§}v|RßùÈ//ØÀˆ½â•SÆf»éûíÇÜ¥>b%á{;];š8ÅIscR¢ç÷c JfÑww÷[=Uòq§iÈ^Kù¸3—Ó€G¸ÀH}²Ðh²ì)—$ÒlæíüBSHØ(Dl'‘½ú ÆÄ‹i ˜š:ò-tÜê,£4<Á|Jìãª>Äw &ØéOo;ðq뢋j@|,a2s~‡Kìø y‚Æ ÿrL¥*px+4Ó Ù¤B|KwüYjU/(ÀMp®Ì*í@ˆçÂ9"eb—ý)†æjD9æC@þUßØ À~7#2.ôa!ò¶Ó3kÉ#Lm•Cg#èÐ6=žö…í¨à:µÌ‘VÈ×izEŸãD*5ß©P.«!Ù“a6.O w(uJ'Á´%bÿÆ< L㰘̇Ýhidé¡Ï"úÌ. ;l0tÚeßÔù 'E[°²Tb²?È Ì'”å °+;:³ WÐO¨LùW³Ï¹Ï¡ð™Ìøž¨d¡î OÁÀÚÅ‹ {,e€Ý™,SKåÈ+˜ÏÉ3E¤«‘ ³6°Åæ‚ZÈ$,'#6ˆãmìÖ 7¥žÅF7âk5ä1€ËŸÝŸÄ®WáG!¹¼‹Ê *îjŽŸtTmÚãMè…AE@7ÔK-»x-â!˜`fžñ •L~p:¹þݵ ÒpÄÆ=ì LEå¾ÍŠ!%g³ÁìÆpÌwÆgÃÓë1*ÆäˆHN3̃›2EÎ9G kv„Ã%-aÔÊ_ô:On 7ÀøHØ(A…øÚºe¢Ok*Œ¼Y#ÅÍ”œ´ ­‡]%ØëÈõà#J¹h0`½Dbƒ¢0טhV¢nß >–[¢`€%ÿØ¥ C¹eŸ0˜5J9ƒðAϽèE´¡å1¬¨Àéø¶œEdhÖÊr@¿ŽOÎNžâaÞ¼½ç§‡z|š¯Ô'7TÓuG­H{]t9GÌ¥^Œ©6!eÓjwIyj2$ÈןÛ~€O%_Hy{Ó„NŠ¬ ©äPîÖ¡J¯ë”™“ëDÊÆÊûVw7zÿM+ŽÎq÷Èm¦ ?Óž¿+žŒý: ¤[LÄ HsKüò&P±±!Ø׉–€R£T@7ì›pÑM)¬È·B6êëXqOìîg>sÆŽ‘å­oZíò6: |4NCëôgC€<ÂL=úµ8áñlmèú>_8£{Î-·t:â‚âöÑÃùRBdéÑÿ%³8“#ªÙÄ“QºÄîhn~,oÛ³­£¨ õ£€ÝäãY)­Î¯¤¬Ç)\Ì›2úZâÅVd£ÓeæMÐýz‘ÙÌñÆ.çô#^à[¡:(&yª—šå|e¯qäÕÙÇ×9ßæRó  õy\)Á¦›ƒ'CðùÙ{ñâàùãèùñóLJ'“ƒG{ûÏžŸ•–zÿGux`NqAy?ÕÚJ¥L$ÛÁHD‰n¿¯{´# ,V ðfO{v† :âBHôó!A})°„0z‘L\°l~Dön¡ª‘uó15Òp'ºÔÙ)Âü)܃Ü>.Ø¿»pf–yãÜCDŸ)0vÌŠP1ï-§°{¿÷€R`÷Ä©î 0ím ö⃋9æ/Å|œ¢¿.9GH‰è§?çTt‰×–Ó —‡‘>r-=¨E¨J¬×ÞÉÓ|f=±çÐXÀbÂí„X8_¸pÔSá<à”æ­ò¦s­SÀgð§_F¾!±”VùXÛ‹c䧼ÎäEàÌÀhP–þ˜ü N'}(a.ÙbH ´ɽ%âk€ÝÑõ{J™R‘®iÒumA'wÈfœ™Â`ïlE‡ÏŸþ¼x2‹7±æ9Ïrwã‘#!ˆjÆÝþú}u¤Áw,u 3ÞªÔ» h!>”ó KŠ)ô5FíDèA=³ûÀÞ“µÐ猭p—©ÍNáW€g£OhZ1± X×H!U¤úq9»rtÖcB¡V‡˜F“€ü¨jþX[é Ò¶k{ <ò#j¼E3v'10yÀ3X<÷œx¤åQ0+’u¼ß¸½”ƒ^ø©é)½+›ïî.MýSe»s7'~SÔo%½kÜEw—•7À?ÅÑ:ª9i™šSL…;¾œfmb¦6$(‚~_–°8f ŒACÝw¥3N|ÿõvÉ€YÖÂ`!=rÇv‰¹uÓ•è·Ôh`3£x|8½ÂÎÒØN÷”?ðøHCxdž}:ÝEº,ËHÞ'.˜=Ð=R–îŽYHD­­s¨ëì.…²~~qrpJÊxä?Ðu G6˜j&©¡ÚéãZòjP^Ägák°ßšqåðYM£x_1\ŒeR¼±âîz€F§g'‡ÏŸfWàJÙÐ.P‚0 Źò÷ ù7’då7„ÎÅ|EW·“«d”¯ QÁ:OßÙÒ§JX<Ðü:•zÅ‹DÎŒéjMê›ÕœÅ4š9_yú;©Ÿ®0ê…,èÑwO€±5ݲŸz:c-þ¹¡¯há_q`r4®“-«](ÿB—Ýô0¨dG…Èx«D›¡›:tCÞBö¸ÏhöD?u–õr¹dtË%‡lòbÉ» X 1‹ö ýùÒäšóà)À ’ú@W1§ðýÌ òt‡3ãõßr ;³œ{Wzt@ÑØB’%ü=Ÿ¯“.Ü?åÞM¿á6²#ÓMS©D•f%Š)˜,ö[寶ì÷ Í—l2)el¨ƈQX<-ñÜd4à8 — Þ´Ä’Ãavuxkº@.Ë8Œ meQû\Zoˆ£¡±Qü’Á™(ªCY3F!ª-Âøf\<°ìÝ¢Þ‡' –y|§&‘•:ç(äY: Íâc˜ë‘*”eß¡ö›¥ä>‰E /.Í1àÖ)ëCµ/V)Z[úQòáJ}%Ì lÚc$$¹NS ºwóÚN86J”ªaD^ÍIUŒ~K¡·ia#¢µ¯{’ý2´>6Ï n_Xš-â"« vMiAˆíîÓõˆI’Ù_®Iìlñ¬3±7Q7í¬ã±IwSº¶×*Ô!ªƒ1¦—±xå% ,¦¤Ù,  ¨®=*‚@)Úl±}œ»fÃi|îŽ `„ù? u„‡0ÏÍÅ(K#ŸQõS:ƒ™§ðZ WûåÞ¢tG)Û“˜ Õriµhp9BsjðíWŽSQ£áw÷‚j}#s±Ë¾[¬R£oûV„6»¢„úF,ĦÕð(ω!-›þRö( D"âþ3ÈNÚu ÊK7—ìTœ73ñþwt-;Ãñ/¦º¹˜úa]P(¢ óq»”±+/»Áì‡/tÌ(Ì|©e³ÑoŠ$9Œ{¾¦Ðp´bã‹ |GAÌ:V˜üÎz—ía‚uðqÕÅÌ@t¡qÆ’£ÚT«Íu!} 4(±/”ç9á x…aD%3œë›‘mݱtqãd Aî–µZ;.ˆ§rá³Rôôd¥ÞǧgðÏ ^O®Éë)ãUë°|de(´*ÐhRÎ|[÷òF,*ÈœRôíl88'¼,îw»¸ßsL³¸_EºA9è’êb¨i‚ Åó+¼Ù{ddÍ#e%áÛ•c@ÁÆ4“,¹Ï°KêËÅðò)Œ‰Ùƒ1 „¸Ý°„½å4to瀶.˜ËfîdlÊC†D8+ÐÅ úŽQÜ‹À+^yK¤À<&(ͳ<Т3áÝ1ƒÕ@íÁÓ»Mj ¼SVx—.ƒ€nJÖ£)Ë=G‘S.%$œò¦_­ ¹F³x–õ‘Ùö\Üñz 7ÄÛ­ÏŸf3PRaúÝM{\FÅg’ø1ÅœÕÇ“G uz&!ûÉ,^BË–p¬æ‚Áì>ÄYÃrî>neزܫN¹²L_ž–¡ì•ö8TÒŒ×;cvM”AQ¥Qá¸Iïþl,b9Ö@¨­°CŸºG7ÁÄây†ª€€e9— ömKŒRƒ©\%³A‚”9/|©¥Æ°'[üB">M2Þ•”´iœf…³Õ¨8¼N˜½œÂ5›žú‚óé`ÊtnœÑð£AA·ó÷ôO5 (^ä>9Žõk ?ñ²&«lèÅ<Ùâɶ ºï‡‡QŽVyÝávò"X^µÛí7X/“¦IY™²ÂKÊý eãÏ8Isã7…·`Ø+L"KPóNæb è]ËЙÅßE1ÙæÝ)Å+…›,붨WkÕ2Nn3wG֣Ǿ“µ:‰šB›Â”Üxk»·N'~qžšMÊv«DÙœÆ%—Ì9b §Á34/¹9a)ùʉTÞ.À!Ú|Îa¦o±‰©Oâô˜’±(UéŒÒ!\Ü¢ºM=ˇ· m_µÿ_{½ýkûëöf{£]mhlßµwÛßµ¿oÿµ]iGíµ×›w›ðŸ¯qÐ;ˆØÎlY;^«ó; »Às”ë¹´¿ï‰Ö6&.»(œ‹ÀR6Èx®ÿ“« &õñvXâQp§ä\)»\JÏ$†—*ËSÃçO­gH¤H"¢‰n0ê׌*1?¥xœyi® —p:h&£YZiQÉPx|Ò¶&çÑŽ…¤áó Ã'…O& h¦> È@>Ÿ GÇß»§ÂòŒ/N0åôåüg÷h9%¬Æ•Ïq¤ Ro°;4íé#QÍ•ÇV"O–íâm¶ä÷ÀhB9ÃÏ)ååT*Øœ³kjÈ3‘V1¡¸üÁ%æFÆ3©]woM¯Æ~‡Aa0ÚF˜¥;3þÞœ:›UŸäwl!¾Àox=šô1›ïŸÛ­o­ÛhU’??(ÿòÑ-¥… çfWƒîI¢Cä¤áedí¦.Â0¶–U›¯;yÂ_[ðòCîóu$IïÿÝÔÄå8_¯J¦EÛ– 54(:3¼!œ<ŸÍôÁ¯å­bùË”·ÛexòÆMeðY Óé;~cØsêûÏG¯0Сsðó‹×+„1¼QŽ)«åFÿºé<‘àv©rÝrõžÕ§×7ô=`òCD@þ(Ñz ü…8ôj^vÆ9’¦›¿Î–sgˆ» n:3a v¡‹|ú(Ÿq1Ç¡Üm×+;• 衘\¯ûnNßRP^DHcÇh ¾(åjT˜ähq‡àj‚’<´Ì‚(471 ÷´ÁÑ-æuu—~ÑÇa&¶9(#u ï‰9ÿýˆ}ݹê Öã•e“w€é=D3Îgc›oFúàªX–à ‡…lzZŒNÒ½åxèÔ¶dFp9rÚ2—ñ¿sgÓ¥µ÷°ð ugÄþR-)qj\üdRH‹ä¶H¦ý@N„bÌËv(åC"ªfy A[©×AY¸ë¿ïÕÿãaýß:RX•*…ˆ;J¥SiDOæS4Û¡‚ùž'—CÁ+ýÁ%6t±1ç[#_NÏ“`N;¯•eW0£×˜XnóÕWvŠ&×|”Yjžœ—Q%mþÚÞ ÞÚÕf§½Õ¬ÈãW¿:ý6;ÍËŠº"È­µ&g'*Jð#YÆjûV³ÃVigh&ŽM ªÏÛµÕ×_;–` 5Ìê*3¹W _¼Í ¾,T4;ú— 5¢2‘%¡¢:Ýý½³ƒ§Ç'¿¬ƒÏAô7¡d÷ÔÈÔ¼ a™x Ü,ï:½šI\é耩ÞР}˜Î¸•Y”¤ü’tæB‚RM˜\;'—|ÉÓÏd3I>牓͵NóøÊ‚8*ç4ŠÝ4\H,róoQ-Þ‘u6Œ€zìH‡·r’:ñ2‘&zÎYãM/—pvN74ϲ›ßºbQt<¥³ýãàd ÿÚ^°\ÁöQýÝØËdÄ•òÜØGrDTé'ï0ƒzÊ’-n‹Ö¢„‘ÓA:Q²©¤%'»3ò4E×ý4Újü)úÿn<”J\úüÛÆ·]zõm}ò¨+$ÉSE¹Y)?U/á[BbrÎÒ¤â!æ5ÑY¡.vM²rg+*¨?Wã!¹±ŒÇ3¸F»“&®Çõ²Û_Ÿ¶½°0nʯGCL×I‹éB1Ý+Wꌮ¿íÈ: É"Е2ÎÊ|énžx¹¥è?o·ÊÛÆWõ?资v4QÑH”OÏxK‰=­µUà^1ÙjiN nÁÞ#3Qý¢<ÐËm²í¶Ú.he#eâò$“BJ¾ßŠl(ß$L%ŠmÛlGê벤ƒ-ΚšíȤÀ¢6õË·ÊV<0æ×ÉtÐsÐÛÑ1çÎÈ΂{•þ·>½dd35 ÿ?.³‡wÈ䪨³áÄXŠp:íÌ®=‚­d"ló £üê#/{·]ËpRÏ©úíBy®Ë\YA^`ÚÁ7¡¢û¹t›µ˜Èí0O,eº¨\³_8´!¥DŽ}'Úèöûõ+,Y¡ênuô‡§iTÁ3u¸…¯'UÌÂg~«Kʼ(ÞzØäQ„´ìÜÖ<ܾƿú øëÇ] 8Ûý.èÇßa)Љ¼=õa_ER»Vkt þŸc‘NÒÈ’?ƒí‡[Ûõ­‡õí­ÆÖ– N5ÚL¢ïZ4Î//9³1çüDr Nص«%FùÀeÆŒŸ¢ÎìèÝùåUäQ‹ Tí'·ÓÁåÕ,ÚدÒÓ:üõ(z‚`§ã‹Ù R«'èÊÔåòg‡£ž±K#[BžbÒpäj¹øN«CHâU‰«dÑ›½ÛŸsi—)ÐðÛ]®Ù3}ùìàdÿǽçg{?žý‚÷Óó秧ѓã€Ë‹½“³Ãý—G{'Ñ‹—'/ŽO&ïºrkáwL 6¸k¸3çsŽ|úÜ„!á–â.X¶TMDn4Õà§Ï_FOùŽ^ +J/:‚ o”Ò7Á'° ’x?(g2 ÇIÅ”G:„ô‡e[°Þ,WŽ›Ê®W9›tôËÜ…Ûõ>ð +QêUO9fÏÉB¯Æ ŸÏ~<~yí=ÿ%úiïävà—]¬C»ƒ=i&XÝ<®¶ó){†Œ)¥¶´´9”š‰`JKþ6Sîwr;ÄŠT¨t ñ–ïFú Çš€Á+Ò&‰ìf5Bëï®f³ÉN³yssÓ¸ÍãéesÈ}¤Íïi2/†Ùb2•SŸ_OƒÅrPL›ˆf8üK8“NnÑSÚ§yåÜšûƒ¹/´:ãh“iØÔØäì¡AH‹¥üÂ(ã§)gòd÷]©F >‰di1¯x!ŪpÍP„ïxÌEvžHYXšÁ<ø2&~wMT†¼…QÐÕ<Éë_)ÕÄßÆϨ‰Î7ÍÙ¸‰L¬²QÜBÖ[gRH­|ºÕxhs2+t¬Çôºj‘PiÒŸ__ߪUYÚZs2K 4F+úàúJ$LRž7©ë£•r+õºÌ¦¢”[ šÖl}1<æª~xý±ÂèV8ä‡Pnçáà-SZ´ŒHÁ.L6àÖÒ$96½ˆw)0G*¥Ùô½%Å»©•ú•O«×±ìy%gòÅÎà4'ô*G3UÂ]©« RÊ) 2méÊ8R¥J…Èd!œ9çŸ[¼Š3ÎyKõ©l¶ëtlªÁʈ­¯xU1Èn<2ezmM,yE2²Þx:}žµ¸HžT¬¦SÆâGµ¦-NÅÔºô4@Æõ ‰T¾É!Þ.¶™Q&©^ÀÐ7¨\%'-Ä\bËN€!µGa̦.¯S¬JO?ò š@AÙ›þi‚³á_ ~‘jª4Á´²ï–!3õ™ý₶R!Ý;#¸ÔæAõècË A» b¾Ô]¹`'pŸ7tI†¢¶Yoù…]„;7ŽÔÍM¤p˜W5Ù­ÛÍ•œ|Ç)û5M.†ZQ* §RL Ït¡oƒÜ ¬… lhmÇ9©¢(°wgìA‡ÕR¦º­Ò«ÇœÑ‚ºL§´|Ä‚äú3@{:l.@C~„\ÆÊN¬üˆ?hj+ ²Ù;¤†Ð »aðe/êŽ÷…T ’‡õdŠ<ÊŒkËQ BÎÔœ5…H'™F‰×ªØ:©¯Ž_œ? ”½BŒýR „«Ç…«`‚A¶Tß0$–¨ªïË–a<çTªRæ r±ÃÜë𑋤ä0• õœy¨ÖÃ í©¬Ä$µŒM žÐ9#êHšPÚÁà↟ÔªÁ'Z±¥z?O\´„óq4)eÙÆu˜ŒÖð<{MÝ¿ÃîuôHT(ø @çÞ,©±kP~Yj¨b%c}„ÅÂð¶TÇ<4íÐPW8íœþáSÚR@\b½­5ßÇ$ˆÙ§T3½Àø4Va‹#±"…ïd ñJ`ÏÇ~ŸÆr>BÒ(ÊR3‹Å.Úâ>©­;T•Mn%ìH?ÿ½ƒ¿®èñu‚.ué,\%X3})Öfê^]Lc4pÐe©‹è>OÌNGìG±®"æê?\²~,àÒ— ³¨ÅÖRFœUÌ#^"4X,¾ù *7rL$$¹›rÒÇŽèÕbTVüàMLðYûä%ë±»bXD=nYVŒ¤Ap›!Mì¦ÎâR3vYn‘™¸Mefø…qÐOï¢Jy»rw‡ÕÜÅÏG»ôW{'O_¯’v[– g ÆßtDëÝ”ïg•XÉ–$,Z”ô ïh tdè—dß ²JJ)Lä$K¬g+)cŠz©ñgé)PׄK1¿=‰M1J¿žMoŌ٣\,ù ©E8# ê"œœdÿÅçDÅAF:'£¢ƒÒyJÓı©ÐOz×µ*J*C&ûœËP?q,<Œ“Ú®‚Š‰ŠMàÅ.©¦¤ò}´QT¿„üL¬¥-€kœ)i”ç ¬XI¶áÎ@''¾°¤òè£Ê—Ñ—ø_Æ»¡ƒ{aÅ0«‡±Q^ºû~„W~pÓÇ|¶@.{_.,`äâ7Jµa×òí!'CScq˜¬ßB[Y#=ÏÕd>¥n½c*|D"©ôu{Ê­+­D`q!z.\C¡í×â™>i^þÓŒYùLú²ƒçø{a¥&éíûžÆ ï|„4 0G¬i¤ª·‹®ozl"ù¢éù[/Ã9²ëöéztð~¦æ¦,K¬¦d„ií‹1eŸËÖfõYû+wÌ"“6³Ò®TfÂã;Œdwh¤Yþ¾âÎn1ŠšfÁêWAÔuv[·\òž®‘€t4PçeÊûû€]0c¶0 )Ó¿FÓ‚Q‘‘ŸyPÓÏ4é¿>P½æ›U Sõ4Œ–xž´ÄŸÓ—1÷ëJ`YVéÝ’Ã9ÀD±ÒEF™DÄåu2á>$’êl…8…"œì”6žPN¯Â‹"Ò]=­’g(ÿÚÚÁ;`Ýõ>•à ,wcëî‰@É0Ü zOÑÛK€>ú7•i)ü…gÜ?MuÐ oLx^ÜåЩçKyXŸGÖàO1gíÁ*dÍä¶%Ûµkr"»Ð l~§»å“Ž¯wŒ¾Àù¥d¬ áÞ –1Éw©{¿S\¶‰n¹n€VÂ~VHœ"u%£u6GŽïõ3õ§²éà]Òˆ?‡8:Kü–Î< gÆ¡éþ2žWØ$‘£ Ð5^©¤#ÿ& õlÀ'M»¾†)$ÚÉrA±q$ê"· ©”.TG^S½.:6ÀÒßboØudI=˜ÑÔH:þ2©•S¢àɈIÀý£¢Ñë7[ç†c}Å4ï}Lå× VÍ®^}aßíºä³X à]y>hÅPÿ\Ù|c‚“s XïœW™Þ38•À?!ï¦`²cXaƃMf¤p.Á`¯mÊ'ÊMHÞ h–Ï ©b‡ ºw³ÛàÐwå^oßVx?©ä¤ÉeYMq#ö5RéôœQ4g¼qJ9C/¦’yD¦U2YBU•Œž')×¢È`5—1É&Ô/2ò:ð5Gg9¯ÁJårKlˆñeBrÖxŠ^·b’e€iÂY8»béâ¦uñ‘ćN€%”©¬OKÎiœ3týÛ\`ùÎ!ªÄž‡ ,;J©Ò%}Š>œóÌØÆéô¹4°¬×+ª {€ñOì9iC›XXÉ$pÂÔE^‰|[Þ]ý=òÕyZJ×÷¾R`¥s‚EÈügƒÚgT]1ã‚o-dùùÆÆvxçþf©––‰8ÖüHUEN¡H(Y[Ë›33“ŸŠ¦ Ö‚íRæúz@.% ÐwaÖ,÷Ï‚°ŒhŒJEâ“Ña–Še¸u'á;bówjÏQ–Gèˆ\St•W³> á»çì~áb€h/ZHöÉØ'xs¿±GnŸì7âÃT­¹ï¬HýG‚Ä›e¨úþÄIW—!«]o—ëÜbâaÏŽS8æžÓtR!å‡UH—0:wõwUñÙqÇ5žU³~õCp[µÿzW¿ªºPb}§×Jì^áqRkŽ¦ ¦B IàN#ÃD [Zz¨B ½ÀTwJkõúfË*^…pßÀÄ9 §µ•´LüYgx•Æ 78ï£)~´_ºGù@ ”o¼?bî-ÜgjàV„O¡òíóÐxE¥ƒ¨›€©ðß;øïý=Õÿ0«×«a>Lï zJÌŒÆÍÓ`3€w¸æ übƒWÓ†š%eU¢ ²h~ªµÜ2—+‹,³Î­¨ZV6•;ìÑ8‘vG(gPÆatrU±8cß%ä€Aa4“£¿`~¾ò*œ[)Æ äåÇâ„ëúd¡hPÿ‰Ò—SÜ&¦‚hù(3W<å¡Ì^ü¹üc\,hg架©\œä×F7•“ö¦ÉMÒç˜Ý2J”äÈìW­ýLT+Pf-’Úó}·Äç ŽzÛÏ–B_¯E>^ôÄnÎoµ~„Ê~ЉA¡  NyÏÑ<–öƒú9çf“2—aéb¢K"Ñ?¹p±SÇO»7‚T0+¨iLï»Î´»L;Ž)ReGÔéq;.hV¶½k#§ûwÅ7aXÁ™wO¼ÌC^à±ß95åÿŽ—…ÚêhäÁÎÏ_ÿúqQ3&ÆRæÇ?þ¼|ÞZi!¶ÖQóÏŒ¤Ìw…n>¶HNw˜Ú‹næ4´œÛ`•Ï§³è+\ ƒ%¢»ò‡{ONêèÙû‘c'È q¾ˆ!ñÇÉ;´÷Zª»BãSñÙ\$¼äï)ã×K‰ÿºdÍP¸æ¯6(´ùÁíßïNvm¥•¥µ«Òš×ø·Jô¦É0¯`ÀþÕ[ÎÐO –rÐbU¸:¢è… sÉœ({ϱ½æ¯ëëÍß,ð6ö«Í¯Î£Ë±y´CÞá¦A»ÑüÊ…êsççô®=‚½ˆîÜZ.‘÷½ÕÃì8cÀ,ÜPÞf­é7£Þ þ~Ë,'ïOeÖÒ®¾ŠÖÿ­V½ù*‚¿ázݪÿÛkI7×®Þµ·¢ö¶ûá$gªáô–Ì'¿ g=DsDœ¿þÏ͆R%LyRÙÀÄ R”˜äÆ· øoëÿTìá¢X(#ô¤¤;…sK0i*!´S*âGÙõærbaÀ”q8Å€3¤MÁ‘¸è Aöp“–“š-JÅi¼–7Ãv‡ON[eø‹Ó/£¡-@‘»- ½8F{úÀëL¯U+š*I(Àû!ðÍ» âÏw¨k&ö+òåô“@oIòCÝ/šÒc‹êêw*@b7!ò²tUKZ2™éF¸È½É §¥É=šÔÝ:™ÌÙ‘†6ÞünFTª'íQ<@¡·žï…Ð;‰šHMë|©ÎGþ²v<ÎM9Ò™$î>””úŸâq¼ª@¹ øBÂ÷X«\ƒÇ$¨ŸBnø¶©•*y«hìîùù”³‰Ò~Ié«ÑChî´¢l£D‘ýYÕ“`; ½pI~¶ šv©DÓæ3ËÚ¸S0%ÛâOpª¬×áJè £÷ç=MíV’Œ þ pI†= WãtVÇú€8;È?àƒ’¹üàÂÚq<âN<8: ÎÂT”Îö÷×ÑÅ°{™îÐË'G{OO]ô±ßâ×£ËÑü¯ÀÂÀe×;þ±Ê Ý3í-À øê’w¼Þ&úå›òÞ˳ãg{?p]Z\¥5ÇBoýöÆí¯‚ ýãçO–÷Q:qr¤Án}?Ôe¾šíûFÉYl ZAHO—ŠMóû5¥=¦dÓŒo„|¬ÃÂm*À¼Ž.“¶‡ïcËøÇÛãèø‡?Ø?«/²Þ”¨ù(%cµÓ^ŽoTi ÇNû^óC/2£ö’— Û˜:JC88~+m¶Ûð}»Ül”±ÁûY³4ÞÊ y„o‡ãfé“j¾Ð2M]¶Œô]µ ±õP¶À›: 'æþËû`+ß—Kë‰Pð³Àþ=çèð€gýø¤~züòdÿ€Þ/Ò4KQxÙ‹ðs»!c¢g•F¯m`®$Õ€V©»Uºy‚_õ`‹<8ò”@Ú§È6?B—÷Ô¦˜§(Šr÷+çœÔùh¶ÜǬ-¹S[<ᜮ*é]»ñê×ÆëÍò,äÎhVC·Ï2®–yþ ½ýᱪŠc ¬àþF®¤žƒ£Mö­v—X¢©¢ò‹½ý¿ï==–»776‚Ü6öó'”<ÇŸç‘÷tŽÜÀ‡aɺ¡H‚+wÕxÝJŒ0é’:ÍIFëtkWa(æ®0oÆnõEoÇ„a"fUhÚåÜXžú•#X3$øŒá*!ˆóèDÁiˆ}ògÉDZ$…êöfðµ{@Ý“Øœ(qø‡xéô“c©€)ƒøU½³Wÿnýw4+4_;Þ°Ù42ZŠ‡ýØÉ.(‚ˆ…&QCØ­Ä)½Gíco5IÂðv”m0«¤&ò }õ0c"å­áê‚ +_w§o™C(\Yíï›´8Ϊ°ÐÓ“ƒpÄ,$c—XE3¿ýý×[ZE‰1«+Ž9ëÇ÷°©Zý*C˜wH4‡#¢,'|$ÞFåÏM¶JŒ“ÖpJ-oÆ#'›e””ÏÉ:@ÐF:CkVu-=-e©‘Ûòžpú(á$`˜wuŒ¢%|± ”#™¤;ØPÐ1At~£w‡©Xj5¸ÞЧ\ÉÊéÁ¯'€m\ï¬Áåh<å´/ˆ#½,Ö9©ú ’'­)†Á‘r‹½ÓF¤Ïæ8Ü„ôØÌ›^ ø×›Ž¥šŠn’›Òè‘°-Å®²o1Ê…d'd)’S¸v f¨ {gô^4ûлìÇÿ889=<~î}£vÓ‚Rä1¶°%¹VŠ¾û®stÖ98~R2Bù^l ¤¼()d\M ϨӫIq•ÄíÆ@L€1Œuøüð 5 Ž®®Èdª`n¸]8Il§‰*©zT<­›HFÞIî,31·3É}h4Q÷²‹ž ‚:ÿu@eûòv÷?bæìz ûâ€Ó³eŽTÍíZà»"Pm§þü,¨ÏÔíf•YåŠ0·æ7äg‡§ÏöÎöT~i§rÂ÷O‡ 1 SÍQélìØ™y7T1w¨Ð܉ºÕ¥áû|ñÑûýáx’ŒZöw®Ñ´¢œ­þ#RçšßÔlÕéÏ'4[­É%Ïè!ÜÂó,>-ò1r™øv²b^qð©ê/Æã'7gž«›:¤ÔW9OEVŽ;üÿ‚ÿªn°õ®sL–<6‹„Q8~@QêÞñ¿üýÁw½¥£ˆ½dñ8b"¹ãùúÿ‚ÿî’e㨑eñ8l@¹£èoü þ»»XÖ¿˜^w/ö‹;þ—ÿ¡¿ñ/øïn°l5”,Uéwðüw·tŸÉl³¸?c ¹ÓŸôù—ÿ¡¿ñ/øïn¾l\kõY²÷ŽÈðÂKþg23eh¬Í•GPV‹çZ–º.¯g\~JÚ ‡fŽß¡¿ˆ¦¸ ²`ØLÑŸ[`ä¹ ŒKãÌÔUƒ2<`.SŽ$ËK7§)y ‘Yçân ƒ¸*®Åi8>1ùûHÜÑOôè8:Û¥ëÅë~$_^L²(ýv|ÜÉ¿KæÀwMÌŽIüÛ7eûsé㢠‹b8ÃÙg¼(O,{{íªæ¬êèT™´$JXÍIe±ˆP¸ñàÎ ¼“Ó ½ª~³ÊN¤o*Á8‡ê—Îrá0 ra¸¥ü”¤¨ag¸¹(Ë‚\ìrëM)7™Òmº@ á­z°É›Ë>qÑpè92Uöë¦F=·à[Í7¨ˆ¼hª%1Ó‘åEm Õ¦‹÷hYz‡™îwøFc“F&Öoñùs¹Ã2”ø c/‡ä—ÊLãååø—NX|©O,› ëž˜Ùç•7yç¿ÖfÝËjôÇÐCt¡[@WXÄ„;¡Ú>þRw§›üdõãé¥Iùãvnm=Ú³ÉÄÆ’ð̱wy©Ìvœ| kk‹³,¬yY Ó,ü‘yrYÖOfÍ}Æ7·ï’Çz–†/Ÿ¨¡pNŽuŠö€%ÔéËž@Õ·£úO¶§³Dç­š uƒ¤êÏlS8ì=ÒH±‰¹,@oé vJÁÕ±:õn/o£Íè.Ú¼ ÝÐO“›GÛôC/¹ìõ“ͺØ4¨xÈ<‚Å7XS¿—/gäCŒZ”2Ì)y,¹ºwÔA­Ã5ÆgI_8áR†wp&±Zå\&»Ø8VVVúÁ$á;õŠv~Ç Ì3f¸´hDþªÀœíÇç57Fçœpä<ב˜¢ä{ù²-ž·Ø6~ ohl3 >îN ¢tkô’Îúôjš¼ŸµÚq™BÄKÛÎÇÇ#Êà̺Ö˜¤«ê”—Y=uÄd&áF±†öJQ~?4‚¸<¯É†ó»É†Udl'·—ºQ~ˆhëû¯·K.ëdƒ5µÀ£Ã p™˜®oP—@P·º‘É=I:à4-[^8Õ©Š|XÍê «UqPX®Òf>¯È*¿ bq •{ÜòZ4]/¸Â„«IºSÌ«í¨B´ª¡À )q -­KõeªMlEï-æ¼.(Îz¯Â¬™p Ù?ÏP×O{±žÓ¦tݽôZ•<Û{z¸o¼àA…_v÷?øJO 8VÆ– @ïjðsãÚg@ Ýa‹ qŠ!ÅøeP‚2/“¾‰=÷»šàX+Ž"d¡É`F}¹š3RÄ-Ie>ê«ñÇd†D׺º¥‰eE %“‹Åe!7E¾Î´Ž¤Gòg‰ ’Ûª¤TIZ²ähiE®ì=‹#–D†sÍ \5®vÃ! /Ž(ÑÂEÖ-¤ láÚ*9¿R&uÍ,=ïL´âíÙtÃ_\DOL‘dÒVÃnÅõÄg‡Nqä”b±RaY82ª]‰ryš]SCûª;ícÑ”á<½Â ^*|‹%ÃX¯gpwp2ÕÜS:cÃÆ0ѽ`ßʯ¿ö<Ï’èÛßøE6…eyPŸ_ץµx~56ÕGßG¾ßF|óæžÿã ¨yRcÿgR‚ ‰é"ï€TþŠÃ¡I¦ÄZ³/(Õ—‚š€á5®ÞÆ)^“tnŸì ǘYël‚ØÞÇá:ì£É7>\pŠVÑH„1ÙC „`믓.z?ÔȺÕ*»S A%—Tœ:bÊÝióœ¢LɱóM÷½µÆÓ·”!¬‚ã9%¨¨$Ž‡)fs ´Z£±ÇáZ’ߧæw<ÁÑŸ¾ûúaô>RÇRŸsgÌÏmEÛÑ£èÛÒZÌé 1­±m‚E×,ïê>Gvm­½Þ¶hØqùÃv}çc^"ó½›ÏÆÄb˜>ÿ†8Z“²Â6°“*çô’Ñý)Ì D¶!ÈxÉ;=Õì ‰Â}yOˆ ÃË–Èiøs‡’™™’Âþ<úÂÿšÕí(ªýus'vžÇùÐõš0œ·+ž¦aJÌ[x¡ŒÞ}c¼¥ì¡])o·+aDµÓÀ”ÐRKí}⸹x'C=*Jšd+;Ï®O•?¸Àøx}÷™Ö£²û<ªçï\)°´”_œ?=Ù{ÆYwTÛ]µ‘_X“øÇ:>>ŽžŸÇ)9©¬!ü jäÏ®í£·j “K±ò9âšð¤/÷evâÿÜ*Û­¿@OûU ~íd?dÀ–J66ªüì¨ìðA‡ú÷‰¾9·â}ÿ¨Z‚‚×÷à¦&a®hâúñàèÅÁIôäåó}L~x­Ê(N 5M:¸ tÙ¸sóhó””2µELA:Ãtæ¹ K³™‰ñdÇmÝ Þã©&'vùI#RÎÔDÍA™ãRLrÄLÎÀaiÑI2¤Äc#Rþ”QK4¼uÝKpölØ·š•±%ÔÌiëÄÇÐT+xöcƒp W›¬Ä.=Yté3v,Á³Dƒ”#,f§Žð‡ã,¼£CŒŒ-iš"”÷HµÅ—&ë! Ë,éuµ´Â¾ Eô…´•§Å¤Ó“è¶\Úµ½D?Ùݱ†·5 o×Ä7SžÅß“éXVÕ÷Jz“Ho(>C=†1óîÂÏÈ¢ ‡:õá6j€hÌL !zEÖD6–¾ŒÒ5½Ü›XA,)Ièv@9ê3š°µýÚ 2àKg›&C…¸Ûlr.žÊ).™+o–Ñ.Ë1s_<ïÞhîHóͯ74EzÆ}ºÇAVœ;.ž+ìàìzÒzcö£~“1¬¿ BÌÿƒñ{Ûý^m$ÿB[¿L¢¥‡qrp«Ëguï’ºX¤Ã.zÈÜÆoÂKtõiY+,1G˜ˆ¤¿³Â÷¥|j‹;pjK¶2¡-ÓçZKf‰ä~¡uÉ,ÎŽ­1"»¢RaF›Œºw¥ŽRŽÆã㎩¦V!iæxt!àDŸ‰ZF¶ïG¨Ã=3šR¤yÒ’ü¿˜¿5vŒ*]¤ùÁy"EKß’šg— cÇäA-KLöœ.Ú颿• •D,¥,—ì¯GóÔš¸oî”@›Jܱ¹ÓÜ›£N­…÷ð[™´à;Æ–µÂ ùÆ.îwåãžKw²cÅy.£+“…6V†g6ûÆê[±ú\‹ÒW¸~Þ+Å»÷€R6„üà[Í/&Ìá”Â|ËÅ1ƒ,»úÿ$öðî”4ª…%¾C+QC­ýÑYgÿ—§LÏ4Ï„q D×D<»[Õ€NK±ÏF> ÛH‘\a‡Ý …ÝEj¸±% l'ÏN9õYê}Kâ7¹ãñ‹Ft8bµΆòiAŸ5ñFeîB&dY]t\ÄF¸tK7£ ús¾@ÿXŠl¢ ]X.™R;¡Sæ`W5åš}öœÎÔZ#ªàçtN ` „ ‘Oún¦{®//N:â¸=_~GÏ«N,—R„Y\!ÊÂð|rrü¬ƒáôàEtvl~4Ïõa€Kö= ”’ÿûã’t~_t z5têr¡ ƒƒ^¤1˜éq2MðnŽoB„s´á¾ îÑ}Ž‚¬éD$_ßýQøæä5ë¢R}pNjy¬a[½ALš ½2«n"†öÓñ»¤£¯V’˜ä[ÕÕðïUª)øUÜÜö…áÌxÖ¼˜L:(©§­8½+oÝ•·ïŒ†‡Þ /ôùQ¾f§hˆÝNÞåGyÊœ¢Wpá²Íè*Ðyà{~§#úaoÿïøïÉÁ‹£èøä¯Þg(N‹Ô hŠØ“[Úauœ-FÉl®×rkXÌbó[EÆ3X¹A†€*Ëx° ýÝ y»Ö×Ý`y*>­ØJ,g.HRU¨'!FPL-j/`úò@¶T:\Ìbk™ ¢¾rn÷«›%å- D"Ž/*ÄÙx&¬ Q’zje”mV¾¤ÿéèÏâ‹n!*¿ØÓÓj7Õ²uóQ ­cWÏEúª]¤€£„E›yªVaW3#EAz”0z!&¼ÑÞë×4Ã7à®{Ð,"Tƒ÷+o:©³[þÛ|€¹ü²Êge7I᪤l%jdå~¤ÑNú>æ9vžO8ëÅ6’?jë-„–\,´tï•ö{jlwûã;3‰Ÿ³ÇÁÿÓȹ9¯ó\#[–Œ¯†žÚ÷_@ùŒ‹‰Àª¸ t Ô8¥š æ1³¢–¡ ì½àRx¯¬ÄÞ/Xà¾WÔÔÒH1¾SñWA¢ÙØoèÆ–´²} Z‚  ­¤ÿU°ÔÛŸûÊÛ9¢vèÿøÉRv¡€ÍŠž?LÀ>³+ÙÎ&±Uï…çöÂ5³©–Ë2÷_¨ñQœd$pCTµ†tÔ-ô®©Ix­æ-ëGçdëÍj‰Ý‘k¸>‡ÃÞKT½‹VvW÷«“Ò'#vq['ÝŸS<;9(ù3B÷¤ØEÑTŒ_ÃNŽ*Éí‚RÔ8ftËÑàþ&¤ïsLF7ê³þ¼"JlF& ÉÄL$Ù‚¦ÛÇøk”ÜŽ’Ö¤rúìfL m'ä€ÈeÎv‚‘ƒSöð½Á¬“N C3uOQc®ˆ“²¥Á€4žŒ#-¶ñhÙc'‰ž¸R2šNÊXÂWúZË—ˆ`¡R§Q ;o•Šg½‚ ü$Ãy8áÂY¼“øáp–L¯33Í"]a¨«©À‘!y8ߺû™Ê7>e‡/¾ó'ÊÁ‡bÍ\¾¥›>\EK“{¶‹<-§ãÞZ pÎ×ÒЫb-¿=ÿu4K u?MÂÅ\؉”þ'P*|¶Ô ”Á‡•U#žÑH‚´‘QšUñ¯@"¾k¹9uºæ°øJc·BWv•]uDõ­w$Kä­±ŽyürhÃü/_Ú$¸Ì®'[­qíËdœü‹F»§+*´CÚvº­EÓÈ}“á\—Ù¦âMèis'¦A˜ Mw e¼ŒŠ2ÿT~yYξð)BîB¨ìüQ¨škÓu”eõI1¶¼ùïŒrK´t|Gié|Œ»¯‚NþótŸ®½ 'ü?CûÉ9ŠZàýßÇ©#½ýËUAåxþ‹4‘ysûŸ‰Ï÷d¥“%Ì÷WŒæœ„På´çwþõ¿s/6¢HëêŠPþÞ WR·2eÿ2*×û³)÷U¹þ‹˜}é€X~ܥż~-‡×—²í¿¯ÿ)×Óò3]QôÿƒQTK>Ðá°ÓO.:ròÊO£ùÓ`ÔߤÑã£#Àh]1iŸÿžÀT°rÁí¨ÇºU,¯ ;žt^à+õ«¼þ¶ŒX|´LŽàÕü? ZöUÿõÕZôzÕíÓæ¯íÝÆf»ºYnö+~óöÆÁÏ/ŽOÎNÛwG‡?œìüÒ®¶7°ù&ŒÙ€ÌG¿Éjë¦# (•Ev–^N,`R5u§—d•}± .áSI×ÂMYµªÁܦ2ºM,ÉGÓMÅñé´‡¯[e.{‚=GÝáM¨Ç[ܹ®-ÊZ Yò#c:Ÿ 2<¥‚…·I<$Å7ëäzp#¤òC-^€Ù:$‰5Ð2)þ:H:X‰Bê¾Jz% uóŠi§6¯æaŠª˜¥F‚tbõ¹FOÞC¸H€¶RnM“ËLi ƒŽ “ö]Z g½f #a+ØK“¨ä¡ã»ßò;žç^¯—Lf¤=—=¬; v0”Y+å]ª)½‘½C$Ó:qKN¥lÊœÛñë, @4{N¥>®p¥ ,©G½„òí˜ðñ‘]‚”\ªÃEwQýBÿ}qxP-ˆ†ÔÝľµ½•Ê1ÜØkQ¤‡‡ ›MÇ[£QœliØÍ—æ'É]+H&c8“ÒÔg™ïÃE²é"v§\°(lg´ÏDÕ”£ éF#DG/_yCfŒÁoH›ÙÔ„‘²ÖY_Ó g6êàÎyÂÕ×ó:ã/½ÕËw´qz-=ãdè,J8fhQ'KPÐ'˶$ÏP««Î5¥Ïälx3wâvj…yï|Zˆjt´n®ŠRñ¿{î¸2I6B“bläè4ä öv™VÞ§c½?$}Ù¸¸Ûë~ä$m27$Õ“SÓŠŒuÎ¥ðA²: ÝÍnÌíÒéÇâêÓ'ZÎ `&áJës˜L5f3â¬ù‰Ô”ZW¿mÊ3gc=ëcFè±Ø %#èлáØÙTÉÈeʼêí?9\\§ã×&çf£Ûïb–gø÷\þMùßôÚiÕûæzÚëÑ?ƒÿ6ÄMôÓdÂÿ¾ï|õêâÉëWÿíõ_é¢þûÏî;òrLÿà$ñßô=w1—&¦¼§<²fÏ4xÈÝj’ãÄínG>h†c-‹0ÞÛAv#Û9¾Ñ˜’û²¨,l„ S´ôQ’%üŠŒb·u4×ËcêñtaÐͶ›ÃZPX ©ËrÙ1»¤9ôs ¶Éb¥J[$\Š)Ѷæ'­#&"ߦ¦ª¸Ó ‚~“ÎïÈòDЦi#ndi{Ë5™o2sÍ-nYT…ÌÇV„ûÙPŒ†ûyAé1«Òú$ Žì×ZĨòêõÿ[ÿuóÃÇÝï¾ÿk\Áÿ­E_oTïÞ”_½®¸]p¾C®ÁÅrøÎW4‘ƒ’Ur\Âœÿ6ƒN¼´Í2nbU NÖrþONâYHEßCO¹%.Xö¡³ˆmLÁ é²TòɺÏRÇŸ9§Td-ïÆÉc¥ä9!J!Xó‹J~ù:mÜ;mã”ÔYÈô¶hp~ùoÞ ò“60 Vô¾\ø‘-Ìy<2¦IÔqU(yRԔ̦°$,í+,6ï.&O*éĮ̀xíÓý^Ï…ƒ©ÚëŒýõIªU<4&;šá{ï88¶’>øµ±Ù|ð`7J´¯~m¼Þ,?xPyÓ@DMoÙqï-s»¶×> 1ÒT…ø$¤‡¦©VÞrº w4¦<}K1 “T’¹Ð¢Ð_¢áÈ?“ÄŸHa­ tÝ}›8zKS÷Ýx€]03,g‚%·7¼A󎬸×9\ÃLªÔáÈK×Ç‘×èåq²ÎsÀòOÝÍ…ÊÚë'â.ʧˆÏZ:DEÓv˜ŠN¾Ì‰úÂI{ÕÎÌÔ4å° G»´¹¹œœŸÔœÙP~.…+·BºSzƒ9am/ŸJ‰ÃËG}*n+"uwÄ™ã&R µJÓ[)UÇ›ÈEîJ¶D““?–ÕëšX¶g¢Ð©ì‰d\Ì4ʧt}êŸ,ïLUê=ÑÜ£zg6ãŠu|Zˆê®JpîB#¼!Ó9È I¿†á×p'Žz’¹¯“«.jÐa²DG•­‡ÃdȤ465ëÿ¬šÈ!`ãgȺ’ƒ%Š;]íÁTW€+h-Ĺòɳ¨lï,W\÷5«r²_¢èmO®2¡¢ñ½‹; ‡3[<´ßçlÚC²¸ÇÝœ·*Ä·õ§R)7ìÓ]Éâ9Oë[>º€çót¿¿ù=åט-9Uˆ•‹¶É†¥úöÒK<4zÌeÕø¤ÜÔ@B¥ª#!"\¡ƒK±zŠ@JÎ?4ÀÔQ‚Kçi¿s5è'ãyÚI¯:çóËVŽ`â]Y_yw·Òa³Z>ç•v}‚œ‰â&]9kX8Ó 2Èô*_Þ_œ)‡Ì†…·ÀTRA0‡ÉŒÃU‡éœ]¦«Æ":v߸–8wãÕ1fˆowâÜ ¦d g!Qï+OºÖvTɧµÉ +œp‰y× ÖX]SfõW±FA½Ú³âÅrιÄ$ ‰|´S2z¹ÿ½yþ Þ<†Ôü;Êdº'FØÐ6fé$`êr±c²žZ×v[sÝÇw²ÝÇŒ‘C÷´eé*œ§Ýýˆ%ª¸Âú éuZå¿îF+^MôA% {Xáå=Ò"pZ™çb0Mgîþ‡Õ敾»Æ³¶Ð²X ËqV|¶À h2N8v½OùeP[éÝGÜdÚÕ.¡|á×m›9|*‘/«IÍ¿3î×æ)\Wžìµ€ÌçRùõèTvË åÖb5ÈÛ¨?P¦ -r-x¯x±8…²?‰ ûßÛäo“ÿôÛä³nŠû^_ôžX¥ KqåkÓŠC-©<¢-_Ž†c­Ž¯tÁØ&Tåç³J‡5G3iNŸÍË€%I³ô<5N_î¢oÁƒ4· š‡Òpœ 60zÁ¬»PùÃÖ7˜–j­Ø×Ô¥q%"½’¦üèR@ëÛˆšP•V óe~,—ëBuxkh‰cëò!5p=î Sº¾Ÿ‘B½oïþ92DÅÑ„î|³3…p%Ï£û6O¬‘£7Lº#;¦ íRüÇÛáúm¤¨|uü£¥_7¨^'E'}Á¶½:yVw^SÚF£T—LœMj—ÂW¶ÉSíži\´«Õ´ØJAÇZë‡û©tÜPå Ò„Ò«ÝÆìv"ÖòJó|0jN¯+Ut_ÕYrúdqŠ6€Þ]¡@¥~Q©Ššs+—à—“g0Ãüâ×¢ã¯)™OuÎ@χC£èuçZ¢¹¢ÞkOÑzú^Lbùx¬Yš /pHi'Í0¡8o'™«¥OÙI9ûÇÏ^ÀÐu©Y-N_žì\KûêwçºR°ÓN*ƺÎ÷%¡—|4Ò 4k5ãN‰‘-ÙÁ5stüòìÅ˳:Aµ/bËNÈ« ã4Åow%Uš+2—­Â3|=Γ¡l>2×J¼`eˆ!†íT¡÷­”1†_øõ¢ìWbd°d¾ÊuWãŠz ('ÍXü½¤¶UÉKŽÆ.ó¾r7?õjOŽöžÚn$=âƒ;¼•8kI@{ø°(ãÉÇŠRÙcà¨Û+0ú¨ßö+^e0C.8,Þ¢!aTÐ91õáÏoY¨™ò*“ï·íXDÍt~žÎ³ùL?ÝWl'‹{e$ÇÒlë¥À|ÏmjÐh8®äV©Êþ‰„W¾ÖÒòÑ+L ÿšHôùãsc¿~Z"ò ]¥UŸqBûC¬EéùŒÄ5Ô‡¶©ØIÍiÜI¹ã§‰ î6ȯG SO%W.nžK¥„2ZÊ ²r—˜œùJ¥l^ÜHB™S[…+-Ù’§Ôd:x4âú‰¢— y³Y€Lð“Ï #ÿ Mîߨ-«ƒÒ|A¢6£®)0ì‡x¥u#}.·?‹É8M%ðÛsÔM£ŸÒFÆoȤy«÷ƽ b¼nÓYrr& R”óÇn«V æÊÃRpEƒóf²˜)ú!\_‘½ñ’̧{RD åÕQîmúO†éŠ{’Ï´3ÂËüJ÷]T),èú|<¤Ã4œuà«á¸ w[GžcgÉ{TRÕu'0l5ßú%!ˆËø«ÛC:¾SY¯?„æªNúýé/ÏDÈþVœ¿`Θdgù”“ãºl'A÷õ)Ü$ƒ§?Ê”O³¬sõ#¹ÍŸ4éNíU‰XbøËk´À.†”@Üùã‚oªñ Îm`Yü¿Æn€â̇‰ÓJ Ú–É#Ð E‘´.º@À•2¢j„«SãivßW;aIS¦-u`©’|x—ÄHä¤~Òv9gæLÒhCIã½À4U¨À²H˜‘-…ºO¢ÎÖ}Û¨ú‘œ¸¼ªº„CH¯<òlŽ¬"´Ò§?8+=ôæ¯Ó'KñŒëY³BÍ•…òP N!UL>98:Ø;=pÉSï-ª•´hÀ0b¼Gñ;"_~²:é®Â›ãl0·ÚœDŽóÄ9æϱ»“WÑkÙ‘hÈá}…æ0Ý(Ê­‘ªzÜâ|F`¦£4;¤ðyì(w0EóáéË'À\P@㧚ßHeÒÀk9קY2JH{ñ…Óqe†ü©Q—uy‡ÿ¦8°d¤ÜÞå*«ãfGû/ONžŸ½Ú99øÇ!¦E|µ³÷ôàõëÜñm6}<ôôŠôoF:'Hº bwõ›¤‹¼Ì†Xy˜rÎqT}`Š¥ÛvÑí%Žv4!f‘è+HQ0H¦u9¸½%Š ìqh{ä#£ÿX½GnDìïûݘN‚.‚¹D}WàŸýý*óÈiëft•–_¥ô‹#ŽÚ§0˜J•\Š1ï£È=ÝJ&‡,S|„‰›VOT žý2 pt+a·‚}–œ/boMF­çÔ9H†E½-lŸÄµ¸¤—Jê D.Ïj©R£Z‰Žàtm†ªj™SCÍkb##2WÞJzÑÖàˆS4U[ttUœErŒznyX@þä»,55 ©]…Hv%æ¬+Ý©Øï¦Ý ÝÀAÓpqi†¯ k§ñÅm×Îù2:¨®ÎÍ(o$ª¤ógÖ¹BA“O”|Ì÷+Ø,LWvwäK½ÿ“, Ef…(ϬPúf…ͪoGrã$£wÝáÎö$‘ ÒÈTŒÁ«âõè/¡«sÉñ(=ƒ£P±8Q¯ãV̧suÏÑ9‘i [Û(IÀzôœ’“¢Æ&©¼C² tŠ i]#° †!E¬¡ÎãFÌnh#FÛ=R(øÅcŠ8wŒI_g2yÓ¡[×Ñ3ÑÒx£13õñ˜H¼ í’8cÕöêuœ=!d‡sœÈÝx®á£»ðu [°°íZ9mþÊDZ Ðt'jN*ÿÒ ,Ÿ6{ßÂÔ+[jonþúé²”´›µæ¯'ôKóCiíÇÒZ?ˆÁ,¿×/¢RÓ @h×ÇÀq¼ì›ÏŽ˜·pM!YíW¿F¯7ÛUhÚ|œpähDÛ[ÔùN³¢³Ù”ý×õ½ä ½Lr }± ¹…Uëy÷½ÕžÙÓôu_³WR˜Zö¾ñQ¢š11Q?Â`xÖD AZùhp}ô]'åÍxª6Dñj æN¢O`íviÍ:äUèuÅä,؇@1i0myA2¦’8à2ª‚„¢g褷étŒ)0Êìëxkml¸ûz´OÉjDulÕH5¼õi:JùÀë5dà!PÒóÎ|”v/ò66ë Ã,uÅxýÛ3%:iR'I·¯¦÷:¡ûC ¾£Xf|Ô¡Rì-upa»—Âû:};˜ðš ûR C‚Þ=çhÊø‚Cú€Yw’0F´‘ÉÕa§˜IÙa"°Gœñá}e’}íS%È)€‡qÍ44ûÃÿá’Y+ŒEtV‹Øª.6ôofé®gjã¦ñ+_c‡D{Ý|åt˜éhA1P] —òI…8Bì„YBw~ X:.߉¥øgÜsò©ZhÚÃÐZS+|×<¦c-ØU5ðQN.q8›9ˆ²9„¸g‘ââPÝL–SíEK*#|ó~ÓëóVúMnúo<2…XÊ-é=­”·C!‡’…%RŒ+˜>%”!Úñìåð=Gí¸].{MÛ±Á4q_·ð ¨û¯‹ÚîäŒáûcÙçu.j îÃTmª~—²YÈâÌ_¨ôì#[œºdV¤ñ§R¿6¹ ;×ÝËA¯U¦L¤%Ñàgÿµb3Ñ`z Mn‘¶¼[)/k’sÔ7))ÁÀ¨FÃ6«ì¥Œé*’ÔØâ¢eo{%ã Ò¾f2ÕOÕÞ 1 H5g7A6[€¦d%ç¾” Xã*-⹉ÈøHƒ²°2`á$ÂÙºç?g¦EŸ˜”mŸ¹ !gAl>öù)‰ŠEŠ èV SHpû5ð}6°½º · "ŽY¥8TŽgÍ Èê±8ú&füº‘ç¨ê›àÌ·E¸†‚s’×8ÊTlA¿¡{»ÆûSH)‡ ɺbQ¿+L~=:àIÎÕ'€²²e³4Ð<±aÇ$Fý\—‘Ô^†3ì‡Ô{ÏŸÒ_/÷žDGû½£#ügÿì—ôûþñÑÑÞýø – ­N„¢³Ôµâ| 4Jeá xÛ1ˆŒðƒ·ÿö4…½r¿ÜU#’üÎ×½’ï5| Üb’y1ˆ]Ê»x°(0©\*õDaçÚŽ‹Õ“h›½W/dµiµ*‘,p±Õ&ÖÅÖ—vD6Ì;ò¼PÖ¡Tú{ù¥Û¿Œ Qêä¿Ãô|˜|O„Ø™‹Gà ¾öy9¹Á2ÅÆBãÏ5ô¸?÷kCICßmäcƒÅ™ C²¹ðv9ÿ¿f÷“åU‹cDFîºðÆ÷Îuqì¿ž©”Èo…§Ëä½ÍEà| é€x$ý†t†ƒ:ðGñ›Lgˆ®qÚI<ª¼nWËÞ ÍöVór×ã‚ò¾Ï%-¤gT™,‹¨Ní’ É¼›Á9çàp9Ò­êÁ0Õ†8+ÚΩ¦Š…k„[耓P^()Ã]Z-[߆Ãy œ]Oˆ•ˆV Bßß,žã«\¨Vº¡H\utPn1`# w~SW*¤}•yMø§>ìâÓëwx\üçôH v!pø?œ<û8Å 8Ô2΋ðéN7ÕŸ‘RÛÅ^<Í>n ,P.p`†HÑžX <Wý‹øjIS?6›öN™Yì(è6ªXŠ²…þ\ª°–¦W˜ÍÉ›­7˜ݳ€fCµ¢©ÐEFµ½.Úć…1'">ð$U?!äËL32ˆÉ i®¢Ú0Ãä(Іyää–üðÐÅMT3R 5lÌoó\~°9œÈÅ> õ/ò'öú<2òê\üÀü%~¾îx”ÊI|=KYZ ºv™#ÁÐn?…±qÛˆ³¿GvȸDwÌYžÓ‰¿ *ãÈ^ÚF ­‰a¿]¡8¢En)2Àù}©B‘ÎË\ê½åäî#‹˜ÆÕUÔ‰¦âwFI‹úó)gF‡/Ô¸ŒÑ¿ ]8õ¨tm\Ï ØWa¿i$sÜ*þG•\®4v:‰tºLãQa¸)Í ã}gä|rùøϤ¥>úÈw)\¶ƒ;jæÆ/Zâ¼3e+n/øºMÑËëvßËئ"f÷hat.ëf”0…£Ô-A ­d·<¦cƒtÆIã‘ðÁG©õDÞq:,÷"j&³^sØo¤ãfÈËÙ§%#ûÛX ú«dƦÓî,(AÚ6ÔÁ†Ê@ýqx>×’IxÔ'ö” Tè ó)§ã!4I·¯þü—ÿóo¯ïÌï[¯Öÿí5¥få„&¼Z¤¶P:Õý­j-êM‡ üÀÞ>¸Àÿƒfû*±íj‚¡ñXÓ«nÞo”¼Î#¿ËŒÂàËß²WùñŒ„8Â-,­¤E‘d¥Æ¶Œh¥/Û‘â0 ®'þ‘^Mb]–Ü­+Êø”B A:¨Œ‰6ã¥ëº1~4èà©pòróüD¼™D@2y?h€ÕŠ¤2ÌåÞR3äÕàb–Ѽ¸}º_9æ>Ëw±ÃâQ21A¨P ¸àÜæïDþ>ÁÉß 80+`F‘Âèw1ßi2Ï¥€.\GlûF©jÍnãké` jœnâ¢ÄL§H»ˆ±7•®Òax$ºàô’[dªRy¢¢Ë³×OQE×Âê{¹xcž Oû:bŽ|c+£ß½=À¦dGÇœgì¶ð=‹òNó˜â„ô]”[Ú*?=µc\™¹ ®a®ä^”¦¨NÞ˜¨zàX|Å%hÕéϯ¯oÙÞœî:lž& /¯Ö_΢-q„ÉqÂÉ;3;OáËX@¡2ðAÍ×hÛ~µWÿný÷×;ü¤šÍqïzpÉdQ+å[Ë×8—¾× fKþ)è†ôHý1¬§'ªqJkdµ]9ÜØ}}ŒÉP<¤›•ý”Jeý8¸Ãš¯.æ³ùT•òLjŽø m­É¢uv™óÆB¯7Ô&ïgê§ q/œ Be.‡ã“`»ºÙºïù ýwt§  ýéBO9É`‡ÏZ˜âµQÍ'WìH§eqD­‹±²þ®ÛäÖBn˜H`åØÄÌ0Šزƒ,ò”þIè×›±j£˜O÷I8^ê¸Ì·:Œ´§ƒføF"†‰»6Ž3!<—G gjþ¸×Ì2ŸæNlS—!Xà’–qÔ³ù_}NÞßwßìbª}ˆÈ€Ħ’ËBg2XVD% €JᄺßuȈ§¶R³õb(EC]ú@`Ð.?x¿)©å£»®†„PŽ*ÅD(¿Ìg)ƾaä"Ì y?!·yþsÒ­~ÞìIJ·)Eü¥ädˆ´Ð&ƒtâÐá¼rw¯fQEc6<†TcÚ›±KM`BÇ#:iú©r#Ú£FˆŠ¢Q(e‡À¢Ùh ö(ÚTÞÖ´¢×ô--"‘*RœüºMÇX@²‹pE¿Q”Ü„FÖ-•9VgoXseöeQU9úgGýf•³W2D•œKšØ¸,cçqeFã»ÓqÅBd’Ó-hõaf¶ø™Œ¢lkJxdÍ `€öÆdŸ>ø[0Æßd=„ÓE|]‹ŒdÿeF•N‰„>ÜÅR1Ü/5“Û/;œìi¥pSùƒ¨Ò®H¿ðƒI„ZöwÖ!ÿ<¹[Ä¥ž‰U—ü­«~KUÿ–q“vFïzRÆq-¿pîZDW)3¸[dï§æRÉŒŸk ß;„  ºùâƒ~òñLèæ/ÉNžÔñh.qòدcw7"OöcOfÛ0²M3m³]˜…‘c.*´Uü”ås%¹¥KÖV.Ñ’%k–ÇÒaåc䆀N5ºU„WðU¥—•}¢¿{[§_J!zŠŽ Ïp|Ú*Jpä´X½¼}‚"…o('l nVJD=VÓÖz˜¶8[¼ÈW¹^´ÉþVÛ˜[Øqù‚Ûeó¹ù™Ž>å[Ë1øaOÿŸ9§bBã“–ÂUŸ¢cbM‹°³¢´5àr¡ÚÐhdmš°~ìCùÖ“\£[Êpð6ñ‚j¤^ôêò.~n؃l£Ø'ÀUÂ)meô—Hpa"ÂÅ¡yA(Lš¿¯¸`T ï‚šÐƆ«ÃN„%XfÑîOŒ6 ¼z6-Ë»É<¯]÷½‚‚ $–áiÑZ$첑W‡¶?D>À]¸êºíwB©°/Õ’GL€r“Œ*¥[,„ùJÃl¬”ö#ü›èEáHXE5)4Ägú“‚dè„Ñ¢!ë“cΈÎù­É/©|«,4P@ÈW Ãµ#*<Í  \ÃÁïèp°æ{˜0°UÌó4¾Ä¨:¹RŒŠGxsñ)ôO&W´ ¢¨ä9ïm:<á)z#–M3å/+o‚Q­±о2“):NLÅt_IärƘ+²š]IìÊ@6Æ|] ›Ÿs°k1rq.1‰ Ï–Ä„njÜdÐB h^Á‚5k$Öø€)YXË•Ê.™Œ±Ñ ʭKÉÒ!8G\c?XI&×4Nª’×/dúgïùÛƒŠV ÛºBøe;vœÞ]æ9T¼Ÿp©—`L€Š¸ùǶØd9÷c7S³h˜MPrþžG;îÜ$\M%Å\=™FìßCCF]fji„q"kžëŠ×ÀýÙÖ/µÒ½½„ÇTøoöΉäŸ>úºLŸíý†¤ªÑô)} vÓá ™ªÚ'g0(‹æŽâ“41ùHù¦hoYݧ2]’0˜*`·0©9—ýmÎÓ)iMT–¥¼~ÐÁ d±4ZwG·7Ý[e\F¸æ0a›5å+ªVÕ†kÚñ%.aµv\†kÝp1ã·®ŽLZJ+Ÿë$vß°KÒÞëuÛàIxŽ7ŸsðÕv–AX(:´Uýr +6eªãä”° xüìaȇvj•»f«‹pâÕòE)黂›Ä)¯ù„S=Rj3*tPíp-<ìûê&:–ÎøAùNn¿JõÎ(âš82@a ÏÜŠXY‘O¶KÇwdܼè‘\½-ʳÝmf\·UTvÖàšZ¼—’ÏYr ÍÃÑiôò\ÝF»nÖ-ͱÂ\'×çlDìö’€±“{ÐY%Ï?-0S‡MYSG>}2®¡¢wn<$¼óS ]0b$3D)]aÿu¯æsYó t(O€YQÐW%ôe*ˆ¯w¢¯u„h“œ:”K9ux¡h<\¢ÖëÙ zI có¨"‘Ÿ¥™ÒBK&:«ð/°]}ͯìÖÛ€Ó4âÚb¶] L£ëREË w^þ@ÿ~<5?±Ç΋î4uÔŒÔXj9åÔJ3>£ƒ‹Iš3-N^õ;BÌï½¢rÁWX谹鲮‹\ª(~0²U~*> *œE=J®çâ,m6±Ã§ª À":å'ÇOOöžENS~±·ÿ÷½§Õ¨üƒÌŒß”Öýä"êtz“á<ÅÿJœt;jÇûí„•uô^¸ –‘&ñît ËýNñ|ccÃüÚjEßVé¡ZÕ0¤¿Nú•a¿’!€hocs}­Ë‘IFGgÇG§¿<ëì??=½ §Ξü-MŒ¡a{@?@Ú!á$=wz”B£Ñeé˜@Ê Þr/ݤÑéÙÉÁÿÝH·jQº]6z×@º£7àY±îa•PáÀÏ/yªe¢xÜ„ÍxhÚ%×L->‰Wعï8“Æ!‚•O©èÑ2¡÷(¶Wv¢¿ÉÑü[T!BAÄJ5„è^ˆž\ã¡eÒ"«–¶ÁñãKŽ82×"|‘(š:–8_l??²É9ÐPBÏŸmŸ¾x£º>í„ ÓµUõå±òÚl3o;0à”» Á)××¾U ù}Ý R<~ŠËÎ^ÌÑ÷ßÃp´Ü·QÅy·cò¾7œSŠœ‰{G.Ö˜I¹Ñƒ§'/¢ú»(Ž6ÂŽªåØ`ƒƒg• *Y*ïÌOGyxȤ‘"i=IÄò 3OŠúú¢S‡K[3]%¦6›ôMAˆµ Öߘ·<ÿU†Õpø h¹"ÄtøzëŒÙ«s„Ъ4uO|¹Ù¯Ðã´ùkc3jo4PõƒiW&•(®|çC1Xf`÷¾+cýÁŸØÕ)ªf’WI–.¤I?¿8>9;…ñsø2@”ãJ~G¬Ìœ™0¨å®9©¦×%Gž6n1–ÆêN[¡œ6¯¯6-¿nW›mü³Õ¼4°oFMý¹ ÿ«Ä•è»¼ù/œ>´ŽC çSr±ô»è»Ï>0x°Ö¾¬åï¿.èž]n¼Ñ€âÍdä2ºš¬”¦wÓ½/Ó…ã?êFékz»@Mf’³!«mÆ:ç½ÆÑz!ÝØhäñ9fmúCWÝ­FLXPþUdÄ´ m4|/NA’ʬÓE Ôut†]Ò ¶ÕÖ)Û¯³æÓÈ6 §–g‚ð5?Ò½ÕpÈ$x.€j]§ ýÄ´5ò¼¦Âæ=Øí󄲟ˆ®ÆÁªæIêvãΗæúƘ×Âéq6 ÍåûÆí%Ð#ø]æL~²éG~ó\°.±’…ƆÚhñšMÄh8è °Šq"r+‡}ç£ä÷ ¿Ã2ûôâžá©ê iÁ|cù¨U¼œ‚®²ëò A©-ïvX¸G:Ü}Rî‡øê(ÿC&xqÎß_…ºOV–±®'0Â"«)8I\*„3b*œ‚ Ÿ|îÝnÒ*ì»wÝÝŽ ¹ìvmßì'ïš#L •Ïsßø¤7xóäRÀ=Ë0áƒÑu§ù8jî¦Mü±Ó„[ 8[@¬ˆˆ€¹À@ãÄ[¼ƒ¦¨aç›,d%ד٭u_´.Â&A?;¡`uIóSDIù4—«ôÄ/töO¹>©Èæ£ÁoóÁÅ­&gn®!3.›©€°ã±¶w£‚ýEõ·Ñ£è;»GÎvmÿõ–®pÍ4ÒçÒóo¶-úÚ!pŽÎbO]híbDá„ïóDé‹üî;}lí¡Jd ù,—9¶ÊáŠ?QÖ57£çÇÏ¢M&w >C¦¬ª¼‚Rk¬ªñCÈöÌì™XÆ«,Tš+5?ºÑ)´¦ï—ªÈY‰Ù¬&D;UéŠú‹«7…«gí#ªˆQ§Î¦óÞŒÊá°‚s‚G›cψSÜìöû@8ÒÝÒGT ÓØ8Ý]Õ‚:J·M ~!« [¤>vŽÎ~ÎÖM}õz—•Œ¨S ²«AEÂhþ¤ÈÆ„s³ ü o æm ìZÑJ³G@¡àµ±+0®Ï1*ß|ÿ³VáƒêáØ/ªÙØlš3¿AÜhÃý¾$üëv\­š^e`^¼1Õ¨ýõ×»MWÀü•¡È4ÿcl“è¬øáÀˆ¨Uú}h¶Ëv\³‹ø±öE‘&ÂñþvøüðìoÞ8_[ Âí•ìj y²0ɱÏq„­.!zÎãÁ›êS׶P#Æï3ˆ3ËOO«Cô¡·a¥»%c@áðäî”ÊÇR m>¯©ì4I0}˜¤¾d‹Ò«''ð¢óÓñÉß÷NŽ_>¬GÉä×fNfóÉF•hÜ~‚µâ±þèÚõB  ¾Dµöx¯\æÐmó”äÝ¡O²Tªë=ˆÍlaQçBI °›’«šÀõ'sT&ëb£QVÃõ9`7'²Bé,<`K@¹óùüR«ƒ°›Úº´Tâ3îP¥Èúë"JÐ<—çEJ¾Iùo_îkTVý0'÷?ÊxBaŠšBÁÎꊬ¥L–åÃ×g\ºp"yˆšš¥ëÄ·Û?Óí6À8÷÷ìF¬o5¶ˆõÚ¬oÖ/àÙyÚßnlÞ9¿>j<ô~O†øHUþ¢Ï‹N¿þ8‹š»½šÌ߯Ü[ê²zxP5ž¥Ÿ/vÓãO:=ÊÄ×bU!程ÊGgûX­õTU„^»5¬ÞÖ¯±È%Ùîu>k ^x™¤fýß,+*[‰^úóÙ`˜J¼¬¯©oD'Ü!|E]ŽÆ#¯×'{G§Ð­)-¹¯Nߧ3O³·µÜ¡»h”Ùõ@þüYT¬àCÀçJäW‰»ÂZ±J´Ñ¹JºýŽäÁ{Xÿ·Îëo:¯ºý×ÃÍ»¼‡Ò»j™E]gè¹Æ9›|~É=EÏNÿ­u§ù‡í¬ä‹l,ïkçùË££Îá3´UwœîŸ¾8;>Y´kÞ<ÜMc›)¼àJ¥u•¢œzê“Ð÷„€Pf•Ò:Ö«N¨6õpLŽ)—ã1JW\;wóà¾ÉnÄÁ›½Ãýú±›Jñ®T¬ÃÉpòÍQ4žöÙ¡¾’tg/ oiEtЛKâ1’2ʼ˜ªÐ]è)Á–hŸN3ë[ãÔ)}ÌNèóço£sà )¸i€Ü_>¹Xâ4à\Ör™W8±)ú¥ôêGQyËUÐã¦1wæ5g¿âÍî´­éûÚön ðæâH8À¢ÄòšˆofRñûÿógíH²4]î0ÔkO“§kÕ,aáMÒIŠÓi%—SøiÒ‘ºPOM<]ÁCÃ;û?ìÿ½ólïé!V£;ûñø±I¡Ox_>þáß¿|F¾#%›®²õð·ŠoÖ0Åy„Øt9ïJ´1I›õÁ£ÿóçÆ&­k ô|šìDø°ú×»IRïN¯ë7E†¿xêþÄ;DŽ×÷è($¬òc*­ã÷³SÌ_5̉«6¤:ιce}ñ=ƒ­JkÊQó^Ž®‡d‹M–÷]"ex¥ûR°5·Ó7¼/@¶`K&ãø«úÞë-Ïõþbžv«¶õðá‡ÒÚZ3:Œ°Ê9=Mï@fçeÝÉ£‰üûü+6©¬œWÜÂ=94c»-Ü) ój§ÁM‘/LJ!ÎÎJ‚ ød”t³ù½Á{÷ Ú”tÏ©¢ ÒGÍóŠî€±mSŠžF£Ã##Ðñ³Ó¶–®hG/ÚÑ! òÐdÂ]29?-­ù]~S1ì$9è‡$ž3²3m^ »3<¼uL¶‚ÛGÚºyRÐS ›¦ãÞ€ävCtL>hï³ 8$Þ‡£wã·&€8^QM›æPwhºØãDÕ;ÑŸÙ•wÀè“ÚAÖVëF¼;A*÷òYØ°ž³ã㣨^`~K êJà`0ÛÖ¾F#¯ùšrIŒSù^–Á8„’FÓë[TR©O¿Ž*J´!kh“B¼‚ª3ÉÂlï— º‡eñÚq£*á^œ{íh\]hhò¦‡gEºxøþÑÃmÇ@2HÜšÕöa/$þÞÐ2‰.i/é‚H™t{HÔ–†3P·@à"Ä´¸€êUòèøÂ,ŸÖ“ÉY6åÒ‘’ïkøk»ÑìïâiÅ«¬Îˆšç_ÎÄ©j©ˆ»pÈF²’@ø! ÀÓ¸>T#h÷,›Äefþò‹vor¯ÿPHÍÈŸŽô»©Š5Ø&ï‹YÐÕÙ”ŠòZáH¥0ùBaÚ›æuZ·&¼ÅTÿìN5UÚb@ˆ,©š\Ï™œ‘NwÔQòŠ&PN˜Q*jR˜màZsCʽ_Þrk±8/5©È–¯± Ã1¬ã(e<¦\ó”$ØPÍ„}7ð]I]ñBI‡#/óËÞ±Û®RmØ6TüSw@þ™xÎÍ'¢[dÆSG¥CTVmç”oÎË•‚FèvÙ™¡÷N¢÷Q;ng×׎«œ,3u£f Uþë.æbæôiº”]ÉŒ-*Ÿì~™±Ü¢Ξj˜„s§ŒxVäŸú¼z¤VÝ¡wr+y&9IZJDÓ4 =òïÐ+u' ÀÛÌ™–cFÊœ½™á¼ÏÆ9 ‘)ši·(!÷œ´S§˜—BóØ[ÜÒßßãá1¿tÏ7”ÜÏä'’¶ä•apRÙ\%¤9åçF˜yBú(­W:Ò‰˜ælù5ÏßLnúo⦾Žs+džá9ÚX^ëÊŃI›ÎÜÌDNWxNwœµÛ —²{IßîŸñŸ*›хʸø­ LƒóešÀ=:Œ¾‰¨2@ø\æL_9¡5v¶ÃY¦¯zËsñß.¨ä”]F+Î[›]’ Y"Ø;›¶‘—áéú-V›žÈæp]¼(¶‡æ©SKªl _ó&3h+ó$me0Ù†[û³uQÙë!\…Ôbpz3óÆËÉ?âàµ$%3Èìv{¦¹§‡S@úôÂÌKœ×ŒR þmý(lá<\6·‘üÈ× E*eÐ*ǽڳbz!t«–ÇÐ8¼[\¶¿ÀÙ£ 3w‘Á,ñŸ\†tÁ&‰)óR•Yx|îõ`ÖÑ Õ¯°úùhüš ðÆIƒd±Æª­³þƒÒ´n×áŠÈÜeÍ·„îÛ]›R3ʃ€ ‚sW<%¤_£+DÝ ²ñ’yµIΣè€#ó°–ÉF=CæàøùÑ/”é‰ó@SD/÷¢‹¥d”ÖɈÏæJÕFsÒîi1ÃÑ6’HQÒÁˆuAâ2Äj”áÜ©îúÓÉÞ‹'v•éüpptüüéiçðy ‡'ð± ' Þ¬ûWpxU@2«H!lòv€  ô+ò=BUašÎ¯Ýr²¦úÙ W`—•eô¤%.$ÉnZ³+´È¹Í±Q©•PkxÕ}7OUÖqq…䜵ÌsL߸…‚L}4þˆ‘œÌ?´Kë_EœöQO¼`£z„ùªÇ¤h ŒÄìl6 øø^‰×Œ¡P‡Ô,O’ø<±x+=û¢7ʔփ¢}!ò¸uõ•a°.QÿŽÌÕ£“‪XˆŽ’«|9E©Ä€ÕÏÑûâÔá˜Ñé¯í!4ES#bÌü< f’ÙŽ´ÞÉp’bÃþ8šŽÏñ¸`.kØpÄ=C·÷–j"£‘æ:™u­y…;ÁB¿ˆ„ÀÀ¿KôŒt®Srì¾èÿA–D«'̦ù´*åàIçûCý0žOGœ+¬; JÒáUQ òá?NìȆ~‡ñc›2DlpN>¬•V-ˆl"Û~Aw¶ýg©”òzôéUô¨ñž¬$ß¿’øŠ`“!œ?²þÁ,P4Ç©ü­¬¡LÙ»¢>(ÞhÆÎk\—ržv/ñH?¤\F—Çp¿3‹vw8^·~U¼^+­ŠüˆúX%ÜSÑóãÎÓ£ã:§/8=+‰&„®ö› $KõqÕåøÛo}Ø$ÿ¹»Óìîòu1(ýäèôÇÖûÉå·»bVˆø¬ÞÙtþçoK_îíï´¶L+}$ížýý+GìÇõ—?GoªÑǧ‡?‹O‰µ Ì€>$3‡ja ºHJ””eÿñ‹½³‰„aI†ù×ÀO3›ŒHà6(•‚´òí0÷z;.é¹LFïÓñèÚËXÒ×"¤)§…£#†§¯Ž†ÁKܨÜÆm,m‰Á†ü‹ÁBSA…:¢$3|}°¡±Ì\8ˆœ‹ªOÀAºîö¦cýÑ%,—Q ‹GTyÖ£Ÿð‚Á:/xœ)û E; õ£ Ö4o3nd›i8›š¥ˆî)]phZdÇW¹ð¤íøáÃv,ª„ßp+râ?“€C<ÄùÛÜ/x+;V qÝœ§ê¶ijåŒÆ‚ŽÑQ>xp!לÑÀ“ÞWôy6íÒwßuŽÎpÔÎÁñ“R»¼Ur~GSN‹Vë¦%µcV¿Ãÿ‘ʃ¼0è‰Á Ä)‘avà§ì}µÑ­šú Ì4¹f ¹WjÑÆy•/²(÷cb·±¹4ƒ›|5µt¹™š–—jú“ìÄ{p9YõD‘ê…½*Ý“d_tìitDq½>œÕcø|ƒj÷J}\ˆ³ž¤yô¾³ ‰·FIòÚ‹ãgU/WÜPì‚f9»«… 'ÎìD4ÒÄâ|á3~0¿žÔ éo×~‚¥¾ñÜaé[@jŒw§RŒšê%ÌI"in´åž?OÔ¿†F«¤Qù!óŒ5×È¡Ú·1Í<óM¹Å‰}ߪɹ†Lça ŽR)2Še*$CŸ”"U}òŇ•^´cUØY(U£p[ª± !g&ŒË†çÇ­ö¡íøgÆ™`;PýúsS³Â=hRY†òƒ•öÓ­Ðîˆúš×7Ö¢4óhdæöä“çÆUl܉!0òxMûó“vlÚ‘šñ¡ï×HPt„M3§—#¸Ç—£Áï”yZ ï £À»B´õý×Ûþ[¹ž“*Šk‡T÷Ãp¬/:·\_'ý!ûNÉÓZ1hàÑn"Œm· ÂŽü¼Ó.>?x~¼“ t»"ãyih¶EË/äòLå×zÌÃF}LÅD„3}'p`çàån•Ã&qZ-I=*Þ7J;o–yÖyì=O¹`ΓٻÅ%7ðÙ»WI¸ã×;=‚ßi‚Ûo€íšFáwhk l¤-&˜í£±ØКk•dê; l—C…K¦ˆAGè±ãײj}`ÕUHH;C/¦™•?Q*BÚ>ìÒE@·E‰£—I®Ä°OøyœRIàͺö.ñLê°e˜ø »ðÀŽkÆòïø§,W?<†Ým,ÖO.r@³.Àë¡d²KFõŸ‹æ ˆæ Pý¼fUpÅ™Zð<€v ?múÓÒø1ä ÇÀù÷º“”ÅÂ¥ÇëÁÃ5‘¾DÜg˜Žs^t®c}¬Hø îU™>-Ÿd= Mkd¦’%¹¾q©‘ÞÝ›í¶w¥™º™ ¥Š¬Ù“?/›·ÖZ'DndJUì‚ð72v>D¬#6#Oói Û¤"vwµ€âøÈðQî,ª" 0×o3ŒÈAÔÁ“p¹Ž¨É:3”-Y3$«è€ª›às4ó9\Ë@m·YÀ§‡ò¾]–Ï…?yo>ÅâÒsC&F\Ÿ„ÖR äÑ[õ=½ÁÔ3Í<Žqºúu£¤"Ó›aÕ‡ýœù¡›+ZãêßGÍæ„gÈÖo—„ð7Æ.õƒVZw[.îG\š³±uQ‹hšØüÑL´™½«îè2q—âÊŽïÛZÄHÅÅ÷v–adÎζ6ü ÉlÖCA|ÌÞz»Ø›¹mÝØGŽ]<ŸÌî¢pù~Z®îeÊUZ+£q¥Ô®—°ZÞUæ2…>µý>IùOÎrdO3ÜŽeZk1^g½`Y7r:n±ª„çOGR. ;m1…Õ7*–„G¬`‡=¿“›¾uI#Þ¹žÕ 'B-Í}±ÈŽ ÁL‚Cª>¯æ“ ûÝtùòÕ¯‚…|t‘l‡væ€g ãä€@.ÙuÏ©h‰KØ8_G„¯xn½~0/Lü"`qià“)÷ynů¸¥SHÍÞÙBÞ[p«TF¤RâIB¸ExÞ&í¸T j±w›ùÁ=T[ýY1ßáúÌGìíÕPó:Þ¡½¶3]-ª£aX¼ßyIBœG¨5·ƒ´Ëþ[%™ •áfqé¤TEB®œ4 ˆÇ£:ÛrÈTœ3.ës5þ?`k8FæH2AŠÏ¡´v õýŸF'ßbÍ»Üy»A8kË4wv€n6 -–µ`‚™rC÷µ·PŒØœeW2¦p‚n˜#„….;VÌv%-CT I·G­1ö]C(í^£”•å¥Âq%‡¾Tlä }îJ÷¦“3GšƒŸÄITUŽ¸}¦¿Fn§ »Ÿ¨b2¨óE¾Ô\V™#(1FÇíÈÜ/†‹&q k”Ï0vÒ)ºUàc6“pí*¥Æ¨–õn±ž6ðå?—/´¬.õsñ\ §/~lCÕÖÓF² <·gEE®Îûùvà_Æ·ƒ‹Ú¯ìÜÁ;ÎÎêîïàE«{xl6Kõ55C|÷] ¿Ç&³è³Ó}ô”°…ß:û'gÓƒý—'çÇÇ/Nö÷Îi%+éú`DÙÌ£ïPÚ7®¾÷aP = G0x-ÔÈ>„Í@2x*ýKq:ó.f)h‹Ói·’8U+bÔZØi$ë —u »6îeÖÔÎÖMÓd: Û¡%ÓÖC_QÿбQ¹‹Þh6 :»M›ƒO?­èžWdði·ÜÞóÓC£ßL3e±.äÓŸmÌŒ0èáþY?…çhê`=ŒÑ»hÃÍß]Ýu ê×0t6"¿SîuXt÷{ýÖlÿ8¶Ú}ô(3ŸZäÿíœ)|üYR,AÇ$OpŠH6TÆÓ©l‰—pWìDÜ*%­ ìêgi ”q #ÿ‹,¨3‡Ö@þùÁyh€g¸ƒ?Øǽ+h†éû„ÿÞ ¼èðö…€N·Ï¾8íþüòô$êÀ?ìg6ÐE‹ÿ¼éc•|ñãÞ?€~<ÿ‡}øäøÅÁóÎO?DñÍy\°ïÖU!ÜmwϽî<ÛûÙ«”‰á™óÒëžà›£ƒç¹_¹¯3E8µÑÖÃíoÝ ðáž»ïm"<ˆZ¢f[>=yá·„¶%á´‡´.†{L=>><0¿Ø;Ù;;v0Ø{UšûŠ ã¼Û©äׯͩëúìôññiPÖµóøߟ¾xÁ‘ݵ/ŽO·3ßÿ°,u“AvN9=;xV„ H¢²‹ìlã%’·ÎÎ6p¤íŠ¥}ú½¿d¯ƒðUTÙ­„WR>°©éåð´ã½’wý —€÷ªÊØaÜ`ònYØÜÛ¥µ‚^©npî«Î6–¦• jÖ—';ÿ¥¿Bÿ³Ä xƒ5®Þ),ÃYE^¿fŠE¹x‡g²sÜùáðùÞÉ/ó¥œs©÷þÏÏöŽŽŽ÷7™¨!C.ÙÀ6è %Þ3ãOèíf”~OÆô¾Š{¡=aòð dN“*:ø~ óƒ‘¸òìC„yÉõ×݈þ€©Ø>BÛb%Ú@&Ã=ºX~áà‡—OE¯¯)òñvFk09“´¢­]¡sù¯»—·š)Ê¡ʼnׅ£ÑvG“ã¾®¨?ŸPº ¢Z%NÐo „éÌŠ»Âyè7Áì¶qR\Íc#,^bzðŽÃå{-eΦ1ü =R¡ ´íym‘&£¹C¸J{TÔ/¶•v½«=74kxÿÞ(C|Æ šCk-jBÅ~¯¨l¬ñvR‚ïÝõ¬†÷ªÓÅe¯ÞÃ5ª—/íÅ+¿ 0‘ªÕßÁ¶\ÿ)ÓØÔnÉá'9=§û„\ó (á3¬M[0ô?¥ø$qäsŸwû}^ñlÜ Ì'}æp;YŽ¸x&Á甑âŸóo›.ðÛI'Ý›‘"Æ&:¸˜€þ¢MÙÀ{v^“˜ïHœøû»1pWH4Ü1#N¸ ì&i9G*¬7öÏæFc‚ý½J‰ÖÊhÝQÿUšL¿Ð®æD(†¸÷- « )ZâÑËh×rÒñš.5ï®ê݆®€¿´w·©+“©Â˜£Å^¾h_#½lá°ù™½ÅßCpÚýÊ›Å*3XÄ%Ð@9Û;yzÌ?ë³::£á¬îè¿øÊ»O’  zì€Ü€Ó¹:ŸìêWì¾#áò³z&Ãt©µÿøå6|qrðäðgƒIêûG¬‡3u"g6©xÔ*ê5—ä#µ^ •á?…]D±ãºçwH ;l_K;ÄöÐ^Ð%täŠ6ðQí©‚ƒ¼ì^‹ûÓ\ö½ûmƒØZ|ñz»¦Å hŒr ö)ëì:–Z¿ÕÂkÒ#¹ Ùñô]3™ëd¦hŸŽnû/ä’ˆôSÀ­©¦Æ0f%ž…Õ*ö*«…o„ßÕokÊ´U `èÓZ¥¡3ßa”DJ)¶¨¶Œ8×£ÏZ$ˆ­Ì€ÚvsäÇTÛxNnIÇ;B‡UҚȂ±NKýfä[x—ð.´'pŠqTÖ^\$XÛ˜ªm6ÍÊz­‡¦nÛ€˜áh}GK‚Ÿ¾ùFj¶•2%ÚJÌGc`ë×>¸*Þ¼ÒóN!©®_­­3)ÆJEÏGX¡ y¯ˆ §)´ãtFÃEÙ³±U3âJuÈüZP'c-Cõ‘Åg¼f5‡?× À$4ÓÕMÑg8éQž ,9 <‰ÕµÖyA“j*«7€£ÓyÑùiïð¬ùÔó1‰®tÓÈHÜg+ªoù@ÇÓ× Y2\ƒ…^V]•ÏðøsÓ)GÙ*ÓÑŽa·âÌžùk2Û‡|É ä½W­9ZW¤UÚ(Ïp©"P:ú±œÝä­ ¨±·N‡© ÇÚ¢.Úã0$”r°ØtqÝ)… «’~m þ¨VòRž™œTÒüo‚ þè›4eS:ïïW“•dÉëä£Ñ’÷W@É;c&²P¸aFŒJ¥EÆyš™|$‰dþjx2«y6k¦N¾&6÷~-ŠôÑŽÜæ}„Ò"Ã?«ì/]ß?b'!ÿéÛÁ$B¥"§oYÜ`©QøŽ´H &$=H»ÃÉU–:¥ƒK'P¥O‘yC3&ý¼õ]e§Â»C]ÓŠ¶­Ã…PHœ:ì1 5›üþ­D‡ ý„¢ †ƒ² Nbƒ0Ù ²‚ŸA¶fÞ›±_a:»ÇeP5Ç=+Ï[§+5ãZ¡é.GW§¯xR¼L«±Ö–4Á –§¿Nd~O¾¸Ü?æ ƒë<¹MÂoêuygòîÔ‰¯êA4avàjNZæB`tŒ6w?¬Áx,TU¯Y;˜JSÔªHô«Tû#9Ež&œ–Ž©$ñ6 ®F󙺿¬7’MiÜ£øûé ÖÕˆÔXå+~úXãXH}¤Ê$t/~„‹“¦ˆ§*W5²…b®Éã_ÈÕJ>H-`¬ekQÜð0(ó ƒu¯vUø$Ûèù­^'qè%"E€´ôÊqgŠðšð/”¥€([c# ` äÊH,x5¤T@Tí!V]—*F E7§•öʬ¢á&pìiÄ5n÷_C¯ï…—ÀB‚.Pš®¿dýƒ)¼n@èJõÖ÷ÌZÂr‰°~ŒV6Y¤·+ü¹Ègn{{š ¹ú 7Œ3{8Ë#ÃÞÚ kX[qÎNy‹X+XÁÚÇÕ÷ ×\ È!É$wñðD÷êDŠdiG¼vOú5*áàÊÚÄW™V¾y 3§ZÚÕPR’ü ßÞ0Î¥ÊÁäoãaµ0JÞ ³2r%àeáoD ÆŒ¯‰3Üo†ï•ã.‡]óÎc¿¿aO»Ø6ú aµ¶&Hxolþ†û Ÿ „¤êùRu€ëѤê4 B}-ìA0ð‰¿³÷›8¬9ëçîèšY[ã’À(oÉ ¿¦¨7Ÿ¢…ßI«°^„ú‡Z£šãÆ_µ¶6–pÈÒ Ë/;dnɵøyt­XZQ› ƒJax"ï¼ã&3 Tªú¹¯ Õ©€ÄŠ%É51àNŸôµé";æ+yóZ5M“‡ýÀ(Î4j‘C´,³:>ÉÖ­°°ÏYÖD>ÏYÒª Z¶œ•¨ÜZ‰+$Ô\ÂÚºE!™‰= ¤DÛ]M!ÎU”¢|ä»î$A¿Îw|×Kå}ÎE”^‘aV; _äx,Þ‹Cxó|Ê!Xí,>÷DÿÒjxRtÞæc…ò•ÜÖ¿t‚NžÿÝvh.tG±¾®I«±à(®ñuFbÉw‚sYOeïð²†ãÕÙ Ó+r¬Ö™®¯Üî­2´š)Ú#(h>Ðe¨ÝgS„R†!KH¾-ãëT#Aùþ&Ÿ'ÞX ŠF¤ë^ßh¶ qoݤDBþŸL‚|ÓöSI( Èà³xxAFÄ4xÛõM”k­ßG™ Ùø*G1©*Ó7©× —¸A|×}{00a.‹¢û½Ö§Ñ0¹˜Éâ²0‚Øv ‡ãÆ÷Óñ‰[îÄÔ«ÛCm(%F˜X¦Á³ %/ô<°lg.Î/8È‚!C™ðµÓ„s^èšò0sÊ‹=TäÒÌyŒÇˆ•ä±’™ev!$„¿·´oµ V]1Ó N#ë‹^ =N;c8í]ç94už£ ì]Tð/5ç¬S2|<>ü®…_û€Äq¿¡çÈ(˼2Þ‘´,ìN®Ñ r8xµ«äÒg ±²¹ÛÁAè_”*rhÏþRH].t¼tÖ,áAºƒÿÞ ðšªE<œƒ¡¤0 Ð]*…&×3óN†x—ƒæŒíÝnÝÙpRšJÑ’(„è8J]f¡péy@gª´¥(8 “ð›6¹aSœï"hÁ?‹ V£¤ÿ´¶,@Ì€]椲ã4ØËN¶ÔY·£×£<)‡^Ÿ;æ#qÎÎOÌ Ô–énÔÁχg'{‡G/O|ˆÄOöÎöŽâìú :Lx 9¥‚È5ϲF Vã lYõ•Ùæv¶‘/O¡×xƒÚWcèÝÞ>¼ï gRb¯ædz§²T@}[ÑZ‡ÿëïĨŠLªsÑñò4‰›@nòîð¦{›²ûo—Üejt?àr/’Qï–ó}å|¬²¡ø.§©tâ"Oàb Ýrx[÷Np(·q+r8"îU-(þÐT¢ônŸë]{<wžtEH2 ¼PðÂ!?}¹¿pzjT waôöñ´_Bç¿@,¤3Jnø ½ lˆÊN—Á-Ç€¶¯yÏùn×ÿ&´…'¦‘™OvôÃoÂQU.TÈë*ó Ÿ2…TÎTs[f¦)å8};y —î÷?ª,¼`¦óÔÂY`Z×r3¢Ãf8hàP§OŠ”½?™ †©â-8¸¸5ëüÖI9øyÄKœÄ}DoýÁ"|®'%ëëvé¥jMËŠ<4›„¢\&¯âfÉ뢕ÁÍ’GÐ^¯X-s>]Ó™T¢Ã×ßÃpE9º^óá+hXßz]Šc›Õëª=1<ª‹ðÎEÆX‘™Ð·ðÅÇt»_dõ'£›ó?Ý>s;r‚ÞVqœB›î öw¢h-Sšç©ñÕ3³å!\Éãi£JQ<ÏÇ3©¤(OmÊAØŒÁ,M†ô!'Ì–tµ°ÕÉv þæUÀÄûÇÏN_ìÇÆáرœ—šãvãCt|*‘*‡ÏŸGïv£wþ <äÒ^‡£‹ñ)A<|œûÃkïRð§ÉL>:x¿ñõ;÷vùBL̇}”Á¡Î‹£½³'Ç'Ï8?Oçù™¹ÿ‰‰ì]÷ɳYTYyþr‡p’nÝu)NóV4 Ò®½b’IÖL±ÊêW‰*âÓ €%Óú>Ÿ}Áža°5QôSÂ>ŒTïËï Æõô‘|´~YbyŠw'œú…XcŠG®´gv‹…¿ãJ´W¸ã•ï*4­Ê÷•**»»%â¼8190—´iõ蔊=P ­î¹äT|è£o‘ºà¨ÖÆÑr8ÀŒ&‹mж¡rÓt>¥ä£ -®­È€@!ž¸Á3y9JÒ^w‚á©n#ê„ž÷5×9NøBšÐ`ʳ’‹ 8 X"Tûº3¿ £ôW‹ÒÌ’u)Ö&Æ”p< r™¤[3ÆêprÖfÀ$ ×ïaw¶7GßlÙ•äºa{ézý íøZؠѪmŒXTÕƒ‰å5êßG¦’S»ÍÚî}†Ñ'@3qa‘Óžôý£Îþ{'§QÜŽÛí¨ýðáü· ÿ=‚ÿ¾…ÿþÿýþûKûáÖCøÞoÁû-x¿ï·àý¼ß‚÷Ûð~ÞoÃûmx¿ ï·áý6¼ß†÷àý#xÿÞ?‚÷àý#xÿÞ?úKœ™ßÞþÎî?yf_Z£ÄU¼ùÑòtaaÇýd žûpfN²S›àVB7ÉVMñçäCL¡oä(œžõÔÚo}«}ÕòND5tF@)‘«;JêåÖ‚Ž êVêšË­^brxbŽxvT¢¹}Mª¡ºúš“ƒdÃM99ecnwäGPËNöj Ç™Áá0Ž8c¦:·pMê'-9¾Å‘pPýå>?馄ÉûÙ´kº¸v¹iBi4Îx0z7ærz Ó”r’tPv"7ÏÖh\2ïžþüì`„&èj6Iß™)"<™ŽBXü]‹óqŠ.=E5éKóŒ0IrºêbÀŽú—rq7Ìæ>’dB´Á Þ˜>È÷»«®ÖZ&‹`Yj`ïžÀ’G㛚SEªAßšNê£qÝŽ:y¢i§)÷ÏTüîp±p@2ÅM³ËÁ –C¦Íb(Ì+½$ýš“IDêÓ…ÓÖáTÍ/MkpsiKSgMë\ õµUG’ê‰ÂN:ŒLI+–7Qùo,¢É S Þý†ì‘U _z_RpfËÿÀy¦ÍLŠÁ iðxMØðA2ê%ü`<ìw2µ|»iá=!§<ò 7ÙâÅ«j£ó?#Íc K¤q…4*Ï!Ø,TRýë`{>ÀËÖP€š)G?âB‚çHÁ§:$fB4€ó;êÕô3.Òéߎº×ƒ^ðT²•ó¬3M.“÷üæR«F˜åŽÏÿ©šY!ž²È£±&ñÓ'ö«fÙ ž€¸%a½Áxžvh1îp#>Pº„7Ãq·ß¢[CŸ¼3_½´n‰ß0Œ–_ìÞ½w~† ÷ÚÅAD,¿_a¢¨NÚ½0‹|‡…KZöÇ Ãúú&é¾íX¡'^– §òÍ°î=)溂õ΀2—Ýs¨Åy~²$‹²[Õ25·ŽÝ”’kHå„(™*¦ùõKË~áÒx¼U“ ñ+LuH%6:J:p}1漦ˆ-š?ùt4Ë×z‰µlÕçG}+‹KkÜë˜{¦f·þÒš)Yl’ÅÂœù©®YŽ±ƒ*–Qq–´æ|\~ÜË;™·*“Òôwh@Ò ñ¼zÉ)™‡’Ò˜k%³ÄRò¹/úüeó‚G (ïÛÅÀ!¥]8z8ž$£ü²ó‹|`»Ì9Jx9¬qJ‚<ðÐÒ':¨Ÿäõ›ÝÒÁ¬ÂÝýOž¢6ºMײøÃ8ì£5}âµ¹Žµþ(•àJˆ¥çZdtVðŠ¡šº\:‡k~é›FÉTR¤Õã°ò®ƒÊê^>À3jçLMÆ~Šš1R/¯BcƒIñ#E¯•/ºé £âÔÄËëqT¿œ¡¨j ÒäòV¦ž±!–a€‰1_U ÿFŸæ4VGdWNhëvˆ‚Ô¨ï1:Qåö"Ùp-WË%xé&Á›IS"ñõŒa(b¡ð fleqÀMèÀ S%|Dd‰I4á³;߀Â)ÿíøåÙ‹—g‹Ã¦!ö5(š›™ [ø · <\£k6¤v$¼Çe;èó²ÜÄû' [°yŠˆo{«wU¢(Óä] w- §¿3ªTíáòì¢J¥ß¢æ¥jSmc:ݲˆcˆ^[Û#Éo g¦×(Þ¬Ò8k¨+r÷Å|›ù&&!Y¯ ©"ÓÙEïRYx׌˜ìlVábùŽ’@Þ[ ­ëáðÝ5}ºí»˜iV÷ ³ýã™j•j’  µ âФ½î´ù\¹‹J:Œxû5i,é'úc¹°Yq‘Î’IcáÔ˜Z£×¯Ïk)2ºç)í¾C­ö¥YpD¤Tã( ¨‰,ïTÆeý&~#¼Ø¸´žsÞ´º³C“ŸYÁP‡ÛFïø:.e:¦ò¼ŠFÉ6ÛÇP"Òö$âB¸qÃ[.Qª*ýØZhfÃ.Jüó ‚IŽ5+×bè¤/é‚€‰¤Oз·î:°ð”z–ÂôpT¯Ïár?T››Ð×¾õG Z —3“B§Å×_çµú1ëŠrhŽˆt”Ü”œ ÆzËS™yÂCÌuMÉþ©¾î ¢t~n…²S …´¡n…üÅMø»{O‡Ëm¢ŒŸ3ZÑWÁ¢å¬“_âñ(îŒ(´p+© ÐlÐgÎn–qNï% h^|åV=X$}j½o9…ß_á•æ,Þ4•C¿æ'ü–bÉrx`ÿ<°П§*Ì™h@U+!\VÃÐ^òïÌ5©Á$ðǃý¿G¨HŽñX¡:)³Ñ)mDQý8M»×ÝÒÅlŽ°¢/„=¥öA¤¼&ö€¯-¾æ³0´´³ß‹^î{}*Àòº#Zæ ‘=/ÏÇ£ºßi»‹ì'bx@³Ëý‡vÉ €Žúx ¼©f–¨ü ÁĽ-Í!xÅ”ÌÛkf0[Ù§µ5ƒÛF¶³S6™1ñæÅ”òì„×örS'-!VܶðI#†ádî e/Íñ\ŽÑÍL3Î#àó5ßúÓÛút>Œ)+ÐGXÇÇÃÕé±Ì¹ˆ"GÑBš,_ÇÛc½Ýri©–-6­µB¼Ìm¹â¹»ï.¨ ×`QöFÎ[ÊtÑ‹wШ¿Ÿú©~Ö\Á#Û;±näk¸ŒÏç^é,(£µÛ3ÊwËÿçêã—r´¢h¯r… Vº×—%ùÞKÎÎ5WÍŠ7GP#OlÕn7_£öÕ^ý?ºõß_ïð“j fJîšf8!uŠduË0Äy"œ’ª©ä‡É‘3E®á±Xr4²Œš¾tÔOø˜yŽÈï?aˆ÷‹Ç0ŠÏüK¯¦šÇ†$µârü@“HFÙeì$®L]ØÅû^­f™~\cšJ‚qf-¯™r±*¿ßí“m˜]ƒÌ¢ú_sz_À7Ãû/ÂýfÙ:ܶáRøà‹2™GhÝŽ—hDT)gU¾:WµÄjf$Ì_`Kó¬O«ZvØ €+Õljô"¿ RAr$&%Zè'3,áÙX¼™AWsÎGH&,äv·kH§uŸ€E/vŸg¹›ÖaTT1FêÛ\ÌgX¦´–sÁ†W8–L‹ID9]5Ù3×¢ä ÉE—TûÞ ÑÎ^;;ÌÏ·»“2weFkN¨Ã¿4e‰M›ŠTVØùÍ­¼”ûkèê¢2­’/£C]ô¥z¤Ü…OêÊxˆêk-Ožó’Ù“³;I;»Â PÀÒË’~ݺɈK¶2Sæ.FœÓ‰ý®.âŸASœ¥5½<ݧ<ÝØìª5éCó à”ê¬ ¬;Øâhó?\§ò>#Îuxrø³Ð\rš’´•Fõ£½çOw6kðÃáéÙÎ&EÔžïlšn°P }Ì5\0AF%`n.æCœsÀ [ó(æ¤~¤Ë8Bvê5ýµ¹³ilêèÅÕ¹ìõšV·;7Qµ;˜Þ#fYÁ´U^•Ðk;kuÍþʵÙt0a‰¥~G•Š?BL˜Ao8ïcŒ™¤ŠÓ• Ø"æÃÁT´ð¤Ul%ñ˜þÂf ˆ8}ùÚõ~îñ‹8[Zñ9Þ·‚3b¯~S>ØÿñXñJ+éf¦UÞlB«Íʶ Ú®š|ãü~Ç K;;ÕÀÓ¨$h f÷ûàZ6¶]Ïâ)Øv«ÍĶs¬Åäs¸Yu/ØaÏ^ªæ·Ç×ywmÆâw½>OÆ©»Ùòøª;x;WùîÇÔÝs½SË+:Fûx ¯ êú»ÑM£tÞ»ª.0! ºÝs¤‚ò€¤­p`ØB Pºæ‹i’8¿ö§ÝËñèbxk@5Â~i§úxLw¹˜S/êÏ®‰sEµ >Ń”¿ñI“œÁKÇ}3 ¶ãn5^=ÜÚ~mær"­6xÓ9Û0@TaóOÙsÝa¥2jxCˆ¸­gÖ]¼“ioü¨±ýîO:WøýOïþl!¶"B8¦w:½Ùí$ù$àž¼û¶±=¿1øŒOÌøXH䯿Ã_>?üÙ™‘ÈͨyN¦³”wQ`ÕOñÀdæÀNprutG¥z»x÷˜3ëð_u¦9g:<ÒŸ‹®¹Ø #óE‡q(¼Õ'¼@bZ]½UÐ"x † Ê¿å ¨œÚÞ‰/§_Š’w.´ÇÝB±j]*'á¶F„]øm2Œ0ê5Õ3Œ Yâ»· ¼Êþ7ߘ>zCÌi—r"8=£Ë¡FŽH=eôA#‡$xnÃ3Óaäq±÷:e™$ùÚY|‚É-p'IÛ.5ÞÑ—wõp'wõºüTõáœUô0¸WböWcõisŒ²¬hƒ`Š×rîêoù§»úßõ‡Ið4ªóOu´á»ÉÝÕÍû DðëÉ]]ÿÅÿÞ›‡ø×oéõ¤µù¯‰ð¬ÅaËÔÀ‘Ï6,ìȲ‰ ø…ksL²nînƒ‚>FãúEDf‰@°Â¯nAáwö“/Àfç¤édÁœ²Ä_u{o1X Ã$ÂãÉÅHd¿¾SkŒ¿Ç]”Cjâ²´J§5ÌkD=ÄΡ ‹¼M­JÏø˜Wœµ“Åip9ã¸Ø'!Î~DÉ©)NñŠ<ù«ø*À¸qè—°5Ü*T±eCÈò¿ó¼ˆØ'EŸTY¥#ôÍy£–¬:)ÓŒn‹Zû†¯‚®­Q‹¾‘_‹‹ ‹›â/ O´Ñû…­rt•úIÅÕeX‘>”÷¿ 0ßr49ÎTZ2úh.˜«ˆ¯Œ¢i¹ñ§Ûä2’¼gÛdYÔP¿B˜q`²‰…aBÀù]R¼¼ëÆ=?1%00ÃõŽÇèmWЯÒø·¢¦Kâ]rf¦áKfFHBºs-zŠ!ŠX*>õ‚n2ÕtðÓþ oj¦vÉ¡oÖiÒæZÄßÎL?¿¡ Äçð èæ»îU¾èfq3{a˜­4Á¨ œB“PtSüñàr€ÉM_b>¤°{‡?Ú¹ó1¦É ç*Ö”‹9 ŽÑ]ºI굤=‚_x1bÅc²T½ ¨ƒ ÉmýS¯–K"à¹G$8ijà8R Ü¹ . Ùá“ÓÝþjÕ gôÝD6P§Lé…ÑYN¾/ë7N”{~ G®•‰˜“ÅÑK­‹ ?f· ¦XE!  áäÂ}X÷á¸ß ?ô÷û>ä-ÿ“6îgÇö¾’|ñ³±†ssþµ¨ñþ~Ð\ÝŠ„ÆúuzÙáJºãô"êõ _ÏÅò£Ö C¢² _žäÄcq]”2û&Ì }‚¨‰Þœ¤ á`D Æ;vžþ¶“LÒWëÿöZ|¡FT3ãÏߢŒO‰® O{úôРŒídJÓ_›&=*ÞkùÒñtIïQ@m¡ýë=×&mm.œÈ|”íä›Ç{ÐÁ7o:Ù9tòã‹œ‰ü¶™Í©­(͹ùüð‡g9ß_ãf¯¾ýÓkúá}Úˆoz²y#&îðéþ¾íãI“Øï=AÝŸ­blÕli-©/RulW˜Änîz½‡u5)/wývçú&ÞEø#e—ÈÌßÈ--ø @(J'ãš ÉžmFœ¶1žÎ†x•OpšR|Ö¢F Üw‘Óö¢ú ·¯ Ç#®Êöƒc÷%þu1œéß›«ñdJ?Tç[Ÿ ç—@}qø¤NN h‚»üÞõçÎúÀ†ù«á©F½o0C5™Jøpõ0ÔCOùŸ¿½³‡êÎ;wŠéwÑïqïoïýàÓÍ;£ÀTº3˜tWŸÀÿ/ïì†Þ9ûyW²y÷7l>Á!,áÅ%üGpºS0Ýå@é΀Àò.ŸC¹¼>–¨NòÚjPtêmì™­\ªzŠI€)‹‡=û¬´¢HõÍ‚ŠCÏ7è/˃çŠm¼Åݪ,ãö2K ãg>-rf¥˜Ï¸”õô-±þ$'lFÅÑ nf¡¹8Þ.Žœ±M Cgrš¸â/´e/ ž‘ƒ{¹k/öÖ^쬽hÝntïýc èfZ>sÎ/@³R茆|ø¶Ç!ÿ3#e2>_¾¸ Á}Ãdî¼4PfY@lŽ¿¼ë¬!–É ×ÏõÚ7n@…ÖÖʉ—q²—Ì|V¯2£+/Œ™ ¡°jPÂgEÍ8ñ”aØŒÅ?ë¥t¯Èþà¡3yÀÌÌèÞÂ5è Vœ!°æEÎð¢îA‹—Qãeô8/z&—–‡Ï"i~ÓUâý·b‘»ÛŠÁ3ÖóÍã… á…Fš¥±Ä2ìqH6#ØbÓ1¦ˆ(f™LÖ¶BÏ<ßqÁ=‡ ÝAjìÂçøoÕ$®ä!èËhNn9åØ'â`ßéÏ'ÈÓ¥^ò5 ¹s½ý¥#òp)§†È4Œ³ñùçÜo‚ü~JËpÜ–â¶ù”Œ`Nw."ây—²2ô½/OÆX6t’:9ìЫotëëÀž(b{„¬ h:1‹Gïô-G )÷‡ÕE¤7ÃÕ `R¾qR˜n$ÜmýXœ‡ª¢U6²ƒÃÐ~µ‚ 5vÌâMZZoƒEÜžÜåØe¨%UÐÁÚ¸Ï!fx]-ǯ£EQáˆÞ—jý +@z}{‰ŒGÉžÈÞmÇ{ž{!ƒ Ä1°5SZñ„ø⛤2µiúÐ'͵'ÙDØîц-¦7ïz}ÕÏhVð »û¦"ûÞ…]\ÖC¿õ0)‡Fh%¿ÚVŒy¡##¤Ðúb±¶8+kYŧ²•X<”)KKM¸ Ë_öôaþ®Šˆm#ʬe‡ÈI;ÀVq¡öH½ÑëQXAƒk†å³jú 'KÆz&‘4ÿbIû°JqÎ<ã,Üì͹Ù7öZ¡³‰YèéLRc‡v³`©½k;¤´•SŒŽJiO”ìÓÍ…g"Ì4ïÄ>2êÔO¦\T¥ŽŽ)½!ýë`&IòQ!×K°¢€/×`õʹáRèM݈:ë&¬™.EÊJ>ú7”üž3®¥3ö ¥¼¶êÒONÔü!—Pvô¾¼Çéq}ØçI2Þ–[wv»øV\óÛj¤[Tvž_ må¾´4è a 5C­þ,!ª#®yÄÌ¡:416yw¦¦7eÔÁ\¥NIÿr¦9‹©ÆZ›—F3ï±çjäÁ,<>xqtøÃ邱K_‹\öè,B'¸°‡d5&4OoPQ¬SfUúðI`ÊX`P CµÖ£Cò&•³ë6H.›ám¡—UVuEœÌš¥³ç. ’Ø-Ò̸DMÒʲ³ë“Å×$ú.¢™£ãﯨ8`oÈ®˜)å‰t…Ù#â.X”•^]ÞMÿð3jU Æ:™Y¢²›ÛÄuËwºY”¥¥€ùt3µÈ饿Cl.ÂG¡æ¤ßËG?ƒ­F¥I¨ä‹e(Å‚3[²nä-¸ÑS±v>ÒôýꬭKk_,²ã“c;|ª³ô2pKWd‰nðÆdŽ .kûAø*Oƒ^èÀ ¸»¶Š¸±¶rXI€À6!ëýcK\„^³éWÙâćIY86Õ_ÏWÞ‚ŒŽ®‰¯r›MØ_©gc(4©zS,9‡2ÕÐt¨>ñv ­Wž3üÒýaw"œR0EÉrótºüy’"~åi–D/æ> îþ¸Ç0Kòð’aXYguè´i…%”±fí.ƒp×aú¨<`£k¿à\:çWñ1Wˆ -; ‘ãF•íX¡ûåÃÅM6IßàŒp+í·^2U"|;nNB’å‚ DÛE¹âô_”’ékßD©”ÔõÌñL¶Ü2帞Êï!‰~¦óº½¥x°Ên—ìîUÓ®œª$ý±TFÝiŸRâÑ™½EE€7ò4ë+N)°aë•›÷«7¤]¼aŽÒ$ÜÏHaÖ¡*œõSŠ&àã–MhX>õ‚Δõ¸ì|AçÄöÈHÊ凭ò~æ­uSü\cÏuú’yüI””8 ‰Bˆºïºƒ!º´jŠSÅrTÀDcøC3»…¶ii€g†Z5݉ynWº>×<Ú•nPs2îs‰fóÜf?Ë ‘OŸñTä(\l?Ù—±Ÿþ6HÀKOé/›šÜaÝ<åY× BbHNš$×jw̧÷ænîÏßÜŸÃ ê,Øš/¿3.™ÍÞô¤N¯Ã Ýt3üWç—Að sx´Yu…S«\Sà*à XâˈGÙ ŸˆY!§x”å eNGœ,c¶‚·…êE©èâ…‹ ÒÇÒÓéÃMÏ–ömtCŸÐ·K%þTɸbþ×ßEOíH9G«J9V?ORöÐ!9<‚“wŠeBÿ2»ZÉü¹°[žÖŒ¯ÈgXZ4‹jVb€ÅÆ25 ~›{ÎåÙvÝ@ã…Ùv|Za¶ÝÅŸÉlÊnh…Ðr J<Úàp—Ön•ó¿ì„foÐ%´y=:2U¡LõN©,™²#’W8-*(ŒpL¸‘E0ôXíVìãå•T•¯PŠ.7È 7|­i¿œ)*ð‚=WâB®‹.Ò~e·ÝÔ°¥NC*:×ÉìjÜç ôº;ããÂUÈ¡ÊN³¨?¿¾¾ÍÿpWª¨aSïsÉÙý&y?™Ú,wÞ·q´o¶¢ö¾ÆZ,¼ïìbf\_äÛvœ[Øyëáo˜²kE僧'/ ×œ¹ÄÑ÷‘ùÜãú]€íXF˜nD»gøX˶̯àƒ"±ÓÒŒ•ô®PØ’´q›››ÑOLw æ‘ë·WÒx„t/‘J]&ö{ * ;‚2ʺŠe_áW˯LMÌõŒJ&›ŠÓäxi§ D]{&a{ã^9VŸ<úº“îù`8˜Ýš²ËdÓutç³ñuWÝ%ÿãÇ}Î#…$¶KÉS°7¿/ǵ’Í»@Ü’QJ…‘”Øñ'å,"®1oçp„}„8¹ð?Ñù§”aä‡êi£ÕœPýшC]N”¹ òsšåðeð¯þ›1OE©È6ƒX sÑeç{F}‰ Êú<Û34¾áÄ„XdªâI‘ƒQ§Æàp€æÉC꡶é3úŽŒ|x@k¶Ü£¬“’g÷ÏX þõÂ~fnù[$3-'Ÿµ~;EYÞÉáÕ^Ë¥ÒkSm‚kUòrfÚÜú{n8ŸC®¢ ~XÁ]›¸ŠdßÒ™Š Y‰ïaÄ7dâ+—ÌVfUj!ÇÂP \ D;™<Ô ßrŒî-²þQ9óµP·ê+V‹ê¤¯™($7ÁzÑ}ˆ7_ÉÖ„D^ÖWÃï~ß`"_\?ê‹1;€a:À{Úé«F}‰’CSœ×ý£—œÄÅ{K9­(•<Ö—òá´»NüjWâWs´ÆlƒÆŽzl󎃬6Ž5bø!HƒéùEçƒÌ¡1èÝQW“M· ›`·é̬½ñêרüøÇf{ËZó’sïR„¢QI9^<'kÁQÖ|¥ÄwÌ¢{*ÕÍû(¦ ;ó óH¥BU‘:Ç“Ä€øXª"ö[È«»åD+8æhË…–TceÍ`w£²¼d2›ñÙ@%i~&D#çKïÞ2íJ\=mo q€$ †º§ãðàò ¼dš–Ë8Ðû¬ÕÆ»õ–‡Ó¾*½ãq¾:<þjfyWEva·TL´Û§hŒáÝOnfû1V;ºKÊ~‹oï÷}ÀÝçEÚ‡—]@ 4žoëµ¢ãÐ *öÅŽé^!\»å=ÕóÍFþV9#ºœ–˜-×D¥pØÅ®E€ä»í©ܸ¡Bæj–š³"<7ؽŽý¼«ËÅM±ðÁ7 ã‘r+v`¡˜^¾r±¬ ³m^+›ËÛ§T:'߆i‚W¶ã²ITúú×@@.¨ÑÂ)÷#D÷î3ºÌ,ÊR7­Í Ä8oº2@þIÛqÉ–æÃý\ Wù98Š¤+Z†ã‘‘®pÔÚ ‚–vàÈ[ybV„žÝ!ØàÖiC­„ÌXdŠÊœóá¬?¬¤JtäÓdª6]£á_ŸG‚72 d³àä èH1÷¯L%S;U¾‡™/Ž)…e0>0@K+%!¥›aIRø²#B7÷ŠŒÈ+®3B?{•F<\3Íø„ݯØõV‰ó:BhàÜm茤9 ©eþ±ƒ•—WØèzpy‡¾kÊ]‡ëv Òš´4t]å v„[RI.•WQLzׄ ÃëÈaGÉ ~î%Ë.M kæ|%â³M ˤ¤i(  œ½p·¦™C"CÐR6R;¬-Öo¸V!3S‹Æ¢û<ûØ1 9m¹¹ßcîká(\P]u§ýð,£Z¥õ#É•:’>õIP\.(´ÚZml‹äär何—ÂÆñP ±9gyuR0ÿõžç‘@‚eU­ˆ`Ú) ½* ¹Whè¦*­-òê\ñ*¶¹h³§Ê»“=—×{0Æ}$Ðu÷Ö™Ñ ×·kÒsJ¾Ð%)®Z§€ƒLî`Zý‹ƒúã£#•:6Tí6O»T‚©ZÍæ×C#åMŽyBM4à†)l7ª²GöÙæo&þ|4ƒKü yŒªEɈìÅ7d<À¤/N/RuÎ$~\ïà ÛÍL%Õal?d¥¼¤I×™aÃ'ß2´às4™J-*³®‡+‹ó[ŒŒš©)+˜õE†Ô²§ümØ^~Âۀ͆¨¤TT¦"•,LB6‰ôäQpñ‚“ùt‚¡¡ªbcGÐ :·U¬ÌÙöÃÜ™¯ ÔȸáŽ,é‹T•RÀ§)·Ñ)éLöNxF‘çeû‰œæVÛ!ImKòr fuêycºZïU¾ÏŠÚ ¡¿'É„„ýtæ‡åê3í •‡Û…fåæÜ#ç î%DÞ.OR¤†ý>—µíû4kX/^£J«Nù /[ÙÖFL9yS`„ÝÐ8@,Ã7@ ÑyüËó½g‡ûznmO¸rS¹A̪Õ|4+Öãüï>¯q=:¶$N-²*|éF%ÔE^,Ñ°çeå³¾þòá§Ãðûè©õˆ<H¶²”‘ÿu!_m’h'sñ®%⨢‚½XdüüT—ÕÌ«;¯f>]ÙÕS°ÜÉ9ò_µÚ8÷|ù´älD–ar”ŒÆõåNz–Á,R«Â)•í&,´JNô~1P±fIA#«‚Z]+ânk0“'çè')C3q|Z”uEÏÉè]£/áC¹–ã±=Oìµ`XLL€á¯VÝëCõÓ3ìà*:† %%K°ÍÇÓfW²í[n8pÓÖŸç ÿßX« p²èœ§Â2.Š-¢˜À§+PÌ Ì»wPM áªã.ÔY;§:Ps«Å=·ÛC‘Eê£=æÄsÄsÕú\³hI^.«” ­›§äÈø½ø®¹÷òÌU¢ƒw¦nUF2©þ»³Ðîk?ŽìEȦ`ú±6&ýééÛÁÄËDfð7ÆFµH=•;Âð6#J[5Gग़›á+,ÿFë(pS•“©wvè×\ØCta¦šs¾wfŽËÛ=–ÄœÓâ%^"M9]dÖ”éÂ0Æ«-ʧ#5e í`’ÂTÔ^.a`Z#Þ¯œÁ:ׇ×9ÜVÉŠ·\a":%tü”FRnîÅú}Óy!F†Ûsž¡Ÿ$ÏI|¨’CÒ‚YSKi ˜<—Àµrˆž%Ðœh!|–M ž§»ÇBŸÏ€WLÐ}bžÝãÝ éo¶Šòå˜#?G“ñ€RvFœÑ e@T²GX[H p³nösÝïüLN®Ñ'›5*/öÄad‹àücÞ*®åI`&u.*{ì’äAWjL;=Wïlò‚®¡£reæ3OR¶‚—6sZzƒË¨ :î1Õˆ>&Ý™ôÍâ,eYã6ó|E|½“:™†ÁFy‘Ÿôòó¹xqÁÁ'$ªüƒñ¯´…œ»u‚Ì][­í*{¤<‡¸@¤ÊuÓeO÷Õ’üð4—9ð'ï“Þœ|îóœ÷É\J/e Y¶ûó# Q|uP­B^¸€~P(ûÅ(2v&Ôõfe¾ÿe\þ—q)f\Jé¯*q î 6¾“¼Ÿ¤·×À‰\÷C̺\"?–úéoHÍ bB™¼ëSÞrþˆ>Ïl]Ûʼƒ/éÕ‰R²aJòF’ÜÆotFxñ‰)Vu“D—X~|Ö€ÿ€ªO’é«G/Çã>º‚ü5G°ÉÕ8òÚZòR©ˆ/Í”2œñ+àyL‘`+Èxæ4ïþ/¼þõ*(õË|:Eÿ’: ôeB‘eÿ«·6µ±i0Òf~q1xߪ—©YaXgæE·½µµsh¨BG73#<‘Ä×E-[Œ´Zš˜ƒ<$£zf&͘*U•]Ü = ¸M¬,p„ÈL‹oK#ëJcüî]ðßàzRÏ×I5º¥ `†ÒXÌT<§û&…¿Ô…éqŽcÔNŒÆ7 ^dr)Ëœê@~5 ÈNADlð9ßbÇÎÆã#“M¶¶<¡­"=Wb¯¾RÞ LWžÝ£8ª$ﳨü×J¶j ¯Nò-_·3+Û]°*IK>6¾µ“ýãVYÎb—³.YÖµ§´Ðqm Y•‘'—x=ò’|÷Òpσ·þÀ‘ФÊUér)ÌL°*0OÍúfTèe®n3+‰f§eŸq‡üÖ2ä™Ýâû–I¢f|_¨€Ÿ¡oƒëë¤?@ì¸sË%UCó›H¦æMlš œƒg¦ÑÔ–œ¢|R߬§½ñ£Æö»?56^=Üþ–œËd9õ£²º–iãÛôÝ·›ó›í¥­þt ðËç‡?k1yzˆµ‰‡Lþcm½n¼ÚzHîm2‹íæÐä›,BKÓWåËu‚ £‹:Ó¬2GUmöZuŠ=ÚÌÇž3˜ÕH¶Aê£) 3ÝèsÁŒpjsû4çé´y>5)¶²~—M¿m;Q¾Ñ´^‹Ê¼½úuV>ÇH¨8ú>?8o\Yã«Œp“!Kl‡¯î 0jâîóï¨ø_[ê­““ \ù‰Ýc:¬²—y'ˆ5I™â°Ÿ35Í’Îë94»%O@Üœ©ÌSƒ×øЕs2/­™ÜBv$]EY#§MYäñâ³ lÊ<í9dœƒHÇc>§‚ò–¼X´ç¡Öü!½>,Û»ÑLr+Ep§þ˜E´ª6ñ2%­U© I—ÞB›]в£Î§ ©]ŠÌ°™]q@Ë’•²;ƒ+l8“°{1˜¦Ž›q꞊g4ûXç¹Ù¸ádÀ“x´” DÀ]v\{·›DV=iþâìk‘Ï-[ͳ‘æô¬BŽùP§à¡îB¼Éë_Š8TºÁiéKeÙ4ybÖ/Š#Šzã d¼o±s¿Z»g˜žŒ|›_âÇ]y^ò½#‘›f¾fÇïcg%ÙÜ4§°³Ø¸ª.É_ º¾dû cŸ½ŽŠ;)êÀepóç”3—åsÆ?È U.Z+j¤%lµÊIœ1úŠiÖ_øTDY+Òu¸H¢ß„ÉüjšYEÇrù‹ðÇätO“Ö‚Z$¦PE1ôjf˜ìpj sB'Ô}n”{Ý'R/•ÀA?Tk,½ULWzµ¸ó<†G+ïMƒ=’S„>–æ8´XiVˆHYmÈ}bÝýóëØæ^–ž­î"Û Já3KZUñÖÛsã;¦ü¤"…áw|­E—ó$ÅDì`f/PLvÜù ‘ã3™€p¤>ÿásŸÈ{’”ÉÜ´Ÿv[å8Ø™+¢ ïFÞ]‘ßÍJ©;þU7–Íý±Zú–õèÇ„½÷»i:¿–Ä(æŽ/¢€*bÌ_HÕ¸±Ì8ÜÅ°‰‘³g`¾]Àt.ià ÄXÈ⦉€ðj»<ÙW‹4>¸‚xÙ‚ÖŽ›*ßÓiÓ|¶Äa33ª ~$š•‡ ¿Ë×Lj.j<ÏÑx,:_|Uè}ºJ išqz.V°„¦Bã>¨H"VM\çZÖT !©H@µé¿Ï ñÑÚßUÍ ÅTà™qu‘˜Ûwã‹Ò±ö¢>ãZ ŽuY לé{×7BËmnš2 ÓâµÈM¡YÂò²•Iª2í÷Ëf+ó{ýü„e~Ÿ—³¬ç3w¢ôò/;(δ›R·3ÞhBw£ë²ãk.R,¥3ü[¬ q¶[ƒ˜ª1# K63J;ƒLjn©!Dø7á:mƒœŽ Ì„Wÿ…Ÿj¬8eeˆ_® ¬ê’Y­ÊŒÄBzºËáø¤\nß™ &Ž†Dtuv?Žo°ŒTwô†D›L«\X8ÁÊÈt?«1J¦ä§‚C£‰D™jŠ5‰G©Œ®)ïF•`=ß°Dœ˜RórÀð~w&Ø?ºØúŒQt:–IËÎR™èçi2N+ÈòGÃÓÌž>ÃeÛÎüºÀØp=ª>Åýa™²¼ätRÉ©Ü/Nâö,™mñDÍ;ýÆÚ ã™óqVS&;_5Ì(êw&ƒ›ÀO"|v›>}ûkÉ˪SÄ]ø&â0™OèË—Ÿ­wFÆE×¿Â Ì Û9ëÌzój¹úú ãD0Ue-¼ÂbZiÃpÈ |þs´yüSgý5|³S`‰fÁùr +¦¬9ž^:Þ5Mýd;ñ²¦åu>ˆµ1²ð‹½…}G5’.r$ž¹áCgû²Û‹£’XÅ ~*NཫýÚXîùuq¤0A¾;NŽ…¡ëQ£Ñ ’B• ³8õIñ#Ÿ”FDÞŸÕÂO¢ìŸ{Å¡˜ZëúG-ÌΟX¤ùBÁ ¢]¨þIîz #0V¨év¿°Œe ͹bî*aQ>½Û&ØñA£òy~ÌNè·¼*†F‘£ç+xœ#¿sˆ‰&ï^ˆe™°(~°B¢óœÚ.Šq¦¼Ë‚Â. ¶h¡6Õš,LØBƒƒžhVä9§jñµädj ÌFŸ—§E²´xÙ&Ø„c윮éO!›®µYGcµ”—Ð:ÏÔ)¶{^?|‹Ÿsé ò©âÞœT˜o( °õó-þê¿å|Ýåf{«9©è\èÌž{îý.91£S64·*‘/’yh ^< S›žD> kü˜ ÚÛ†·Ž¿ÃŽåã³ãã#ò7ö€}Ý›·QåLfãùIÔjEÛÕèËÇå­]tßùø±ò&ć"EÎ~Yî¼? æùço½™~æTÓþâ€7Ãzÿ9òÍ€_ó¶c6(·× ù¥×áj½ ¡t+¹ÇLµ26h›ô%8¦fÉÚ“sRðñ‚#Rê^˜?P²ô.Í—k:7tËØis‡±•9̨IOÅu„R¡WBÙQ®ºÙT10·Ïx\±aT¬DÅeúL¼ñ"–ÖHQî]Œ‹æ'«7ðŸhPÓ†`šê ™Â¹y1«è}³:Ïy]sU‘9úÏE]äh%U\õg+.‡§Õ&„-áSsÚâ¯æ‡ŒòÿoïËÓ6³½çßð)Tâ&à`lì,­]w.±I­·kœ¦½I^UÙVˆAÛÓf>û{–g×#À‰“Yn˜N Ò³¯gý ž£¨—ä¡Ð7å7K˜”íÔq—ñ¥2‹žâý(îECþ8êòV&Ì> tÉ0k†] 6HŒŠ1‡Q6¹¶ø42ŒdýQ·› 2${=ZœŽÓwñPyßU}°˜c“%F€œè|Ù-V7 ;¨]gñ%ÉûøJ£xÈX¼oÎv˜ÕµþH”w|¹Kö“’“±£,n’䞌Y¼O2sŽcóŠ$õ]Ôï!·_¡:™èá%Ê?ÒÂðÔP6ã 8ƒPÄ„ŠŒuEŸ^Û¸Tòü®‰8 p>d0k¨L3ã[ €JF&2VÚeÏŒ.ùSAl›ðÆÇ ^;P~4fœ;#¨JÍ/w‹™[äjäè°:Ò=2P´ôBƒÚd›Üy“õìؘg;–*5ƒÊÈZþJ£ZµÔM¨³ ÈÌX ·aR+QóìÑ%ü¬!耵ƺÑ™=º64®D…õ/£ëŒwKÖy. FîxH°š´÷.ÆÊÌÇ¡M„WÄÐDkíG×À â§C鑧‚nLÆI÷]¦ AŒÐyY °òª_[qqŽdh{1Vjý@t~:—¦¬P‰yqDýºKäå„4…à mRÞ™wL´}£Ü;¾àŽ‹-)øÅ<Ðä 5K|(Ë_wƲEHŠå¾yP‘9~u7(ÀºÃðÚBo+™ñ ~Ä·.4YD¨/ñhSœ*RðåìÓ(0B®ŽðÂÄÂ’’B=%¢NhAR,-+ŽÉì Nn=8 ‡hÂnÛF»µ | ЙÌNÊ!lŽy¼ÈTrØ”ZÈNG:[“Ã6ÓÖü½dÌÑ6‡EZ'Y¾ô ߶e-%S)£ÃíáӴߣ{^ E*Äp9·" $î,AwcL2ñ]h²¬kÉË®–µô~ùM°Ò'_š7b#»•õïÓ=K¢|òLöÕ¨…ìlLíÚ±ÖGpçn ôrFor¥]Í,îø&EÁM–•$l V0ͪú5œNãñM*r ûϯoR"» |æü”‘ýµqÚ‘v~¥hÂsInÅxk·;²¨EÅ)…€ìŠÆuXibÃÇv)!aÌIœÁíß~ÖÙ à„D5öK°†ÿÃà„K‚©–dN«[Oœ™·ÌN0ˆ†ˆ»ƒbû É$ÒÀ[²+‚*í¶ì¸E…Ô9Nç]>’E׸°¡³Â€––³ŒD(Ì'h4áœÊ¾wD"ᡧ Å7XÜ8¾À• ¤$ã¸Ðà„Ü&âã`e ÇBCÒ0%C|´n<ÇïìÜöÒí é…BB†ê¦m¢Ë4xGpÑ++¯•±U0g‘HÓE,MW©9r(Åf$onY Pm§l:ƒJï°Húž‰ôu@ÂÄÒCEJÆÉ'§B/¤¬Š†ã6êõ`-“Ç.hX'ª×bT¹ìpr=’AÓïJXo”@M¯pÆ·ÓUþÑ›*çý!§É9tý,BuÉHwû'%þ3ÍÎþ 4ÂWM“F“1'/x cÇ…ð…Ø 0C¶ç@ˆä³é‰vfÞu;ÇñiÖ[‰àüSþ€«ïÏ¿ ¯þ$òªÓ³½À¶­™âláPd“t4½ú§Ž‡ñ®? ±aa2ìŽc<¬à=)<Â_ÔZ­ZAûMN{š°a VŒ(´¸Lã¨{!ÙÒm0ž k¿Å¹£"8É-†ËsíÏוïßò¿¯×ì¯ÞßÅ韪ë‰á[˜’Üyy|Ü:8¢QT¯ÄJ‡Ãøμ÷òøÎqÙOÞçsKiø¹‡ž‹¢ì w]*_´ïÇ­ŸÛöát^6àŸÒ{< ¿hÇ›Ï[Ðg¨ö wW’`Ýå`å¿Šuçò;ù¦Bmçäs1fÕ‡y-aƒÇp<ÇbWëù:!îDýî®XT’™ÀFæ˹d‚ñ÷ Þ&ÛêŠw/#º4HðqG`aJ³d  öðŽaýŒòúÝ–mP(ênSµ ¯'¨Qä M+Ž„¾wúYÀývÝëþ2þYsÕ—Ì»èn°K] €œ—nY}ìßšD-CÝóGíóÞiÔ@àþª·V•q\äj3¦¬ Ñí¬_Ñâ›-]£Çÿ„•»É‹µ¾æ¬QRi(ki‡òït:vɨº+tÖDTySùZYM=°ÏspkŽû£¯!ntâË EÈ÷ƒq$âD´çjA– LOªÌ.)<íPÀ¯k)*ü·{Ø ¾«o0K³×]ÕóõŠÞðÔxƒ!)€Øb *îoº3î[WÈýržýî“c¸#§¸Åj;îÕ„˜ 5TLÑ("ÒºkLKróâV}¡JêÆ]g÷Â2ŒñòIóC„py Ví_JJøª½)¹RÿmŠÿçÚ¼eëÒ =ÝÈŠ 77ÂÒK H“ÉÐo×êk>ˆCT‚Pt΢'L¶Ç¤Œ5-jPA-TDZk²Xq%à¦Å܆B€ü*†ÂA£¡ÏQëél`­¨¹z¶ìf›c%?–è`àŽXB†J•!~b:„Õ• "pæ ô ‡rzª”GhËÄ“ƒLÙ­A÷+tr.æ† ^©r-vP#[q²–¥èKеIY(Ž¾ŽT8Ã=Aìj5ïK¥¦§f´G?}Ø~éŠnzbDö@Üdâ¸ãÐÔ7ïLo¤·—†©óˆW…«z¤ÞH›±¿dÒA—ͯ›%ŸŸRoBN<…ágÙÔ)Bš‰R Àú¾íêg«‡7 ëÄ2/ôhˆ„¹›cÎÚ ¾Gð´Äü„w€+þ4V¨Û=66fnWÆQ{Gêxat¹P´^ÝFÝÎ`d<¾Ž‚náçÉrŒ­Ê­L’áƒv¤­üë¨FJðOø~Þb\ËœÐU!EZÂåâwò&¨Pò–FúLÒiF~_Ò~Gû󡋤ù¨´Èar%.Êj þë?ÞkÄ™rÔ±ƒî8ÖWcáé!%+Ãrn´”)'_lXiÞ‚2¿£¦ƒ£ú2äKïoÌĹ ôñ†Hs@uk›jÎo樾-S%Ö “éÁL2ëOÆÑ0#¤z?û®Žºø› ¤m˶!ÚyIïmtT:Z?Ø“KåÕ7²’¥ÕÞÒËë)%;Ø[ïýæÍV?$CV##®;™—›N7"1Ûg"|"Ú!ßi›‰Dw\_³ÙŽý©lvö­p–û6øö¼ü›*Jú%©"´õµ‘ue¯(³erjb¡4-Pó ž={e[M¨ h÷nRŒÃkh\Ì„ÖR H ê|ÖI0>Î 4~.Ï2á“>ê'cø°9ø ¿±r¼äËn"ÌŽârø(æ QŒŠj!¶,Hºäá,Ìî/å-<ÆA¦¡°Òõ»¥‰-K¼2Ç£²<ó´ÅM¨l”MemºlXxK£{#—mßm„J–¥vܦQ½3):ñ’²„§‰0Lµ½# ê+««Ú\Ú±•¶l© ûlGà‹Ñ ½PgÍ€Òóú{S'kï»Ñ5óÑäV–WŒ€rðK•£Ëuù=ÍÔ×Ó8Íø;ž/¢äÝt¹ªåP"c£1Iu'S²×`ð´ÀÑeäbSýÆbì ØñE4ÊÒÞµ¬†9φPX«j;©‚U$[°r­ÃÀsÊ#6D¢mNkúÒ–Ý ãÉiÖÓ=eŠ\àõÃ6†’º:Y°Ü*ªc¤~¯¼m‚îWq¯î–‰[ uÕçqtžÏú×f¥Äã=ÛŸöb®S0×ÓLú†áÓUü'çj”‘/T„Šnúèýc]Á:fŽÙ[vQ+ cÔ×12†ïBþA-äoCW&”?h'÷GLŸ˜Ò ”l@«s$ =Ÿ¶,@9ˆvî!ͯ€æd“\›°g†q2f8{DZaqwFüB½žV ]q|BÁ—kRKf$õ&Ê'tŽÛ Œ0>ÌXÖÙ;D»³m)«¬†é™ø… Ñøâ±øe(zÅ õ[è‚Åc!ÿ*âþ€ÖÁ0Zø{‚ ””b‹’åäõÑi¯M¶#ï0¿|-!HdÓ‘œñ•~PIðÏù`ô¨*„B|„ìo’bH$ |™tc¬@WúWÕ]G•-E&ìî.Ëzã&¯‡>IÄç›^d¶I3žÒò¹j²åZüeaÉAÓZè^ËnÁ¸d³ºœr@>Ãd¼ÐO&“>ú'ï±C¯bñRt›+ଗFÔTyæÅW„CõÃäKé,Õ×iv¶ÜÃ?Iv(§R˜ÒáŒ"˜Š È[”Á¡ÎOäZ­õq’‹&4œ”cP— @3\ö¸§B¡è­ÀÁÌaýd{Ã’]¾0¥ÀIŒ¤Hö’s™N&ÂòY`Ï,¸†QŒ;âð•Åv#xj®Ôg”œ‰è¦iï-7ös\]«dôDGÓ)˜Ó‘X‡°Åéé]Ãv?ùÒèñ¥@rŽÞø:O‡HW.ï#as†CWïò-> ~4ž?üÐ:|F¢7X#èD¥üÖžÓñ0XÛ >”ÄûYeËÄ{';;ôï³½æóN°’ªf•KžhöЃùÊíßà»Jþ›†ÔJ „!f`bbfõÉýÔñq€ƒpÚЋo¶ïJÄÒ$šBx•WxEf¹¸$^ŸE…1h8'æˆ ½¤ã!ß-Û&:¸—¤ÀñÎÍb*ÀŒpM`efþ\ãÉÎkX8ÛÅlÉà‹NdUhˆ~‹¯FcäøÔŠ(›A¹¾l•Wþ´qkyD¯Y㧠 ÆMfëq!±ØxÐH;^GÝn<š‹ºé ’ÔËF¹· D|ëHÄEÜFƒîŽL”KÌ—'#GGyŽ½¤G˜²!A¤åè&=FKÏó€|©)&Å䣣8š¨³?8'XÛ ÀQÊDÒçHñºš…l¤eýwƒ øtCO’+œ@ŒL×^ŒÑDsõß -£`‹‚,6U„›’ðE¨å¯¶‰àÆ“ìnm í/}ŽÎ¾4îÜàÎHÌã¬ø²¸“'¿?âì^èôÎŸß àÆ®NquŽ+X³â³üƧù§ç žèþ3ýVNõ…FÕ8Ù‹Îvët¿åóý³ðŸáŒ¿=Ày_‰ŸvÎS«áèô•Lä´ç°·ÏyƒÎzFP­ßÊQ«&¿b¾ãZ-²¡æB@?z‚H¯Ø&Ƈ‘!áË%;n〃ÛÈeeÿ oq” 8“#»˜b·4·GGá‘ãÔ°Y“ɨ`ÒýÚ- ÷Þ8QÙd®ZXR‹²„ºTaœÀœT<™Äcô[¾YY"‚)P çÇy"ÂXç,›ßÒQÀuNV*nËcÊë‹ŒÖR#`HH NŽª¡ ö냓1Ò@™¾Ö“\¯2ÒFÎñ÷‰žn|÷ͽ÷ðÎS½‘W_ñ4@ãñkÛÅä, À}dª•7º­²Œǘ& oÿÆÞ°È?Ý°[Ê´•8pËúͬD)‡1áëúÊÛå`]«í%±äfÜå]ª<ÝQ§Ke„r‡ÚEZÅwƒg)™ÆdéŸÃ(iÓKj_éï!Ú´.³lÖm‡)V~ ¼Á‰ï˜Ö ./9¨’À‡Äfp[ !ÊD’YW£9+‡ê12Æ9Ë\mkØeÚÓpµw¯»}AÜýº«å„Ò…Ê&¿R£8iEQv#3Õ%$ËÝ~š‘ Þø—(m§Ñ¤ kF¼Q, WÓ_5Äo:!Pr=´ê•a„»rÁ£ïŽ¼˜Ç;ü k¤Å²‚FTüL㞮֗qjVW×TâlëŒ|ÎÍÀ#7Z*²ÐIvG¿RÊxÙRU÷Ÿ¯ÿ”±ôçŸ÷+p°ˆ;Š p°±iõ1Š—qèt½)¹˜7Þ•(ΪÆÚß䶫±NBiPã!¿³ØÑ~Ç<Ùïø4XwW·èŽcqƒ?O˜ ²Ìµ›K:ù OD0Š©Ù¼Wèf™v“õ9Áon’¿Uþ6©÷<ÝÞ&z¼+¼wck,U+߸=Œ™ºdsw>Åé8"誆c£=Žq†¦Ã^=¨ÔëurgÇêh½R-Õ²yÝ–:Š¡ÓÇó¨*A ™;Ëõ0@¾$F³,§H†`ŒŒ&ÔÐXŽMy†HZ·8F³YÚìì™ÈóxÞ]èƒýƒ²ŸãŸÉŘ+EÄ ,£.éfb¹‘€ó~xSÒÙÊü•zþ¥žoÐœMËÑq7 àòB¯Æ±>Õ˜ ‚’ô y¤yÓ–õ°èaPì[–oXº^(? —Ä-ëÙ&þ‹ö»^µ–#;›÷î×[÷ë­ûÉ·.­Ø@¬ßÚÅkµâ?âù3N^Š–Y6% “ëZ §š£AK¡¥ÕU¸Ÿáëë½ã·¯ÿ_ðvyu•B7|úÅf«Žr·›©Dº+|¹pUÿ‚Ó,øP¹Ò—Ál*·ØÕû*†³·»ÆSÖùÏ¥äÏ?Ë¿ùd‚L4Ù¤ÁâëoÞÜy¼•‹@GÕ®]Ã8X(F¯)U' 9™®(s)¢–v(lò$Ýš$Lº æ\÷DÃþ¸:xI1Tº4í’颛´<»ýˆ•’3‹gxxq-È"s·„Lˆ¿Ŷ٘4¬ZÒ&cÚkÉ´bòW„ëi×ð®Ø¨àˆ íiµ®#áo Ç>ñb[¹ò+¡p‚§1ÙøSÄ*åû·"pЊF†‹h¸8Ð#–ŒÝØO,]öycP/ÂNÂæ¿Ž©EL9AS-:’æÈAR«¨ŠXo–övßà¬_ö·MÜ7;RŽì€ÇÕÄK!^[;–¶?¾W™yªXÔ³ŽUÀCþæ¸éª0ôÙÁv@ëR‘KƤŸK*«ãv<¶C'Z’P§…t“PÜ!dff6¹©vzžsó i?ÃÙù¹£i ÿr#-ª2%xwÉYM§ë)`E¾ºöh(îf®%ÅIµÄŒâøÁŒaUv·ÂŠÖëGá6*˜_e¹ÐÅÂ"‹HK@ð(of¬˜7eÇÌM-t \86.)«ÛrÄ1yÛØY~ÂxŽ#»´NÎ9³{"‰YÙgvÛôŽØSàYéi6I&S±fäôä²Ñ8«cô}á-Ü»'ê/Lm³}r縉ĒFGŸ1³g¬¬e‰…3aÃ`é1´E¶5ÒKQ€z…³>öìH¯ºPSÀjá–ð¬a€ÖͲ- •}6½}ŸO½7KæÓû[ÇK ¬ê1°Á‡:.•W7Ûñž…{*©Ã\=*Eǹ‘WéêÑ’Qˆ5Gê¹1b$Ô+1ê7Œ‡õÎë¹A~.'5[‘qN*æÌ!Të7‰„d'VùV + "mbIhC>sÇ(UZ^w”ø51õÆ  –d-ÌïY7SO&p…hçƒHªZ‡qÕ…âx *Mà… Õ™b„–ça/s„:Óg ‘€n¯§Bí0rÙ5{†&] ãCÚ³¤ËÈb&¬Ô¸49 .³ü‹Î‹û—À«^XbdØóc‡:sŽá´+i„ðZÆ0»Î6Ý‘§¬Â0SHɤ¬Û³Ò»³!;„“áT,f=Â4tj0ÅôaÊ©–P ŒQÍÊ…£õ÷ÜKuJXMR¤«YjÊà6S³œ »dðq= QúFWFç’ñ`HЛëàðD¹Ø Vóˆû;³›Îiè,‘bE·IȳÖ=Ë™Vèûx|Š‘gÊŠ0 ) 7Ôûj#÷£ûRæ»ØÎßïî\`îѪãמXI÷ÿq_D²Af1i!;^’6 –1‡8V·äv“À¬G.Ä¡ ëM¼7"] d~’!·UÌ/ÐÉRdö÷±£)/å*øÇ0ÉÄêÓs´Ûek°Ðt‰˜LürˆöÔ¾W4¸‚’.7Ö!Å?»3A€úr?´ã^èPÞæ8„oÊÚܬJ™”ÂoÁuÂ7Íi26sAUÃT%ÊG.vx.{™M¦àÀþC†Ä€ÚË"nÜ ºÂ¡ 鑶­’ûÁI°Òƒ•Æï\â –Û„áÃ.÷㫨»¿Â"»“½KP¯"6ÞöYd*àmV,7³k óOÖ/ò–ÅÁ»¨‰–‰ô(Ó –t¤äsáè*ƒˆÊò¶ýŽPM}8í1—Õ&UY®GK¹ŒºEW½.×>~ºÓeé`V<ÆE¤–`e›V6ô‹>ýö¸9ʸÏÛÄ5 † [^æoÁÖx·Çüå"‡ß˜s@ÍæÏ]\$G`‡àp‚‘ µ*u#u6)»›l±»žl&^€—J£i ìRvg–¿^'›;§q›Ô˜§dDˆ¨Sq4î_×ïè2AZÚJORÐSî1·i@ÝCïÇ(èSˆòô¸Àë‘Nql5)º"͵zŽôÔž˜’l2ÌžÝPÔ’žâû&Ò¨¿ô<‡+éûᇓòýÂ*ööfÈ—|ߣM»îí¡æ“LFÄÖ<ÅuyÊñ¤õ1$r¼y»ºMÕ|Õ8¼ùzpp¬áð϶= ¾n˜¢êE_s¢Lѽ´q0Ä[RÁOXň™ž¥âêl ¤6¢x7“à"õVtì6Oš²â27Hô‹ˆ/Qº2‚F¥²„.ì§ßtÆåÜÏîËC%“V©Ø¶k=¥/"ôñª“YëihqTjËPƒhÅXšýŒ¬?äPY7"Xäé(ã±…Ç…6£!¨dsØhƈüž&ÃJ£ª†‡I7&ë¶R™bô©ÉÑ[Á8"Ë¢ ÈÈ!íû„ßÓýÕ×Aí-Žòê7½­¬ÆÞo*¯ƒ7µ·øµ–ýùÿÞ4–þ|Óx³þgí~ðƒKÀÂVŸ=‹óÀs º ó dq·Ïæ-è¤g[`OÝ=̱\ ³L–Æk±ß†Ô4šXæ²ÑÌnjóÊRÓˆÓÎXΛò%¢ÔˆF^÷5æaÈ(ÉåE „Ô”iL[¤­Œ?Eè~YÈW¯“–¸A)rElåe@ê«p¤g”Â+ŠÎšIKe8½w7…©† $&4’"Ê¢‘pE‹Ü=Ü.~ ˆÙ“BVI£å+ôZ”`ïE¿)c7G”fÙWÓ;ÁÈ)ÎøC#œ¸Ê¯4‰ZßÃuÆEHÛ&öçq”íÌd"k•ç‹5 í½Å˜ØÄ ÷5G(‹ -Ã,:‹kÐxã;K™åMü¦ì“½JcC™%D䄲‘mÎt$%YÓ¡këqͪmÖPT¿ß ß_D[Tº=çðÃa ¹ÄR¸üá%=’LÉ›­·ÕûTSüª;»©ÇT¾7¬'Ê…0¼µç’ì£èä™I߉üL3¹Åˆid๼ñe‹…2ù÷ŽµbQ‰…EÉ2ÌÈ‹wPž‹÷ГÃn—'Á¼>šþÂÌ^.F”R)¦ðEÕ¨Þú¤0òÝɱˆÀM3È<¾S:TI¦“a/ƒQwcd$踆óËü'’ý‰¤nQHÌ6kúZœ\DÖ'#¸Õ„ZYºÁ´LI^-¶4«.iæ w¤Âu5‚u˜EÄš3uÜ5hÔ#ð7T*bÞf(N¡ y#á:½åIÃQh/2 FKÉ9F@†fÙt›î^hL:&…UVT²…ü*­˜AáðXÕI‚>ÈÈð2Ò·'Â=%i Qa<ÛáÈŽ¯º@̈@K{N¶À’p›Ô”WÿýSi¦A¼20±|ⶠ˜'oãîèYy‘ Ë­Ò¡Ú›ÆSrilÈ0AÖ i-²;…ýQ—Ì3!D§Ãndü†ÂEèØè¤Ãúõn»QÊ’æ¸Ìp¨× Ľ¹Î‡Ó°oÛ^Ï•ö‡ïx3úÔ Jž'v9§4%yÊþù~ûàèåIP¹¯ù'-Ï÷‰ú¤È¡x%~|[±Ð¥V͆eµîy7É\gaËÌr‹%©9ÁòGM¶4ÊË£ì™Ó,Ž¥’[̼éN1 ¯|³«ÀF½”ë?¯*ðóSŽO°j]XuXKîK®°[^H¢§oÜé.lÓ,šÂ)^lÙh~!ø¥Ê‹‘…JvÎb[Yz'£R)ùwŽìâz,ª«ˆd’oáÅšGs¥^n#Å´VÒʽ=T°¥ïö9+q [Aäkà™g¯©;f3…jŠí o›¦ùìØ‘¶Y\x¿²&l69hØ€ZAœ¸£‰†¨I êFº-êÐyB’†5ÏD6™EXúÑUY·ÅÁJü7hà;KŒkdø[ZýRí*â{Œ I§™YCD@çl5Çk…ÉÑ1 JšãúÍ/-fŒ-̳éi†>ÃIÑ‚gO eØ< K:¹¼p 8_+Õ,Âj÷¹¸Éo–Œßÿ0;ð7ÄѪBÞ”MÌ3M[,¶ø¦ï8š5‘%ÞuyýnP>zÙÙ»Ú gÛ¬ù÷É-9-Ô¦º&ꚥ£´[}ˆuO~%bçŸ ï,z6äÕYý ˜‹y G‘_AE+Çx( l¹ˆÀ6׉µHdÖVqÏXvþÙºMt¡öU²Àšö,c¸aÞEš÷Ä‹S‘ÂT囊Z!Uå²=ð_~7´¹¹õÌ ìg%þ³è :¸„ Ü8¼ÑqŽý ñ©`¿i¹ÞÂÒš»b ¯œ;Ÿ¾d>”L‘»¶žCëDF˜@ÿ®ßt—Ÿ *$Þ‡1™!WfÜ!b°…>_DÇ[Њ- ôXÌ5„¢åõ·iä8Û%ʳ(;žŽC–Q3m4TVð§âäusØbë@[ÝxŲŠB4¢? Q¸º½ô×ÙÃL¥ã¸P>Ì#–˜$Ñ,Ñ04¤t{®¡« Ìɧ,¢²!ó=±ß²¶^K„Ëâ“•ƒ*ß0¸ZIF,úã E‘EÃML ­csåV¶È‰|VVf1cÑ[µ~(ÜŸfa]kÖÍ6uÐ$÷§š;äÏO2yÈ»·böÀeݒ郤î?ÝüKºa(]dá%*¾¬)Ä,¢íææ7 «„IDñÜ¢Y„>Ó˜ÜðPgö½¦4œ ^2¸(Ó0'¶dëÖ™·ˆlýs+Ýy î-&#Lo_髬!òžÆCHöžâ¼ZÉ#GŽûRÇ$ ’Ê¡ùzØB¤E4±·¨‹­aµ™¯5s{jÔ9ºQ_ë\Íçl+E¹ï-c;?³ÂÑ ²[… _Rž)ÒXWpšõ¼Ñ–ì7¼Vœ=˜–{~5˜Ûzb×hÿ¢†% ™•Ì1*1¢ ßùx‹’…¶1ûiðïa0LÔŽ–†ýRÞÓ€O‘O’ãGÔ]QÈh?Ö›p$ D,N„øj“Ñ€æGÌ-9ÛZ?³¸E2&ó™‹0̱&¤}œËŽÜ¤ÃŸÝ4çd¦iŽ~k󨤶áÎÌ«Ô{à/ª±ö0Dï@äk±ÃslÏ9#­_Ú'açåÎN«ÓQÖKk(N‚”£“g±ö!–>°4$ŒÆ,_厔Ý0W©eʼŸ˜ÑƒJÁÚä©Š G{aǪÆHs`8Kð(ÜöY°"€ã ;+‚ï“!ÐfB»Û!\¬Ùyx†}•´8ÏŽ(ŠµîŸCŽàÌ™éHË÷(–sM„G¿¤‡|Pøõf³jk‹y[ºjÉ#ëêÍ‹E5|˜òDõàÊퟩÓ]2,cP¾/@×îShòóaŠXlB1…·\Y·È„½2±Ÿ’¡x³üÔÑË ¾:[Wÿ>íúû+{÷y8<ú1¡Üòâür+ —Å}Év5³´ã”ô>¦ª¨ áÞ·‚inP¦@'-ì,¿ž[ » ['=[õ~Z•nêCÖfKˆZ¤fV^"TñYçwS°É2pºÈù20‘<Ð…,ó¾¨J@3¡ß±N·Lx6iÖ†51ézª¬™áÎ¥êÒĨ‚kL$Ëâ €ÅvaÈ„;í+ç}‰ã䜣†V´H—shÒ€^Ê HQÉIæX™Ê‰ælýX®ˆÂ¼¯$¸â¥Ôà¨zÉÙ°òCRï0[sÔÞYÅq†¿4¾'’4ãêMšTÂ"|"ñ r¤ZÅZñ\¨%[mÅŠ\+ 0÷v_„‚ª“h†9˜Šð¨Iå2ïÊ«>[‘‘žp&É0ÖXÆ)‹@tó§¼ ˆÜg<˜luãºìÉe_Álͽ­ohÎöƒQ˜OJ*á™VßH8Í¥ÕÞV?á}uÑ? ¼%w´ek•æÎ(ƒ” !Þ§–­‚é{ªzÜÂ' YµÂP£,°—²êÊ9áYéçì.í†âßXbé}´µK„¬‡Âu×Ì"3þÇmµG- 8›’!$Mz}Áá õE§1¡QDT XÑH÷.‚¢!h„—˜ð!¦A‘1ݶ&({JÈù“h0BÁ¡º ïð£…Y,„‘ýà=;5Ž$1{ñY„¶äDgâk‹eC˜c_(i¯.$ñûêPÝf0\úB¾cÛ(£»H‹_ÜÑwn°ôÝu4kÌ_ni…Ã+©zœëjš¬@ª©ºˆîÃ9P‡ÞÝw­úì“ÀóÙ„ÑíQ±2Rî푱¹—„° ‘RIé¢æüe {âlBÉ\S¿²~ˆøeQ®Ó¾½“°}Ð>©¼æoa…{õ ‰Ô¦ƒí.ЫEuu‡ü–3+×",/ É ¢Hd³)ß0dôw¥¨Qa„È‚¤~ Ž ØÓî$Eô¾»¡'Éxº`.û(¾Š;?h¬Õ¢(Á*×Ñõ7UCR°óË/ì;nöûÍÃÎ/ánëhïð×ýÖÁIxÒ<~Þ:Y‚×>(,Eø…s½ñ¶êÓpÉy’í2B·®œ&Ã^MBÜe_65só™>® ®}[øصún„ýqKñFU8ëò+6unòþ0ª&ý›cU»ûÆÀ¬.-tB¸Û«´Ø‘Û3^‚ˆ¯lÜä@”.…ÏÂ#MÜr"¦ó}+ûUàÕÚ¨ÎÖÔæðjYÊeuðj €<»z÷ÏE12µ`Œ•䑪õÚ6†ÄœœþñÝ^ú†ÐÒ9o&Xî,dhWù» >´EÜD´2þd”hüزúH€èb|dǯx!„è`_ š½©†.…^dƒÍƒÖˆ'¢†ìÄ_ ´Œ.7Öå÷4_ 4Oì’=ÉØ[¥š û¥lyE.Ë«v™£RP;6Eèó•‹íÞT½Ý¥lêÞnnV+µ\÷ÞÁ°Rª¼²}™Ìk„îÞì†èt‹5F§//z'd÷€îÙºzÄîb´nÚ3¤;˜¹kœu o ÜÿO8Õ¿ã_ñú1®áGžçþüEûÿ­ÃÞàΉa{ª¸žÙ¶;™ Èáq4Ì(âXdÇ®Ñ8ä¤ sÐÉëš%T¿¾ á»<„.Í}³Hq.IM Mê§Â^ŸP›¥´S˜†ü×Ññáóãæþ•R“ãhïGÑHÿʈW¢ÍIl;FŸüØJ8C€|9Æ 2F ×ߦÉ8îmoÎ’h1µ‚„ Q6ëÝx¹ªœî»IF^B²XöÙÁL¤%U™,7« ÍMЧY&..Rà ¯/£ëº*8ßJCù^ë× òKÐ^ºy‹(]¯I—ëD©Ce_ÈÃoå|3;ä‘–‰Ïk„Ú¹n<2!vÎåê$4qÓBYa_Á´E ©ˆ•ë7Ü|,«ú¯Ã—'G/OþëÛûJП%S¼EQn6×HêªW¥Ôg‡g‡n¼‡E´§azYg] ʧÙöZ)hk6J왜”Œ6ƒ!žó;o.v•mû7e¼âiè–jùEÃ)ßžî…F’Bt†û2t÷˜°`˜¬I¸/m¢ð z`ŒÐY>œ‚i Ü‘^г”—d`·P!¶žÕ˜¸™ÊÀ|è”| Õ>wý»ASÞ,VžPå!ñ’KϽ­FÏhbîJó´q±å®À¼ h3ë Ƴ¹äœ½¥|±‚‰¤ãÍ‹43FôL4;g‡ zSöÅ ‚!+;Ñ^†~ õVúå)÷†´¦êF=,R7ËKt˜†âx6H¾WÂp@Y½¨`¯â^R0g´`Î%qƒ›ÌªÂ«˜‡ÿ"wXÞOW Õø-ñ„mßÝ`m&Ø„ Ï_¢‘´9ù"wSðõRZܼÆáÛÙf°¶t†îòbÁj¢6füµeõþYD4/%SÑÑXÉq}Ý>ríÊútfsƒæNc7ø£5¥ñ'ûÉ|dç~òÎöc`ƒ4­¿+ç‹Ò¦°"°¶h+dëMǘÄ—²hâ ÕüàXýsG'ÛÒží9wŒ½;úÍÚg Yñ†Ð£hjš›TaµaZýgÎm®9p‚¢oë­©]“ÏðxÁóU¢r|Ú!ë@çËÌGD¡!´nÒkhNX\‘ûª?Y1ÞZ,þBG´k÷žÓŧ´o8JwnõØ.ñ=ÉotŽûU’V‹K(Ì*Ñ $²´ÿAŸ8‰i‰7¯Ô#]•]$£9ÒúˆVk›DÍzëŽ ·äÚˆ¶Lˆ?b¦À냓8Ø$³Ú2-§2†èxÖ#·=®Òð^Rpp(ùF/Ï?0ß ?¼±ÄÞΞ.ÿQ˜‹vCN‡H{â ’зmä~mè?w$V#µ†ä¯¼ „#åÒ’zõnf[}5ûëÌb¿ƒ$oC]ÛŒz–<(’Ǭ7´iª5|wîò $q#‰Øðà}p%ý,¸\M¹ññÕ$¢ah–Óàj bUúƪó™ƒ3Z/NkÝxv™+îé*D=F [fÉ6pŒÉ˜JFà< pP†ÿêV»B£a¹X\F2µÖ¬ÃLÕ•ÒÆt:îÆÊ™Ã4–2îTª´Þµ³º™Œ”jÜé2·ëÒ¿Xü€ÏJ¸eÚ8?k¶÷^·ÊA#X¬(ƒdÊLІ0wÑ(Ý.W¹JŸw–ÁáÁ.BqïD`‚ãþâ •×DM k2Ñp.œ” òèò"Z­—H\¾"ó*±9Ú‘Ö˜ìǪ&Ñ=‘t{jÁUŸ§±·A÷5™êÆ¥€ÝbÒ‘" ß'ãtˆ+ëþ¨‡ ?niïdg‡þ}¶×|Þ VR=p¹!”y:'Çí#wF?¨¡VL!оçÆc¹iLg"Ò‡œžé>».Z7…©­%o,´yf.¸ÙÃxOôx“ÝãD?é´&/£XÍÂ=¶Øì^À±_wQæÊW¬v ܃+še ¦§feöio:­ˆÚ~\t@ˆ¨Þ<²Ðaz“b4zŠ¦¨N9K¤âL?¾Ñî¶h–Kƒ<¸2Ÿ:¶$ð˜°yª»A'Ž…;‰Œ±7*l3ô×:‹€2M1°¬ O£0wû=i>Ê_ÙlÔväõJ¦„Ãp‚£Ñ„blG"Hƒ%åWBcF½›u:NtùÊ(&û£[ÕXµX£Êx¡ÂÖØé…áƸrÔ务ÐaPgatW¢OH ‰ÌU ­@ÑØxºàå©-FCäVÛp1L•ü!çxCŠzí¢ŒNÎvÌÓ£†HrXÌ5Gä8å,:N!Ë8 sµµJUC <…e•Œóé?gá™”ú½£ÃNû— ³·œ…Êo˜!›¸`< Qzz³v–hî4ˆÞ§IO#«Æ’7rã$)<ê0ó€”µÒãÛý5nz/£1ÂÖÅõózƒ#éZ0?;A©¥†‘:Ó3`PòSˆÁ;Ç\„Š®$<ʇ“dO®9§tŠ”E²‡ã•îtŒn@w×£··È+Ün*&Tº˜/î¾I©aî;ÄyYk+!ó*þ¬LH]íÅïW‡S Ö¼×¨zCÞ·e¹›Ž®ÉØ$îÃVˆ{6Ä·š[ÕDØ3˜Î‰Â»¿µ5/Ó Þ¡©ÒHû(êÈ'ò&1S>c%Þtkf»!ÕgN½‘ÉÒœyG¾áóYœ‘tËÐÛMš÷—UÕ×6BZÖ-¿~¬¾¥ŠN)û²ò¢º¼@éߦˆò+B†eÓq¬œp¸ÏÞ!¥!Bâ Ôn’?EýŒó!š?¡jþœˆ/ÑŸ,‰¡Y‘5;€üâµ@;—ãèÅ÷wûŽìW©lðгDž›ßð}˳º*RŠÓ“]߶`Ùq63t¶‰[îŠ`ûCua—JèÍ#ï+¯ÿ™qd¤V3X-ÊH„L&ÛÏm'T8Ÿ¤—¹r03¼yéeá´³©˜°pÖ](`§KwœhçHùckü¤O ±•¿˜1Ï1û/ÇÞà-¾ÐÎJ˜‹)j‰Ž(N¦‚ã×Úü…!Oˆ£-Žßb Pø ½­Œ-ÈT¶HÛÀ3@³[V<îY¬CX}D¼3x2ŠÆ“¬hb4VeÁ¬ÐY|Ü<Øk?Ý^â¿øX<ÙtƒC¹£ºîmr¾SÐÅx‚GÛeDü: 9 GàC寋^„¼ÎÏÅ°·ÈÇsñìÈ;³ºsÑ\nrÍYÑXôù7; KG–È¡n<Kú0/8 Ÿ²›>[}â%/^®W OŒí"ÊÍÎã‰^Å*‚qs`G2ÂG÷¶DáçôZ8"«±ró±>gÿÊdŠÚ)vŒÃx_.É‚~ø†Ç·Ã ò`º¾ÆºÁ– þãMÑŽH|˜r>Ý¢O¥Èøz6”ƒ"7˜C6— 1ŒÄRfãè%¹ZZÙr½Iaa|Èv1ü‹²ÇvšYÔí `wnª ýhÍ¥vZT}¹¸òò˪.?^qùqjK¹QYÞºÂÒï¾¢Uâsâ³´œ­½=˜#²¥!ÃÁ2‰Öh…Á†>Ï‚„¶Œ·…æ}IÊlèݱ? /®P™ô_Õ²¿ÒW–º&ŠÚl:I›"§×o“Ó¶û_nrV¶FR×:CÍzF®_Ò 6Ñ0Ŧ¹`¥²µ*i±'œHJLë%VÊŽúW¤ÊdÒ ùËF?hQâXÞÓ¹§¡¾¿N„à~\ðOÊFÿZà=Üñ`!8‰Ì@.9D…)7ƒ{HÈ÷ÎPjr6ø•öaµ›5NÓ‰•[ų.Ð Ù$fõÿ‰Ç/`iõMcut_ÐMN‘¢Âß @ jÌ¿’©¼/Zr_FÖ%î²ãó—o¤ÄþèOdƒ6l î–ԆˣMÜqTÛ+{¨Ý6GGô•Öˆ1|^ÕöBm\Ù[ò•ia4òØÛÈãÏßÈãÅ™ÓðLŒÅaû\j‡»ƒ–ò…éÝƨºÛ%½ÍÔãWù½åÝXÊÃÈÙ_‹l®›ïxú{ä#7ˆ¿±øÆðL§.f‘9ó²¤ss&…øÛ¾Y“/œ8‰]7Š² Õˆì%=u$NÏ(‹§½tE2ç(£¦ŒñûxˆE*V…:Ü¡ßu¦“;™T¥üþâºöÐ .žÀ¤zTõRÉ"‘VI¢Ny OÐMÏyþŸ°Þä ÞlÉù—‘Z*KVÑ6¿e7?î¼~ófõ-Z½n®üo´ò÷·›ü¤ 8«p•XIX^-ÞÁŒ½få/ºY¾DïÌ ÷wpÆ42¹æØ8Ü ˜cÜu gŸŽq+¡GBv9ÚâMH¿àQÔ¦œN‰mºô mÈ®„0€° rÏ&‹!.G`Á Œ°ˆãÑŽ{+”Á Ržï‰iü”q1'š(‡NË KP\)”$o8Òå5O^Ô¸Œ=BåŒT}Œµ ­Š£,ASÈx(̤êH­ ´é+ayÐ]µk+ ¥R÷ϧÃ7+ãÞG%Œ[AÄž\ƒí¢j‚©Ž£¡öÇ#ÈG-.FªÚ b­â» œ•°ñ"[:"S!ðÆ•¡ ˜Ãi±Ñc¶Êè'õHÚAÁTÂp Ñ#™M$l?ÿÕ¸hTË­¦yš)P[RëN(@„bm¹%èëQ¦µåzêS6‰þwì7žWÕ¢¾6j`W¸+p®žO©Ï aJcÞ«Ú%¡Çhã¸î ©)ñ`¤OphËdºp”s8) ï9fùœâZ5†Ó°€‚{ÛEbð3ÜT:õ"žŽ“ øϺQ|½Ž“ç¥E‹6  3ÅJé”ß”î¦+Ê¡Ä–; —${®ô®§×Á’#*õm騹óSóy«,ýÜ:î´Jw!Ç¡œ»‡ÁÁá Æ/cÿ‹„Cä})Úd(<Œ»q–QU"8‡²Ë°%6‘Ô*K”Τ•j½$äþ’šû˜é€,U*Rʼn/d!šmÓ ­ß·jˆ„¶­@½d Øî/¿(7zëÅcÆS ^ÿç)YXÛTx½” aÆÛ|¥ÆZý>¡áù_Šz’âmnè$ê\¸‚,˜ŽÐÅÆeî»|³=TQ¯G7G—qôÎàÙGãô}Òã`h Ó…î Ê‡\üÏþ¡tñÈ’W’N–„yÄö’øRŠÎaûÀ?%Œ_Ž™:ž¿a‰¤¦A;ó¡¢ s®þ-©GÛú|ÂÜVÀ:Bß5ÔLñRÃÝ“ô“ɵeíÁ1×ðlàƒ-ûk‰Õ0§˜DFŸIŠ™×æ*ÝÒø­Äpø™8¹_Rï衼Íi¼v‰âMÇ×ÆÔʉæÒÄÆ” m–Ùzß9š8¶²†™¨åÄE5 u” ‰3Ã:4Á×WÌö¦l;>8nõdõ‰(—°«ˆð—°á19muŒ'™NÉBL³·7 ñª—Êæ!K™ –e'ë~éýý€R&¦€¶N^ Åúe…ïÉ[t˜~ÂÉIÊÇ…RjóA£¤ ãö øôƃòÒ•?”P, ëJ¿Wò9¼,ëõzÉ÷ªR-ýA­…3ãtzŽÚžÅã}Š$ `+S&­I;€IèÆ䈤Q’&ï05Šp›Ä}ô°°Œ²³àw47GtŸxbhà‚±$|°6ÆS†eRÂhótKù±Ü„© ÿ””…, PYF±ðX¯·•3››ÇÅAI`ôe§7µéæÊrQrÆ™’Ô¿•J-WAõw²^Îk¦˜½ˆû£ |NÙlŸ/1 6E ’ÐóŒŒß¦Æƒì =@²EFùƒ@ 0r”ð jƒdì÷ö°É¬:#–DVJ9yû™V—â{šomŸÁýS«$bp±ÀÐ¥éoï9Ô¥ÉÚMßÖAÌQi‘ÖÄñ¢Ð‹(N@íDdhœ ÓÚN™3fÎ`tTúÃÀI›)ž" ³,‰X¦2Pº¯m„KŒ ,’3›7&Wpzs…Êùˆ EC,$ª ^wC*àöäðo\[B8Á 2åÅÜ”ÚÎZ¤ãÙT‹C‘ì=7yä4Že\Ü46s.‰=«![¬4z|ÆÁs%l’»±Di@ù¦Y–œ¢£{•Ãøè9؈–¤$ËE«啲¤d>2ˆ«vjΫXÈÚáz@’·º´÷Š w­V€2P§QÊÕZ˜ ¶¶(¯ìZ¿ç 1—4#)W½XÜ´ª¶©¤ÕdÃ`’€¬™ÍÔ[6ƒip­nï™­“é\K¼À†°“äÁìáb×pÖ•±–Ì‚¡W'NÕ’Öêl.öxÍ<ºKësÌ ä[dae‘nÖrcÈÈ)jÍšnÌì‚ Æ,Ñè\¶4üŽ$]ØcY?£Ñ5Š_Ga2"Hú" Èø&*Èœ÷ `™Í ;âp¿PÏàFÁXWˆðÛ‹Ï´È¦Ý ¥à€±R b fÉdJ-‡Bô*˜Â§)\ZïŒÃ±bÆž}œÙP¹§¡ºïnнH“nÌÃç) ‰¤@yRCd°B[ r?®•(ðm7ÖzFqa£ÈÐ…RƒdcÕÒž„s(ÝÕf¢ìG•¦c…ù@´¿‰Þ†µ ßB.a có"Î[4†.LûÑÍ)Ô`Š¬4Û¿ÔT¡*zã]Y*9‘ ¦a”úa.€³‡:!„¹Þw)6#ãDÀsÙ\©?•ay©À•”l'aN’óéX … -Ÿ§Qõ$:Çžã,ÖD `TÉp]rÞ¨HœZ«Ð€£q.± RVÿ¹ˆÊÐí"ÔÝ»wƒ§­çíƒ`¯ýñ®pÍ;‡ÏÚÏ76–üNé¶éö6Ü=¢ÜÖÁî"¥.Þ êŠ[ßo3\ÿñ"¬²£ç0ÝÚ"ŒüƧ[tuü¶h[¹nÔW¥]8~–’ÜÍÒ]:a638ú4ÜÅJB:|š ÍuxÔö6KùúùüœwWžÔÖ×WÙá³Ô±Ÿ'OáßÆ“Gkæ_ùùKc}ã!üïÑ£‡Yk¬­?YûKðèßi eGäßÏùçÓ Ý28‰êÝ[šÇÍÿúÃGbþ×oÀÔÃüo !Ïš,(&šH´»Ôºa~)D5üýlˆFAḚ€ùx¹ÍXlœ¡¼Ò8˜¾q– 9‹¬ƒewñR¨áüÎV¢Y÷*•ßƒ{A£Š"Ÿµà¯XØÁ&}«¾NÞ–ù¥~û¸†n?J!þ¼¥ëÎýßXüdݽÿO½ÿ¿Ägu¹Û']sôJ·¬¯5heø"¾ìÇ“ÉÊpòÝkÈ€hx <{¸uJŸÂ{­¨¨“íN°ßü¹½ÛÚ šøY ^µO^ͧý—'­½_ƒƒÃàUóø¸ypòk{ú¸Õé´v±¤Ãã ½´×níb¿/;-,°yüzøò88|u·;?ɚЂ<Ëâ?ÊŸ çãh8aB+hn}ee…ÐO`^0 ¯ƒÑtŒáÙk6·Ô ẋªý1BS£€Á7Yw:JËÜjÔ ,6 ´£Çq#Ð>1ɱÀ)B/ëõ%Ú\ÃÂlFÊÄ;mËGE^F¥ê!ˆ±žá,$päBà’Äر‹t")|Hþ%<ƒÆ¨X&ñ‰l ‘•ˆ0$i—ì•©ãeAQpˆ(MˆïC‰x?–ž:㘎!–j»BN…nl`|ü‡‰YA¡þM±§~ñ£ý,IÝGSŸI2çEóçVȘðÜ1мg°² ·¯Þž¼8n5w;X×Ý@QÃ,CŠØG)‡ò@f’YMƒë0Ê`ÛM*±¤‚‘ˆø~aªg#há¯Ú^<ׂr“²‘ùo”ô§ã¸Æ2ßö6ƒrpê|3,×€–Ýk´€(Þ2 C9qI ñ EôCt˜ÄÔ_Æ7l·àNÖBÚ02LVž¬¬hj‡[¾\e4ꑬu«­m[DÈé£s<ª§·v‰šÿ”ÇÓæÎOìÌnˆËÂ^w"š ‹¶&(¡nO¶w:Ì’sÜáýôœr@¥ËõTTY¥ÍÆ?B9­gI•ðC iJ]…]ù ÙtêniɃ—{{U]4öXdj?ü åfæÙ¨èÖáðÔ‚µ«GyR‚ uªzpºFŠ þ$ÁL´?,QTo0‘ƒ©vaØí§tvÖ%ÀÜõ¹šf$À¶”š©’@ŽÆV?lÃ…³Q×ÝsÉÏü1}‡fÐMˆ·ÆdexЋ³ŽãArˆp·ÝÙÙk¶÷Ã]`Ž_‘s_ÞÅø|‹mª| 3òí¨Š§¡ÍøK>Þ«¯+?Bkìß½qŽÒK ­a+ПjnûCn9#¹wßpU¨úäoóÒöTÚ^>­kèï“ïÖ53ÊEWõûÛª:{iÈÔ=Oê^.µÕG]ù¶ÊZÕ³Þfm(Bw$u c7‚U˜ù0Bf¼ÛÓzøO:þx òŸa|YÑë¼f¬qwÁn}ÔÉ(·„>¹Ð‚ÃÌæyÇVÍ3­ð<»ÑYfcJÅç—·=réÚ“ÒðM ,/¸‡*0´ ¬e\öZ•^õðUÏ}åN¦:ƒälÒ)tÓ½¾ƒÓöy7» BFê¢åuF º•«mäG#‹42Ds“Þ|£Þ|³.ºaÍÒoéUªÁ·ÁºMÁá s»Œµg†Ä5õÆÆ&èjØ#G‚|Æqd0? wN‚ÇøXæ£ÉÚĵ.%­ù< Mq‹—G‡Ga§ý¿­ <Öm&ÿ3¨rö_žK/Ö™ã_Õisµ©B@ +—u??>|T÷~ÛHÂWë2’hb¹ÁÉcPTr1¥£×²oÅ™+è‹ÔÚÈðSî^EŒ­1f4UÒdÖrœ@J5Ͳ.ƒ2v®{a¬(úG£o Á¾Þ¨šÅ’|m“ÿnlZ‹‚Ö,ôjò¶š“¿ós\5ôÅY_ OiË®¨!*zø)õ¨hÝ®@¢îx’Ê·µÒlNÕŸ«:³=ü»ô;ÜÊ g«:§Ô¬Ú,~ W&vÄFÉPqž}D5ñ& Q¤ðZ¿k± r‡ 3,eŒ—¢~jœ¤ãp”Ò׬W’ ÒPhœt:””Z‚v0äÓâ'J»ów¯$B\ƨÊÚ oWĽrB=Âh‹‚k§BêúÒu7›.Ë»ÙàÇ#Š‘Ì*÷`¸’·LHÔ¨‚šÉ,ÊY†¼sùœgiõtW®)¸Kò€o3’$þ cL.KT‘?jäø£Ÿ>¿Ã|WŒø¤Nca·ÚåÇß{ú|WÝtr™¼Næ-:òEï樊µÛÓH8ò1Ì}ô¿5ÀýÿÆÃõœüÿñÃG_åÿ_Dÿï•\ΑOjŽ¢É =¶|–gÒªB¤4E–6yòn§Þ]&Ã^z™ñ;§"-«õU IAV¡rUíÔÝW‡Ç»Á«öê)ÕÞÑχí]™ŠªÓ4Øò•àÅR.qÎ5ÖrçÛÎ1H`3}PDõAb]±;/Z;?…{­æOJÕ+Có•~†:a¬B•¥ù${@Œ£º(XMŸ‹W­à×Ii@>h:ú@Šº¹ä@`‘®³Úc¯eyosM{Ñ<ØÝkÙIø O¢(…[6F¬UÚ“²ZA[ Æ8~x{Izh5HÚÇ(Ò3‚•Ê,Fé ©6(Š!+»ÏÚ»4•õÙê‡dñ.)Ùi5õwÕ]èT&Õ‹óTŘð„X¦(ÖGëaÕ&¼jw(#“<&Ftnúïž}ë²  b¾a Fð×` øZûÏãÉ^”MZtÓš­Ps'o{*µösï|n¥ˆ@#”0oßöèºÇr|×ùºç6ÿlóÀ” 63Æ^dz%“g鸓 Ïûñ!©ÜDÞ6œà°dZU¤í_5Û'ááÓÿn휄k<Æ¥Õ}î¹!bìçÅsN.öèöéªûÏÛ³™Gÿ­¯=ÌÑ'_é¿/Dÿ-¬áþXSOK¡n!£ÉØkÚÞ7L@ËHýNYFŠêànxRƒh"ý“à0qm™ëúr½-#ÊYÖ“JÐíCÈ( ʘ¢¬wq˜LAŸK:ˆÉ%ûïñ8 i>¨Àsiîp3Ž%®£Ô%È%‘н`ÓÂQšžõÓ,«ÖgÑ77èl†å(ë õ³æ¥ä™­ÅŒ4·|Y‹Œ·ªgŽà‚­Í•²ž+&'ñn-øeFÏ6oAiÙOÊ Õ`sèâ‹––Üõ:¥¼qs7­2º÷¬!Ì­¥â\gCL%<ÖE£–úẫ²-8¡–sA.s+‰Zú©¥ßZz<ÐtKM¥!¹!îÐj`ü|½öjò“Z®±±äóÓóSÍÑ6Ö éšåÜz*.A‘Ms­KgçϦ)ÏõŽ\ÁÜä…k°xôÌ b§×¦Ør«hŸ4‰¬›k!!ÖÑJ#/‚þ –Öÿ]Šë_šþÛÁà…{ |­O®&·HÍ ÿ ¤ÿ6ž<|ÜhÝkUλ¤2|Õ>ØXgL·Z:i?o IìOñ´ÝêȤp€Âõ]-ýgœÿ·«øYðü_ßxâžÿë_ý?¾Ìù?C;S(º/Ðxüë ÑÆŠŠ8ˆcÂ0:Ê•>á"qø zPÜ,´íg ; îÝÓ.ê׃ù²ýAõ¯Yßßf«¾ cÿå心(»¸í `Îù¿öx=Gÿ?‚G_Ïÿ/æÿgxvÁá|‰ 1_x*^¦ãwäñ¤8Ž×uò »›çýü=jy‘kçðåÁIð„Ì!Å#²¿ ®•J,b š¯)ÕÛ‚6<78õhKø9zS÷H£âìc­ÉgÚÈrÇ–HÍ+IK’o7 ¥(l[«z3œèÑã'dY·†P#¡½¦Ž=’UäO°¶‡JÎöO<ñ\û d=Õ»_Œþ[G´Gÿ‡ÁWü/´ÿoñSúDIBé–8ïÅùîÒÇòÜ’ã.)Žû#îOe·K’Ýþf»d2ÛÉjßê:*M³è<Þ äq §ˆø¿’ž­ÀÕÄ‹(ƒåbNÈ„Cñ¤—±ï1é;Þ"ÖÁø2F0Òy7ì>xP—ŠÃŒá³‰ µƒcãÇáÅExìq:À`ŠèFqIÜÀ8•JMô^¦ _XkðˆòôǸ±VQÊ. ãöF¹t Ó ”S§MB¸N(ÿzµô1öS©´}ú²½·ë8,ãåQpíÏs°ÎéšwNBØ»açd7¤K¹yrxl¶*Œó¬Ò„ù¼t ÞŒIBämÛM0:YçdOñ¢uÁšecø'Y¾Ù÷SÞ)“úI¥“÷Ñ$^=ïê1#ퟮæQ;<:nÿìÿÈÇ⻡ý3_J/K¡ŽaÏ3A"qP§ZP¯×‰A'Ú ËD›dèk‚‰º ýˆ õ©.SÈÊñ(d·`°úEM@jªÐó2Å+6Å15 E] •óXbˆcF‚µä5Ž` Œí(bÂ1v5©çÙeí´ß!ÉÜ\CPivuÐÜçU½×Þ9Ñ6¸¤`p0A'üŸ—ͽö³_+0bÏwª%¥î?KÓ ¶”ñé¬Ü˜Õu'ÒîSAXŽúAÎS_ϬÇI­ÊA>kïµÂ0(ûöýUÒ•?Èûò |È£ éž¼Üt?è3ZQ€”Ý@RV<Øoc: `«zTš''Çá˃—É5…5bÀ’0¬VÝÁ4³Á‚‰#8qŠ±ìö1$n3øc4=í'ÝMéÚp ó©› )%¬+¡O³Â¬As|T7ƒ¤"¾°t‚¶²=f:CÊaÌ]BÐN”`ëƒ!óBkѾ§›·ÏYçÝjM¾i¢¨Ó‰`FžrË~ÇæCo~×mÿÇÓJAS ÒabeK…µõvW¼ärau™…¨œÛðÆÎŒ©åkê4>xº¹idYÓC±S8!5OG7¦=Df"^Þ'cŠx<˜ö'Ɉàû)Jì±Àîh?~÷Å2€qÔ?küÝ|d È°)!L<°L(9l“œic?>C3 uîˆRm!pl™nò¦û`¹Gú‹—Ù׶>ˆå°c-ƒ¢¶Wñý±~Cù)Šr GÊ;È0eÌË,6Ñ6ûÒpì4ÚBÉ“w]”½& ™àíVîÝ©ç]Þe ¿ÙOg$dNèÐW3²²›¤ó¥uš¡±Ôƒoaܪ"YÐÝš9ËïãñuЇS*6æÚ³{ŸÒ»ããtD›rŸÁv…®è"É`÷¨¢]ÃYíâ> rÏÚ¡¢RÌYE+¡ ”=‘51U\úÇÛÉùt98uö•(ëiaT徜¹¹ú#G¥<ÝÜÔÂÅœ¼K‰c·Á¹¼kÄeܵjÇkõYû΄ÿm…‡ánk¿y°ë”Ch>ïÓw±†àËLå¼3á6l,¶}sïû¯†§žýcN\ H{4ÿ0™y¾VóÓÉŸ:ÉOýÉ£•…tÛ}#¦ÂYM§…égO®bs“ú1súY¦•âÄ¥g&š´ç– ŽÁ*Äì)«1(»ùGÏÔ#ä1$‘„#º®F4¨¬ûòŠ™—0Â0~¤«Æ`•Ñ˜Ž;b„²i·K¼Dݠɘ!“õÕîòÿªý§Šÿp WäÅ—‰ÿô¤±¶áúÿ¯?þêÿÿí?¿ÆøÿaNü‡O‹Ž·‘V%å«x†hÝ'Ân:Jèép ç(0ì a=÷xù]BŒam9Р|ÜAp7òȯÞº|)i$î:!—qƒaŒ_o¼•›° ËcO+ÎOFÆ‚åeÒ(å!ªÕ®ñŸp Õ×èjËÙ×|JFãñVé£Ð{evßÂÀ6Ër8«† M*³ÖqVaôºƒ+Åoa¹¬¬`¬örUø€.¬Ü¦.¿d©ù·YðZ0¾MtG1TüÞ[Xxù,o&kÁÊ ,É9öÒš„‚ Ì`¦3f³ Ë:fq¦˜îD© ÔBGÖ±7›3K-'}å,KMƒQG=¨³ü»êÏ?|?ºò7Å1™2`X™mYß2Ñã$<ï› þÆ£BAÚU%ƒx5Sßð½ìLEëî&Ã-þŠŠ ½ÐáÎÝQ½tŠB"%êFcsD†v³‹ú§ðä×£–-PVƒI®G"‹¾ì'íýVeÒ.„ºq¥XêdʹƒÊ½ýΆ—;Ë®XîÉ×ïðD2/x`¹ãfµPÿuŸ9W ã~‡^†»ígÏ ŒO»ºÜˆW6ܱȯM7²X3ß®¯e°»ëõ‡ý3üÛ?çi+鳘¾ù1Þõ\¯Vx=TÕ¨C#á¿U¤:+Âì6eù0æÎ0Z‰k‘j.¬6Ë>Ð÷¯>ºÿaò¼T³Hˆ^4¾ðËÝÏ,ÿy´Öpñ>\ûŠÿýÏ‘ÿìùÏÞ´—¾Gß©t:†µñY¥;_Z¸óU¶#e;ØS«Gî :û>0rC ýN¡59¼'ŸY¢Ö Û1¤Ò€%6CœRbô¹‘åõ«ƒCñ6táð¨uð´³¾]±s«ì6!{YØoä3Ø!bB¤;'ÍŸš»»ÇáÁQµ ˜½öÁË_œRš;{EÉ¡}pì7áÔUó̼Pçq{«ÞÝqËP‰¨]OON÷)·*ýEë%”|ÒÞiT-O7+7µ8tËP¯Ÿ·Z8|füH“oµÞƒÁ4›¸Ç®+y^ /iÝÓo®ï²V¢âEà*÷”H_Ñ^ÕQÿpû"¾â£*“¶`„»[»±Ñ&ÅÄX„ÀÖOò¢¾’Ü~î˜y1øMþoþÀY-Ûé5ó-šãÊdf{Ý”ÚÅø+#÷•ÿ3ñ_Жú ã?5æôÿëŸ|åÿ¾,þßl˜†Ïÿ (üÀsHÐ} `aÌSù4ãYÊ) Ú\›BV­¨ôø¼!Ÿ›¥…M 1Úó »7ØlE•–;‘öH*Xù‘,Çd¿…jŒž_{žs'ÆþÀ†þÆâæ@J8qU›4ÿ Àá Ge‡(-N´"èØ©(øøÏŸâëµWŒÿ•Õ£Á­³ì¿nWŸ±« ×ä»ÕïE=tYªLÒQx:Mú½^2®®BV¸·û¼hýrrÜä){í§j©„ß;4œÑ¯1I RUK2Îóã澑¢ÄÂÌÿN«#ô~|ÐÔ»ò-·’Ú¢šV-©`»;ÝLÈov÷¸aLzˆT»­£ÖÁnë`§MuÐè ¢ÏëLS’_r}2À³u"×tÕƒ¤×CúÙ•ëT%ý5×~µiæÕOˆ¯óªW‰Jê[®r:ÖH6¯þ‹éùÜÞË4%ù%W9¾u«Dóª&º´ΫÞLW2äša¾„–XiçN„zmætØIKÎïüÔ¸QÝr9vží5Ÿc†•]7„Ž›ÔÛ:p¬x[<pŒ¼)´pËåY—™DŸ÷NÜ>íÀÂ:f”äÏö£Y£DñÂfd…fù&sF†]5Àqn%ž¥Acscs-X¦+ªGWÔ›…LWÆ£®ƒÕaz‰W猺= ñã†jýÆc¥sÌXŒ³ê¹õ!Î1ÞHdÚ‚f·áÑÉqGo_b.æm\•¨¤¾åoFCc$ó‚å6nJÝ ’).r³Ù)KöÏ|ûr!ÂÝþ½²Ý–¾‹¯ÃÅZ*S–ìŸ-•¯U;Uú›¶3›žr ,±ŸÛZ_ú’ïa~ÉDB9€'¶/ßM{à1ï˜Û‹¢<¥¢¹ÞxJŠ³/Ö)½òwŽö^vðÿÆŠà3×’HS’_¼4ªÃÆzš¨# wŽŽðHÓ¹dsöišk÷Î/¿ˆ&£¶#—Î_ÌI$wQVê­îsëÃÕ„»íÎÎ^³½¯{®¸hŠò½¶ß[¿rý·ÞŒ٩çÒì¾ä…¤»§ä‚6« œÀþYÜ áÑ榟u®þß”ÿÜfèŸùòŸÆ£G\ü÷ÆÆïñþ)ö_ï¿û®†ÿ~¼ˆ†ÙÊ׃§i|1¨Í~4 àçn<ò*ï5ØøþûÆÊ!ß}ÅÜ(zÜW¯ÃÿTË4Fù…<úœ½ÙqÌ0çy4>Îã@#¯{-aèeÄø!÷ô4ë¢[<œŒ¯Ò‡»ƒað:ãZ·‹ qe"ãU©>ŽöY?:Ï| a3‘»¢—¢ˆç;Pf{‚ 2Äå&8¡aÔ'! .¹£qÜEØ!XßÓþ$3[¡‚p¹HÀ°Po6'Clß /ðšäI#ø»AîýÌ05z …ìw¿À¶ojþÔb> .î£UÛG* @zaE¢RBƒ`Þ \Ü #ü+KE\­wuFv—©ìrúŠ*ÉLû È”ãéÖ G4Ác§j £í넪m7HF…²xúµƒ áÓÎîà eŠ´ß>êà9³sØ ró…¡ž.ÓVPÛåõ¹fõ!Ù•…¯ÐòÌ2ÎhßU»†Ëdˆ—X 4ÊÀ­M86OŠÚlj ³¬!"Õ#ˆî”Å?¿€3„qù{ñéôü†¿?CƒLN²¼Dg¸‹mP*Cßׂ~JÛ§C{¢%Ü sCÎhL¸ãHöÁÅP0Úô°no³…,ÿr#­ŒBƒýÑqûà$ü¹uüôðBš'†i,éŠCl[ˆ$ú%Åçì”ÍAYWá0`@z9Ô±é£LÁ‰ˆ²òˆÆs0¾‚«}B!òh ×h3À¡S!ÄÖÁÏ„e¯ìîZ'ð(w8jdaÚ˜#×¢ Ô,ÖE½.‹’kiЖdˆÕýßl‹öUÊþ‰(W«Ž@É‘xËJDÎjÅ,TpÃ,òƒ>èÂ7þ[·œXö0¹X…gáÉÅ資÷µ|£Oo¶YþGÖö=3X¥A¤³L‹i+«6ïTf¥°›ÔC¶Ñ Ÿÿ¤‡«ÀVmA OÐ(ïçݧö;&³°Q[û­ƒ“æž}^æ®7UŒSiϬ6š òo=¥P"|"{øò$lžPbsü=UÙãÈ7§7•1 Ó!œobE0؉íD ë¼<::„‹@œ^©aˆwo¥QõÙáïD´Ûþc¬éЋ„­4B&˜_7Ûž b›µuÅßØ#¸ÈòZiÉ!Î3"+*U ÉwJÇåe $ù Né†ó‡ ͦãq:*"Áý„Ý€]ņ“ÕîúZÑPùIÍu-wÚYývNGÿ&e2ÁkÇmmaðyç¸}ÒÞiî…ØYíÃ\Tã°›mùnr$O¢ñ¹ ðEkçEø|g¯ý¬–ñ&À@Æ=“PÈø+dg[Á§"K¸ßüïÃã~h<®.(çÿ3°²c|“~ønñÜVæãC”ÄÅ,-“ÄOF‚[5D“îuå²I/çÅòÛÙAP˜fqx#Ü>}ZP x$ãJ!o†¸—±E4á ²HpYÊìÛeLž? 6¤q«“‹áTÎPŠ™®”±Œ|^ A¥ÙþÅ"‡äñ¬;h¼<ڣͼÂt|ØÞµr wÄMÛcü4§”JÎÙÂYÇðt¿ ä tª:üÈáÑ ®²SÞ<¾T¾6†“ð\»ÒÁ€Û™Ûœ[fy[¾±•£_ì ôSˆGàá³p¿µxükeTõì!|ª-g­Õ¼ÝáÍ–hS×vñŒ¼0œ ñ &) „@¥Ùõ°{1N‡b™ÕÅÒQ–_ÅÆi;¥ó8—ÁËø"IšM¦§pÕ Mgz|® ?Úy9ãU;#éºO¥¾ßòØ·ÏÕæ~ûy3|Ö„™ãkP%ô®Š~çâ'’; Éí1ÃaØ8sK¦iR‚gpEò‹?ü™ª[tÑV]S¬–gÍöžðÞ2Š©Ê¢—UQ¬†6B¤ͬ·†“ ZÃ&'ÝV®ú‡³´<Ž'Ûðª¨È©Ý9*˜x›Væùe™ ¹à ÖQXKѲ¯*ÄÀâÕ‚#ö#„µ\p[”1, ±JZd”_A:¢%\µ1hpŽl´oËÿþHËZÿœugÏYT[xòŠJŠj·9} ÕòŸ8¦9ý pN«Á¢»[¥íi­›/wvò߃Ädº‘‚¿hÝÛ{pu­[Ì‹q‰ƒÊ÷S¢æS¸%+e XÍžRåªA_jÖ××*¼NÂÖÁ.Å/„kD%“n±x܈ï Î ß™÷‘@wW‚瀃ž%çÀ¦ˆ5uÂŽêˆÃãðè¾vêJ–ÛÌ€öBºyØËj,Ú Ä'Z¹¨8!wkW®-k”7_›i²gm 1öZÍŸì5ªKWE@ß{A?PS´ÞÈdŒG ñþ€ýBx¹°M.X,gK”…?C(¶÷?Â8LW#à¢ñÖŒ·½1Ãß¹øwV2¿Q<ÍIxrÒûÊUèJ¢½†á¡±ø)f€|œœ" X‰•œ{˜ôuNøT¬ÚÖÌ‚¡_\ü³ò£î¬™¤çKÒ3“$Yõ¨T@—ÁOh‘ñÕd… Œ> §0wÙ(ê’ÂÏ(ô]Çó½[xÕw¤ù‘w%šKPñgÁ^’(uÖÏÞø’RY™Z\¯a·Xñ²È‡C­’xÛ_Ã:Ì­„¹é©+r!~•Ç#¿ä¹®j<¸ÁµãŸc ?†ÑáÙuHC ƒj ñ–Œ…3éÀññ¡ÕR ¨ŠÄà#ÑÇ&ˆÔHÇ#—d…–êÃ÷з±Q4|õU¾ŒlÔq¤ü—G.x“qi>CÉ,œáßãqŠº°oGÁJ ¢ªàAw:NßÅÃ"! 49W¼yšO˲ÃÕJ¥±üðCÐXÇqê–#tr°vuvvV­jïa)Ÿâ3]ÔéyªT”Ž†«¢Æë^ð'ùx.ckëp*ckãÂókšIÅÉõëçäÇíà†Ø0‡ÛÝÌܸÌN% 4ÝyaÊ Ãjé…;/šÏ[j ,ï1áuz” Ïwþ[IŠlï¼A4~—sÙ;ïþNÚ7Ò„b(kTWûÅ«-Lû…©†·ï‰]ÂC³¹Jԣˆ”ÏQȆCf¿ |ðn«³s {ãY§uB  ŒÆ½‹CQøŠÜ zÓÁàzË°q 6yo'CbÊdcH&'£ ±Ë7§ÈRY!¿l ˆ"º û¶Ú@<ÝÝjÖº\ >̌Շç@ RNô ©3Ø?\nOÖƒí¨‡u5Ò~¬ É)ÌþväFµÊ"¯ÝNø´}²ß<šÝà§ÉdŠ\Ò²ƒ,dÝü2·Ž+Χ´KǼ‰z½ñâ ©¾Â©H ®Ž&·WV?$“ÅK£îÄÃ÷ðÕ¾°®ôiB>¥Æ¬ëAN»‰C‡g#$B¶¼ì£søìøp?|Úì´*˜ÆBz»2NS*àA€²$*Þ%#sÏ‹=§täö8K·XØãM8»Ž^v^Tæ –¼J*W6éT n6…¹I’%CÙ÷ÜÂEç?Oã£ÏÙøH5^\vEŒÞ¬9$û" ­(È*Mn-@\•ŒØ8ZR6“fò’J ÐG7½ ­{0×·Ð’ý-ÚSÀp6}øò`çpo¯µs‚»Ÿ½çr§þCá×>¢ ˆƒD7 Qá˜È+tY’×bÈjIŒ5G%¬Êºf,Ò'ÝËÕ…ß{¹ëp‘ñ§Žã+ŽAóeÁ ¹/} ”Ò0µ&ˆ5ØŸÇRB„Š¢9C˜<ï‡úÌ'Mƒ{J×(œ3¼P«iÞ(¢r¡äèQFÕÀI̯–°Ê¯r³jÜxð QëæXùwãÍ×.íÏ¿¬ZäZPGÆìõ`ä5×Dañ¾YÅŸufU_Ô—ÂYUmñÏìÌÛ™¢T„´#1ÿ.caLÚO²‰@-ƒõPº$ù+¢’mrí†A/Å0¸ç©ˆ`5K*Ãcl_s_hÙ7ò"»Ê=ð=Í.ØrDC±o %ãnã s zj‰q©ãÿ1W•QÒ°mÞ@¥fKË{AljàM»éM»$¹ë¦cB¥ÄײDÌJòâÕ.|°&Ø{6(:tO4J»Êr jF˜ì§hõ2¿òÜ”®Zƒ–™rŠÌ3QJ-*ÜÙe‰oŽÎ'Šr¹õ,ˆÏ=Óå—]IS‰ó:á‘}{“ŠócS4Á³Ûw“¹öh´üÓìû‚ö,a3¬M…áÛÙ´oÛ oâ¡E3ÎÆ‘ø,Ô½^ ¯=cdÚ{º¯¹^ +ßöªåZà]#¸À߈Šå-–ÀÖg[¹½E;Ím¦S¢=y¬Ñí%“Iª§ ¹Ælæ0¢Y)ôÆ=Òžxê}=6¿½-+†µz%A«LÄz3Ëà]¯ ˧Ï^¾ár²JÞqÃö£‚ÇiÈ´õO^Þ©ºÍµ®;Í`’ ¯ù„P·é~&’nqà“ÙqG³Òt1EÏIûà×ð¸…VN­¨¤Öqøssïe+xèQ&n¬ÝŽI#Cý!ðˆ½.!çÀHH²”Z¥&Ÿ“5ÀÉÉ1ðú/;­Ýª l*RÝ4»‚`¶bè¸ÀkœhÆõ*‰lù— [4r°þ<ìó¬ Eá fØ{«!ƒ×(4°ªù¥ìˆ…ǬcŒhÀæYHº¤‹È±î˜ÃÓ–­µ:šêÅñt}·a1¢nå†-˜‡§ë·.¡Õ7kå/> ÈkùB c_è',$µP|ŠÚyyÜ>ù•xûéK`ùáep_Vd®Í–Úx&Qäf p&ðOž–2i Ðs‹ü$¯Gq&ýénà»wŠ õLiű è')Yw‹Â•q„œðZ¨ºÊn¾ g4svðl¥l¾ñÅbøƳûq æ>ð.0m‚˜Ý_ —À.†“GGMôéGÃóVCÔOÎÑH«Ñ°C¤Af=cI :£±G›[Êò6 šõ(’çq<ÂMЃ2ÅÒì;²òôHõFÑì¡i~B‚Í›4tcŒ=@¾Ñâ–eËì^ÒC>ÁœÑo˜rJŠ~[6ƒBš{®„a<WN/šDžølܱSóG×üÑ3Äæå³Z°|ÿ¿0â¨a-N”4©&Dp6F·Ù$#¼óiDÞÇÂ{&¥A“{†¿¥¸b„![ˆ‚ð¼FÝIò^]sFoɶ\åcF‡HhŽÇIoyÕp`Ý9ìTuÛ_%Ãõ›Ù“Çn4Ö¿û‰»“I E¢™˜Ã™6Ž äŒ5Ï\qÌf˜™Ü‚>@íÄ´ÝcÚ<†|íèLGñø ¨Z²Þ$J4gà Û>=&Òƒ‹byxlæºZÛ*ž'—›¸çK,uÅwE­©X¾0¸ÕÓZ£¦Ký<‚çêlÍ- w”Š‹”G³ËŸV­üÔ=Ö-Ò*½¬°×Çà™¤x| kBS6ÓVÁSá–DÐnø& ÛÉ¿8áû"‚‹þ2ºÎ$ ‚‘ð…kC]<üžVÔ9ŒP&'ÓŒíÖÑtéú,:‹•/¢-d5K³dòMhˆ&„ìG¥–(úÙžioÔg+›&ϬFU+R¨󰡨ãt9t‚85º'íãå=«½#`6¥=Vf3<÷àÆvø£Ho#ÏÑ!±fñ:^qÞÜR¾[w‹ñ¬˜3×¹o_È“çøiÚ¥Ó®ÇæœY}öÁ²r“ƒe¥à`1•IÐ*}*ªzµÀ"¯Œ¢À·š–Ðïøz¦·ßÝôzË_NöbT#’`=ú¶.Þf )9ëknYËâ*Ÿö£IBÖ¤÷Nµ¡±ïuW¿¶dx´|ròJÉ6âÁ+=ÆÒðT «¬úy3µT 8#—q[6J졸êárÌrš„¹éü‰úÑõ§§É0ÂûxÇYG6S TB Žõ’,‡>f®ƒð“¬ø×ÌS;Þ(N˜RBãûÑI‚>y𽋷‚ÉP„S—-ð¸›ê0çÆ 5˜¢7N¡K½i’ ÷SéIªä²()@¡&ÅÔÝ~go¨E“! ¯q[â·*¬· Ch5x!a òÎuæFC æÁHIé`:‰¯Â £à2Úeäºý—'­_È7º!Ô[Çvø>Ίy*÷TvnÇ|‰(5|g ô,â“p¢˜nfÅÌ"ù®åBdŒŠÅÈÞ‹‡:ó aØ«1jZ­(í”qžîU ºð¬vÓóºZAnl©Û¬Oˆ œâm…±æ¬Ê“Á î%ð¸mºåÈÙµ&÷*™Ühní™™?rnˆŽ_`nÐFˆZiXâ± ›.Øûýæ/á³ö-žÝ "‘À–¢™P]|““! Û\R{Í*V\ž=mçcÉ݆m•lJPØ¡`3„uÖÚ,ëXi·jºÊh˜{AwžŽ 5\ɛЎ Ó ïê!zB-Eb~ˆÞVëæˆó½5‰U0»+?rËŒ‘¬ÄX8MW ÜZ¨Ø±[lqVmcõ²ïÔVœ#×nÈ°Æ÷J"¯¹#¹³å"k"xÉÀ°»$¬ øÊ\k|h ãË°Ÿ ß¹|¨ÆTS/—nŸbò!°Š4Ë)¾r´»Î§’Êg.y¡QÝæ^eò3ŸÜ¼|½qJí¥„‚ñeGسA—qµâ1q:E¤\Ä.@šYiYìiŽê”äâ $P˃àÌ=§º]f~6ç® “îø”E±=ò“9Ÿ>ñO¦ÐF-2ÌÄÜ?owNZÇê68V|>Ÿ 5MÝk‹%uQ çùG`J“2$¿;(aÍô9Zs¬˜ÔÔÃlÝT®¸#‚e߈)ðgýô2îåLKgªª]bL¶ ¦Æ†ÝVä×[­ãæžËÝv§ytÔj·lÙ²ÉvìүܫÖU­ÖÄÑœ·îðô]Å'ì¥wždp„Š)…-MªP‘ßl4D/0šùåj™Û—R±?Û¼¼ÔŒþrg§Õé̈‚¦â?5ü§úQã o%¤Å>(lôÖ=Ÿ#’lãm ™.ïVÎtX¼"+F“·Zå³Jû[ß‹Ì24Ï_ìÞÚëÕÿ»SlÑ~æéÒBÖÙ5”œàžÃN«nÎî¤ÝAÕ1*gæ²µ»bNš½lUI3Z8wfs˜x©nÏgî¬NgnQë¶>ë˜,x Îƒù‡èól{FÏfž…ç¿ÚÊ[øP¼Ñ8ûˆúõÅ÷ýbí¼ëaQlʟꈺÄw!çfKS>øKG Ž ”Cx1 M¡’ŒLfïôÓÓÓ1Ë"„ÿ:ûXç$[d¤¥5†4’ Z±‡cÃUEB§|[ì)Uƒ’f·Çzl<ÙÈm·B«­¥2À Diß>Z[k8Öb´ÚV(¯ºµ†@—ŠÛ1¶Ú Æ Õ|±ä…)^pÖÇ/Rc´ÌãïÈÌPéþ,Y¿éÈáÚ3ˆØ³¡!xqëþ}WêËub… fŠv d±e:V˜/…°ÏM¯y€åªìóyMæ†3Dš'‡ûmÜJyBë†Ç‚ŒÊl ‰°éö( ñσíà;s M,csã ÙšC·ä±¢X1®ÃéŸå4Ó™L{ˆ·Zá‹Vûù‹“ ±^`ìk%zdcì«`67®mc‘Ú{ýi^ñ(Ï[\°Ú+M'[¹9ƧZ_bTb[ä{ fßXGÖü`ò†Áªj]…\)®‰ÚXå­ h€£q<ˆ&W`i¦?‚ñÙA4ÔV¦é¨QŠÐ™ê––¦ã8",>™Áaƒ’!12pÜO’þMÜ‚ò@·‡8–?oú{µÅW¸ËäM¿²b2X•%Æ8ÚÕ$Êâ'­ ØáÓaÆ®5ímXË‹Î.¥}>„ºýuc”ÝT:a>Ò§ö/ò{mMþFà@„aeGžŒÐUÙôAÃ2Ð…ž“Ï»ßå·»ÆWJ‘˜[FÞzËzs:ØÀA¼Úp¯Óãu÷qȾøîìÉþw¦’ÔeßÅ¡ö¨ÜƒªjÁzÕM¾^˜|Ý—|£097­lä3=ôg+³¬U·œ»²q§fài£i{ *©Ú‡ª±ä©Ú2Á^ ÎÑYD ¤¤²]ó£9JÞ¸yÍ $·UÔñ‡y+‡Æ’ ªpˆOŠ]_ÃŽ@ýl¼A%9½2èÐóÎË/x`šGæ‡/»L?xo;¼‡ó×8¬ò¬sÆ–Ó"xyJ⊢>Q˜[Mnz›¬ÍÜu¹EZD8£`·úÄáF®XZGÆÞÐË2oÃ)Ð8£!dHW9 +]žhËFQ”k:Lþ&òjA½^ç~±È%RA†–ÿ4ù)oHҀ͡üŽþözøàŽŸAn¨c<©D5Ær¢ÉÞª@*L¯T‚—BöE")4jÝâì‹€|ªD:w²«ã‡!/½„~Çç¿ÿÀ?ò9/›¿½NÞ¢°âo¯;Ž Ùš#»äºX@D;ÂðƒãtÀž}*©B}¨ÃúrK:ŠÇшc§N³ Ô$dNÁ ¢€Þú×5‹(DöБÒÄáˆز—'•a5häÅKžTc¥»Ó²µê Õ„5$äÐr鈟´ä<¨, È~õz!\KhžµwÉt¦CGÖaÐÞfdiƒME «-çÁòßM‡/‡r7^k¿™•Jz©sMoº"—»½C8B1˜³äë’Aì2F"Ú("‘óJ¹Åø^²ˆH½±Ž·Ÿ‡ˆ*¡8f½p¢ÂшPõÒ˜®wÆ‹ŽÅ0íÅöÅcœÏ­«¡Šh"P,Ð(ƒŒÓÛÃ#½E×,G+ÛýIByIÜ—L©ë€(BÛ™Ž fCxó‰.éŒ2ç,°»»–J¯xæÇ=Ø6,ä" > GE]ã•'|~”‚ËèO¨ÂX{LÂÍþüÓSFã‚A2½Ã%²hpÊé0¾qÎEpúy°€ãÐ0Ç!ß²µù½+l±*B⛲çâÊ$MP»Ä¦¼»ý.;°§Ÿ>¹½J_ëï=š=4åõ£.yª‹0àdº˜'¡•/ɾv^âÙCteêz*°>±Ã@¬Ç<›»»ˆÜØà!»*ÊuG£€ô`ÈU^Ôó‡ÈÀÄòPƒT I褓_>¹N¹÷mÀ=”Aöa‚o¿ š–¨Š#Ç|M8W ¶ñ¼ŸžÞB#•Àîè¸Eq¼q©hëeýú°s"Þ¼ÜmY/Í…x5sá!ç†%¯b 4ܲ7íáÍ*¯}j\Ïj?Þh©Ùâ™$Ž<¾" 1ÒÓß+WÕ1ÁƒàÑŒ»Dd¹U'1×z½ÉWóÎöSZôwë¬Ò*iq:|Õ:>Ú± ;ÚÍÇ«Ö“ýÇßýä '‘7Ó“'ç/ 3¡Eè¥ Á),åªÑÐç.‹Ïñªq„jtqa ɵñ4Ž‡@ÈIß–ÌõFà9@>‹F¿š€ÝA-¥¤Ë’AÒ¢?‹8ÅÞ¢Nãà<ÅäˆÎŽ4ãAcšDï¶;G{ÍÖ~ ¶Ú¬ƒ&Ý‚Šx9^#a>8ŸmßAA•†Ü”°,åu7IípÊõÜmI‚jóîgözµ6ûgÉtmÔøš•ÊHöµì/[¶\ZkÍÒã ¦=¯¤ÇìemTu‰îÎCyËrmFgV´h²¤7[ůC¶ƒœ“ê&…BƒÃ.?†}Ÿ[’ØhB¨n£qŒjˆŠcfï*\ŸÌIÚ‹JNóÈ¢ÔúdU—Né§çFä_ ‰0’îè8Ë‚ Œ6s NP{®V7…Êøø–tP(N. Vc´¬Ø”ò›ÚÇ›¼y ‡jk‚6–r>l†6p0‚0ƒqŸ´>Ȫ(øÙ"/|dkI‚OÇ Ë•½.êE5vg&zî&),Ô­ýF .‚ì¢hŒa¹Jì}ÈßÛIÂÞ±­“ð¤½ßªhň…aŒkoôÊ^–²HS¡bu@éK€BØïPb¸9Ÿ=³rÔo“r£¶b~Ôš-GÅ4–|; *ߎª3áÏ•<ºª›©ïã{Þ6}˜£›0,-©DÁªÔ-&¥hðtê‚¡[hàt[o0l7´óÉwm•m˜<{‡L˜ÔÒ©zŠGK&õÖbC%¸ðHÝtœ}~<:K:ÈânŠHzÜ…oæ‹t„ÁšúרgKº±Œ…ðz&ª»oS/² 6ô§lg{ sƒV0ò¢ï7Þäzü^¦šD’O8è†!Z“ĸWRƶA{È1½â1#§x©2Þa`ð¤ÍÃð,žt/BxF½^èŒAtB®é0z—$ht†—`3±$Ó]lG Éô¬8–µàž°/ØL¥ÙW’#µÇ M%„ÉÃÁËý§À£sjøò¨ò¾œ"¦W5¨Àç}5xTă„g]•?«Á²új…“#%µÑ2×|ç º)þnYß]à“f“]¶r°03ÝàÌì®ú>6íL/Te@ -ááA¸ÛÚ¢Ô*«+K:t˜¦H^‘Gi¦ŸŒ!€ŽF°i\™Œ‚ó)еàò"é^P˜èƃQ2f„:c­F½ßÀ (dƈxP=2‡‚4AÈ"îÉx€Èx¾c.w`4n (>8˜¦ýhŒð½ÓÓ$fà×l!š†"H‰8‰‡ì&r>†fõ7M€^Iqˆ%Õ£™A`mºóxB" x˜NÏ/‚îu·gõL I fçèˆõÃÿ‹¢Áǵߜ^…0iÙ#CM)“³S®g§Ô“¬=™¯w}cmÑŠ׊j6l-Ä> ?0oAË$#³­€:ÍŸ[dÀî¼h¶Ì*;ïÆ–‡‹0ò£À2w†›e<ض‹t3¯>Üò0yOqM:;-gf¾ðe§îï7lÍŒˆiRò¸{0ok­7ÖÖåŸhçy4>ΕÌ1Æd¼ÒÒ ²x¿û0êâÆ$1‡¢Èg/ k<ÓE¶_§g†qÇ;ˆ›¢!ãdÒÉ&H‰ÑròÀÇ9ÓÓŽªø w¹ç+aVyÎ×Ûs!ßH<÷>}§óŽ³"øóI)! d6.7ÔÙé–uÀqÆb_Ôët•{ÙiÕP¨Ý EÀÎm~4N鸗D*.$8M'“t°)/ùì´>ˆTg^a×úò ½´GâN}Ì©;ß*Þ#èÀ…׆k)ãwÌ*Lém9j´q¦&Áükš¬¥Ø"dœŽ¤½Ïðíd¤o ¢Ãj™J¹÷D9G¹0§Ë–È,ÉÃTxüâç”.ðÿÍšîÈsrg“ééi:ZùåâžÉ£JX…BäÁ´xûäøµÖò€‰ÕyÞ¢”—Ç‹ 狦ð»ñi|ËÁ Çóݨüön‹~Ì@É26t3üÏ°º^  ¶q©3²…l×óÏÖ[XhúÎ,PnCM…›¶ÿî­aAz}\˜­ä­~AWgºë|$–}ÃUúb .¿`VîaÜ)hÖ—«_ÉÍüŠÅÑ8nƒIÁ€i‚ˆˆ½“Iwl\Ú€”€rß– ä@å˘˜`=_œ²MÚÏY{HýDÏŒíõfò39ûN³QÒE†á›¹W…“¿ÓOÎ/(ö¤*ƒƒ[«eyø“/.oN•?—)”#íÌt¡á ì}LußssÌTsÕàî¡{’"36œNÞˆ%*9™c›ææÍrñÂ`‘¡€¦(8æ™[#]2×Àߨ&ŒÑb·jˆ+|@€ áß¾<—'ÆÏúb|ÜàSA°±ñÈxcƒ†¤Qw¶­Ld⫸;à ƒ$ÃXWä¼¢é–ߟ”ïwð@R€Óá "hÙåMÖ¢0à¼2§ù@¦ØtÝA°ä|Ìûvt9 ëYlÏ&Nd-eÒϼˆÍ™Ìõª:³(³Ã~ ‡@™å‹Vó(|Ùi>oå÷*rTñ$`»W)_Ë‚ Š;ÌPÛÚ) .Óñ»jÝ`ÌþM3àÎB XTá`¹þUë}<GgÌ3„²Ïœ‰Ö¨VîÑŸš GGÕeÊóZ®‚ò`^¨óŠµï(¯\Ê®ÓØ\ë`Z8ö°'ëŒÔ°M«ªâÅùN:‹h7‚Á™Žˆ²«çÝp˜Vª–«‹Oqi…è7Þ‚¤¨ÜS†‘çå U&-ñ†ÏÅÆ@‹å.ä[—[Øg>(>Øb"X E;ñd?¾i: H¥r@$ÃL””¿‹Ï‡ñes4êïa ‡sYà0ÙÛ‡°Ÿõ'\¢áÊ’Ç"5KDK;Ú¸•ÔÓJu®~ÅS}²´c–_9Bk³!žûѾþßth©ö?˜²ê. $Õ١Ȩ•Gõ=!Ù«–l·<Ó)ï23N·ðWdç5e„82ðDÄ”Ó{ç@)ë :Ä`u»s.ƒÇ˜L/v[Ç!<ÔÁU Ñ~³}îtNŽƒ½£WðGy"%â4bÚáW0N®ª-‡Áî¾ÕáõÞ”7"ߢ?`5ß)Œúk†ûíƒç¯ Ž0/NÃβT¤yÔnœÿŠ!s÷áH¨¼htNš^Ãù„"dÛ#·PÉ«sŽÆñûEs9£ØôÍɼ®»ð] ì^¾‹’ôþ´?œf£úÅz™yyÜ ›GG{íbtéVë„쩸{ÜÂgÁ‡ý֌<Ô"ŠÐž4;?uBBÐó¥Ƭ½ÿrŸ“¡#l> Sôœò…0#Ð…ðvAåñÃe’ƒšÃ1žÄƒl=z¡ G&èY8‰²wA{GƒþJ÷6Щ°=Z×k“Ä6à=kA%ÍX£­íP÷Š¦ñämIQ•…Û¥y¹ž³Gwrû<2N-8Œ^,:FÅS/I5@* ÓþizE,óÔg‘¯˜èÞeÏw ù]x–fj* Ca¦vi’ ú î;}ªoêJ ”GÃþÑñá ªÿy÷©mØ||¸“{øüÕ+z&~{ÏŒõS+Ä38|~ÜüÔ9jî´4rùN&·ü|÷'[Ïò8ûçpÄö‘'б`¾w°;•{ªg‚ßcaJ)0ö*ôy‡62—ݺª˜=óUž#Ÿ‰L;¯Be¾j7úY8fs†¸ª†Àì™ÑÛ]Š¬õº­3Œ è\¤—b7èrjAçUØyqøŠÖãK²×Ê%âüRW«]qC– ­¡Ÿ´<‡NÆÑ0C”™R¬øݨI8¹r¯>”œãÙŒûxkÌÓÇ°NË8ùÙ&‰.È?k˜]\>¯å |¡ÌÁtäT÷ú7®-< .Ì°³|‚HГÞV.ôê.êyœ ¸ è´sˆÂh“¦µ(ZƒÍw⣇ÀÓ5÷BòS*ÊnI®ª’@Ÿ¢M$‹¨Ðÿ®‹q¾®+)‰ôüb®cšIÛÖ…ïLÝPênÊ“vý>..r/G$?¥FHrNŽªËW¸!`oHä’øºÆ¶b•fDŒ›ËÜä׎uN¨ã’ÏÞØÏš{xÑŠ?†XHFöm8þi1Vmý¡ÉP`ÑåÁiÀYÂæ$óe“*  aš«uPËMM¸á',“UG’¾0ù„ª÷Ô^pº!ÊZ  \Émôë~% ­:°þúñ!é'ía­íƒg¸ÒZäÎóªÙ> Ÿþ7rmkÕ\Á;@É{Ľ¬ðËîùã*«å{KO}A i³ÇÛ¤¹gŽú…@\ûr®8<8ÌàÁå>~œŠ&»gtÿÊûL]÷ HË;Ú¤4í½¦¡Qf-dÚX‹/b}æù8`‹Õü eÜÂÀÝb+±_ŠÃC\‘pA³9`hx‚‘/žõl][ew¯JKΦ-콧¸qÛŸÍä†phÚ¢vt®«8[I¥[_(Oª€%ûþw „Ô ûû§{¶1¾f£“œgOÑ]ðÙ%Ï/º,hyË7ÜÖqœ…黈`U°¬Y!„Äznä¦>6qýŸÓÄõ‚&úW¦³6ïúeZº!X¸›Ê4üël Çöù®l%>Œ—~:=§_©mÈ–¹:á +‡:Uï¢Éd¢‹ Õ¢6LΩA´¬}Üþ%tõºJα…üXH "Cëûq¬Í?\ 1dí>*½…hM…ï£añetIÃ{áˆbd]Æ((çG@8ÒrCµu!Ëç#_E~ˆÿ6MÆ1¬âý§–nWfïä{{!¼8zùK>20ú’±\AÊÞ…!Ê$MŠ—P b ´C~Døb‡?$1dóiÛ“6F(åH&7¶“vFØŒ$„lÂJ¾,ÃQE B³§f•ã…ž3î´ „=Œz éÐ?Ap{'íp¯­Eϲn€ O\ÂQ÷«79 ;­^íFRWhj±WÍc¸• E7á´DQ»‡'!°Mkœær^%«„+f7C§frM¶oW–禸Ôf­ˆ|Bü~™Žûh‰›ŽH#„˜·‹¨oò'nóÊ=üZÝòŒ¾¹ Ýpcˆ£ñ´³:ê_Gì™BûmÓ¬¡¨ˆÃ£ÖYWnuQg0‚–ÜÜ©x¢ëø}~­•½>Ž[»íc|µŸcËo¤«BÿRé<;<ƽuܧªÀèr6iJð³t#nf@æ.+÷dô8CZDVý_qqXøŒMÅ\—…Éãk§hãäâAT$o+Ÿ:»å‚ ü¶ MftÁuç£Þ>¡{¿3…LŒåÂøض¾L/ºZÈÜ ×cŒsbßà®VDÃü«Z^ëvZG×UqdPùú±?çÝ•'õ‡õõUºƒVyØ)"(¢sto¥¼õ?~ˆO­™ñópmíÑ_ë7ÖoÅù—µÆÆÆ㵿ÿV):£þþ›|${ù‚œUÉ*|a˜:•9lAý¢l2ÁÒ²Yãïh–T=“Éõ+E"‡’vA -(PVvÞÅŠˆÍ®ø ûlb¬s¸ÄJ'Gµ©Âpgüû8ìöD²*ªóSûHäÿ©õ+¡4!mÌkû—ýÖfÐy—Œà’‘˜øp[t€¿Ão<é‡é%°bèÝNoÑŽä@…y£¢RD.êyŒqgQÃ~÷ûO€Ò÷áºÅìpŒ§CtL{ÉpzU v®Ï‘î6ŠB"›©ñb•¹˜O÷͉&'hO=g?ýšÀ)‰C`ˆTˆë` 2T#TmÉAD“Qƒ¸ ¨;h1G,Ög=ðˆÉ,é°súŠJô@,¬ðð`‡íÿ‚$ä“zÅys9·ÜØ0±ãk‰RS/Ä°é­"4rÜq{·%1;iñŸï¾<ª”/`-¥5fÄÊ ^ (ÔªnØÑ<Ò¡¼Ñö!¬ÐŠ×'x9ÈNkeqG,ïà¼1=”uJM1DN2‚Œ¤» [¶%9Ú—3Ùt4#üXDÆÍH%G§@„ätsúÃéˆ(Ç!«–AÈŠP m4»`g *÷&RNièËüÎÎ¥ž`yõ´å©5`­&mŠÍ@£nÏ•\ïy,ÐcÖ*¾†i4âÈS(CX|ֆͱ0ÄØå)ᤔ¸oÚÔÒÏ`c-'Œ4k‚Dêm=¤»ÁŒÝ|£æ¡ÄÍmÌéékM€¥ u)xê¥rÖ´Œ“„ËÙt£ZlI´¯)&¢@m —üWN26·|v/ÿ`Û­9z•o‚÷ê9¦Ës™Üž÷›¿TÉÒµŠÑéÞÁ²ˆPDÝ1*™Î°YsÌÝd$ÿ$êÙé¸&œ†fu¹ßÙ!EÍ!™ ˆëqü·)‰‚‘…€¦•;SС¢ÓlŠš",K peÔr Í¡¿ïEz‰ç š SUQ0ŒÏ‰ÂÜìˆ 1E™ˆ©€úµ^JcÈ>é—*Ú15§ P½ƒÉŠz‰È*¯ÊQÜîJè/”Ú‹Eäµµe­ž³¼M‘wºL€¢!ça¨9f~šŽQ¾{À@ãzŠÚ亣A;ѺŸ‡©á•àÙhÉtÓ1ÀdC±oAÐ< [ÿó²}Œ ŠžBnX:ÊDa^z•‚à†Ô] ùÖ#éÖû„Ò£]½c³d&“]ÐKVgÄ6²hh”ê¼|*¤Š»-hƒî;Píæž”žžd°a87cîæ^:e%yôÈNâT<)zÍÙ××Örs»ÛÚiþ¼Ü7µ‡Aã‘û|·up¸4Ra 3!U”usW‚ÍzSA fߤI*ˆd,¦øU uÙ‘âUû yÔfILeïèçÃön ’^؉ Ñ •ºˆÉ•{ùöׂ†öP&$†ÁuØ‹a ™¡P ø_*:O¥úaÛ»{ £]?øæÏM_12|kÎ "™óêæCÓd3ó ŽB?tçÕ´Tóˆ¢3ùåɱç|¨}n€æÉk…qJôSH’7€†9²6I.ËAv¨/(eéH¥ûݼéÀfð-"¼è1òj°ï ŒjóQ_뎕œe?"œƒÌ¾ç|‚ºöq ûåxðšWãá7î—Ã3¹PnjŸ4Jl¥0gœfÙ–Š>exML.,Á®pL Š7±ZÇz [²T/‡«,býKÙZÆ–®ïXk ®Õ”ÏHËgªÃjû,Q|E(«¤Ò·‹v«Xmíãw–WÍÝ5  ¹sflö‚™¹SÖæm áür“ÝQ°3ü‘Ûê,4O±òouM8Zü21 šîÙ(¸‹®ŒglÞ4I,LÌá­-Œ"g—ÉâÞ=7l÷§L³}´A Hø²æ—ˆÖ×»Œàf è49ÀA¾Ó‰éÀïQO\Á ª5ƒŠ(² ðÀEM°4Pš1/Oð@7æðÿƒ¤+ä6•?óùÿµ'OÖþ¿ñxíáWþÿK|X3q"ƒÖ\ÄŸ##çä£q§ Ã=‘`]ï¢Ì?h³Q2†Sáô:ˆxÑì¡ÿ7íO¢að3äŠXCà²ü‹Z K{EûCÆ®U s¡pp/¼õ\øO'° á÷píûÇ–I¬Ž¨^}ø” Ö×~WPzeÉ~D[v]¹Ö'Âuö¿pʺ]ðœýßXøÄÑÿn¬m|Ýÿÿý/oÁ™²+%¬Sðy()¾-kîX†>Ö*…Ó$3Ö¨çÌÛ¾‚@5ý³1xò²781GÊ®j¿Åå¿™ÉdÀ]ºZ5¤1#s{äØâä¨=µuÅ&ƒ>ž‹ )E“8SábQj‚4—}›:ñ·Z°Ž¶wþÖ%Á·0êÔDÝ.{€Í±{B˜í:#Å0§É¤{åÁôBI›ê@Òé51š›oõ=ïžð¡ôUãôeé¿ÓiÒï…†=»¨wÉúøVŽÆ'OÒž˜ö?ð¼ñp}}ýëùÿ%>w¿Y=M†«Ùpƒ¯b`bt2ŠM6!ÃöÁ(#EØKÆ}– Dç.1ÒÌp~ÆТY JbƒžTYn0ZÆä%®3´Ð¹€Ûc|]‡Ô'h€‘ Áïù8Ͳà}¥É™T‡ÿ ü¦Ÿà8¦’²Òà4+€kJ¯ÝÑÒÑöoÐÂßJÿ³ýÛàö#X_ýa°’奣r°ô?«»Ôí‰o«V9¥ú*+¹Ðdee4†+ïjÛ—RÕ¸„®–ÁÎÎöÒÎŽM,~µ4ÈÚÆlñÒÿ|=Õ¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~¾~nûóÿìr6¸Basymptote-2.38/guideflags.h0000644000000000000000000000045212715037472014465 0ustar rootroot/***** * 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.38/LICENSE.LESSER0000644000000000000000000001672712715037471014216 0ustar rootroot 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.38/castop.h0000644000000000000000000001112512715037471013642 0ustar rootroot/***** * 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&) { ostringstream buf; buf << "invalid cast from string \"" << *S << "\""; vm::error(buf); } } } 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.38/types.h0000644000000000000000000003601412715037472013522 0ustar rootroot/***** * 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.38/tr.cc0000644000000000000000000002772412715037472013151 0ustar rootroot/* 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.38/runstring.cc0000644000000000000000000004416012715037516014547 0ustar rootroot/***** 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.38/runtriple.symbols.h0000644000000000000000000000172712715037527016075 0ustar rootroot/***** * 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.38/drawpath3.h0000644000000000000000000000737712715037471014264 0ustar rootroot/***** * drawpath3.h * * Stores a path3 that has been added to a picture. *****/ #ifndef DRAWPATH3_H #define DRAWPATH3_H #include "drawelement.h" #include "path3.h" namespace camp { class drawPath3 : public drawElement { protected: 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.38/runpicture.cc0000644000000000000000000015431112715037516014714 0ustar rootroot/***** 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, triple normal, 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); triple normal=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 drawSurface(*P,center,straight,*p,opacity,shininess, PRCshininess,normal,*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(primTriple(), SYM(normal), 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.38/glrender.h0000644000000000000000000000547412715037472014166 0ustar rootroot/***** * 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 { 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 { triple u,v,w; void init() { gl::projection P=gl::camera(false); w=unit(P.camera-P.target); v=unit(perp(P.up,w)); u=cross(v,w); } void store(GLfloat* C, const triple& V, const triple ¢er) { double cx=center.getx(); double cy=center.gety(); double cz=center.getz(); 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.38/camp.l0000644000000000000000000003203012715037471013273 0ustar rootroot%{ /***** * 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.38/align.h0000644000000000000000000000434612715037471013452 0ustar rootroot#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.38/path3.cc0000644000000000000000000011204412715037472013531 0ustar rootroot/***** * 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.38/coenv.cc0000644000000000000000000000214612715037471013624 0ustar rootroot/***** * 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.38/name.h0000644000000000000000000001216712715037472013301 0ustar rootroot/***** * 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.38/allsymbols.h0000644000000000000000000004261312715037533014537 0ustar rootroot/***** * 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(normal); 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.38/camp.tab.cc0000644000000000000000000037153312715037503014204 0ustar rootroot/* 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.38/coder.cc0000644000000000000000000001720012715037471013603 0ustar rootroot/***** * 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.38/xstream.h0000644000000000000000000001442112715037472014037 0ustar rootroot/* 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.38/envcompleter.h0000644000000000000000000000151512715037471015056 0ustar rootroot/***** * 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.38/pair.h0000644000000000000000000001070412715037472013307 0ustar rootroot/***** * 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.38/runarray.h0000644000000000000000000000272412715037516014221 0ustar rootroot/***** 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.38/seconds.h0000644000000000000000000000410112715037472014004 0ustar rootroot#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.38/runpath3d.symbols.h0000644000000000000000000000244112715037527015753 0ustar rootroot/***** * 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.38/runpath3d.cc0000644000000000000000000006120212715037516014420 0ustar rootroot/***** 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.38/drawlabel.cc0000644000000000000000000001531712715037471014453 0ustar rootroot/***** * 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.38/stm.h0000644000000000000000000001046012715037472013156 0ustar rootroot/***** * 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.38/simpson.cc0000644000000000000000000001500412715037472014200 0ustar rootroot#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.38/interact.h0000644000000000000000000000243512715037472014167 0ustar rootroot/***** * 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.38/runhistory.in0000644000000000000000000001177712715037472014774 0ustar rootroot/***** * 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.38/INSTALL0000644000000000000000000002431512715037471013236 0ustar rootrootCompiling 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.38/runpicture.symbols.h0000644000000000000000000000553712715037527016254 0ustar rootroot/***** * 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(normal); 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.38/dec.cc0000644000000000000000000005063512715037471013253 0ustar rootroot/***** * 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.38/drawlayer.h0000644000000000000000000000134312715037471014344 0ustar rootroot/***** * 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.38/drawclipbegin.h0000644000000000000000000000342012715037471015162 0ustar rootroot/***** * 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.38/modifier.h0000644000000000000000000000161412715037472014152 0ustar rootroot/***** * 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.38/configure.ac0000644000000000000000000003042512715037472014473 0ustar rootroot# -*- Autoconf -*- # Run autoheader and autoconf to produce a header and configure script from # this file. AC_PREREQ(2) AC_INIT([Asymptote],[2.38],[http://sourceforge.net/projects/asymptote]) VERSION=$PACKAGE_VERSION AC_SUBST(VERSION) m4_include([ax_pthread.m4]) test "$CFLAGS" || CFLAGS="-g -O3 -ansi" 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.4.2 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(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-$GCVERSION.tar.gz echo exit 1 ]) fi asymptote-2.38/runarray.symbols.h0000644000000000000000000000241712715037527015711 0ustar rootroot/***** * 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.38/arrayop.h0000644000000000000000000003300112715037471014023 0ustar rootroot/***** * 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.38/types.symbols.h0000644000000000000000000000210312715037526015201 0ustar rootroot/***** * 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.38/asy-keywords.el0000644000000000000000000004125012715037721015163 0ustar rootroot;; ;; This file is automatically generated by asy-list.pl. ;; Changes will be overwritten. ;; (defvar asy-keywords-version "2.38") (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 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 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 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 zero3 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 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.38/runfile.cc0000644000000000000000000004251712715037516014164 0ustar rootroot/***** 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.38/drawlabel.h0000644000000000000000000000403312715037471014306 0ustar rootroot/***** * 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.38/pipestream.cc0000644000000000000000000001150212715037472014660 0ustar rootroot/* 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.38/flatguide.cc0000644000000000000000000000177412715037472014465 0ustar rootroot/***** * 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.38/gsl.cc0000644000000000000000000014301112715037472013275 0ustar rootroot/***** * 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.38/fileio.cc0000644000000000000000000000767312715037472013774 0ustar rootroot/****** * 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.38/glrender.cc0000644000000000000000000010766512715037472014331 0ustar rootroot/***** * 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 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 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); 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); glPolygonMode(GL_FRONT_AND_BACK,GL_LINE); gluNurbsProperty(nurb,GLU_DISPLAY_MODE,GLU_OUTLINE_PATCH); ++Mode; break; case 2: 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); #ifdef __MSDOS__ glutFullScreen(); #else if(reposition) glutPositionWindow(0,0); glutReshapeWindow(Width,Height); glutPostRedisplay(); #endif } 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"); #ifndef __MSDOS__ Iconify=getSetting("iconify"); #endif #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; if(multisample > 1) { glutDestroyWindow(window); continue; } } break; } #endif #endif if(samples > 1) { 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.38/getopt1.c0000644000000000000000000001065012715037472013732 0ustar rootroot/* 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.38/name.cc0000644000000000000000000001642512715037472013440 0ustar rootroot/***** * 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.38/findsym.pl0000755000000000000000000000233512715037472014215 0ustar rootroot#!/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.38/runlabel.h0000644000000000000000000000023112715037516014151 0ustar rootroot/***** Autogenerated from runlabel.in; changes will be overwritten *****/ #ifndef runlabel_H #define runlabel_H namespace run { } #endif // runlabel_H asymptote-2.38/varinit.h0000644000000000000000000000373512715037472014036 0ustar rootroot/***** * 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.38/parser.cc0000644000000000000000000000556012715037472014012 0ustar rootroot/***** * 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.38/drawgrestore.h0000644000000000000000000000076012715037471015064 0ustar rootroot/***** * 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.38/fftw++.h0000644000000000000000000013251612715037472013456 0ustar rootroot/* 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.38/prcfile.h0000644000000000000000000000117512715037472014002 0ustar rootroot#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.38/varinit.cc0000644000000000000000000000367212715037472014174 0ustar rootroot/***** * 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.38/tests/0000755000000000000000000000000012715037570013342 5ustar rootrootasymptote-2.38/tests/arith/0000755000000000000000000000000012715037472014452 5ustar rootrootasymptote-2.38/tests/arith/triple.asy0000644000000000000000000000036412715037472016472 0ustar rootrootimport 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.38/tests/arith/pair.asy0000644000000000000000000000070112715037472016121 0ustar rootrootimport 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.38/tests/arith/integer.asy0000644000000000000000000000115412715037472016626 0ustar rootroot// 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.38/tests/arith/transform.asy0000644000000000000000000000117712715037472017211 0ustar rootrootimport 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.38/tests/arith/roots.asy0000644000000000000000000000325612715037472016344 0ustar rootroot// 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.38/tests/arith/random.asy0000644000000000000000000000030112715037472016442 0ustar rootrootimport 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.38/tests/arith/real.asy0000644000000000000000000000057712715037472016124 0ustar rootroot// 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.38/tests/imp/0000755000000000000000000000000012715037472014130 5ustar rootrootasymptote-2.38/tests/imp/unravel.asy0000644000000000000000000000227112715037472016324 0ustar rootrootimport 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.38/tests/pic/0000755000000000000000000000000012715037472014116 5ustar rootrootasymptote-2.38/tests/pic/trans.asy0000644000000000000000000000255012715037472015765 0ustar rootrootimport 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.38/tests/TestLib.asy0000644000000000000000000000035612715037472015433 0ustar rootrootbool 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.38/tests/gs/0000755000000000000000000000000012715037472013754 5ustar rootrootasymptote-2.38/tests/gs/ghostscript.asy0000644000000000000000000000056112715037472017045 0ustar rootrootimport 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.38/tests/bench/0000755000000000000000000000000012715037472014422 5ustar rootrootasymptote-2.38/tests/bench/6000circles.asy0000644000000000000000000000042412715037472017072 0ustar rootrootsize(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.38/tests/output/0000755000000000000000000000000012715037472014703 5ustar rootrootasymptote-2.38/tests/output/line.asy0000644000000000000000000000002612715037472016346 0ustar rootrootdraw((0,0)--(100,0)); asymptote-2.38/tests/output/Makefile0000644000000000000000000000240412715037472016343 0ustar rootroot# 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.38/tests/output/circle.asy0000644000000000000000000000002212715037472016654 0ustar rootrootdraw(unitcircle); asymptote-2.38/tests/gsl/0000755000000000000000000000000012715037472014130 5ustar rootrootasymptote-2.38/tests/gsl/random.asy0000644000000000000000000002720312715037472016132 0ustar rootrootimport 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.38/tests/frames/0000755000000000000000000000000012715037472014620 5ustar rootrootasymptote-2.38/tests/frames/stat2.asy0000644000000000000000000000031212715037472016367 0ustar rootrootimport 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.38/tests/frames/loop.asy0000644000000000000000000000425612715037472016316 0ustar rootrootimport 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.38/tests/frames/stat.asy0000644000000000000000000000023612715037472016312 0ustar rootrootimport 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.38/tests/string/0000755000000000000000000000000012715037472014651 5ustar rootrootasymptote-2.38/tests/string/rfind.asy0000644000000000000000000000027312715037472016473 0ustar rootrootimport 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.38/tests/string/erase.asy0000644000000000000000000000035412715037472016470 0ustar rootrootimport 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.38/tests/string/length.asy0000644000000000000000000000020412715037472016644 0ustar rootrootimport TestLib; StartTest("length"); assert(length("") == 0); assert(length("abc") == 3); assert(length("abcdef") == 6); EndTest(); asymptote-2.38/tests/string/insert.asy0000644000000000000000000000015512715037472016674 0ustar rootrootimport TestLib; StartTest("insert"); string sub = insert("abef",2,"cd"); assert(sub == "abcdef"); EndTest(); asymptote-2.38/tests/string/find.asy0000644000000000000000000000026612715037472016313 0ustar rootrootimport 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.38/tests/string/substr.asy0000644000000000000000000000016612715037472016714 0ustar rootrootimport TestLib; StartTest("substr"); string s = "abcdef"; string sub = substr(s,2,2); assert(sub == "cd"); EndTest(); asymptote-2.38/tests/array/0000755000000000000000000000000012715037472014461 5ustar rootrootasymptote-2.38/tests/array/fields.asy0000644000000000000000000000360712715037472016453 0ustar rootrootimport 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.38/tests/array/sort.asy0000644000000000000000000000135212715037472016167 0ustar rootrootimport 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.38/tests/array/transpose.asy0000644000000000000000000000211012715037472017207 0ustar rootrootimport 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.38/tests/array/array.asy0000644000000000000000000000165012715037472016317 0ustar rootrootimport 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.38/tests/types/init.asy0000644000000000000000000000034012715037472016165 0ustar rootrootimport 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.38/tests/types/cast.asy0000644000000000000000000000023712715037472016161 0ustar rootrootimport 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.38/tests/types/ecast.asy0000644000000000000000000000023312715037472016322 0ustar rootrootimport 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.38/env.cc0000644000000000000000000001253112715037471013301 0ustar rootroot/***** * 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.38/knot.cc0000644000000000000000000005352312715037472013473 0ustar rootroot/***** * 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.38/exp.h0000644000000000000000000007021112715037472013147 0ustar rootroot/***** * 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.38/runpair.symbols.h0000644000000000000000000000216312715037527015524 0ustar rootroot/***** * 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.38/asy.ico0000644000000000000000000001027612715037471013476 0ustar rootroot  ¨( @ ÿ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.38/ax_pthread.m40000644000000000000000000003036612715037471014571 0ustar rootroot# =========================================================================== # 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.38/runtimebase.in0000644000000000000000000000247712715037472015061 0ustar rootroot/***** * 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.38/refaccess.h0000644000000000000000000000362012715037472014311 0ustar rootroot/***** * 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.38/README0000644000000000000000000000501512715037471013061 0ustar rootroot ASYMPTOTE Copyright 2004-16 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 using the Bug/Patch/Feature Tracking Systems at http://sourceforge.net/projects/asymptote/. 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.0.2 cygwin1.dll is available under the GPL license: http://cygwin.com/snapshots/x86/cygwin-src-20150430.tar.xz The source code for freeglut.dll is available under the X-Consortium license: http://prdownloads.sourceforge.net/freeglut/freeglut-2.6.0.tar.gz The source code for glu32.dll is available from ftp://ftp.freedesktop.org/pub/mesa/7.6/MesaLib-7.6.tar.bz2 and patched as detailed here: http://old.nabble.com/Error-building-MesaLib-7.6-onto-Win32-with-Microsoft-Visual-Studio-2005-and-2008-td25990977.html asymptote-2.38/stack.cc0000644000000000000000000003371512715037472013626 0ustar rootroot/***** * 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.38/locate.cc0000644000000000000000000000422312715037472013760 0ustar rootroot/***** * 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.38/bbox3.h0000644000000000000000000000751612715037471013377 0ustar rootroot/***** * 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.38/profiler.h0000644000000000000000000002324412715037472014201 0ustar rootroot/***** * 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.38/fundec.h0000644000000000000000000001037312715037472013622 0ustar rootroot/***** * 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.38/runlabel.in0000644000000000000000000003156612715037472014350 0ustar rootroot/***** * 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::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.38/runlabel.symbols.h0000644000000000000000000000126412715037527015651 0ustar rootroot/***** * 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.38/bbox.h0000644000000000000000000001006612715037471013306 0ustar rootroot/***** * 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.38/runfile.symbols.h0000644000000000000000000000166412715037527015515 0ustar rootroot/***** * 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.38/runbacktrace.symbols.h0000644000000000000000000000102212715037527016501 0ustar rootroot/***** * 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.38/install-sh0000755000000000000000000003253712715037472014217 0ustar rootroot#!/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.38/pen.h0000644000000000000000000006677112715037472013155 0ustar rootroot/***** * 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.38/ChangeLog0000644000000000000000000430167212715037472013770 0ustar rootrootcommit 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 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.38/absyn.h0000644000000000000000000000200612715037471013463 0ustar rootroot/**** * 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.38/keywords.cc0000644000000000000000000000114112715037503014347 0ustar rootroot/***** * 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.38/genv.cc0000644000000000000000000000613112715037472013450 0ustar rootroot/***** * 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.38/symbol.h0000644000000000000000000000514612715037472013665 0ustar rootroot/***** * 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.38/drawsurface.h0000644000000000000000000005225612715037471014671 0ustar rootroot/***** * drawsurface.h * * Stores a surface that has been added to a picture. *****/ #ifndef DRAWSURFACE_H #define DRAWSURFACE_H #include "drawelement.h" #include "triple.h" #include "arrayop.h" #include "path3.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; triple vertices[4]; 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; triple normal; bool invisible; Interaction interaction; triple Min,Max; bool prc; #ifdef HAVE_GL triple d; // Maximum deviation of surface from a quadrilateral. triple dperp; #endif public: drawSurface(const vm::array& g, triple center, bool straight, const vm::array&p, double opacity, double shininess, double PRCshininess, triple normal, const vm::array &pens, Interaction interaction, bool prc) : center(center), straight(straight), opacity(opacity), shininess(shininess), PRCshininess(PRCshininess), normal(unit(normal)), interaction(interaction), prc(prc) { const string wrongsize= "Bezier surface patch requires 4x4 array of triples and array of 4 pens"; if(checkArray(&g) != 4 || checkArray(&p) != 4) reportError(wrongsize); vm::array *g0=vm::read(g,0); vm::array *g3=vm::read(g,3); if(checkArray(g0) != 4 || checkArray(g3) != 4) reportError(wrongsize); vertices[0]=vm::read(g0,0); vertices[1]=vm::read(g0,3); vertices[2]=vm::read(g3,0); vertices[3]=vm::read(g3,3); if(!straight) { size_t k=0; controls=new(UseGC) triple[16]; for(size_t i=0; i < 4; ++i) { vm::array *gi=vm::read(g,i); if(checkArray(gi) != 4) reportError(wrongsize); for(size_t j=0; j < 4; ++j) controls[k++]=vm::read(gi,j); } } else controls=NULL; 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)); int size=checkArray(&pens); if(size > 0) { if(size != 4) reportError("4 vertex pens required"); colors=new(UseGC) prc::RGBAColour[4]; colors[0]=rgba(vm::read(pens,0)); colors[1]=rgba(vm::read(pens,3)); colors[2]=rgba(vm::read(pens,1)); colors[3]=rgba(vm::read(pens,2)); } else colors=NULL; } drawSurface(const double* t, const drawSurface *s) : 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) { for(unsigned int i=0; i < 4; ++i) vertices[i]=t*s->vertices[i]; if(s->controls) { controls=new(UseGC) triple[16]; for(unsigned int i=0; i < 16; ++i) controls[i]=t*s->controls[i]; } else controls=NULL; #ifdef HAVE_GL center=t*s->center; normal=transformNormal(t,s->normal); #endif } 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 ~drawSurface() {} bool write(prcfile *out, unsigned int *, double, groupsmap&); void displacement(); 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 drawElement { protected: triple *controls; triple center; bool straight; // True iff Bezier triangle 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; #ifdef HAVE_GL triple d; // Maximum deviation of surface from a triangle. triple dperp; #endif public: 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) : center(center), straight(straight), opacity(opacity), shininess(shininess), PRCshininess(PRCshininess), interaction(interaction), prc(prc) { const string wrongsize= "Bezier triangle requires triangular array of 10 triples and array of 4 pens"; if(checkArray(&g) != 4 || checkArray(&p) != 4) reportError(wrongsize); size_t k=0; controls=new(UseGC) triple[10]; for(unsigned int i=0; i < 4; ++i) { vm::array *gi=vm::read(g,i); for(unsigned int j=0; j <= i; ++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)); int size=checkArray(&pens); if(size > 0) { if(size != 3) reportError("3 vertex pens required"); colors=new(UseGC) prc::RGBAColour[3]; colors[0]=rgba(vm::read(pens,0)); colors[1]=rgba(vm::read(pens,1)); colors[2]=rgba(vm::read(pens,2)); } else colors=NULL; } drawBezierTriangle(const double* t, const drawBezierTriangle *s) : 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[10]; for(unsigned int i=0; i < 10; ++i) controls[i]=t*s->controls[i]; } else controls=NULL; #ifdef HAVE_GL center=t*s->center; #endif } 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 ~drawBezierTriangle() {} bool write(prcfile *out, unsigned int *, double, groupsmap&); // void displacement(); 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.38/runmath.h0000644000000000000000000000041512715037516014027 0ustar rootroot/***** 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.38/tr.h0000644000000000000000000000676712715037472013017 0ustar rootroot/* 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.38/asy.rc0000644000000000000000000000140212715037471013317 0ustar rootrootasy 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.38/lexical.h0000644000000000000000000000053112715037472013772 0ustar rootroot#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.38/patches/0000755000000000000000000000000012715037472013630 5ustar rootrootasymptote-2.38/patches/gcc3.3.2curses.patch0000644000000000000000000000047612715037472017225 0ustar rootroot*** 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.38/patches/flex.patch0000644000000000000000000000276412715037472015620 0ustar rootrootdiff -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.38/patches/cygwin_glu.patch0000644000000000000000000000602712715037472017025 0ustar rootroot--- 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.38/patches/bison.patch0000644000000000000000000001221612715037472015765 0ustar rootrootdiff -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.38/patches/gc6.8_AIX.patch0000644000000000000000000000041712715037472016201 0ustar rootroot*** 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.38/patches/gc-7.0nomem.patch0000644000000000000000000000075112715037472016603 0ustar rootroot*** 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.38/patches/README0000644000000000000000000000153212715037472014511 0ustar rootrootThe 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 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.38/patches/fixmem.reg0000644000000000000000000000016112715037472015612 0ustar rootrootWindows Registry Editor Version 5.00 [HKEY_LOCAL_MACHINE\Software\Cygwin] "heap_chunk_in_mb"=dword:ffffff00 asymptote-2.38/patches/dvipdf0000755000000000000000000000243712715037472015040 0ustar rootroot#!/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.38/algebra3.h0000644000000000000000000004610312715037471014035 0ustar rootroot/* 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.38/asymptote.spec0000644000000000000000000000553512715037472015112 0ustar rootroot%{!?_texmf: %global _texmf %(eval "echo `kpsewhich -expand-var '$TEXMFLOCAL'`")} Name: asymptote Version: 2.38 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.38/arcball.h0000644000000000000000000000642512715037471013760 0ustar rootroot/********************************************************************** 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.38/runlabel.cc0000644000000000000000000004102512715037516014315 0ustar rootroot/***** 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::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 395 "runlabel.in" // patharray2* textpath(stringarray *s, penarray *p); void gen_runlabel4(stack *Stack) { penarray * p=vm::pop(Stack); stringarray * s=vm::pop(Stack); #line 396 "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 469 "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 470 "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 395 "runlabel.in" addFunc(ve, run::gen_runlabel4, pathArray2() , SYM(textpath), formal(stringArray() , SYM(s), false, false), formal(penArray() , SYM(p), false, false)); #line 469 "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.38/runbacktrace.h0000644000000000000000000000025112715037516015013 0ustar rootroot/***** Autogenerated from runbacktrace.in; changes will be overwritten *****/ #ifndef runbacktrace_H #define runbacktrace_H namespace run { } #endif // runbacktrace_H asymptote-2.38/absyn.cc0000644000000000000000000000073012715037471013623 0ustar rootroot/**** * 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.38/callable.h0000644000000000000000000000315212715037471014111 0ustar rootroot/***** * 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.38/drawpath3.cc0000644000000000000000000001336512715037471014414 0ustar rootroot/***** * drawpath3.cc * * Stores a path3 that has been added to a picture. *****/ #include "drawpath3.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, const triple&, const triple&, double, bool lighton, bool transparent) { #ifdef HAVE_GL Int n=g.length(); if(n == 0 || invisible || ((color.A < 1.0) ^ transparent)) return; bool havebillboard=interaction == BILLBOARD; 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(havebillboard) BB.init(); if(straight) { glBegin(GL_LINE_STRIP); for(Int i=0; i <= n; ++i) { triple v=g.point(i); if(havebillboard) { static GLfloat controlpoints[3]; BB.store(controlpoints,v,center); glVertex3fv(controlpoints); } else glVertex3f(v.getx(),v.gety(),v.getz()); } glEnd(); } else { for(Int i=0; i < n; ++i) { static GLfloat knots[8]={0.0,0.0,0.0,0.0,1.0,1.0,1.0,1.0}; static GLfloat controlpoints[12]; if(havebillboard) { BB.store(controlpoints,g.point(i),center); BB.store(controlpoints+3,g.postcontrol(i),center); BB.store(controlpoints+6,g.precontrol(i+1),center); BB.store(controlpoints+9,g.point(i+1),center); } else { store(controlpoints,g.point(i)); store(controlpoints+3,g.postcontrol(i)); store(controlpoints+6,g.precontrol(i+1)); store(controlpoints+9,g.point(i+1)); } gluBeginCurve(nurb); gluNurbsCurve(nurb,8,knots,3,controlpoints,4,GL_MAP1_VERTEX_3); gluEndCurve(nurb); } } #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.38/runpicture.h0000644000000000000000000000027712715037516014557 0ustar rootroot/***** 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.38/errormsg.h0000644000000000000000000001160612715037471014215 0ustar rootroot/***** * 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.38/envcompleter.cc0000644000000000000000000000216612715037471015217 0ustar rootroot/***** * 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.38/util.h0000644000000000000000000001024712715037472013333 0ustar rootroot/***** * util.h * Andy Hammerlindl 2004/05/10 * * A place for useful utility functions. *****/ #ifndef UTIL_H #define UTIL_H #include #include #include #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.38/runsystem.h0000644000000000000000000000023512715037516014422 0ustar rootroot/***** Autogenerated from runsystem.in; changes will be overwritten *****/ #ifndef runsystem_H #define runsystem_H namespace run { } #endif // runsystem_H