From gcc-help-return-4037-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 01 09:03:49 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 32193 invoked by alias); 1 Nov 2000 09:03:48 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 29576 invoked from network); 1 Nov 2000 08:59:30 -0000 Received: from mail.npust.edu.tw (140.127.1.4) by sourceware.cygnus.com with SMTP; 1 Nov 2000 08:59:30 -0000 Received: from Crab2 ([140.127.33.65]) by mail.npust.edu.tw (8.9.3/8.9.3) with SMTP id QAA22677 for ; Wed, 1 Nov 2000 16:58:44 +0800 (CST) Message-ID: <000801c043e1$895ab660$41217f8c@npust.edu.tw> From: "Kevin Chen" To: Subject: help: can not run a.out... Date: Wed, 1 Nov 2000 16:55:51 +0800 MIME-Version: 1.0 Content-Type: multipart/alternative; boundary="----=_NextPart_000_0005_01C04424.976405C0" X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.3018.1300 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.3018.1300 This is a multi-part message in MIME format. ------=_NextPart_000_0005_01C04424.976405C0 Content-Type: text/plain; charset="big5" Content-Transfer-Encoding: quoted-printable Dear Sirs, I've installed a gcc compiler (gcc version egcs-2.91.66) on my linux = system (kernel version 2.2.14). It works but the problem is that I can = not run the execution file "a.out". When I ran it, a message came out = with=20 "bash: a.out: command not found". Could you tell me how to solve the problem? Thanx! Your prompt = response will be highly appreciated. Sincerely, Kevin Chen ------=_NextPart_000_0005_01C04424.976405C0 Content-Type: text/html; charset="big5" Content-Transfer-Encoding: quoted-printable
Dear Sirs,
 
I've installed a gcc compiler (gcc version = egcs-2.91.66) on my=20 linux system (kernel  version 2.2.14). It works but the problem is = that I=20 can not run the execution file "a.out".  When I ran it, a = message came=20 out with
"bash: a.out: command not found".
 
Could you tell me how to solve the problem?  = Thanx! =20 Your prompt response will be highly appreciated.
 
Sincerely,
 
Kevin Chen
------=_NextPart_000_0005_01C04424.976405C0-- From gcc-help-return-4038-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 01 09:28:41 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 7140 invoked by alias); 1 Nov 2000 09:28:41 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 7108 invoked from network); 1 Nov 2000 09:28:40 -0000 Received: from twingo.tiscalinet.it (195.130.224.85) by sourceware.cygnus.com with SMTP; 1 Nov 2000 09:28:40 -0000 Received: from tin.it (62.11.157.203) by twingo.tiscalinet.it; 1 Nov 2000 10:23:13 +0100 Message-ID: <39FFE224.C833A8E@tin.it> Date: Wed, 01 Nov 2000 10:28:04 +0100 From: Maurizio Umberto Puxeddu X-Mailer: Mozilla 4.72 [en] (X11; U; Linux 2.2.14-5.0 i686) X-Accept-Language: en MIME-Version: 1.0 To: Kevin Chen CC: gcc-help@gcc.gnu.org Subject: Re: help: can not run a.out... References: <000801c043e1$895ab660$41217f8c@npust.edu.tw> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit > Kevin Chen wrote: > > Dear Sirs, > > I've installed a gcc compiler (gcc version egcs-2.91.66) on my linux > system (kernel version 2.2.14). It works but the problem is that I > can not run the execution file "a.out". When I ran it, a message came > out with > "bash: a.out: command not found". > > Could you tell me how to solve the problem? Thanx! Your prompt > response will be highly appreciated. It has nothing to do with gcc. You don't have the current working directory (.) in PATH, so if you want to run a program called 'a.out' in the current directory you have to write: ./a.out Maurizio Umberto Puxeddu From gcc-help-return-4039-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 01 11:15:07 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 7482 invoked by alias); 1 Nov 2000 11:15:06 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 7433 invoked from network); 1 Nov 2000 11:14:55 -0000 Received: from unknown (HELO exchpowerise.powerise.com.cn) (210.74.189.126) by sourceware.cygnus.com with SMTP; 1 Nov 2000 11:14:55 -0000 Received: from CHW ([172.18.200.10]) by exchpowerise.powerise.com.cn with SMTP (Microsoft Exchange Internet Mail Service Version 5.5.2448.0) id VS1L5J7D; Wed, 1 Nov 2000 19:20:13 +0800 Message-ID: <000601c043f4$4afdc480$0ac812ac@chw> From: "chw" To: Subject: GCC FAQ Date: Wed, 1 Nov 2000 19:09:46 +0800 MIME-Version: 1.0 Content-Type: multipart/alternative; boundary="----=_NextPart_000_0003_01C04437.4CA75A60" X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.2615.200 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2615.200 This is a multi-part message in MIME format. ------=_NextPart_000_0003_01C04437.4CA75A60 Content-Type: text/plain; charset="gb2312" Content-Transfer-Encoding: base64 SGVsbG8sDQogICAgSSBhbSBhbiBlbmdpbmVlciBvZiBzb2Z0d2FyZSBpbiBDaGluYS5XaGVuIEkg aW5zdGFsbCB0aGUgR0NDKGdjYy0yLjk1LjIudGFyKSBvbiBIUC1VWCAxMC4yMCBJIG1ldCB0aGUg Zm9sbG93aW5nIGVycm9yIGF0IHRoZSBzdGVwICdtYWtlIGJvb3RzdHJhcCc6DQoqKioqKioqKioq KioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioNCi4uLg0KLi4uDQooQnVuZGxlZCkgY2M6 IHdhcm5pbmcgNDgwOiBUaGUgLWcgb3B0aW9uIGlzIGF2YWlsYWJsZSBvbmx5IHdpdGggdGhlIEMv QU5TSSBDIHByLg0KICAgICAgICBjYyAgLURJTl9HQ0MgLURIQUlGQSAgICAtZyAgIC1ESEFWRV9D T05GSUdfSCAgICAtSS4gLUkvb3B0L2djYy0yLjk1LjIvZ1wNCiAgICAgICAgLURQUkVGSVg9XCIv dXNyL2xvY2FsXCIgXA0KICAgICAgICAgIC1jIGBlY2hvIC9vcHQvZ2NjLTIuOTUuMi9nY2MvcHJl Zml4LmMgfCBzZWQgJ3MsXlwuLywsJ2ANCihCdW5kbGVkKSBjYzogd2FybmluZyA0ODA6IFRoZSAt ZyBvcHRpb24gaXMgYXZhaWxhYmxlIG9ubHkgd2l0aCB0aGUgQy9BTlNJIEMgcHIuDQogICAgICAg IGNjICAtRElOX0dDQyAtREhBSUZBICAgIC1nICAgLURIQVZFX0NPTkZJR19IICAtbyBjY2NwIGNj Y3AubyBjZXhwLm8gaW50YQ0KKEJ1bmRsZWQpIGNjOiB3YXJuaW5nIDQ4MDogVGhlIC1nIG9wdGlv biBpcyBhdmFpbGFibGUgb25seSB3aXRoIHRoZSBDL0FOU0kgQyBwci4NCi91c3IvY2NzL2Jpbi9s ZDogVW5zYXRpc2ZpZWQgc3ltYm9sczoNCiAgIF9fYXNocmRpMyAoY29kZSkNCiAgIF9fdW1vZGRp MyAoY29kZSkNCiAgIF9fdWRpdmRpMyAoY29kZSkNCiAgIF9fbHNocmRpMyAoY29kZSkNCiAgIF9f bW9kZGkzIChjb2RlKQ0KICAgX19hc2hsZGkzIChjb2RlKQ0KICAgX19kaXZkaTMgKGNvZGUpDQoq KiogRXJyb3IgZXhpdCBjb2RlIDENCg0KU3RvcC4NCioqKiBFcnJvciBleGl0IGNvZGUgMQ0KDQpT dG9wLg0KKioqIEVycm9yIGV4aXQgY29kZSAxDQoNClN0b3AuDQoNCiMNCg0KKioqKioqKioqKioq KioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqDQpNeSBmaXJzdCBzdGVw IGp1c3QgaXMgJ2NvbmZpZ3VyZScuDQpJIHVzZSB0aGUgJ2NjJyBhbmQgJ21ha2UnIG9mIEhQLVVY IDEwLjIwKHVuZGVyIHRoZSAnL3Vzci9iaW4nKS4gDQoNCkNvdWxkIHlvdSBnaXZlIG1lIHNvbWUg c3VnZ2VzdGlvbnMgYWJvdXQgdGhlIGVycm9yPw0KT3IgZ2l2ZSBhIGluc3RhbGxhdGlvbiBzYW1w bGUgb24gSFAtVVggMTAuMjAuDQoNClRoYW5rcyB2ZXJ5IG11Y2guDQoNCkJlc3QgcmVnYXJkcy4N Cg0KQ2hlbiBob25nd3UsQmVpamluZyxDaGluYS4NCjIwMDAuMTEuMSA3OjA1cG0NCg0K ------=_NextPart_000_0003_01C04437.4CA75A60 Content-Type: text/html; charset="gb2312" Content-Transfer-Encoding: base64 PCFET0NUWVBFIEhUTUwgUFVCTElDICItLy9XM0MvL0RURCBIVE1MIDQuMCBUcmFuc2l0aW9uYWwv L0VOIj4NCjxIVE1MPjxIRUFEPg0KPE1FVEEgY29udGVudD0idGV4dC9odG1sOyBjaGFyc2V0PWdi MjMxMiIgaHR0cC1lcXVpdj1Db250ZW50LVR5cGU+DQo8TUVUQSBjb250ZW50PSJNU0hUTUwgNS4w MC4yNjE0LjM1MDAiIG5hbWU9R0VORVJBVE9SPg0KPFNUWUxFPjwvU1RZTEU+DQo8L0hFQUQ+DQo8 Qk9EWSBiZ0NvbG9yPSNmZmZmZmY+DQo8RElWPjxGT05UIHNpemU9Mj5IZWxsbyw8L0ZPTlQ+PC9E SVY+DQo8RElWPjxGT05UIHNpemU9Mj4mbmJzcDsmbmJzcDsmbmJzcDsgSSBhbSBhbiBlbmdpbmVl ciBvZiBzb2Z0d2FyZSBpbiBDaGluYS5XaGVuIA0KSSBpbnN0YWxsIHRoZSBHQ0MoZ2NjLTIuOTUu Mi50YXIpIG9uIEhQLVVYIDEwLjIwIEkgbWV0IHRoZSBmb2xsb3dpbmcgZXJyb3IgYXQgDQp0aGUg c3RlcCAnbWFrZSBib290c3RyYXAnOjwvRk9OVD48L0RJVj4NCjxESVY+PEZPTlQgc2l6ZT0yPioq KioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKjwvRk9OVD48L0RJVj4NCjxE SVY+PEZPTlQgc2l6ZT0yPi4uLjwvRk9OVD48L0RJVj4NCjxESVY+PEZPTlQgc2l6ZT0yPi4uLjwv Rk9OVD48L0RJVj4NCjxESVY+PEZPTlQgc2l6ZT0yPihCdW5kbGVkKSBjYzogd2FybmluZyA0ODA6 IFRoZSAtZyBvcHRpb24gaXMgYXZhaWxhYmxlIG9ubHkgDQp3aXRoIHRoZSBDL0FOU0kgQyBwci48 QlI+Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7IGNjJm5ic3A7IA0K LURJTl9HQ0MgLURIQUlGQSZuYnNwOyZuYnNwOyZuYnNwOyAtZyZuYnNwOyZuYnNwOyANCi1ESEFW RV9DT05GSUdfSCZuYnNwOyZuYnNwOyZuYnNwOyAtSS4gDQotSS9vcHQvZ2NjLTIuOTUuMi9nXDxC Uj4mbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsgDQotRFBSRUZJWD1c Ii91c3IvbG9jYWxcIiANClw8QlI+Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7 Jm5ic3A7Jm5ic3A7Jm5ic3A7IC1jIGBlY2hvIA0KL29wdC9nY2MtMi45NS4yL2djYy9wcmVmaXgu YyB8IHNlZCAncyxeXC4vLCwnYDxCUj4oQnVuZGxlZCkgY2M6IHdhcm5pbmcgNDgwOiBUaGUgDQot ZyBvcHRpb24gaXMgYXZhaWxhYmxlIG9ubHkgd2l0aCB0aGUgQy9BTlNJIEMgDQpwci48QlI+Jm5i c3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7IGNjJm5ic3A7IC1ESU5fR0ND IA0KLURIQUlGQSZuYnNwOyZuYnNwOyZuYnNwOyAtZyZuYnNwOyZuYnNwOyAtREhBVkVfQ09ORklH X0gmbmJzcDsgLW8gY2NjcCBjY2NwLm8gDQpjZXhwLm8gaW50YTxCUj4oQnVuZGxlZCkgY2M6IHdh cm5pbmcgNDgwOiBUaGUgLWcgb3B0aW9uIGlzIGF2YWlsYWJsZSBvbmx5IHdpdGggDQp0aGUgQy9B TlNJIEMgcHIuPEJSPi91c3IvY2NzL2Jpbi9sZDogVW5zYXRpc2ZpZWQgc3ltYm9sczo8QlI+Jm5i c3A7Jm5ic3A7IA0KX19hc2hyZGkzIChjb2RlKTxCUj4mbmJzcDsmbmJzcDsgX191bW9kZGkzIChj b2RlKTxCUj4mbmJzcDsmbmJzcDsgX191ZGl2ZGkzIA0KKGNvZGUpPEJSPiZuYnNwOyZuYnNwOyBf X2xzaHJkaTMgKGNvZGUpPEJSPiZuYnNwOyZuYnNwOyBfX21vZGRpMyANCihjb2RlKTxCUj4mbmJz cDsmbmJzcDsgX19hc2hsZGkzIChjb2RlKTxCUj4mbmJzcDsmbmJzcDsgX19kaXZkaTMgKGNvZGUp PEJSPioqKiANCkVycm9yIGV4aXQgY29kZSAxPC9GT05UPjwvRElWPg0KPERJVj4mbmJzcDs8L0RJ Vj4NCjxESVY+PEZPTlQgc2l6ZT0yPlN0b3AuPEJSPioqKiBFcnJvciBleGl0IGNvZGUgMTwvRk9O VD48L0RJVj4NCjxESVY+Jm5ic3A7PC9ESVY+DQo8RElWPjxGT05UIHNpemU9Mj5TdG9wLjxCUj4q KiogRXJyb3IgZXhpdCBjb2RlIDE8QlI+PC9GT05UPjwvRElWPg0KPERJVj48Rk9OVCBzaXplPTI+ U3RvcC48L0ZPTlQ+PC9ESVY+DQo8RElWPjxGT05UIHNpemU9Mj48L0ZPTlQ+Jm5ic3A7PC9ESVY+ DQo8RElWPjxGT05UIHNpemU9Mj4jPC9GT05UPjwvRElWPg0KPERJVj48Rk9OVCBzaXplPTI+PC9G T05UPiZuYnNwOzwvRElWPg0KPERJVj48Rk9OVCANCnNpemU9Mj4qKioqKioqKioqKioqKioqKioq KioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKio8L0ZPTlQ+PC9ESVY+DQo8RElWPjxG T05UIHNpemU9Mj5NeSBmaXJzdCBzdGVwIGp1c3QgaXMgJ2NvbmZpZ3VyZScuPC9GT05UPjwvRElW Pg0KPERJVj48Rk9OVCBzaXplPTI+SSB1c2UgdGhlJm5ic3A7J2NjJyBhbmQgJ21ha2UnIG9mIEhQ LVVYIDEwLjIwKHVuZGVyIHRoZSANCicvdXNyL2JpbicpLiA8L0ZPTlQ+PC9ESVY+DQo8RElWPiZu YnNwOzwvRElWPg0KPERJVj48Rk9OVCBzaXplPTI+Q291bGQgeW91IGdpdmUgbWUgc29tZSBzdWdn ZXN0aW9ucyBhYm91dCB0aGUgDQplcnJvcj88L0ZPTlQ+PC9ESVY+DQo8RElWPjxGT05UIHNpemU9 Mj5PciBnaXZlIGEgaW5zdGFsbGF0aW9uIHNhbXBsZSBvbiBIUC1VWCAxMC4yMC48L0ZPTlQ+PC9E SVY+DQo8RElWPiZuYnNwOzwvRElWPg0KPERJVj48Rk9OVCBzaXplPTI+VGhhbmtzIHZlcnkgbXVj aC48L0ZPTlQ+PC9ESVY+DQo8RElWPiZuYnNwOzwvRElWPg0KPERJVj48Rk9OVCBzaXplPTI+QmVz dCByZWdhcmRzLjwvRk9OVD48L0RJVj4NCjxESVY+Jm5ic3A7PC9ESVY+DQo8RElWPjxGT05UIHNp emU9Mj5DaGVuIGhvbmd3dSxCZWlqaW5nLENoaW5hLjwvRk9OVD48L0RJVj4NCjxESVY+PEZPTlQg c2l6ZT0yPjIwMDAuMTEuMSA3OjA1cG08L0ZPTlQ+PC9ESVY+DQo8RElWPiZuYnNwOzwvRElWPjwv Qk9EWT48L0hUTUw+DQo= ------=_NextPart_000_0003_01C04437.4CA75A60-- From gcc-help-return-4040-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 01 17:31:16 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 14548 invoked by alias); 1 Nov 2000 17:31:15 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 14492 invoked from network); 1 Nov 2000 17:31:14 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 1 Nov 2000 17:31:14 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id JAA10327; Wed, 1 Nov 2000 09:31:03 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eA1HV0J05736; Wed, 1 Nov 2000 15:31:00 -0200 To: "zarb" Cc: Subject: Re: i want out!! References: <011c01c04369$c35c3140$7b0a38d2@zarb> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 01 Nov 2000 15:31:00 -0200 In-Reply-To: "zarb"'s message of "Tue, 31 Oct 2000 23:38:27 +0500" Message-ID: Lines: 13 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Oct 31, 2000, "zarb" wrote: > i would like to be excluded from ur helpline mailing list Then look at the `List-unsubscribe:' header that comes in every message you receive from this mailing list and send e-mail to that address. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4041-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 01 17:32:13 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 14939 invoked by alias); 1 Nov 2000 17:32:13 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 14904 invoked from network); 1 Nov 2000 17:32:12 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 1 Nov 2000 17:32:12 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id JAA10485; Wed, 1 Nov 2000 09:32:08 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eA1HW0705748; Wed, 1 Nov 2000 15:32:00 -0200 To: "Wilfong, Paul" Cc: "'gcc-help@gcc.gnu.org'" Subject: Re: GCC on OSX - GCC on BSD Unix - GCC configure hosts References: From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 01 Nov 2000 15:32:00 -0200 In-Reply-To: "Wilfong, Paul"'s message of "Tue, 31 Oct 2000 14:18:52 -0700" Message-ID: Lines: 13 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Oct 31, 2000, "Wilfong, Paul" wrote: > 1. I would like to build GCC on the beta OSX release, if possible. Has > anyone been able to do this? To the best of my knowledge, the changes Apple has made in GCC to port it to OSX haven't been contributed back yet. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4042-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 01 17:33:32 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 15475 invoked by alias); 1 Nov 2000 17:33:32 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 15431 invoked from network); 1 Nov 2000 17:33:30 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 1 Nov 2000 17:33:30 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id JAA10717; Wed, 1 Nov 2000 09:33:22 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eA1HXKV05776; Wed, 1 Nov 2000 15:33:20 -0200 To: Gigi Sullivan Cc: gcc-help@gcc.gnu.org Subject: Re: Static and Dynamic linking. References: <20001031223554.B240@armageddon.tin.it> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 01 Nov 2000 15:33:20 -0200 In-Reply-To: Gigi Sullivan's message of "Tue, 31 Oct 2000 22:35:54 +0100" Message-ID: Lines: 22 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Oct 31, 2000, Gigi Sullivan wrote: > AFAIK when compiling a simple program, gcc will try to compile > and link the program using shared libraries (if any). Nope, it's the linker that decides whether to use a shared or a static library. GCC just passes whatever -l flags you use to the linker. > What about if I'd like that, say, foo.c will be linked with > just libbar.a (static library) and not with libbar.so (ok, soname > and realname are right)? Just list /path/to/libbar.a in the command line. Note that this works for static libraries, but, in the case of shared libraries, it doesn't always work to list /path/to/libbar.so. It depends on the OS and the linker you use. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4043-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 01 17:34:52 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 16044 invoked by alias); 1 Nov 2000 17:34:52 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 16005 invoked from network); 1 Nov 2000 17:34:51 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 1 Nov 2000 17:34:51 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id JAA10801; Wed, 1 Nov 2000 09:34:42 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eA1HYdE05793; Wed, 1 Nov 2000 15:34:39 -0200 To: "Beltran, Victor" Cc: "'gcc-help@gcc.gnu.org'" Subject: Re: Help installing GCC in IRIX 6.5 References: <2CEBCAF96F65D411858800508BDFDC6C16B6CB@USPLM250> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 01 Nov 2000 15:34:39 -0200 In-Reply-To: "Beltran, Victor"'s message of "Tue, 31 Oct 2000 17:06:45 -0600" Message-ID: Lines: 16 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Oct 31, 2000, "Beltran, Victor" wrote: > We followed the process recommended in the installation document but when we > try to make the links to the common directories, the file > /opt/TWWfsw/gcc29/tww-inst/make-links does not work. Please advise if there > is anyother way to go through this process, or what other solution would > there be. The way to go is to ask the maintainers of the binaries you have downloaded. The GCC group only supplies sources for GCC. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4044-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 01 17:37:16 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 17112 invoked by alias); 1 Nov 2000 17:37:16 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 17077 invoked from network); 1 Nov 2000 17:37:15 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 1 Nov 2000 17:37:15 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id JAA11045; Wed, 1 Nov 2000 09:37:04 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eA1HauL05824; Wed, 1 Nov 2000 15:36:56 -0200 To: "chw" Cc: Subject: Re: GCC FAQ References: <000601c043f4$4afdc480$0ac812ac@chw> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 01 Nov 2000 15:36:56 -0200 In-Reply-To: "chw"'s message of "Wed, 1 Nov 2000 19:09:46 +0800" Message-ID: Lines: 15 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 1, 2000, "chw" wrote: > I am an engineer of software in China.When I install the GCC(gcc-2.95.2.tar) on HP-UX 10.20 I met the following error at the step 'make bootstrap': The error you've got implies this is not the first time you run `make bootstrap'. The object files of cccp that are being linked with `cc' have been created by GCC (I can tell from the name of the functions that `ld' complains about). Run `make clean' and try `make bootstrap' again. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4045-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 01 17:41:39 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 18663 invoked by alias); 1 Nov 2000 17:41:39 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 18629 invoked from network); 1 Nov 2000 17:41:37 -0000 Received: from mailgate1.asf.com (root@207.170.76.253) by sourceware.cygnus.com with SMTP; 1 Nov 2000 17:41:37 -0000 Received: from mercury.asf.com (mercury.asf.com [207.170.76.3]) by mailgate1.asf.com (8.9.3/8.9.3) with ESMTP id LAA00398 for ; Wed, 1 Nov 2000 11:41:33 -0600 Received: by mercury.asf.com with Internet Mail Service (5.5.2650.21) id ; Wed, 1 Nov 2000 11:41:28 -0600 Message-ID: <2B0FC65846A0D311B7C800508B615BB4012EB529@mercury.asf.com> From: Thomas Burnett To: gcc-help@gcc.gnu.org Subject: unscribe Date: Wed, 1 Nov 2000 11:41:25 -0600 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2650.21) Content-Type: text/plain; charset="iso-8859-1" From gcc-help-return-4046-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 01 21:25:50 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 10069 invoked by alias); 1 Nov 2000 21:25:49 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 9977 invoked from network); 1 Nov 2000 21:25:43 -0000 Received: from mail.sitera.com (postfix@206.124.27.238) by sourceware.cygnus.com with SMTP; 1 Nov 2000 21:25:43 -0000 Received: from sitera.com (robrlap.sitera.com [10.0.8.35]) by mail.sitera.com (Postfix) with ESMTP id ADD6F5C054 for ; Wed, 1 Nov 2000 14:26:42 -0700 (MST) Message-ID: <3A032BEE.314B916D@sitera.com> Date: Fri, 03 Nov 2000 14:19:42 -0700 From: robr@sitera.com Organization: Vitesse Semiconductor Corp. X-Mailer: Mozilla 4.75 [en] (X11; U; Linux 2.2.16-22 i686) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: Re: gcc-2.95.2 Fails to Compile on RedHat 7.0 System Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit HI, What are the magic keywords to find the patch in the archives? Can't seem to find it. Regards, Rob Root From gcc-help-return-4047-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 02 12:06:15 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 21541 invoked by alias); 2 Nov 2000 12:06:15 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 21511 invoked from network); 2 Nov 2000 12:06:13 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 2 Nov 2000 12:06:13 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id EAA02915; Thu, 2 Nov 2000 04:06:09 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eA23REL01635; Thu, 2 Nov 2000 01:27:14 -0200 To: robr@sitera.com Cc: gcc-help@gcc.gnu.org Subject: Re: gcc-2.95.2 Fails to Compile on RedHat 7.0 System References: <3A032BEE.314B916D@sitera.com> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 02 Nov 2000 01:27:14 -0200 In-Reply-To: robr@sitera.com's message of "Fri, 03 Nov 2000 14:19:42 -0700" Message-ID: Lines: 14 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 3, 2000, robr@sitera.com wrote: > What are the magic keywords to find the patch in the archives? Can't > seem to find it. Look for a message posted last Saturday (Oct 28) by Jakub Jelinek under http://gcc.gnu.org/ml/gcc/. The message id is <20001028165407.N12422@sunsite.ms.mff.cuni.cz> -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4048-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 02 18:59:23 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 14627 invoked by alias); 2 Nov 2000 18:59:23 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 14585 invoked from network); 2 Nov 2000 18:59:21 -0000 Received: from cs.stmarys.ca (root@140.184.71.180) by sourceware.cygnus.com with SMTP; 2 Nov 2000 18:59:21 -0000 Received: from stmarys.ca (AndrewDumaresq.stmarys.ca [140.184.71.249]) by cs.stmarys.ca (8.9.3/8.9.3) with ESMTP id OAA17067 for ; Thu, 2 Nov 2000 14:59:09 -0400 Message-ID: <3A01B914.2FA1F323@stmarys.ca> Date: Thu, 02 Nov 2000 14:57:25 -0400 From: Andrew Dumaresq X-Mailer: Mozilla 4.75 [en] (Win98; U) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: Problem building GCC Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit I have a DEC 3000 Model 400, that I wanted to put linux on but I can't, aprently the bus is messy. :) Anyway I was trying to compile GCC on this machine and I run into the following error: I have un tarred the source to /usr/src/gcc-2.95.2 and made a dir /usr/src/obj I goto /usr/src/obj and type /usr/scr/gcc-2.95.2/configure. The configure runs fine, but when I type make bootstrap I get the above error. I'm sure this is something simple but I can't figure it out. I am using Tru64 Unix and using the default make and utils for that OS. cc -DIN_GCC -DHAIFA -g -DHAVE_CONFIG_H -o cc1 toplev.o version.o tree.o print-tree.o stor-layout.o fold-const.o function.o stmt.o except.o expr.o calls.o expmed.o explow.o optabs.o intl.o varasm.o rtl.o print-rtl.o rtlanal.o emit-rtl.o genrtl.o real.o dbxout.o sdbout.o dwarfout.o dwarf2out.o xcoffout.o bitmap.o alias.o gcse.o integrate.o jump.o cse.o loop.o unroll.o flow.o stupid.o combine.o varray.o regclass.o regmove.o local-alloc.o global.o reload.o reload1.o caller-save.o insn-peep.o reorg.o haifa-sched.o final.o recog.o reg-stack.o insn-opinit.o insn-recog.o insn-extract.o insn-output.o insn-emit.o lcm.o profile.o insn-attrtab.o alpha.o getpwd.o convert.o mbchar.o dyn-string.o splay-tree.o graph.o sbitmap.o resource.o hash.o c-parse.o c-lang.o c-lex.o c-pragma.o c-decl.o c-typeck.o c-convert.o c-aux-info.o c-common.o c-iterate.o obstack.o -lmld ../libiberty/libiberty.a ld: Unresolved: ASM_FILE_START *** Exit 1 Stop. *** Exit 1 Stop. *** Exit 1 Stop. I hope this is enough info Thanks Andrew Dumaresq -- Andrew Dumaresq Technician Mathematics & Computing Science Saint Mary's University Phone: (902)420-5893 Fax: (902)420-5035 From gcc-help-return-4049-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 02 21:11:55 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 25528 invoked by alias); 2 Nov 2000 21:11:54 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 25495 invoked from network); 2 Nov 2000 21:11:53 -0000 Received: from postoffice.netsilicon.com (199.93.124.180) by sourceware.cygnus.com with SMTP; 2 Nov 2000 21:11:53 -0000 Received: by postoffice.netsilicon.com with Internet Mail Service (5.5.2650.21) id ; Thu, 2 Nov 2000 16:11:18 -0500 Message-ID: <3FEE3089984DD211ABCC00A0C9D346D0018E13AE@postoffice.netsilicon.com> From: "Fu, Jack" To: "'gcc-help@gcc.gnu.org'" Subject: RE: gcc for ARM processor. Date: Thu, 2 Nov 2000 16:11:17 -0500 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2650.21) Content-Type: text/plain; charset="iso-8859-1" Hi: I have a version of redhat gcc for ARM cross compiler arm-elf-gcc.exe and arm-elf-as.exe. Does any one know why when I compile a standard ARM assembly code such as the following? .globl ASMLWriteWord16 ASMLWriteWord16 # ; mSectorBase[whichWord] = data MOV r3, r0, LSL #1 The arm-elf-as compiler complainted about error: bad instuction 'asmlwriteword16'. This seems to be a standard assembly code for ARM. Thanks for your help. From gcc-help-return-4050-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 03 05:11:50 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 1079 invoked by alias); 3 Nov 2000 05:11:50 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 964 invoked from network); 3 Nov 2000 05:11:46 -0000 Received: from agni.wipinfo.soft.net (164.164.6.20) by sourceware.cygnus.com with SMTP; 3 Nov 2000 05:11:46 -0000 Received: from vayu.wipinfo.soft.net (vayu [192.168.200.170]) by agni.wipinfo.soft.net (8.9.3/8.9.3) with ESMTP id KAA22198 for ; Fri, 3 Nov 2000 10:36:00 +0500 (GMT) Received: from platinum.mail.wipro.com ([192.168.223.18]) by vayu.wipinfo.soft.net (8.9.3/8.9.3) with ESMTP id KAA18586 for ; Fri, 3 Nov 2000 10:39:20 +0500 (GMT) Received: from wipro.com ([192.168.205.97]) by platinum.mail.wipro.com (Netscape Messaging Server 3.6) with ESMTP id AAADB8 for ; Fri, 3 Nov 2000 10:41:07 +0530 Message-ID: <3A024951.3178D9E7@wipro.com> Date: Fri, 03 Nov 2000 10:42:49 +0530 From: "phani narasimhan venkata sesha myreddy" Organization: WIPRO X-Mailer: Mozilla 4.5 [en] (WinNT; I) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: Testing the performance of instruction Scheduler Content-Type: multipart/mixed; boundary="------------C1C44633AFAE992B9AFF5190" This is a multi-part message in MIME format. --------------C1C44633AFAE992B9AFF5190 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit hai all, How do i test the performance of instruction scheduler. I have written an instruction scheduler for a database code generator. The scheduler is simple and tuned to the graph generated, as i get some class of graphs. It contains the global, local scheduler and the instruciton grouping logic. I wonder i did not got the expected performance. The gain for some graphs is 6 to 8 %. The worst part is the performance goes down for some graphs. The graph size is very huge. some times 200 blocks and 2000 instructions. The instructions generated is very optimal. I read the ultrasparc-II manual and in it the instructions are properly scheduled it is possible to bring CPI as low as 0.25. I am not able to visualise this much percentage gain overall. Is there any tool to calculate the number of cycles taken by the code at run-time? Is there any tool to find for a specific run how many data cache misses have occured? Is there any tool that give the number of pieline stalls that occured ? Is there any other way to project the performance apart from just comparing the execution times? How much performance gain in terms of percentage one can expect from an instruction scheduler? Hoping a detailed early reply. Thanks. sincierly, phani. --------------C1C44633AFAE992B9AFF5190 Content-Type: text/x-vcard; charset=us-ascii; name="phani.sesha.vcf" Content-Transfer-Encoding: 7bit Content-Description: Card for Phani MVS Content-Disposition: attachment; filename="phani.sesha.vcf" begin:vcard n:M.V.S;Phani Narasimham tel;work:5530053, 5525121 ext 1053 x-mozilla-html:FALSE org:Wipro Global R&D;NSBU version:2.1 email;internet:phani.sesha@wipro.com title:Sr. Software Engineer adr;quoted-printable:;;Office Addr:=0D=0A1 st Block, 7 th Main Road,N0.8=0D=0AKoramangala, Banglore - 36=0D=0AHouse Addr=0D=0AH.No 78,34 th A cross,=0D=0A11 th main, Jayanagar 4th T block;Banglore;Karnataka;;INDIA note;quoted-printable:The deepest hunger of a faithful heart is faithfulness =0D=0A -Geo.Eliot. fn:M.V.S Phani Narasimham end:vcard --------------C1C44633AFAE992B9AFF5190-- From gcc-help-return-4051-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 03 06:59:51 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 448 invoked by alias); 3 Nov 2000 06:59:51 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 405 invoked from network); 3 Nov 2000 06:59:50 -0000 Received: from virginia.yamato.ibm.co.jp (203.141.89.165) by sourceware.cygnus.com with SMTP; 3 Nov 2000 06:59:50 -0000 Received: from ns.trl.ibm.com (ns.trl.ibm.com [9.116.48.18]) by virginia.yamato.ibm.co.jp (8.9.3/3.7W/GW3.3) with ESMTP id PAA07622; Fri, 3 Nov 2000 15:59:22 +0900 Received: from localhost by ns.trl.ibm.com (8.9.3/TRL4.5SRV) id PAA39782; Fri, 3 Nov 2000 15:59:22 +0900 To: gcc-sc.973234577.enkcejhhhclnihmfgong-etoh=trl.ibm.co.jp@gcc.gnu.org, gcc-help@gcc.gnu.org Subject: Re: confirm subscribe to gcc@gcc.gnu.org In-Reply-To: <973234577.31557.ezmlm@gcc.gnu.org> References: <973234577.31557.ezmlm@gcc.gnu.org> X-Mailer: Mew version 1.94b48 on Emacs 20.5 / Mule 4.0 (HANANOEN) Mime-Version: 1.0 Content-Type: Text/Plain; charset=us-ascii Content-Transfer-Encoding: 7bit Message-Id: <20001103155922F.etoh@trl.ibm.com> Date: Fri, 03 Nov 2000 15:59:22 +0900 From: Hiroaki Etoh X-Dispatcher: imput version 990813(IM119) Lines: 0 From gcc-help-return-4052-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Sat Nov 04 02:51:08 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 24526 invoked by alias); 4 Nov 2000 02:51:07 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 24496 invoked from network); 4 Nov 2000 02:51:07 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 4 Nov 2000 02:51:07 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id SAA18796; Fri, 3 Nov 2000 18:50:41 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eA42ock10627; Sat, 4 Nov 2000 00:50:38 -0200 To: Andrew Dumaresq Cc: gcc-help@gcc.gnu.org Subject: Re: Problem building GCC References: <3A01B914.2FA1F323@stmarys.ca> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 04 Nov 2000 00:50:38 -0200 In-Reply-To: Andrew Dumaresq's message of "Thu, 02 Nov 2000 14:57:25 -0400" Message-ID: Lines: 18 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 2, 2000, Andrew Dumaresq wrote: > I am using Tru64 Unix and using the default > make and utils for that OS. You failed to mention it was Tru64 5.0, which is not supported by GCC 2.95.2. I heard there are patches floating around that fix this minor problem, but I don't know whether there are any more significant changes needed. If someone collects the patches and send them to gcc-patches, I'd be glad to add them to the system-specific installation notes. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4053-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Sat Nov 04 02:52:17 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 25175 invoked by alias); 4 Nov 2000 02:52:17 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 25145 invoked from network); 4 Nov 2000 02:52:17 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 4 Nov 2000 02:52:17 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id SAA18846; Fri, 3 Nov 2000 18:52:08 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eA42q1W10639; Sat, 4 Nov 2000 00:52:01 -0200 To: "Fu, Jack" Cc: "'gcc-help@gcc.gnu.org'" Subject: Re: gcc for ARM processor. References: <3FEE3089984DD211ABCC00A0C9D346D0018E13AE@postoffice.netsilicon.com> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 04 Nov 2000 00:52:01 -0200 In-Reply-To: "Fu, Jack"'s message of "Thu, 2 Nov 2000 16:11:17 -0500" Message-ID: Lines: 18 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 2, 2000, "Fu, Jack" wrote: > I have a version of redhat gcc for ARM cross compiler arm-elf-gcc.exe and > arm-elf-as.exe. Does any one know why when I compile a standard ARM > assembly code such as the following? Since this is a question about the assembler, it doesn't belong in here. binutils@sources.redhat.com would be a better place. > ASMLWriteWord16 You're missing a colon `:' after the label name. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4054-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 06 03:46:31 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 14896 invoked by alias); 6 Nov 2000 03:46:30 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 14865 invoked from network); 6 Nov 2000 03:46:29 -0000 Received: from tinhau.pacific.net.hk (202.14.67.13) by sourceware.cygnus.com with SMTP; 6 Nov 2000 03:46:29 -0000 Received: from localhost (kiddpoon@localhost) by tinhau.pacific.net.hk (8.9.1/8.9.1) with ESMTP id LAA10716; Mon, 6 Nov 2000 11:46:24 +0800 (HKT) X-Authentication-Warning: tinhau.pacific.net.hk: kiddpoon owned process doing -bs Date: Mon, 6 Nov 2000 11:46:23 +0800 (HKT) From: Kidd Poon To: gcc-help@gcc.gnu.org cc: kiddpoon@hotmail.com Subject: Error building gcc2.95.2 in BSDI platform. Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Hi all, I'm running a server with BSDI 4.1 and gcc version egcs-2.91.66 19990314 (egcs-1.1.2 release). I've downloaded the gcc-2.95.2 and tried to configure and complie it. However, the following error appear: -------------------------------------------------------------------------------- for name in _muldi3 _divdi3 _moddi3 _udivdi3 _umoddi3 _negdi2 _lshrdi3 _ashldi3 _ashrdi3 _ffsdi2 _udiv_w_sdiv _udivmoddi4 _cmpdi2 _ucmpdi2 _floatdidf _floatdisf _fixunsdfsi _fixunssfsi _fixunsdfdi _fixdfdi _fixunssfdi _fixsfdi _fixxfdi _fixunsxfdi _floatdixf _fixunsxfsi _fixtfdi _fixunstfdi _floatditf __gcc_bcmp _varargs __dummy _eprintf _bb _shtab _clear_cache _trampoline __main _exit _ctors _pure; \ do \ echo ${name}; \ ./xgcc -B./ -B/usr/local/i386-pc-bsdi4.1/bin/ -I/usr/local/i386-pc-bsdi4.1/include -O2 -DIN_GCC -g -I./include -g1 -DIN_LIBGCC2 -D__GCC_FLOAT_NOT_NEEDED -I. -I. -I./config -I./../include -c -DL${name} \ ./libgcc2.c -o ${name}.o; \ if [ $? -eq 0 ] ; then true; else exit 1; fi; \ ` if [ -f /usr/local/src/gcc-2.95/gcc/../binutils/ar ] ; then echo /usr/local/src/gcc-2.95/gcc/../binutils/ar ; else if [ "i386-pc-bsdi4.1" "i386-pc-bsdi4.1" ] ; then echo ar; else t='s,x,x,'; echo ar | sed -e $t ; fi; fi` rc tmplibgcc2.a ${name}.o; \ rm -f ${name}.o; \ done _muldi3 _divdi3 _moddi3 _udivdi3 _umoddi3 _negdi2 _lshrdi3 _ashldi3 _ashrdi3 _ffsdi2 _udiv_w_sdiv _udivmoddi4 _cmpdi2 _ucmpdi2 _floatdidf /var/tmp/cc2xaF3N.s: Assembler messages: /var/tmp/cc2xaF3N.s:122: Error: Alignment not a power of 2 make[2]: *** [libgcc2.a] Error 1 make[2]: Leaving directory `/usr/local/src/gcc-2.95/gcc' make[1]: *** [bootstrap] Error 2 make[1]: Leaving directory `/usr/local/src/gcc-2.95/gcc' make: *** [bootstrap] Error 2 -------------------------------------------------------------------------------------------------------------- Anyone faced this before, What's this about?? Thanks Regards, Kidd Poon System Engineer From gcc-help-return-4055-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 06 08:03:30 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 8728 invoked by alias); 6 Nov 2000 08:03:29 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 8697 invoked from network); 6 Nov 2000 08:03:28 -0000 Received: from web10007.mail.yahoo.com (216.136.130.43) by sourceware.cygnus.com with SMTP; 6 Nov 2000 08:03:28 -0000 Message-ID: <20001106080302.2626.qmail@web10007.mail.yahoo.com> Received: from [192.169.41.33] by web10007.mail.yahoo.com; Mon, 06 Nov 2000 00:03:02 PST Date: Mon, 6 Nov 2000 00:03:02 -0800 (PST) From: Ooi EnYee Subject: please help To: gcc-help@gcc.gnu.org MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Dear Sir, I'm facing problem when installing gcc in solaris 7. When I try to configure the gcc, there are errors show : Configuring for a sparc-sun-solaris2.7 host. Created "Makefile" in /usr/local/objdir/gcc-2.95.2 using "mh-frag" ./configure: cc: not found *** The command 'cc -o conftest -g conftest.c' failed. *** You must set the environment variable CC to a working compiler. how can I set the environment variable CC to a working compiler? Thanks Best Regards, enyee __________________________________________________ Do You Yahoo!? Thousands of Stores. Millions of Products. All in one Place. http://shopping.yahoo.com/ From gcc-help-return-4056-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 06 08:36:37 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 11553 invoked by alias); 6 Nov 2000 08:36:37 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 11500 invoked from network); 6 Nov 2000 08:36:25 -0000 Received: from bastion.energex.com.au (147.209.142.2) by sourceware.cygnus.com with SMTP; 6 Nov 2000 08:36:25 -0000 Received: by bastion.energex.com.au; (8.8.8/GJW030998a) id SAA16051; Mon, 6 Nov 2000 18:35:55 +1000 (EST) Received: from newman.energex.com.au(147.209.206.13) by bastion.energex.com.au via smap (smtp gateway apd20000403a) id xma026650; Mon, 6 Nov 00 18:35:05 +1000 Received: from dux.seqeb.gov.au (unverified) by newman.seqeb.gov.au (Content Technologies SMTPRS 4.1.2) with SMTP id ; Mon, 6 Nov 2000 18:35:03 +1000 Received: from dud.seqeb.gov.au by dux.seqeb.gov.au (8.8.8/apd19991206a) id SAA0000021978; Mon, 6 Nov 2000 18:35:02 +1000 (EST) Received: from energex.com.au by dud.seqeb.gov.au (8.8.8/apd2000212a) id SAA0000020486; Mon, 6 Nov 2000 18:34:17 +1000 (EST) Message-ID: <3A066D09.834DD20@energex.com.au> Date: Mon, 06 Nov 2000 18:34:17 +1000 From: Anthony Lee X-Mailer: Mozilla 4.7 [en]C-CCK-MCD NSCPCD47 (WinNT; I) X-Accept-Language: en MIME-Version: 1.0 To: Ooi EnYee CC: gcc-help@gcc.gnu.org Subject: Re: please help References: <20001106080302.2626.qmail@web10007.mail.yahoo.com> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Not familar with solaris. However, this sounds like you haven't got cc in your path. If you got root priviledge then try this: su cd / find . -name cc -print This should then print out the path for cc if you have it. Modify you path accordingly and set the environment variable CC to cc. Ooi EnYee wrote: > > Dear Sir, > > I'm facing problem when installing gcc in solaris 7. > When I try to configure the gcc, there are errors show > : > Configuring for a sparc-sun-solaris2.7 host. > Created "Makefile" in /usr/local/objdir/gcc-2.95.2 > using "mh-frag" > ./configure: cc: not found > *** The command 'cc -o conftest -g conftest.c' > failed. > *** You must set the environment variable CC to a > working compiler. > how can I set the environment variable CC to a working > compiler? > > Thanks > > Best Regards, > enyee > > __________________________________________________ > Do You Yahoo!? > Thousands of Stores. Millions of Products. All in one Place. > http://shopping.yahoo.com/ -- Anthony Lee Energex 150 Charlotte Street ..-- __o Brisbane ....-- _ \<,_ Qld 4000 ____ (_)/ (_) Australia voice:+61 7 3407 4541 fax: +61 7 3407 4607 email: AL012@energex.com.au ----------------------------------------------------------------------------------------------------------------------------------------------------- This email message (and any accompanying file attachments) may contain confidential or privileged information and is intended for the sole use of the addressee named above. If you are not the intended recipient, or the person responsible for delivering this message to the intended recipient, please notify ENERGEX immediately and destroy any copies of the original message. Any unauthorised review, use, alteration, disclosure or distribution of this email (including any attachments) by an unintended recipient is prohibited. ENERGEX accepts no responsibility for the content of any email which is sent by an employee which is of a personal nature. From gcc-help-return-4057-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 06 14:23:01 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 12389 invoked by alias); 6 Nov 2000 14:23:01 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 12353 invoked from network); 6 Nov 2000 14:23:00 -0000 Received: from pimout2-ext.prodigy.net (HELO pimout2-int.prodigy.net) (207.115.63.101) by sourceware.cygnus.com with SMTP; 6 Nov 2000 14:23:00 -0000 Received: from prodigy.net (A010-0109.BRYN.splitrock.net [64.196.232.109]) by pimout2-int.prodigy.net (8.10.1/8.10.1) with ESMTP id eA6EMu749400 for ; Mon, 6 Nov 2000 09:22:56 -0500 Message-ID: <3A06C0D8.3C865C7A@prodigy.net> Date: Mon, 06 Nov 2000 08:31:52 -0600 From: Larry Evans X-Mailer: Mozilla 4.7 [en] (X11; I; Linux 2.2.13-4mdk i586) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: g++/testsuite:WARNING: Couldn't find global config Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit I cd to obj/gcc where I then did `make check-g++`. The resulting output looked suspicious when it showed: cd /mnt/scratch/gcc-2.96/latest-cvs/obj/gcc/ make check-g++ (rootme=`pwd`; export rootme; \ srcdir=`cd /mnt/scratch/gcc-2.96/latest-cvs/gcc/gcc; pwd` ; export srcdir ; \ cd testsuite; \ EXPECT=`if [ -f ${rootme}/../expect/expect ] ; then echo ${rootme}/../expect/expect ; else echo expect ; fi` ; export EXPECT ; \ if [ -f ${rootme}/../expect/expect ] ; then \ TCL_LIBRARY=`cd .. ; cd /mnt/scratch/gcc-2.96/latest-cvs/gcc/gcc/../tcl/library ; pwd` ; \ export TCL_LIBRARY ; fi ; \ `if [ -f ${srcdir}/../dejagnu/runtest ] ; then echo ${srcdir}/../dejagnu/runtest ; else echo runtest; fi` --tool g++ ) WARNING: Couldn't find the global config file. Test Run By evansl on Sun Nov 5 21:14:08 2000 Native configuration is i586-pc-linux-gnu === g++ tests === I was testing some changes I've made to gcc/cp/method.c and got different results than those shown on http://gcc.gnu.org/ml/gcc-testresults/2000-10/msg00290.html, and I was wondering if absence of such a global config file could account for those differences. TIA. From gcc-help-return-4058-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 06 14:43:17 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 14218 invoked by alias); 6 Nov 2000 14:43:15 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 14186 invoked from network); 6 Nov 2000 14:43:13 -0000 Received: from granger.mail.mindspring.net (207.69.200.148) by sourceware.cygnus.com with SMTP; 6 Nov 2000 14:43:13 -0000 Received: from bigblue (pool-63.52.89.160.cmbr.grid.net [63.52.89.160]) by granger.mail.mindspring.net (8.9.3/8.8.5) with SMTP id JAA19121 for ; Mon, 6 Nov 2000 09:43:08 -0500 (EST) From: "Scott Thibault" To: Subject: 64 bit for SPARC V9/Solaris 7 Date: Mon, 6 Nov 2000 09:42:38 -0500 Message-ID: MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit X-Priority: 3 (Normal) X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook IMO, Build 9.0.2416 (9.0.2910.0) Importance: Normal X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4133.2400 Hello, Could someone tell me how I can build gcc/g++ with -m64 support on an Ultra 1/Solaris 7 machine? I've had no success with gcc-20001101. By default it seems not to support it. By specifying an explicit target of sparcv9-sun-solaris2.7, it tries to build it, but libgcc2.a fails to build. I patched sparc.h as indicated by earlier messages, and things seem to be working for gcc (got to stage 2). So I stopped it and configured it to compile g++ as well, but it failed with an elf error trying to load libiberty.a. Should I use another snapshot? Alternatively, if there are binaries for this platform with 32 and 64 bit support, that would be even better. Thank, --Scott Thibault From gcc-help-return-4059-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 07 01:24:27 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 16680 invoked by alias); 7 Nov 2000 01:24:26 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 16649 invoked from network); 7 Nov 2000 01:24:25 -0000 Received: from mercury.sun.com (192.9.25.1) by sourceware.cygnus.com with SMTP; 7 Nov 2000 01:24:25 -0000 Received: from mpk02.Eng.Sun.COM ([129.144.26.11]) by mercury.Sun.COM (8.9.3+Sun/8.9.3) with ESMTP id RAA18257 for ; Mon, 6 Nov 2000 17:24:23 -0800 (PST) Received: from laie (laie [129.144.25.55]) by mpk02.Eng.Sun.COM (8.9.3+Sun/8.9.3/ENSMAIL,v1.7) with SMTP id RAA18296; Mon, 6 Nov 2000 17:24:23 -0800 (PST) Message-Id: <200011070124.RAA18296@mpk02.Eng.Sun.COM> Date: Mon, 6 Nov 2000 17:28:31 -0800 (PST) From: David Cheon Reply-To: David Cheon Subject: Question in powerpc-eabi-ld To: gcc-help@gcc.gnu.org Cc: David.Cheon@eng.sun.com, jici.gao@eng.sun.com MIME-Version: 1.0 Content-Type: TEXT/plain; charset=us-ascii Content-MD5: JohDllaXfeulwydQLTfdkw== X-Mailer: dtmail 1.3.0 @(#)CDE Version 1.3.2 SunOS 5.7 sun4u sparc Hi gcc experts, I am currently using the powerpc-eabi-ld linker and found out that there is a couple of issues on the linked object. Problem 1) When linking objects using the following command: powerpc-eabi-ld -EB -oformat elf32-powerpc -o ./bootloaderrom ./apl_init.o ./apl_boot.o ../common/common.o ../common/mmucache.o ./vpd.o ./FPGACode1.o ./FPGACode2.o \ -T bootloader.ldi -t -X -N -Map bootloader.map powerpc-eabi-ld: mode elf32ppc and if bootloader.ldi is written as follows: MEMORY { rom : ORIGIN = 0xffc00000, LENGTH = 0x200000 ram : ORIGIN = 0x00000000, LENGTH = 0x800000 } SECTIONS { .text 0xffc00100 : { *(.text) } .rodata ADDR(.text)+SIZEOF(.text) : { *(.rodata) } .data1 0xffc04000 : { vpd.o (.data) } .data2 0xffc08000 : { FPGACode1.o (.data) } .data3 0xffd04000 : { FPGACode2.o (.data) } .data ADDR(.rodata)+SIZEOF(.rodata) : { *(.data) } .sbss 0x00080000 : { *(.sbss) } .sdata ADDR(.sbss)+SIZEOF(.sbss) : { *(.sdata) } .sdata2 ADDR(.sdata)+SIZEOF(.sdata) : { *(.sdata2) } .bss ADDR(.sdata2)+SIZEOF(.sdata2): { *(.bss) *(COMMON) } } My intention is to do the following: - locate data section of vpd.o to 0xffc04000 - locate data section of FPGACode1.o to 0xffc08000 - locate data section of FPGACode2.o to 0xffd04000 - locate the rest of the data sections to follow FPGACode2.o in a sequencial manner. As shown in my bootloader.map file, the resulting object has duplicated .data sections (for vpd.o FPGACode1.o and FPGACode2.o). How should I edit the .ldi file in order to avoid such duplication ? .rodata 0xffc01894 0x0 *(.rodata) .data1 0xffc04000 0x34 vpd.o(.data) .data 0xffc04000 0x34 vpd.o .data2 0xffc08000 0x50bac FPGACode1.o(.data) .data 0xffc08000 0x50bac FPGACode1.o .data3 0xffd04000 0x10 FPGACode2.o(.data) .data 0xffd04000 0x10 FPGACode2.o .data 0xffc01894 0x50c50 *(.data) .data 0xffc01894 0x60 ../common/mmucache.o .data 0xffc018f4 0x34 ./vpd.o .data 0xffc01928 0x50bac ./FPGACode1.o .data 0xffc524d4 0x10 ./FPGACode2.o .got 0xffc524e4 0x10 .got 0xffc524e4 0x10 ./apl_init.o 0xffc524e8 _GLOBAL_OFFSET_TABLE_ Problem 2) The link also complains that it is missing the .got section (global offset table). What is the global offset table and how it is used for ? Here is the message from the linker: powerpc-eabi-ld: warning: no memory region specified for section `.got' I'm using gcc-2.95.2 and binutils-2.9.1 Thanks in advance for the help, David From gcc-help-return-4060-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 07 01:51:39 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 25606 invoked by alias); 7 Nov 2000 01:51:38 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 25573 invoked from network); 7 Nov 2000 01:51:38 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 7 Nov 2000 01:51:38 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id RAA28624; Mon, 6 Nov 2000 17:51:31 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eA71pSV14634; Mon, 6 Nov 2000 23:51:28 -0200 To: Larry Evans Cc: gcc-help@gcc.gnu.org Subject: Re: g++/testsuite:WARNING: Couldn't find global config References: <3A06C0D8.3C865C7A@prodigy.net> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 06 Nov 2000 23:51:28 -0200 In-Reply-To: Larry Evans's message of "Mon, 06 Nov 2000 08:31:52 -0600" Message-ID: Lines: 15 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 6, 2000, Larry Evans wrote: > output looked suspicious when it showed: > WARNING: Couldn't find the global config file. No problem here. You just don't have the DEJAGNU environment variable pointing to an expect script with local customizations. You don't need it. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4061-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 07 16:18:57 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 4262 invoked by alias); 7 Nov 2000 16:18:57 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 4230 invoked from network); 7 Nov 2000 16:18:56 -0000 Received: from probity.mcc.ac.uk (130.88.200.94) by sourceware.cygnus.com with SMTP; 7 Nov 2000 16:18:56 -0000 Received: from mrbounce.compsoc.man.ac.uk ([192.84.78.5]) by probity.mcc.ac.uk with esmtp (Exim 2.05 #4) id 13tBSV-000AGm-00 for gcc-help@gcc.gnu.org; Tue, 7 Nov 2000 16:18:51 +0000 Received: from mrworry.compsoc.man.ac.uk (mail@mrworry.compsoc.man.ac.uk [192.84.78.2]) by mrbounce.compsoc.man.ac.uk (8.9.2/8.9.2) with ESMTP id QAA50396 for ; Tue, 7 Nov 2000 16:18:50 GMT (envelope-from moz@compsoc.man.ac.uk) Received: from moz (helo=localhost) by mrworry.compsoc.man.ac.uk with local-esmtp (Exim 3.12 #1 (Debian)) id 13tBSU-0007wF-00 for ; Tue, 07 Nov 2000 16:18:50 +0000 Date: Tue, 7 Nov 2000 16:18:50 +0000 (GMT) From: John Levon To: gcc-help@gcc.gnu.org Subject: C++ parsing question Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Is it possible to do what is implied by this code : if ((const char* p = func()) && *p) { // deal with p } i.e. declare and initialise a pointer p and then check the contents all within the conditional I don't have a C++ standard to check what the problem is here... g++ 2.95.2 thanks john -- "Alan Turing thought about criteria to settle the question of whether machines can think, a question of which we now know that it is about as relevant as the question of whether submarines can swim." - Dijkstra From gcc-help-return-4062-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 07 18:25:38 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 17861 invoked by alias); 7 Nov 2000 18:25:37 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 17755 invoked from network); 7 Nov 2000 18:25:34 -0000 Received: from mail.tconl.com (HELO hermes.tconl.com) (204.26.80.9) by sourceware.cygnus.com with SMTP; 7 Nov 2000 18:25:34 -0000 Received: from hermes.tconl.com (localhost [127.0.0.1]) by hermes.tconl.com (8.11.0/TeleChoice) with ESMTP id eA7IPRP17600 for ; Tue, 7 Nov 2000 12:25:27 -0600 Message-ID: <1033410560.973621526793.JavaMail.root@localhost> Date: Tue, 7 Nov 2000 12:25:26 -0600 (CST) From: jarnett To: gcc-help@gcc.gnu.org Subject: Can't find include file mips/a.out.h Mime-Version: 1.0 Content-Type: multipart/mixed; boundary=894474240.973621526788.JavaMail.root.hermes.tconl.com X-Mailer: WebMail/Java v0.7.3, SendMessage plugin v1.7 --894474240.973621526788.JavaMail.root.hermes.tconl.com Content-Type: text/plain; charset="utf-8" Content-Transfer-Encoding: quoted-printable Both mips-tfile.c and mips-tdump.c need an include file that can't be found= -- mips/a.out.h. I am attempting to build a mips-sgi-irix3 cross compiler= on a sparc-sun-solaris2.6. I have honestly searched several versions of t= he gcc tar files and the FAQs, but have not found any clues so far. If you could tell me where to find that file or even email it to me, I woul= d greatly appreciate it. Thanks, jon arnett --894474240.973621526788.JavaMail.root.hermes.tconl.com-- From gcc-help-return-4063-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 07 19:46:03 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 10020 invoked by alias); 7 Nov 2000 19:46:02 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 9975 invoked from network); 7 Nov 2000 19:46:00 -0000 Received: from pimout4-ext.prodigy.net (HELO pimout4-int.prodigy.net) (207.115.63.103) by sourceware.cygnus.com with SMTP; 7 Nov 2000 19:46:00 -0000 Received: from prodigy.net (A010-0100.BRYN.splitrock.net [64.196.232.100]) by pimout4-int.prodigy.net (8.10.1/8.10.1) with ESMTP id eA7JjuK31620 for ; Tue, 7 Nov 2000 14:45:56 -0500 Message-ID: <3A085E0C.6F0B59DA@prodigy.net> Date: Tue, 07 Nov 2000 13:54:52 -0600 From: Larry Evans X-Mailer: Mozilla 4.7 [en] (X11; I; Linux 2.2.13-4mdk i586) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: Re: g++/testsuite:WARNING: Couldn't find global config References: <3A06C0D8.3C865C7A@prodigy.net> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Alexandre Oliva wrote: > On Nov 6, 2000, Larry Evans wrote: > > > output looked suspicious when it showed: > > > WARNING: Couldn't find the global config file. > > No problem here. You just don't have the DEJAGNU environment variable > pointing to an expect script with local customizations. You don't > need it. > I restored the method.c file to that from the download on 10-31 and remade the compiler and reran the check-g++ tests and got the same result: Test Run By evansl on Tue Nov 7 12:38:12 2000 Native configuration is i586-pc-linux-gnu === g++ tests === Schedule of variations: unix Running target unix Using /usr/local/share/dejagnu/baseboards/unix.exp as board description file for target. Using /usr/local/share/dejagnu/config/unix.exp as generic interface file for target. Using /mnt/scratch/gcc-2.96/latest-cvs/gcc/gcc/testsuite/config/default.exp as tool-and-target-specific interface file. Running /mnt/scratch/gcc-2.96/latest-cvs/gcc/gcc/testsuite/g++.dg/special/ecos.exp ... FAIL: g++.dg/special/conpr-1.C execution test FAIL: g++.dg/special/conpr-2.C execution test FAIL: g++.dg/special/conpr-3.C execution test FAIL: g++.dg/special/conpr-3.C execution test Running /mnt/scratch/gcc-2.96/latest-cvs/gcc/gcc/testsuite/g++.old-deja/old-deja.exp ... FAIL: g++.ext/initp1.C Execution test FAIL: g++.ext/instantiate1.C not instantiated (test for errors, line 18) FAIL: g++.ext/instantiate1.C not instantiated (test for errors, line 20) FAIL: g++.other/crash18.C (test for excess errors) FAIL: g++.other/loop2.C caused compiler crash FAIL: g++.pt/mangle2.C (test for excess errors) === g++ Summary === # of expected passes 6051 # of unexpected failures 10 # of expected failures 94 # of untested testcases 8 /mnt/scratch/gcc-2.96/latest-cvs/obj/gcc/testsuite/../g++ version 2.97 20001031 (experimental) -------------- cut here ------------- The following is a relevant part of the g++.log file: -------------- cut here ------------- Running target unix Using /usr/local/share/dejagnu/baseboards/unix.exp as board description file for target. Using /usr/local/share/dejagnu/config/unix.exp as generic interface file for target. Using /mnt/scratch/gcc-2.96/latest-cvs/gcc/gcc/testsuite/config/default.exp as tool-and-target-specific interface file. Running /mnt/scratch/gcc-2.96/latest-cvs/gcc/gcc/testsuite/g++.dg/special/ecos.exp ... ALWAYS_CXXFLAGS set to {additional_flags=-I/mnt/scratch/gcc-2.96/latest-cvs/gcc/libstdc++ -I/mnt/scratch/gcc-2.96/latest-cvs/gcc/libstdc++/stl } {ldflags=-L/mnt/scratch/gcc-2.96/latest-cvs/obj/i586-pc-linux-gnu//libstdc++ -L/mnt/scratch/gcc-2.96/latest-cvs/obj/i586-pc-linux-gnu//libiberty } additional_flags=-fmessage-length=0 Executing on host: /mnt/scratch/gcc-2.96/latest-cvs/obj/gcc/testsuite/../g++ -B/mnt/scratch/gcc-2.96/latest-cvs/obj/gcc/testsuite/../ /mnt/scratch/gcc-2.96/latest-cvs/gcc/gcc/testsuite/g++.dg/special/conpr-1.C -I/mnt/scratch/gcc-2.96/latest-cvs/gcc/libstdc++ -I/mnt/scratch/gcc-2.96/latest-cvs/gcc/libstdc++/stl -fmessage-length=0 -I/mnt/scratch/gcc-2.96/latest-cvs/gcc/libio -I/mnt/scratch/gcc-2.96/latest-cvs/obj/i586-pc-linux-gnu/libio -L/mnt/scratch/gcc-2.96/latest-cvs/obj/i586-pc-linux-gnu//libstdc++ -L/mnt/scratch/gcc-2.96/latest-cvs/obj/i586-pc-linux-gnu//libiberty -lm -o ./a.out (timeout = 300) spawn /mnt/scratch/gcc-2.96/latest-cvs/obj/gcc/testsuite/../g++ -B/mnt/scratch/gcc-2.96/latest-cvs/obj/gcc/testsuite/../ /mnt/scratch/gcc-2.96/latest-cvs/gcc/gcc/testsuite/g++.dg/special/conpr-1.C -I/mnt/scratch/gcc-2.96/latest-cvs/gcc/libstdc++ -I/mnt/scratch/gcc-2.96/latest-cvs/gcc/libstdc++/stl -fmessage-length=0 -I/mnt/scratch/gcc-2.96/latest-cvs/gcc/libio -I/mnt/scratch/gcc-2.96/latest-cvs/obj/i586-pc-linux-gnu/libio -L/mnt/scratch/gcc-2.96/latest-cvs/obj/i586-pc-linux-gnu//libstdc++ -L/mnt/scratch/gcc-2.96/latest-cvs/obj/i586-pc-linux-gnu//libiberty -lm -o ./a.out PASS: g++.dg/special/conpr-1.C (test for excess errors) spawn [open ...] FAIL: g++.dg/special/conpr-1.C execution test -------------- cut here ------------- Do you have any ideas about what I may be doing wrong to get results different than thos in the following location? http://gcc.gnu.org/ml/gcc-testresults/2000-10/msg00290.html Also, I'm writing another test for my changes, but I don't know how to specify the required output. Could you give me some pointers? Currently, this is what I'm getting: -------------- cut here ------------- FAIL: g++.pt/mangle2.C (test for excess errors) -------------- cut here ------------- TIA From gcc-help-return-4064-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 07 20:08:24 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 19819 invoked by alias); 7 Nov 2000 20:08:23 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 19786 invoked from network); 7 Nov 2000 20:08:23 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 7 Nov 2000 20:08:23 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id MAA03653; Tue, 7 Nov 2000 12:08:15 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eA7K8BX20080; Tue, 7 Nov 2000 18:08:11 -0200 To: Larry Evans Cc: gcc-help@gcc.gnu.org Subject: Re: g++/testsuite:WARNING: Couldn't find global config References: <3A06C0D8.3C865C7A@prodigy.net> <3A085E0C.6F0B59DA@prodigy.net> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 07 Nov 2000 18:08:11 -0200 In-Reply-To: Larry Evans's message of "Tue, 07 Nov 2000 13:54:52 -0600" Message-ID: Lines: 33 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 7, 2000, Larry Evans wrote: > FAIL: g++.dg/special/conpr-1.C execution test > FAIL: g++.dg/special/conpr-2.C execution test > FAIL: g++.dg/special/conpr-3.C execution test > FAIL: g++.dg/special/conpr-3.C execution test > FAIL: g++.ext/initp1.C Execution test > FAIL: g++.ext/instantiate1.C not instantiated (test for errors, line 18) > FAIL: g++.ext/instantiate1.C not instantiated (test for errors, line 20) > FAIL: g++.other/crash18.C (test for excess errors) > FAIL: g++.other/loop2.C caused compiler crash > FAIL: g++.pt/mangle2.C (test for excess errors) These are all actual failures. > Do you have any ideas about what I may be doing wrong to get > results different than thos in the following location? Could be a number of things. A different target triplet, different optimizations used during build, a different assembler/linker, bad karma, etc :-) > Also, I'm writing another test for my changes, but I don't know how > to specify the required output. Our testsuite doesn't work by testing output. Execution tests should either exit(0) (== PASS) or abort() (== FAIL). -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4065-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 08 19:40:39 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 16527 invoked by alias); 8 Nov 2000 19:40:39 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 16494 invoked from network); 8 Nov 2000 19:40:37 -0000 Received: from web3607.mail.yahoo.com (204.71.203.111) by sourceware.cygnus.com with SMTP; 8 Nov 2000 19:40:37 -0000 Message-ID: <20001108194009.23246.qmail@web3607.mail.yahoo.com> Received: from [199.108.77.82] by web3607.mail.yahoo.com; Wed, 08 Nov 2000 11:40:09 PST Date: Wed, 8 Nov 2000 11:40:09 -0800 (PST) From: Philip Greer Reply-To: philip@tildesoftware.com Subject: Compiling gcc-2.95.2 for AIX 4.3.3 To: gcc-help@gcc.gnu.org MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii I've run into a problem with compiling gcc-2.95.2 under AIX 4.3.3 on an H70 (64bit) RS/6000. I'm compiling with IBM's C compiler, version 4.4. Besides several other warnings, here's the final syntactical error during compile that aborts the compile. ... "decl.c", line 1809.54: 1506-280 (W) Function argument assignment between types "int(*)(const void*,const void*)" and "int(*)()" is not allowed. "decl.c", line 4448.1: 1506-343 (S) Redeclaration of start_struct differs from previous declaration on line 736 of "ch-tree.h". "decl.c", line 4448.1: 1506-381 (I) The type "enum tree_code" of parameter 1 in the prototype declaration is not compatible with the corresponding parameter type "enum chill_tree_code" in the nonprototype declaration. ... Has anyone out there made some patches to gcc in order to get it to compile in this (or a similar) environment? Thanks and regards: Philip Greer whilenot1@yahoo.com pgreer@visa.com __________________________________________________ Do You Yahoo!? Thousands of Stores. Millions of Products. All in one Place. http://shopping.yahoo.com/ From gcc-help-return-4066-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 09 00:24:17 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 8580 invoked by alias); 9 Nov 2000 00:24:16 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 8549 invoked from network); 9 Nov 2000 00:24:15 -0000 Received: from mx2.utanet.at (HELO smtp1.utaiop.at) (195.70.253.46) by sourceware.cygnus.com with SMTP; 9 Nov 2000 00:24:15 -0000 Received: from multi1.utaiop.at ([10.1.1.195]) by smtp1.utaiop.at (Netscape Messaging Server 4.15) with ESMTP id G3QEG303.A4L for ; Thu, 9 Nov 2000 01:24:03 +0100 Received: from pablo1 ([212.152.226.135]) by multi1.utaiop.at (Netscape Messaging Server 4.15) with SMTP id G3QEG102.W1L for ; Thu, 9 Nov 2000 01:24:01 +0100 Message-ID: <002601c049e3$5bb0ef60$87e298d4@pablo1> From: =?iso-8859-1?Q?Pablo_H=F6rtner?= To: References: <973655870.5734.ezmlm@gcc.gnu.org> Subject: Re: ezmlm response Date: Wed, 8 Nov 2000 18:46:17 +0100 MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.50.4133.2400 Disposition-Notification-To: =?iso-8859-1?Q?Pablo_H=F6rtner?= X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4133.2400 ----- Original Message ----- From: To: Sent: Wednesday, November 08, 2000 4:57 AM Subject: ezmlm response > Hi! This is the ezmlm program. I'm managing the > gcc@gcc.gnu.org mailing list. > > Acknowledgment: The address > > pablo.hoertner@web.de > > was not on the gcc mailing list when I received > your request and is not a subscriber of this list. > > If you unsubscribe, but continue to receive mail, you're subscribed > under a different address than you currently use. Please look at the > header for: > > 'Return-Path: ' > > The unsubscribe address for this user would be: > 'gcc-unsubscribe-user=host.dom@gcc.gnu.org'. > Just mail to that address, substituting user=host.dom for the real > values, reply to the confirmation request, and you should receive a message > that you're off the list. > > For some mail programs, you need to make the headers visible to > see the return path: > > For Eudora 4.0, click on the "Blah blah ..." button. > For PMMail, click on "Window->Show entire message/header". > > If this still doesn't work, I'm sorry to say that I can't help you. > Please FORWARD a list message together with a note about what you're > trying to achieve and a list of addresses that you might be subscribed > under to my owner: > > gcc-owner@gcc.gnu.org > > who will take care of it. My owner is a little bit slower than I am, > so please be patient. > > > --- Administrative commands for the gcc list --- > > I can handle administrative requests automatically. Please > do not send them to the list address! Instead, send > your message to the correct command address: > > To subscribe to the list, send a message to: > > > To remove your address from the list, send a message to: > > > Send mail to the following for info and FAQ for this list: > > > > Similar addresses exist for the digest list: > > > > To get messages 123 through 145 (a maximum of 100 per request), mail: > > > To get an index with subject and author for messages 123-456 , mail: > > > They are always returned as sets of 100, max 2000 per request, > so you'll actually get 100-499. > > To receive all messages with the same subject as message 12345, > send an empty message to: > > > The messages do not really need to be empty, but I will ignore > their content. Only the ADDRESS you send to is important. > > You can start a subscription for an alternate address, > for example "john@host.domain", just add a hyphen and your > address (with '=' instead of '@') after the command word: > > > To stop subscription for this address, mail: > > > In both cases, I'll send a confirmation message to that address. When > you receive it, simply reply to it to complete your subscription. > > If despite following these instructions, you do not get the > desired results, please contact my owner at > gcc-owner@gcc.gnu.org. Please be patient, my owner is a > lot slower than I am ;-) > > --- Enclosed is a copy of the request I received. > > Return-Path: > Received: (qmail 5725 invoked from network); 8 Nov 2000 03:57:47 -0000 > Received: from pop3.web.de (HELO smtp.web.de) (212.227.116.81) > by sourceware.cygnus.com with SMTP; 8 Nov 2000 03:57:47 -0000 > Received: from pablo1 by smtp.web.de with smtp > (freemail 4.2.1.0 #10) id m13tMMp-005CBlC; Wed, 8 Nov 2000 04:57 +0100 > Message-ID: <00d001c04938$078c3800$1ec398d4@pablo1> > From: =?iso-8859-1?Q?Pablo_H=F6rtner?= > To: > Subject: > Date: Wed, 8 Nov 2000 00:25:59 +0100 > MIME-Version: 1.0 > Content-Type: text/plain; > charset="iso-8859-1" > Content-Transfer-Encoding: 7bit > X-Priority: 3 > X-MSMail-Priority: Normal > X-Mailer: Microsoft Outlook Express 5.50.4133.2400 > Disposition-Notification-To: =?iso-8859-1?Q?Pablo_H=F6rtner?= > X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4133.2400 > > > From gcc-help-return-4067-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 09 04:27:35 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 13675 invoked by alias); 9 Nov 2000 04:27:34 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 13643 invoked from network); 9 Nov 2000 04:27:30 -0000 Received: from pericles.ipaustralia.gov.au (202.14.186.30) by sourceware.cygnus.com with SMTP; 9 Nov 2000 04:27:30 -0000 Received: (from smap@localhost) by pericles.IPAustralia.gov.au (8.9.3/8.9.3) id PAA39885 for ; Thu, 9 Nov 2000 15:26:55 +1100 (EST) (envelope-from mikal@stillhq.com) Received: from xena.aipo.gov.au(10.0.100.52) by pericles.IPAustralia.gov.au via smap (V2.0) id xma039867; Thu, 9 Nov 00 15:26:26 +1100 Received: from localhost.localdomain (IDENT:root@disc-5-69.aipo.gov.au [10.0.5.69]) by xena.aipo.gov.au (8.9.3/8.9.3) with ESMTP id PAA77503 for ; Thu, 9 Nov 2000 15:26:26 +1100 (EST) (envelope-from mikal@stillhq.com) Received: from localhost (mikal@localhost) by localhost.localdomain (8.9.3/8.8.7) with ESMTP id OAA03902 for ; Thu, 9 Nov 2000 14:23:13 +1100 X-Authentication-Warning: localhost.localdomain: mikal owned process doing -bs Date: Thu, 9 Nov 2000 14:22:55 +1100 (EST) From: Michael Still X-Sender: mikal@localhost.localdomain To: gcc-help@gcc.gnu.org Subject: CVS access Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Hey, I followed in instructions on the website to get a CVS'ed copy of gcc, but the webpage fails to mention the need for a cvs login, and what password to use. Mikal -- Michael Still (mikal@stillhq.com) - Panda PDF Generation Library (http://www.stillhq.com/panda/) - GPG Public Key at http://www.stillhq.com/mikal.asc From gcc-help-return-4068-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 09 04:27:56 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 13961 invoked by alias); 9 Nov 2000 04:27:55 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 13923 invoked from network); 9 Nov 2000 04:27:54 -0000 Received: from pericles.ipaustralia.gov.au (202.14.186.30) by sourceware.cygnus.com with SMTP; 9 Nov 2000 04:27:54 -0000 Received: (from smap@localhost) by pericles.IPAustralia.gov.au (8.9.3/8.9.3) id PAA39920 for ; Thu, 9 Nov 2000 15:27:25 +1100 (EST) (envelope-from mikal@stillhq.com) Received: from xena.aipo.gov.au(10.0.100.52) by pericles.IPAustralia.gov.au via smap (V2.0) id xma039908; Thu, 9 Nov 00 15:27:19 +1100 Received: from localhost.localdomain (IDENT:root@disc-5-69.aipo.gov.au [10.0.5.69]) by xena.aipo.gov.au (8.9.3/8.9.3) with ESMTP id PAA77508 for ; Thu, 9 Nov 2000 15:27:19 +1100 (EST) (envelope-from mikal@stillhq.com) Received: from localhost (mikal@localhost) by localhost.localdomain (8.9.3/8.8.7) with ESMTP id OAA03984 for ; Thu, 9 Nov 2000 14:24:43 +1100 X-Authentication-Warning: localhost.localdomain: mikal owned process doing -bs Date: Thu, 9 Nov 2000 14:24:41 +1100 (EST) From: Michael Still X-Sender: mikal@localhost.localdomain To: gcc-help@gcc.gnu.org Subject: CVS access Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Sorry, it was in the middle of a sentence, so I didn't see it. My apologies. Mikal -- Michael Still (mikal@stillhq.com) - Panda PDF Generation Library (http://www.stillhq.com/panda/) - GPG Public Key at http://www.stillhq.com/mikal.asc From gcc-help-return-4069-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 09 13:05:57 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 24647 invoked by alias); 9 Nov 2000 13:05:56 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 24604 invoked from network); 9 Nov 2000 13:05:53 -0000 Received: from fencepost.gnu.org (we-refuse-to-spy-on-our-users@199.232.76.164) by sourceware.cygnus.com with SMTP; 9 Nov 2000 13:05:53 -0000 Received: from christel.tourisline.de ([62.52.74.10]) by fencepost.gnu.org with esmtp (Exim 3.16 #1 (Debian)) id 13trOn-0004J2-00 for ; Thu, 09 Nov 2000 08:05:49 -0500 Received: from tl120 (really [195.71.138.62]) by tourisline.de via smail with smtp id for ; Thu, 9 Nov 2000 14:05:48 +0100 (MET) From: "Milan Mithbaokar" To: Subject: WG: Query on bash Shell.... Date: Thu, 9 Nov 2000 14:05:58 +0100 Message-ID: <001801c04a4d$cd610a40$5282a8c0@tourisline.de> MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 8bit X-Priority: 3 (Normal) X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook CWS, Build 9.0.2416 (9.0.2910.0) Importance: Normal X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2314.1300 Hello Everybody, I have a query which I had posted on Sun Site and was directed to GNU site. Query : In almost all shells \ is treated as a specail character. e.g in Bourn shell $echo "\n" new line is printed. but when we type in bash shell it does not treat \ as a special character e.g bash$echo "\n" \n is printed.wheras in the man pages of bash it says that it treats \ as a special character. Has anybody got an ans to this. regards / Milan -----Ursprüngliche Nachricht----- Von: Casper Dik [mailto:Casper.Dik@holland.sun.com] Gesendet: Donnerstag, 9. November 2000 13:51 An: Milan Mithbaokar Betreff: Re: Query on bash Shell.... >In almost all the shells when one types echo "\n",the shell interprets \ as >a special character Ask in a GNU news group. Casper From gcc-help-return-4070-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 09 13:22:13 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 29065 invoked by alias); 9 Nov 2000 13:22:08 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 29012 invoked from network); 9 Nov 2000 13:22:04 -0000 Received: from fencepost.gnu.org (we-refuse-to-spy-on-our-users@199.232.76.164) by sourceware.cygnus.com with SMTP; 9 Nov 2000 13:22:04 -0000 Received: from runyon.cygnus.com ([205.180.230.5] helo=cygnus.com) by fencepost.gnu.org with esmtp (Exim 3.16 #1 (Debian)) id 13treT-0004oF-00 for ; Thu, 09 Nov 2000 08:22:01 -0500 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id FAA25134; Thu, 9 Nov 2000 05:21:55 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eA9DLce14091; Thu, 9 Nov 2000 11:21:38 -0200 To: "Milan Mithbaokar" Cc: Subject: Re: WG: Query on bash Shell.... References: <001801c04a4d$cd610a40$5282a8c0@tourisline.de> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 09 Nov 2000 11:21:38 -0200 In-Reply-To: "Milan Mithbaokar"'s message of "Thu, 9 Nov 2000 14:05:58 +0100" Message-ID: Lines: 30 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 9, 2000, "Milan Mithbaokar" wrote: > I have a query which I had posted on Sun Site and was directed to GNU > site. This mailing is about GCC, the GNU Compiler Collection. BASH is a separate package, and there are mailing lists and newsgroups devoted to it. > e.g in Bourn shell $echo "\n" > new line is printed. Which is quite unfortunate, because there's no way to safely echo some string on such systems. > but when we type in bash shell it does not treat \ as a special > character e.g > bash$echo "\n" > \n is printed.wheras in the man pages of bash it says that it treats > \ as a special character. Just above the table of special characters, you'll find a note that the `-e' flag should be used to enable interpretation of escape characters. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4071-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 09 14:43:25 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 1221 invoked by alias); 9 Nov 2000 14:43:25 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 1190 invoked from network); 9 Nov 2000 14:43:23 -0000 Received: from smtp2.mail.yahoo.com (128.11.68.32) by sourceware.cygnus.com with SMTP; 9 Nov 2000 14:43:23 -0000 Received: from xdialup222.dnvr.uswest.net (HELO yahoo.com) (216.160.143.222) by smtp.mail.vip.suc.yahoo.com with SMTP; 9 Nov 2000 14:43:20 -0000 X-Apparently-From: Message-ID: <3A0AAA17.6C1462C3@yahoo.com> Date: Thu, 09 Nov 2000 07:43:51 -0600 From: Batavus Reply-To: philip@tildesoftware.com X-Mailer: Mozilla 4.75 [en] (X11; U; Linux 2.2.16-22 i686) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: Re: Compiling gcc-2.95.2 for AIX 4.3.3 References: <20001108194009.23246.qmail@web3607.mail.yahoo.com> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit D'oh!! Well, I found out my problem. I was using AIX's native make utility. After I used IBM's C to compile gmake, I then used gmake on gcc (still using IBM's C) and it built it nicely. The next step is to use the newly compiled gcc to compile itself. So. If anyone else has run into problems compiling gcc under AIX - go get gmake. Philip Greer wrote: > > I've run into a problem with compiling gcc-2.95.2 under AIX 4.3.3 on an > H70 (64bit) RS/6000. I'm compiling with IBM's C compiler, version 4.4. > > Besides several other warnings, here's the final syntactical error > during compile that aborts the compile. > > ... > "decl.c", line 1809.54: 1506-280 (W) Function argument assignment > between types "int(*)(const void*,const void*)" and "int(*)()" is not > allowed. > "decl.c", line 4448.1: 1506-343 (S) Redeclaration of start_struct > differs from previous declaration on line 736 of "ch-tree.h". > "decl.c", line 4448.1: 1506-381 (I) The type "enum tree_code" of > parameter 1 in the prototype declaration is not compatible with the > corresponding parameter type "enum chill_tree_code" in the nonprototype > declaration. > ... > > Has anyone out there made some patches to gcc in order to get it to > compile in this (or a similar) environment? > > Thanks and regards: > > Philip Greer > whilenot1@yahoo.com > pgreer@visa.com > > __________________________________________________ > Do You Yahoo!? > Thousands of Stores. Millions of Products. All in one Place. > http://shopping.yahoo.com/ -- ------------------------------------------------------------------------------ Philip Greer Batavus philip@tildesoftware.com NSS# 39936 __________________________________________________ Do You Yahoo!? Talk to your friends online with Yahoo! Messenger. http://im.yahoo.com From gcc-help-return-4072-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 09 15:38:04 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 18253 invoked by alias); 9 Nov 2000 15:38:04 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 18223 invoked from network); 9 Nov 2000 15:38:03 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 9 Nov 2000 15:38:03 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id HAA01555; Thu, 9 Nov 2000 07:37:54 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eA9Fbgj18550; Thu, 9 Nov 2000 13:37:42 -0200 To: philip@tildesoftware.com Cc: gcc-help@gcc.gnu.org Subject: Re: Compiling gcc-2.95.2 for AIX 4.3.3 References: <20001108194009.23246.qmail@web3607.mail.yahoo.com> <3A0AAA17.6C1462C3@yahoo.com> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 09 Nov 2000 13:37:42 -0200 In-Reply-To: Batavus's message of "Thu, 09 Nov 2000 07:43:51 -0600" Message-ID: Lines: 12 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 9, 2000, Batavus wrote: > The next step is to use the newly compiled gcc to compile itself. That's exactly what `make bootstrap' does. If that's how you build GCC, there's no reason to build it again. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4073-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 10 09:13:36 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 19152 invoked by alias); 10 Nov 2000 09:13:35 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 19113 invoked from network); 10 Nov 2000 09:13:33 -0000 Received: from carmen.to.infn.it (192.84.137.1) by sourceware.cygnus.com with SMTP; 10 Nov 2000 09:13:33 -0000 Received: from to01xd.to.infn.it (to01xd.to.infn.it [192.84.137.11]) by carmen.to.infn.it (8.8.8/8.8.8) with ESMTP id KAA10592 for ; Fri, 10 Nov 2000 10:13:29 +0100 (MET) Received: from localhost (giraudo@localhost) by to01xd.to.infn.it (8.8.8/8.8.8) with ESMTP id KAA10621 for ; Fri, 10 Nov 2000 10:13:28 +0100 (MET) Date: Fri, 10 Nov 2000 10:13:28 +0100 (MET) From: Beppe Giraudo To: gcc-help@gcc.gnu.org Subject: ..need help Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII I am trying to install gcc-2.95.2 on my HP_uh 10.20 system, but I have the following message: ..... .... .... make[2]: Entering directory `/utenti8/lyx/gccobj/gcc' (cd intl && /usr/local/bin/make all) make[3]: Entering directory `/utenti8/lyx/gccobj/gcc/intl' make[3]: Nothing to be done for `all'. make[3]: Leaving directory `/utenti8/lyx/gccobj/gcc/intl' rm -rf include; mkdir include TARGET_MACHINE=hppa2.0-hp-hpux10.20; srcdir=`cd ../../gcc-2.95.2/gcc; pwd`; \ INSTALL_ASSERT_H=install-assert-h; SHELL=/bin/sh ;\ export TARGET_MACHINE srcdir INSTALL_ASSERT_H SHELL ; \ /bin/sh ./fixinc.sh `pwd`/include /usr/include /bin/sh: ./fixinc.sh: not found. make[2]: *** [stmp-fixinc] Error 127 make[2]: Leaving directory `/utenti8/lyx/gccobj/gcc' make[1]: *** [bootstrap-lean] Error 2 make[1]: Leaving directory `/utenti8/lyx/gccobj/gcc' make: *** [bootstrap-lean] Error 2 SOMEBODY CAN HELP ME? ********************** * GIRAUDO G. * * I.N.F.N. TORINO * * Via Sette Comuni 56* * 10125 TORINO * * xx390113160016 tel * * xx390116190665 fax * ********************** From gcc-help-return-4074-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 10 12:57:57 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 5443 invoked by alias); 10 Nov 2000 12:57:52 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 5275 invoked from network); 10 Nov 2000 12:56:58 -0000 Received: from d06lmsgate.uk.ibm.com (195.212.29.1) by sourceware.cygnus.com with SMTP; 10 Nov 2000 12:56:58 -0000 Received: from d06relay01.portsmouth.uk.ibm.com (d06relay01.portsmouth.uk.ibm.com [9.166.84.147]) by d06lmsgate.uk.ibm.COM (1.0.0) with ESMTP id MAA94144 for ; Fri, 10 Nov 2000 12:42:23 GMT From: CAMBRAJ@uk.ibm.com Received: from d06mta07.portsmouth.uk.ibm.com (d06mta08_cs0 [9.180.35.21]) by d06relay01.portsmouth.uk.ibm.com (8.8.8m3/NCO v4.95) with SMTP id MAA59694 for ; Fri, 10 Nov 2000 12:56:13 GMT Received: by d06mta07.portsmouth.uk.ibm.com(Lotus SMTP MTA v4.6.5 (863.2 5-20-1999)) id 80256993.00470EDE ; Fri, 10 Nov 2000 12:56:08 +0000 X-Lotus-FromDomain: IBMGB To: gcc-help@gcc.gnu.org Message-ID: <80256993.00470D00.00@d06mta07.portsmouth.uk.ibm.com> Date: Fri, 10 Nov 2000 12:56:03 +0000 Subject: The system does not use gcc Mime-Version: 1.0 Content-type: text/plain; charset=us-ascii Content-Disposition: inline I've compiled gcc-2.95.2 under AIX 4.3.3. It works correctly, but when I try to run the configure script to compile any application it doesn't detect gcc and g++. It stills using xlc, the IBM's c compiler. For example, when the configure is looking for a g++ it finds xlC!!!! (the IBM's C++ compiler). And I want to use g++ I'm not very experimented on this kind of problems and I'm sure that the question has a very simple answer, but... What do I have to do to make my system uses gcc instead of xlc?? Thanks Jorge From gcc-help-return-4075-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 10 14:07:24 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 29064 invoked by alias); 10 Nov 2000 14:07:24 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 29031 invoked from network); 10 Nov 2000 14:07:22 -0000 Received: from ufobi6.uni-forst.gwdg.de (134.76.192.45) by sourceware.cygnus.com with SMTP; 10 Nov 2000 14:07:22 -0000 Received: from ufobiv (ufobiv.uni-forst.gwdg.de [134.76.193.206]) by ufobi6.uni-forst.gwdg.de (8.9.0/8.9.0) with SMTP id PAA12082 for ; Fri, 10 Nov 2000 15:06:48 +0100 (MET) Message-Id: <200011101406.PAA12082@ufobi6.uni-forst.gwdg.de> From: "Helge Dzierzon" To: gcc-help@gcc.gnu.org Date: Fri, 10 Nov 2000 15:07:26 +0100 MIME-Version: 1.0 Content-type: text/plain; charset=US-ASCII Content-transfer-encoding: 7BIT Subject: gcc building on IRIX 6.3 12161207 IP32 Priority: normal X-mailer: Pegasus Mail for Win32 (v3.11) Hi helpers, I tried to build the gcc-compiler on a IRIX ufobi8 6.3 12161207 IP32. After Having a lot of warnings the builing process stopped with following message: cfe: Error: ../../../zip/gcc-2.95/gcc/f/bld.c, line 979: Syntax Error return ({ double lr; lr = (ereal_unto_float ((((c)->u.real1)))) ; (ereal_cmp ((lr), ( dconst0)) == 0) ; }) ; --------------^ cfe: Error: ../../../zip/gcc-2.95/gcc/f/bld.c, line 979: Syntax Error return ({ double lr; lr = (ereal_unto_float ((((c)->u.real1)))) ; (ereal_cmp ((lr), ( dconst0)) == 0) ; }) ; ---------------------------------------------------------------------------------- -------------------------------------------^ etc. I had a look at "bld.c" but I'm very sure that I don't understand the trouble of the compiler. TU Helge From gcc-help-return-4076-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 10 15:50:39 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 25895 invoked by alias); 10 Nov 2000 15:50:38 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 25864 invoked from network); 10 Nov 2000 15:50:38 -0000 Received: from fencepost.gnu.org (199.232.76.164) by sourceware.cygnus.com with SMTP; 10 Nov 2000 15:50:38 -0000 Received: from uhqmail1.unitedspacealliance.com ([161.40.206.13] helo=USAHQM1.unitedspacealliance.com) by fencepost.gnu.org with esmtp (Exim 3.16 #1 (Debian)) id 13uGRj-0004gH-00 for ; Fri, 10 Nov 2000 10:50:31 -0500 Received: by uhqmail1.unitedspacealliance.com with Internet Mail Service (5.5.2448.0) id ; Fri, 10 Nov 2000 09:50:30 -0600 Message-ID: From: "Larson, Janice T" To: "'help-gcc@gnu.org'" Subject: FW: C and C/C++ Date: Fri, 10 Nov 2000 09:50:22 -0600 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2448.0) Content-Type: text/plain; charset="windows-1252" I was told to forward my request to you. I would like to thank you in advance for your help. Janice Larson -----Original Message----- From: Free Software Foundation [mailto:gnu@gnu.org] Sent: Friday, November 10, 2000 12:25 AM To: Larson, Janice T Subject: Re: C and C/C++ Larson, Janice T wrote: > My name is Janice Larson. I work for Untied Space Alliance and my phone > number is 281-282-3042. I am doing a language study and need to cover > compiler reliability. I am not sure if you have a C compiler and a C/C++ > compiler. If you have two compilers I need information on both. You should send this question to the GCC users' mailing list: help-gcc@gnu.org. This is gated to the news group, gnu.gcc.help. You can subscribe to the mailing list by sending the word "subscribe" to the address help-gcc-request@gnu.org. You can find a complete list of our mailing lists and newsgroups on our web site at http://www.gnu.org/prep/mailinglists.html. Good luck and happy hacking! > PLEASE forward this to the right person. > > I was told to look at GNAT and the GNAT pages directed me to you. > > I need to know how reliable and stable the compiler(s) are. > Data on how long it has been in use. > How many bugs are open against the current version. > > Thank you for your help. > Janice Larson > > -- Bradley M. Kuhn Free Software Foundation | Phone: +1-617-542-5942 59 Temple Place, Suite 330 | Fax: +1-617-542-2652 Boston, MA 02111-1307 USA | Web: http://www.gnu.org From gcc-help-return-4077-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 10 16:17:36 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 32688 invoked by alias); 10 Nov 2000 16:17:35 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 32588 invoked from network); 10 Nov 2000 16:17:32 -0000 Received: from fencepost.gnu.org (199.232.76.164) by sourceware.cygnus.com with SMTP; 10 Nov 2000 16:17:32 -0000 Received: from mailgate2.asf.com ([207.170.76.254]) by fencepost.gnu.org with esmtp (Exim 3.16 #1 (Debian)) id 13uGrd-0005Hg-00 for ; Fri, 10 Nov 2000 11:17:17 -0500 Received: from mercury.asf.com (mercury.asf.com [207.170.76.3]) by mailgate2.asf.com (8.9.3/8.9.3) with ESMTP id KAA07426 for ; Fri, 10 Nov 2000 10:17:16 -0600 Received: by mercury.asf.com with Internet Mail Service (5.5.2650.21) id ; Fri, 10 Nov 2000 10:17:10 -0600 Message-ID: <2B0FC65846A0D311B7C800508B615BB4012EB570@mercury.asf.com> From: Thomas Burnett To: "'help-gcc@gnu.org'" Subject: How can I get off this list. Date: Fri, 10 Nov 2000 10:17:02 -0600 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2650.21) Content-Type: text/plain; charset="iso-8859-1" How can I unsubscribe to this list? From gcc-help-return-4078-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 10 17:17:01 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 17080 invoked by alias); 10 Nov 2000 17:17:01 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 17035 invoked from network); 10 Nov 2000 17:17:00 -0000 Received: from fencepost.gnu.org (we-refuse-to-spy-on-our-users@199.232.76.164) by sourceware.cygnus.com with SMTP; 10 Nov 2000 17:17:00 -0000 Received: from ns.hitt.nl ([212.206.243.122]) by fencepost.gnu.org with smtp (Exim 3.16 #1 (Debian)) id 13uHnL-00072V-00 for ; Fri, 10 Nov 2000 12:16:55 -0500 Received: (from fwmaster@localhost) by ns.hitt.nl (8.9.1a/8.6.12) id SAA22584 for ; Fri, 10 Nov 2000 18:16:52 +0100 (MET) Received: by ns.hitt.nl via smap (V1.3) id smaa14720; Fri, 10 Nov 00 18:15:09 +0100 Received: by CHOPIN with Internet Mail Service (5.5.2448.0) id ; Fri, 10 Nov 2000 16:32:13 +0100 Message-ID: <11655D647028D311A3A20008C7BB878A603469@CHOPIN> From: "Eerden, Jense van der" To: help-gcc@gnu.org Subject: creating shared object Date: Fri, 10 Nov 2000 16:32:03 +0100 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2448.0) Content-Type: text/plain L.S. I'm having a small problem and I wonder if this address is the correct entry point for questions. If not: please let me know. My problem is to create a shared object on a UNIX system. When I use your compiler/linker to create a shared object and I want to link some additional libraries with it using the -L and -l options, I still get error messages for unresolved symbols, althoug I'm sure all necessary libraries are included. Can you please give us some examples for creation of shared objects, that have to include several libraries (.a) ? Please respond..., thanks in advance From gcc-help-return-4079-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 10 18:03:58 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 1223 invoked by alias); 10 Nov 2000 18:03:58 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 1192 invoked from network); 10 Nov 2000 18:03:57 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 10 Nov 2000 18:03:57 -0000 Received: from upchuck.cygnus.com (taarna.cygnus.com [205.180.230.102]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id KAA09976 for ; Fri, 10 Nov 2000 10:03:56 -0800 (PST) Received: from upchuck (law@localhost [127.0.0.1]) by upchuck.cygnus.com (8.8.7/8.8.7) with ESMTP id LAA24154; Fri, 10 Nov 2000 11:05:08 -0700 X-Mailer: exmh version 2.0.2 To: Marco.Franzen@thyron.com cc: gcc-help@gcc.gnu.org Subject: Re: Installing snapshot on HP-UX Reply-To: law@redhat.com In-reply-to: Your message of Tue, 24 Oct 2000 16:14:12 BST. <00102416103100.00520@maidavale> From: law@redhat.com Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Date: Fri, 10 Nov 2000 11:05:08 -0700 Message-ID: <24151.973879508@upchuck> In message <00102416103100.00520@maidavale>you write: > The symptom is undefined symbols (for entirely newly compiled code; no old > objects being linked against): [This is from 1009. I tried 1016 first and > did a make install from the 1009 compilation directory afterwards. The > type of failure was the same.] > > bash-2.03$ cat > world.cpp > #include > int main() { cout << "Hello world\n"; return 0; } > bash-2.03$ ~/gnu/bin/g++ -v world.cpp -o world > Reading specs from /home/marcof/gnu/lib/gcc-lib/hppa1.1-hp-hpux10.20/2.97/s > pecs > Configured with: --prefix=/home/marcof/gnu --with-gnu-as > gcc version 2.97 20001009 (experimental) > /home/marcof/gnu/lib/gcc-lib/hppa1.1-hp-hpux10.20/2.97/cpp0 -lang-c++ -D__ > GNUG__=2 -v -D__GNUC__=2 -D__GNUC_MINOR__=97 -D__GNUC_PATCHLEVEL__=0 -Dhppa > -Dhp9000s800 -D__hp9000s800 -Dhp9k8 -DPWB -Dhpux -Dunix -D__hppa__ -D__hp9 > 000s800__ -D__hp9000s800 -D__hp9k8__ -D__PWB__ -D__hpux__ -D__unix__ -D__hp > pa -D__hp9000s800 -D__hp9k8 -D__PWB -D__hpux -D__unix -Asystem(unix) -Asyst > em(hpux) -Acpu(hppa) -Amachine(hppa) -D__STDC_HOSTED__=1 -D_PA_RISC1_1 -D__ > hp9000s700 -D_HPUX_SOURCE -D_HIUX_SOURCE -D__STDC_EXT__ world.cpp /var/tmp/ > ccmNmTwB.ii > GNU CPP version 2.97 20001009 (experimental) (cpplib) (hppa) > #include "..." search starts here: > #include <...> search starts here: > /home/marcof/gnu/include/g++-3 > /usr/local/include > /home/marcof/gnu/lib/gcc-lib/hppa1.1-hp-hpux10.20/2.97/include > /home/marcof/gnu/hppa1.1-hp-hpux10.20/include > /usr/include > End of search list. > /home/marcof/gnu/lib/gcc-lib/hppa1.1-hp-hpux10.20/2.97/cc1plus -lang-c++ / > var/tmp/ccmNmTwB.ii -quiet -dumpbase world.cpp -version -o /var/tmp/cc4Ctod > E.s > GNU C++ version 2.97 20001009 (experimental) (hppa1.1-hp-hpux10.20) compile > d by GNU C version 2.97 20001009 (experimental). > /home/marcof/gnu/lib/gcc-lib/hppa1.1-hp-hpux10.20/2.97/../../../../hppa1.1 > -hp-hpux10.20/bin/as -o /var/tmp/ccfWeoVh.o /var/tmp/cc4CtodE.s > /home/marcof/gnu/lib/gcc-lib/hppa1.1-hp-hpux10.20/2.97/collect2 -L/lib/pa1 > .1 -L/usr/lib/pa1.1 -z -u main -o world /usr/ccs/lib/crt0.o -L/home/marcof/ > gnu/lib/gcc-lib/hppa1.1-hp-hpux10.20/2.97 -L/usr/ccs/bin -L/usr/ccs/lib -L/ > opt/langtools/lib -L/home/marcof/gnu/lib/gcc-lib/hppa1.1-hp-hpux10.20/2.97/ > ../../.. /var/tmp/ccfWeoVh.o -lstdc++ -lm -lgcc -lc -lgcc > /usr/ccs/bin/ld: Unsatisfied symbols: > bad_typeid virtual table(data) > ios virtual table(data) > type_info type_info function(code) > stdiobuf virtual table(data) > type_info virtual table(data) > bad_alloc::~bad_alloc(void)(code) > bad_cast virtual table(data) > bad_typeid::~bad_typeid(void)(code) > bad_cast type_info function(code) > filebuf virtual table(data) > bad_alloc type_info function(code) > ios type_info function(code) > bad_alloc virtual table(data) > exception type_info function(code) > exception virtual table(data) > bad_cast::~bad_cast(void)(code) > bad_typeid type_info function(code) > __user_type_info type_info function(code) > collect2: ld returned 1 exit status THe first thing I would recommend doing is finding what what version of gas is being used by the compiler: /home/marcof/gnu/lib/gcc-lib/hppa1.1-hp-hpux10.20/2.97/../../../../hppa1.1-hp-h pux10.20/bin/as -v Ought to give you that tidbit. Then I would do an nm on your libgcc.a Also, did you configure with --enable-shared? My best guess is you're running into some kind of weak symbol problem. jeff From gcc-help-return-4080-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 10 18:54:59 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 23077 invoked by alias); 10 Nov 2000 18:54:58 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 23031 invoked from network); 10 Nov 2000 18:54:55 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 10 Nov 2000 18:54:55 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id KAA15578; Fri, 10 Nov 2000 10:54:10 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAAIrUG06472; Fri, 10 Nov 2000 16:53:30 -0200 To: CAMBRAJ@uk.ibm.com Cc: gcc-help@gcc.gnu.org Subject: Re: The system does not use gcc References: <80256993.00470D00.00@d06mta07.portsmouth.uk.ibm.com> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 10 Nov 2000 16:53:30 -0200 In-Reply-To: CAMBRAJ@uk.ibm.com's message of "Fri, 10 Nov 2000 12:56:03 +0000" Message-ID: Lines: 14 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 10, 2000, CAMBRAJ@uk.ibm.com wrote: > What do I have to do to make my system uses gcc instead of xlc?? i) make sure gcc and g++ are in your PATH ii) make sure CC and CXX are not set in the environment, or that they're set to gcc and g++, respectively. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4081-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 10 18:55:26 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 23377 invoked by alias); 10 Nov 2000 18:55:26 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 23335 invoked from network); 10 Nov 2000 18:55:24 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 10 Nov 2000 18:55:24 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id KAA15689; Fri, 10 Nov 2000 10:55:04 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAAIsaW06484; Fri, 10 Nov 2000 16:54:36 -0200 To: "Helge Dzierzon" Cc: gcc-help@gcc.gnu.org Subject: Re: gcc building on IRIX 6.3 12161207 IP32 References: <200011101406.PAA12082@ufobi6.uni-forst.gwdg.de> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 10 Nov 2000 16:54:36 -0200 In-Reply-To: "Helge Dzierzon"'s message of "Fri, 10 Nov 2000 15:07:26 +0100" Message-ID: Lines: 18 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 10, 2000, "Helge Dzierzon" wrote: > IP32. After Having a lot of warnings the builing process stopped with > following message: > cfe: Error: ../../../zip/gcc-2.95/gcc/f/bld.c, line 979: Syntax Error > return ({ double lr; lr = (ereal_unto_float ((((c)->u.real1)))) ; > (ereal_cmp ((lr), ( dconst0)) == 0) ; }) ; > --------------^ Use `make bootstrap'. Only the C front-end can be built with a compiler other than GCC. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4082-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 10 18:56:37 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 23854 invoked by alias); 10 Nov 2000 18:56:37 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 23754 invoked from network); 10 Nov 2000 18:56:29 -0000 Received: from fencepost.gnu.org (we-refuse-to-spy-on-our-users@199.232.76.164) by sourceware.cygnus.com with SMTP; 10 Nov 2000 18:56:29 -0000 Received: from runyon.cygnus.com ([205.180.230.5] helo=cygnus.com) by fencepost.gnu.org with esmtp (Exim 3.16 #1 (Debian)) id 13uJLV-00012L-00 for ; Fri, 10 Nov 2000 13:56:18 -0500 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id KAA15931; Fri, 10 Nov 2000 10:56:07 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAAItsu06499; Fri, 10 Nov 2000 16:55:54 -0200 To: Thomas Burnett Cc: "'help-gcc@gnu.org'" Subject: Re: How can I get off this list. References: <2B0FC65846A0D311B7C800508B615BB4012EB570@mercury.asf.com> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 10 Nov 2000 16:55:54 -0200 In-Reply-To: Thomas Burnett's message of "Fri, 10 Nov 2000 10:17:02 -0600" Message-ID: Lines: 12 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 10, 2000, Thomas Burnett wrote: > How can I unsubscribe to this list? Use the e-mail address that appears in the `List-Unsubscribe:' header in every message you receive from it. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4083-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 10 18:59:04 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 24906 invoked by alias); 10 Nov 2000 18:59:03 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 24865 invoked from network); 10 Nov 2000 18:59:00 -0000 Received: from fencepost.gnu.org (we-refuse-to-spy-on-our-users@199.232.76.164) by sourceware.cygnus.com with SMTP; 10 Nov 2000 18:59:00 -0000 Received: from runyon.cygnus.com ([205.180.230.5] helo=cygnus.com) by fencepost.gnu.org with esmtp (Exim 3.16 #1 (Debian)) id 13uJNy-00013u-00 for ; Fri, 10 Nov 2000 13:58:50 -0500 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id KAA16318; Fri, 10 Nov 2000 10:58:36 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAAIwS906540; Fri, 10 Nov 2000 16:58:28 -0200 To: "Eerden, Jense van der" Cc: help-gcc@gnu.org Subject: Re: creating shared object References: <11655D647028D311A3A20008C7BB878A603469@CHOPIN> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 10 Nov 2000 16:58:28 -0200 In-Reply-To: "Eerden, Jense van der"'s message of "Fri, 10 Nov 2000 16:32:03 +0100" Message-ID: Lines: 24 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 10, 2000, "Eerden, Jense van der" wrote: > My problem is to create a shared object on a UNIX system. When I use your > compiler/linker to create a shared object and I want to link some additional > libraries with it using the -L and -l options, I still get error messages > for unresolved symbols, althoug I'm sure all necessary libraries are > included. This is a linker issue, not a compiler issue, so a question to the binutils mailing list would probably have been more appropriate. Anyway, this is kind of a linker FAQ. The order of object files and libraries *is* relevant, and the linker does a single pass looking for undefined symbols. So, if a static library is listed *before* object files or other libraries that use symbols from it, they won't be pulled into the executable or shared library that you're creating. If static libraries have cross-dependencies, you may have to list them more than once. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4084-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 10 20:35:43 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 32233 invoked by alias); 10 Nov 2000 20:35:42 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 32203 invoked from network); 10 Nov 2000 20:35:38 -0000 Received: from mail.moene.indiv.nluug.nl (HELO moene.indiv.nluug.nl) (mail@195.109.255.217) by sourceware.cygnus.com with SMTP; 10 Nov 2000 20:35:38 -0000 Received: from localhost (moene.indiv.nluug.nl) [127.0.0.1] (toon) by moene.indiv.nluug.nl with esmtp (Exim 2.05 #1 (Debian)) id 13uJiw-0002WA-00; Fri, 10 Nov 2000 20:20:30 +0100 Message-ID: <3A0C4A7D.E28E984B@moene.indiv.nluug.nl> Date: Fri, 10 Nov 2000 20:20:29 +0100 From: Toon Moene Organization: Moene Computational Physics, Maartensdijk, The Netherlands X-Mailer: Mozilla 4.07 [en] (X11; I; Linux 2.2.12 i686) MIME-Version: 1.0 To: Helge Dzierzon CC: gcc-help@gcc.gnu.org Subject: Re: gcc building on IRIX 6.3 12161207 IP32 References: <200011101406.PAA12082@ufobi6.uni-forst.gwdg.de> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Helge Dzierzon wrote: > I tried to build the gcc-compiler on a IRIX ufobi8 6.3 12161207 > IP32. After Having a lot of warnings the builing process stopped with > following message: > > cfe: Error: ../../../zip/gcc-2.95/gcc/f/bld.c, line 979: Syntax Error ^^^ This is it. You're trying to build the Fortran Frontend of GCC using the IRIX compiler - that won't work; the FFE can only be build using gcc. Use `make bootstrap' instead of just `make' in the build directory to get this right. This _is_ explained in the installation notes, though :-) Cheers, -- Toon Moene - mailto:toon@moene.indiv.nluug.nl - phoneto: +31 346 214290 Saturnushof 14, 3738 XG Maartensdijk, The Netherlands GNU Fortran 77: http://gcc.gnu.org/onlinedocs/g77_news.html GNU Fortran 95: http://g95.sourceforge.net/ (under construction) From gcc-help-return-4085-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 13 15:15:52 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 32749 invoked by alias); 13 Nov 2000 15:15:51 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 32702 invoked from network); 13 Nov 2000 15:15:48 -0000 Received: from karman.lufmech.rwth-aachen.de (HELO lufmech.rwth-aachen.de) (@134.130.177.1) by sourceware.cygnus.com with SMTP; 13 Nov 2000 15:15:48 -0000 Received: from lufmech.rwth-aachen.de (markus@mises.lufmech.RWTH-Aachen.DE [134.130.177.107]) by lufmech.rwth-aachen.de with ESMTP (8.7.1/8.7.1) id QAA11074; Mon, 13 Nov 2000 16:15:37 +0100 (MEZ) Message-ID: <3A100599.291792CD@lufmech.rwth-aachen.de> Date: Mon, 13 Nov 2000 16:15:37 +0100 From: Markus Werle X-Mailer: Mozilla 4.5 [en] (X11; I; HP-UX B.10.20 9000/785) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: howto cvs-checkout only language specific files? Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Hi! Since gcc becomes larger and larger, I would like to checkout only the C++-part via cvs, e.g. gcc-core and gcc-g++ parts. Any hint on how to do this in a safe way? Thanks, Markus From gcc-help-return-4086-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 13 20:21:49 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 28475 invoked by alias); 13 Nov 2000 20:21:49 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 28359 invoked from network); 13 Nov 2000 20:21:46 -0000 Received: from postoffice.netsilicon.com (199.93.124.180) by sourceware.cygnus.com with SMTP; 13 Nov 2000 20:21:46 -0000 Received: by postoffice.netsilicon.com with Internet Mail Service (5.5.2650.21) id ; Mon, 13 Nov 2000 15:20:59 -0500 Message-ID: <3FEE3089984DD211ABCC00A0C9D346D0018E13CD@postoffice.netsilicon.com> From: "Fu, Jack" To: "'gcc-help@gcc.gnu.org'" Subject: arm-elf-gcc question Date: Mon, 13 Nov 2000 15:20:56 -0500 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2650.21) Content-Type: text/plain; charset="iso-8859-1" Hi All: First I want to thanks for the help that you have given me recently. I appreciated very much. As you will see, I have another problem that I cannot locate the problem. I have a simple structure defined in a header file. struct RtMib { unsigned long ipRouteDest; long ipRouteIfIndex; long ipRouteMetric1; long ipRouteMetric2; long ipRouteMetric3; long ipRouteMetric4; } When I compiled a function, I received the following message: ...... ip.h:122 two types specified in one empty declaration. This message seems to come out of the shadow_tag_warned function from the gcc compiler. Can anyone suggest how I can trace the problem to find out which two types is specified in a empty declaration? Is this caused by the duplicated names in my files or something else? void shadow_tag_warned (declspecs, warned) { .... if (found_tag > 1) error ("two types specified in one empty declaration"); .... } Thanks again for your help. Jack From gcc-help-return-4087-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 13 20:28:57 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 31561 invoked by alias); 13 Nov 2000 20:28:57 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 31522 invoked from network); 13 Nov 2000 20:28:55 -0000 Received: from mail.mry.rbd.com (HELO mry.rbd.com) (qmailr@207.204.192.35) by sourceware.cygnus.com with SMTP; 13 Nov 2000 20:28:55 -0000 Received: (qmail 8903 invoked from network); 13 Nov 2000 20:16:39 -0000 Received: from unknown (HELO developer) (208.61.212.245) by mry.rbd.com with SMTP; 13 Nov 2000 20:16:39 -0000 From: "Marcus A Martin" To: "gcc-help posting" Subject: GNU gprof Date: Mon, 13 Nov 2000 15:31:12 -0500 Message-ID: MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit X-Priority: 3 (Normal) X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook IMO, Build 9.0.2416 (9.0.2910.0) X-MimeOLE: Produced By Microsoft MimeOLE V5.00.3018.1300 Importance: Normal I have a few questions about GNU gprof to clarify its documentation and the info-gnu list suggested I ask my questions here. Any help and/or redirection to a more appropriate list would be aprreciated. According to the man page with the program it states that the program will only work with the cc compiler. However, the online documentation claims that it works with C++ code. Which piece of documentation is correct? Or are they both correct and I merely have an old version of gprof. The online documentation I found is at: http://www.tc.cornell.edu/UserDoc/Software/ProgLang/prof/ Am I looking at the same product or something different? My goal is to find a program that will enable me to perform profiling of a C++ program that makes extensive use of various shared libraries. Is GNU gprof the program for me or should I look elsewhere? Thanks in advance for the help, Marcus From gcc-help-return-4088-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 14 03:05:08 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 1763 invoked by alias); 14 Nov 2000 03:05:07 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 1704 invoked from network); 14 Nov 2000 03:05:05 -0000 Received: from unknown (HELO telesoft.com) (209.141.247.244) by sourceware.cygnus.com with SMTP; 14 Nov 2000 03:05:05 -0000 Received: from telesoft.com (standard5.telesoft.com [207.204.153.195]) by telesoft.com (8.11.0/8.11.0) with ESMTP id eAE3CVv07870; Mon, 13 Nov 2000 20:12:31 -0700 Message-ID: <3A10AB1C.B6E6678D@telesoft.com> Date: Mon, 13 Nov 2000 20:01:48 -0700 From: Scott Dudley Organization: Telesoft Corp. X-Mailer: Mozilla 4.72 [en] (X11; U; Linux 2.2.14-5.0 i686) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org, gcc@gcc.gnu.org Subject: [Fwd: aix, dlopen(NULL, .), and gcc] Content-Type: multipart/mixed; boundary="------------46AF6F653D781321A6384F3E" This is a multi-part message in MIME format. --------------46AF6F653D781321A6384F3E Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit -- Microsoft gives you Windows but Unix gives you the whole house! --------------46AF6F653D781321A6384F3E Content-Type: message/rfc822 Content-Transfer-Encoding: 7bit Content-Disposition: inline Return-Path: Received: from telesoft.com (standard5.telesoft.com [207.204.153.195]) by telesoft.com (8.11.0/8.11.0) with ESMTP id eAE2bdv07643 for ; Mon, 13 Nov 2000 19:37:39 -0700 Sender: scott@telesoft.com Message-ID: <3A10A2ED.31F8D4BD@telesoft.com> Date: Mon, 13 Nov 2000 19:26:53 -0700 From: Scott Dudley Organization: Telesoft Corp. X-Mailer: Mozilla 4.72 [en] (X11; U; Linux 2.2.14-5.0 i686) X-Accept-Language: en MIME-Version: 1.0 Newsgroups: comp.unix.programmer,comp.unix.aix,com.lang.c Subject: aix, dlopen(NULL, .), and gcc Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit X-Mozilla-Status2: 00000000 i'm using gcc 2.95.2 on aix 4.3.3 attempting to use the NULL path argument to dlopen(). i've gotten this to work flawlessly on linux but have been unsuccessful in my efforts to compile/link on aix. below are listed two source files, main.c and foo.c. i want to compile both into a.out and be able to use dlopen() and dlsym() to obtain a handle or pointer to foo(). following is excerpt from dlopen() manpage: If the value of FilePath is NULL, a value for the main application is returned. This allows dynamically loaded objects to look up symbols in the main executable, or for an application to examine symbols available within itself. main.c: #include #include int main(int argc, char **argv) { void *handle; void (*func)(void); char *error; if ((handle = dlopen (NULL, RTLD_NOW)) == NULL) { fputs (dlerror(), stderr); exit(1); } func = dlsym(handle, "foo"); if ((error = dlerror()) != NULL) { fputs(error, stderr); exit(1); } func(); dlclose(handle); return 0; } foo.c: #include void foo(void) { printf("foo()\n"); } can anyone tell me how to compile foo.c and ultimately, link both main and foo into a single executable? many thanks. --------------46AF6F653D781321A6384F3E-- From gcc-help-return-4089-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 14 03:51:09 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 15692 invoked by alias); 14 Nov 2000 03:51:08 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 15609 invoked from network); 14 Nov 2000 03:51:05 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 14 Nov 2000 03:51:05 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id TAA22748; Mon, 13 Nov 2000 19:51:01 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAE3ouN29419; Tue, 14 Nov 2000 01:50:56 -0200 To: Scott Dudley Cc: gcc-help@gcc.gnu.org, gcc@gcc.gnu.org Subject: Re: [Fwd: aix, dlopen(NULL, .), and gcc] References: <3A10AB1C.B6E6678D@telesoft.com> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 14 Nov 2000 01:50:55 -0200 In-Reply-To: Scott Dudley's message of "Mon, 13 Nov 2000 20:01:48 -0700" Message-ID: Lines: 21 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 14, 2000, Scott Dudley wrote: > i'm using gcc 2.95.2 on aix 4.3.3 attempting to use the NULL path > argument to dlopen(). i've gotten this to work flawlessly on linux but > have been unsuccessful in my efforts to compile/link on aix. Some systems require certain options to be given to the linker to allow a program or library to be dlopened. I don't know whether that's the case of AIX. I suggest that you try to link your program using GNU libtool, with the flag -export-dynamic, that will be translated to whatever magic is required for a program or library to be dlopen-able. As a matter of fact, this has nothing to do with which compiler you're using, so this question doesn't belong in a GCC forum. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4090-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 14 04:01:22 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 6045 invoked by alias); 14 Nov 2000 04:01:22 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 5578 invoked from network); 14 Nov 2000 04:00:39 -0000 Received: from igw8.watson.ibm.com (198.81.209.20) by sourceware.cygnus.com with SMTP; 14 Nov 2000 04:00:39 -0000 Received: from sp1n189at0.watson.ibm.com (sp1n189at0.watson.ibm.com [9.2.104.62]) by igw8.watson.ibm.com (8.9.3/8.9.3/05-14-1999) with ESMTP id XAA11024; Mon, 13 Nov 2000 23:00:30 -0500 Received: from mal-ach.watson.ibm.com (mal-ach.watson.ibm.com [9.2.223.70]) by sp1n189at0.watson.ibm.com (8.9.3/Feb-20-98) with ESMTP id XAA41432; Mon, 13 Nov 2000 23:00:30 -0500 Received: from watson.ibm.com (localhost [127.0.0.1]) by mal-ach.watson.ibm.com (AIX4.3/8.9.3/8.9.3/01-10-2000) with ESMTP id XAA28414; Mon, 13 Nov 2000 23:00:29 -0500 Message-Id: <200011140400.XAA28414@mal-ach.watson.ibm.com> To: Scott Dudley cc: gcc-help@gcc.gnu.org, gcc@gcc.gnu.org Subject: Re: aix, dlopen(NULL, .), and gcc In-Reply-To: Message from Scott Dudley of "Mon, 13 Nov 2000 20:01:48 MST." <3A10AB1C.B6E6678D@telesoft.com> Date: Mon, 13 Nov 2000 23:00:29 -0500 From: David Edelsohn >>>>> Scott Dudley writes: Scott> i'm using gcc 2.95.2 on aix 4.3.3 attempting to use the NULL path Scott> argument to dlopen(). i've gotten this to work flawlessly on linux but Scott> have been unsuccessful in my efforts to compile/link on aix. below are Scott> listed two source files, main.c and foo.c. i want to compile both into Scott> a.out and be able to use dlopen() and dlsym() to obtain a handle or Scott> pointer to foo(). following is excerpt from dlopen() manpage: Scott> If the value of FilePath is NULL, a value for the main application is Scott> returned. This allows dynamically loaded objects to look up symbols in Scott> the main executable, or for an application to examine symbols available Scott> within itself. Scott> can anyone tell me how to compile foo.c and ultimately, link both main Scott> and foo into a single executable? For dlopen() [and the underlying AIX load()] functions to work, the symbols must be visible. You either need to explicitly export the symbols you will inquire with GCC -Wl,-bE:symbols.exp where symbols.exp contains a single line: foo or use -Wl,-bexpall which will work in this case but may cause problems in more complicated settings. David From gcc-help-return-4091-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 14 05:22:36 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 26811 invoked by alias); 14 Nov 2000 05:22:33 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 26749 invoked from network); 14 Nov 2000 05:22:30 -0000 Received: from unknown (HELO telesoft.com) (209.141.247.244) by sourceware.cygnus.com with SMTP; 14 Nov 2000 05:22:30 -0000 Received: from telesoft.com (standard5.telesoft.com [207.204.153.195]) by telesoft.com (8.11.0/8.11.0) with ESMTP id eAE5Tpv08647; Mon, 13 Nov 2000 22:29:51 -0700 Message-ID: <3A10CB4A.5E433F3A@telesoft.com> Date: Mon, 13 Nov 2000 22:19:07 -0700 From: Scott Dudley Organization: Telesoft Corp. X-Mailer: Mozilla 4.72 [en] (X11; U; Linux 2.2.14-5.0 i686) X-Accept-Language: en MIME-Version: 1.0 To: David Edelsohn CC: gcc-help@gcc.gnu.org, gcc@gcc.gnu.org Subject: Re: aix, dlopen(NULL, .), and gcc References: <200011140400.XAA28414@mal-ach.watson.ibm.com> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit David Edelsohn wrote: > >>>>> Scott Dudley writes: > > Scott> i'm using gcc 2.95.2 on aix 4.3.3 attempting to use the NULL path > Scott> argument to dlopen(). i've gotten this to work flawlessly on linux but > Scott> have been unsuccessful in my efforts to compile/link on aix. below are > Scott> listed two source files, main.c and foo.c. i want to compile both into > Scott> a.out and be able to use dlopen() and dlsym() to obtain a handle or > Scott> pointer to foo(). following is excerpt from dlopen() manpage: > > Scott> If the value of FilePath is NULL, a value for the main application is > Scott> returned. This allows dynamically loaded objects to look up symbols in > Scott> the main executable, or for an application to examine symbols available > Scott> within itself. > > Scott> can anyone tell me how to compile foo.c and ultimately, link both main > Scott> and foo into a single executable? > > For dlopen() [and the underlying AIX load()] functions to work, > the symbols must be visible. You either need to explicitly export the > symbols you will inquire with GCC -Wl,-bE:symbols.exp where symbols.exp > contains a single line: that was it! many thanks david. > > > foo > > or use -Wl,-bexpall which will work in this case but may cause problems in > more complicated settings. > > David -- Microsoft gives you Windows but Unix gives you the whole house! From gcc-help-return-4092-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 14 05:48:33 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 492 invoked by alias); 14 Nov 2000 05:48:31 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 427 invoked from network); 14 Nov 2000 05:48:27 -0000 Received: from bastion.energex.com.au (147.209.142.2) by sourceware.cygnus.com with SMTP; 14 Nov 2000 05:48:27 -0000 Received: by bastion.energex.com.au; (8.8.8/GJW030998a) id PAA28178; Tue, 14 Nov 2000 15:47:53 +1000 (EST) Received: from newman.energex.com.au(147.209.206.13) by bastion.energex.com.au via smap (smtp gateway apd20000403a) id xma017752; Tue, 14 Nov 00 15:47:40 +1000 Received: from dux.seqeb.gov.au (unverified) by newman.seqeb.gov.au (Content Technologies SMTPRS 4.1.2) with SMTP id for ; Tue, 14 Nov 2000 15:47:38 +1000 Received: from dud.seqeb.gov.au by dux.seqeb.gov.au (8.8.8/apd19991206a) id PAA0000025550; Tue, 14 Nov 2000 15:47:36 +1000 (EST) Received: from energex.com.au by dud.seqeb.gov.au (8.8.8/apd2000212a) id PAA0000003220; Tue, 14 Nov 2000 15:47:14 +1000 (EST) Message-ID: <3A10D1DA.A7361004@energex.com.au> Date: Tue, 14 Nov 2000 15:47:06 +1000 From: Anthony Lee X-Mailer: Mozilla 4.5 [en] (WinNT; I) X-Accept-Language: en,zh,zh-CN,zh-TW MIME-Version: 1.0 To: GCC Help Subject: squangle for 2.81? Content-Type: text/plain; charset=big5 Content-Transfer-Encoding: 7bit Dear all, I thought I had gcc 2.95.2 working on our Digital Unix 4.0D but when compiling a particular library. It gave a compiler internal error. The error was apparently, in the except.c code. I am now trying to build with gcc 2.81 but I am again encountering the problem that I solved earlier using the -fsquangle switch in 2.95.2. Could some please tell me if there is an equivalent -fsquangle switch in 2.81? Thank you -- Anthony Lee Energex 150 Charlotte Street ..-- __o Brisbane ....-- _ \<,_ Qld 4000 ____ (_)/ (_) Australia voice:+61 7 3407 4541 fax: +61 7 3407 4607 email: AL012@energex.com.au ----------------------------------------------------------------------------------------------------------------------------------------------------- This email message (and any accompanying file attachments) may contain confidential or privileged information and is intended for the sole use of the addressee named above. If you are not the intended recipient, or the person responsible for delivering this message to the intended recipient, please notify ENERGEX immediately and destroy any copies of the original message. Any unauthorised review, use, alteration, disclosure or distribution of this email (including any attachments) by an unintended recipient is prohibited. ENERGEX accepts no responsibility for the content of any email which is sent by an employee which is of a personal nature. From gcc-help-return-4093-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 14 06:21:08 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 7937 invoked by alias); 14 Nov 2000 06:21:08 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 7907 invoked from network); 14 Nov 2000 06:21:07 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 14 Nov 2000 06:21:07 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id WAA29025; Mon, 13 Nov 2000 22:21:04 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAE6KxX02304; Tue, 14 Nov 2000 04:20:59 -0200 To: Anthony Lee Cc: GCC Help Subject: Re: squangle for 2.81? References: <3A10D1DA.A7361004@energex.com.au> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 14 Nov 2000 04:20:57 -0200 In-Reply-To: Anthony Lee's message of "Tue, 14 Nov 2000 15:47:06 +1000" Message-ID: Lines: 12 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 14, 2000, Anthony Lee wrote: > Could some please tell me if there is an equivalent -fsquangle > switch in 2.81? There isn't. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4094-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 14 17:39:37 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 21894 invoked by alias); 14 Nov 2000 17:39:37 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 21847 invoked from network); 14 Nov 2000 17:39:26 -0000 Received: from web3501.mail.yahoo.com (204.71.203.68) by sourceware.cygnus.com with SMTP; 14 Nov 2000 17:39:26 -0000 Message-ID: <20001114173840.28628.qmail@web3501.mail.yahoo.com> Received: from [195.35.44.194] by web3501.mail.yahoo.com; Tue, 14 Nov 2000 09:38:40 PST Date: Tue, 14 Nov 2000 09:38:40 -0800 (PST) From: Rahul Sharma Subject: Address Change ! To: gcc-help@gcc.gnu.org MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Hi, Please change my subscription address from maxutilpvt@yahoo.com to maxutillinux@yahoo.com . thanx. Regards Rahul Sharma. __________________________________________________ Do You Yahoo!? Yahoo! Calendar - Get organized for the holidays! http://calendar.yahoo.com/ From gcc-help-return-4095-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 14 17:54:14 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 27617 invoked by alias); 14 Nov 2000 17:54:14 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 27552 invoked from network); 14 Nov 2000 17:54:09 -0000 Received: from ns.arraycomm.com (HELO bastion.arraycomm.com) (199.74.167.5) by sourceware.cygnus.com with SMTP; 14 Nov 2000 17:54:09 -0000 Received: (from root@localhost) by bastion.arraycomm.com (8.9.3/8.9.3) id JAA08122 for ; Tue, 14 Nov 2000 09:52:43 -0800 (PST) Received: from lester.arraycomm.com(172.16.0.17) by bastion.arraycomm.com via smap (V2.0) id xma008043; Tue, 14 Nov 00 09:52:28 -0800 Received: from lester.arraycomm.com (localhost [127.0.0.1]) by lester.arraycomm.com (8.9.3+Sun/8.9.3) with ESMTP id JAA14953 for ; Tue, 14 Nov 2000 09:52:28 -0800 (PST) Message-Id: <200011141752.JAA14953@lester.arraycomm.com> X-Mailer: exmh version 2.2 06/23/2000 with nmh-1.0 To: gcc-help@gcc.gnu.org Subject: libstdc++-2.90.8 not buing built on Solaris Reply-To: Timothy Demarest Organization: ArrayComm, Inc. X-url: http://www.arraycomm.com X-Face: )?{NA%l9H>K'M[ioZs@Nd%.($`3'%ppn*~@nI[Zr~9ec8-i8@@U/lVB>\[J9ESNh a52]aP'[4Qw6*)yBu[V8-C#V%>oY^#o]H@Jn:3"0I2OQiDmeh/Xk1b311'wd`+9rJ=XMaruKy`UT Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Date: Tue, 14 Nov 2000 09:52:28 -0800 From: Timothy Demarest Has anyone successfully compiled and installed the libstdc++-2.90.8 library with gcc-2.95.2 on Solaris 2.5.1? I've looked thorugh the list archive, and I see other people who have similar problems, but nobody has stepped forward to clear up the confusion. I've followed the instructions found at the libstdc++ web site (they are fairly clear and definitely strightforward), but during the build process the libstdc++-v3 library is never built. Any ideas? Tim -- Timothy Demarest ArrayComm, Inc. demarest@arraycomm.com 2480 North 1st Street, Suite 200 http://www.arraycomm.com San Jose, CA 95131 From gcc-help-return-4096-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 14 18:10:01 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 2975 invoked by alias); 14 Nov 2000 18:10:01 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 2911 invoked from network); 14 Nov 2000 18:09:57 -0000 Received: from mercury.sun.com (192.9.25.1) by sourceware.cygnus.com with SMTP; 14 Nov 2000 18:09:57 -0000 Received: from sunfra.France.Sun.COM ([129.157.188.1]) by mercury.Sun.COM (8.9.3+Sun/8.9.3) with ESMTP id KAA02103 for ; Tue, 14 Nov 2000 10:09:53 -0800 (PST) Received: from odin.France.Sun.COM (odin [129.157.192.2]) by sunfra.France.Sun.COM (8.8.8+Sun/8.8.8/ENSMAIL,v1.7) with SMTP id TAA20858 for ; Tue, 14 Nov 2000 19:09:51 +0100 (MET) Received: from france.sun.com by odin.France.Sun.COM (SMI-8.6/SMI-SVR4) id TAA02388; Tue, 14 Nov 2000 19:09:50 +0100 Message-ID: <3A117FE7.6624EEC7@france.sun.com> Date: Tue, 14 Nov 2000 19:09:43 +0100 From: Philippe Gamba - Sun Microsystems X-Mailer: Mozilla 4.7 [en] (X11; I; SunOS 5.8 sun4u) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: Versions compatibility questions Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Hello, Using gcc on Solaris (2.5.1, 2.6 or 2.8), I would like to understand 2 differences between the 2 versions of gcc I work with : "oldest" one : 2.7.2.1 "newest" one : egcs-2.91.66 If I link with 2.7.2.1, the binary generated has very few symbols in dynsym (dynamic symbol table). That provoques run-time linker to fail because of 'unresolved symbol'error. If I link with egcs-2.91.66, the binary generated has a complete dynsym. The run-time linker succeeds. But I cannot compile with my usual options that are : $ /usr/gnu/bin/gcc -c -MDupdate SunOS5.6_DBG.OBJ/.md .c $ gcc: unrecognized option `-MDupdate' This option is correct with 2.7.2.1 - why 2.7.2.1 does not generate a full dynsym ? - why egcs-2.91.66 does not understand -MDupdate ? and more over what is the best solution to have both working ? Thanks a lot for any explanation, Philippe From gcc-help-return-4097-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 15 00:33:46 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 25933 invoked by alias); 15 Nov 2000 00:33:45 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 25764 invoked from network); 15 Nov 2000 00:32:59 -0000 Received: from bastion.energex.com.au (147.209.142.2) by sourceware.cygnus.com with SMTP; 15 Nov 2000 00:32:59 -0000 Received: by bastion.energex.com.au; (8.8.8/GJW030998a) id KAA25778; Wed, 15 Nov 2000 10:32:23 +1000 (EST) Received: from newman.energex.com.au(147.209.206.13) by bastion.energex.com.au via smap (smtp gateway apd20000403a) id xma020013; Wed, 15 Nov 00 10:32:15 +1000 Received: from dux.seqeb.gov.au (unverified) by newman.seqeb.gov.au (Content Technologies SMTPRS 4.1.2) with SMTP id for ; Wed, 15 Nov 2000 10:32:14 +1000 Received: from dud.seqeb.gov.au by dux.seqeb.gov.au (8.8.8/apd19991206a) id KAA0000000576; Wed, 15 Nov 2000 10:32:13 +1000 (EST) Received: from energex.com.au by dud.seqeb.gov.au (8.8.8/apd2000212a) id KAA0000016996; Wed, 15 Nov 2000 10:31:50 +1000 (EST) Message-ID: <3A11D96B.F50126DA@energex.com.au> Date: Wed, 15 Nov 2000 10:31:39 +1000 From: Anthony Lee X-Mailer: Mozilla 4.5 [en] (WinNT; I) X-Accept-Language: en,zh,zh-CN,zh-TW MIME-Version: 1.0 To: GCC Help Subject: GNU Assembler? Content-Type: text/plain; charset=big5 Content-Transfer-Encoding: 7bit Dear all, Is it true that it is currently not possible to build GNU Assembler on Digital Unix 4.0D? I tried searching FAQ but couldn't get any results using the key words "Digital Unix". Thank you -- Anthony Lee Energex 150 Charlotte Street ..-- __o Brisbane ....-- _ \<,_ Qld 4000 ____ (_)/ (_) Australia voice:+61 7 3407 4541 fax: +61 7 3407 4607 email: AL012@energex.com.au ----------------------------------------------------------------------------------------------------------------------------------------------------- This email message (and any accompanying file attachments) may contain confidential or privileged information and is intended for the sole use of the addressee named above. If you are not the intended recipient, or the person responsible for delivering this message to the intended recipient, please notify ENERGEX immediately and destroy any copies of the original message. Any unauthorised review, use, alteration, disclosure or distribution of this email (including any attachments) by an unintended recipient is prohibited. ENERGEX accepts no responsibility for the content of any email which is sent by an employee which is of a personal nature. From gcc-help-return-4098-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 15 01:03:13 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 914 invoked by alias); 15 Nov 2000 01:03:12 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 881 invoked from network); 15 Nov 2000 01:03:10 -0000 Received: from gutmans.chek.com (HELO mailrelay1.chek.com) (208.197.227.23) by sourceware.cygnus.com with SMTP; 15 Nov 2000 01:03:10 -0000 Received: (qmail 4227 invoked from network); 15 Nov 2000 01:03:04 -0000 Received: from purina.chek.com (208.197.227.8) by mailrelay1.chek.com with SMTP; 15 Nov 2000 01:03:04 -0000 Received: (qmail 21242 invoked by uid 99); 15 Nov 2000 01:01:48 -0000 Date: 15 Nov 2000 01:01:48 -0000 Message-ID: <20001115010148.21241.qmail@purina.chek.com> From: "John Kyle" To: gcc-help@gcc.gnu.org X-Originating-IP: [129.109.232.2] Subject: installation Sorry for the typical subject line. Well, I'm a student in high school, and I take a computer science course that uses c++. I heard gcc was a good compiler, but i can't figure out how to 'build' the damned thing. i assume from what i read that i need a fortran compiler, and i can't seem to find one in the subdirectories i unzipped the gcc stuff, so i assume i have to download one? what do i do then? also, do i have to be running unix/linux for this to work? i would appreciate any response so that i know someone acrually recieved this email. if it's too complicated and you don't feel like explaining, i understand. heheheh. -------------------------------------------------- Totally Amazing Search Results - Just C4 Yourself! http://www.C4.com - Total Search Technology From gcc-help-return-4099-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 15 06:53:50 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 10681 invoked by alias); 15 Nov 2000 06:53:49 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 10568 invoked from network); 15 Nov 2000 06:53:30 -0000 Received: from unknown (HELO aints2.asiainfo.com) (211.100.11.6) by sourceware.cygnus.com with SMTP; 15 Nov 2000 06:53:30 -0000 Received: from yangyy (61.156.4.77 [61.156.4.77]) by aints2.asiainfo.com with SMTP (Microsoft Exchange Internet Mail Service Version 5.5.2650.21) id W7BMX1B1; Wed, 15 Nov 2000 14:53:45 +0800 Message-ID: <008001c04ed0$e25d8e00$4d049c3d@yangyy> From: "Yiyan Yang" To: , Cc: "Yiyan Yang" Subject: Where can I find a list of gcc option? Date: Wed, 15 Nov 2000 14:53:48 +0800 MIME-Version: 1.0 Content-Type: multipart/related; type="multipart/alternative"; boundary="----=_NextPart_000_0077_01C04F13.DCB29D40" X-Priority: 1 X-MSMail-Priority: High X-Mailer: Microsoft Outlook Express 5.00.2919.6700 Disposition-Notification-To: "Yiyan Yang" X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6700 This is a multi-part message in MIME format. ------=_NextPart_000_0077_01C04F13.DCB29D40 Content-Type: multipart/alternative; boundary="----=_NextPart_001_0078_01C04F13.DCB29D40" ------=_NextPart_001_0078_01C04F13.DCB29D40 Content-Type: text/plain; charset="gb2312" Content-Transfer-Encoding: base64 yvfStg0KDQpIaSwNCkknbSBhIG5vdmljZSwgSSB3YW50IHRvIGdldCBhIGxpc3Qgb2YgYWxsIG9w dGlvbiBzdXBwb3J0ZWQgYnkgR0NDMi45NSwgd2hvIGNhbiBnaXZlIG1lIGEgc3VnZ2VzdGlvbj8N Cg0KVGhhbmtzIQ0KDQoNCkVkd2FyZCBZYW5nDQoNCkFJU1ctUFNPIE5PUlRIIERlcC4NCkFzaWFp bmZvIFRlY2hub2xvZ2llcyAoQ2hpbmEpLCBJbmMuDQpFLU1haWw6IG5mb3JpdXNlQDI2My5uZXQN Cg0K ------=_NextPart_001_0078_01C04F13.DCB29D40 Content-Type: text/html; charset="gb2312" Content-Transfer-Encoding: base64 PCFET0NUWVBFIEhUTUwgUFVCTElDICItLy9XM0MvL0RURCBIVE1MIDQuMCBUcmFuc2l0aW9uYWwv L0VOIj4NCjxIVE1MPjxIRUFEPjxUSVRMRT7K99K2PC9USVRMRT4NCjxNRVRBIGNvbnRlbnQ9InRl eHQvaHRtbDsgY2hhcnNldD1nYjIzMTIiIGh0dHAtZXF1aXY9Q29udGVudC1UeXBlPjxCQVNFIA0K aHJlZj0iZmlsZTovL0c6XFByb2dyYW0gRmlsZXNcQ29tbW9uIEZpbGVzXE1pY3Jvc29mdCBTaGFy ZWRcU3RhdGlvbmVyeVwiPg0KPFNUWUxFPkJPRFkgew0KCUNPTE9SOiAjOTkzMzAwOyBGT05ULUZB TUlMWTogy87M5SwgQXJpYWwsIEhlbHZldGljYTsgRk9OVC1TSVpFOiA5cHQ7IE1BUkdJTi1MRUZU OiAxNXB4OyBNQVJHSU4tVE9QOiAyNXB4DQp9DQo8L1NUWUxFPg0KDQo8TUVUQSBjb250ZW50PSJN U0hUTUwgNS4wMC4yOTIwLjAiIG5hbWU9R0VORVJBVE9SPjwvSEVBRD4NCjxCT0RZIGJhY2tncm91 bmQ9Y2lkOjAwNzYwMWMwNGVkMCRjZTg3YmMyMCQ0ZDA0OWMzZEB5YW5neXkgYmdDb2xvcj0jZmZm ZmZmPg0KPENFTlRFUj48SU1HIGFsaWduPWJvdHRvbSANCnNyYz0iY2lkOjAwNzUwMWMwNGVkMCRj ZTdkMGRjMCQ0ZDA0OWMzZEB5YW5neXkiPjwvQ0VOVEVSPg0KPFA+PC9QPg0KPERJVj4NCjxESVY+ PEZPTlQgZmFjZT3LzszlIHNpemU9ND5IaSw8L0ZPTlQ+PC9ESVY+DQo8RElWPjxGT05UIGZhY2U9 y87M5SBzaXplPTQ+SSdtIGEgbm92aWNlLCBJIHdhbnQgdG8gZ2V0IGEgbGlzdCBvZiBhbGwgb3B0 aW9uIA0Kc3VwcG9ydGVkIGJ5IEdDQzIuOTUsIHdobyBjYW4gZ2l2ZSBtZSBhIHN1Z2dlc3Rpb24/ PC9GT05UPjwvRElWPg0KPERJVj4mbmJzcDs8L0RJVj4NCjxESVY+PEZPTlQgZmFjZT3LzszlIHNp emU9ND5UaGFua3MhPC9GT05UPjwvRElWPg0KPERJVj4mbmJzcDs8L0RJVj48L0RJVj4NCjxESVY+ Jm5ic3A7PC9ESVY+DQo8RElWPkVkd2FyZCBZYW5nPC9ESVY+DQo8RElWPiZuYnNwOzwvRElWPg0K PERJVj5BSVNXLVBTTyBOT1JUSCBEZXAuPEJSPkFzaWFpbmZvIFRlY2hub2xvZ2llcyAoQ2hpbmEp LCBJbmMuPEJSPkUtTWFpbDogPEEgDQpocmVmPSJtYWlsdG86eW5mb3JpdXNlQDI2My5uZXRhbmd5 eUBhc2lhaW5mby5jb20iPm5mb3JpdXNlQDI2My5uZXQ8L0E+PC9ESVY+DQo8UD48L1A+PC9CT0RZ PjwvSFRNTD4NCg== ------=_NextPart_001_0078_01C04F13.DCB29D40-- ------=_NextPart_000_0077_01C04F13.DCB29D40 Content-Type: image/gif; name="=?gb2312?B?yvfSti5naWY=?=" Content-Transfer-Encoding: base64 Content-ID: <007501c04ed0$ce7d0dc0$4d049c3d@yangyy> R0lGODlhWAI8ANX/AP+ZM/9mAMzMM8yZZsyZM8yZAMxmZsxmM8xmAMwzM8wzAMDAwJmZZpmZM5mZ AJlmZplmM5lmAJkzZpkzM5kzAJkAAGZmZmZmM2ZmAGYzZmYzM2YzAGYAADNmMzMzMzMzADMAMzMA AAAzAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACH5BAEAAAsALAAAAABYAjwAQAb/wIVw SCwaj0hh4PFIOp/QqHRKrVqv2Kx2y+16v+CweEwum0foywVigajfl8ca/pbT7+/DW3Ph3+V2eG5q gYN0g2yGcXN4go11i42Kaol/jHSBj5qElpKQlI5rbXByk5aZoIqAj26ti6aIo5ibd6azqHCGhaGV kLakl7OQuG+TvcC2xJq/xYeyyHjKrJurnpygtZTPx6+0zZrVF2jjIw8Wn3cWTBQIEe7vFPEUEfPv CBQAEQjt7+788PLcVVDjp8+bZ3AQYrLlhg8Ec4P8nNNwTtsyQhDcVGT08BefBxAy1HkoxyHITBuv FdTkh9tBZmrU6crER6TBiARF0QIEgY+F/5VxWrWRkxKkzaBMbkLMeWHiRjbeWiqMCbMpSIJXKTKt 46cgVG/m0NGRuSfo0ZMl1yw1WFFkRTZAr+Ihm9PoSJAtHxQ82XCiTlpSbU3dRDfoR7nA1PYMJo5c uY2Z3ClwV4+eP3sFDhAgMJlfhQIQIhygHGHAAQcQEDgoEKEzhAMcPHyQTduDBtt9ftZdHHN34j6Z ThpkqjuhK4N4m/4ZJPzt1uFyVeVs8zYrZEZAMVX8KD0dJb3I4QA9lwHu2ONebxpK2dRPoOJMo5N6 OHw4fKrYwW0P+juhNveNDHVTI6U8F8d10aAnHkbYYGSOT/YVtF9SFdmhkYJl8bfGSu4xl/8hNPVF M+Ev9zVF33BHqRXJSISAZ5xjI1CS0VjK8VOAappBQAACN+pDwGjzyMPPPhEQUEADBOhjmT4QFOAA Ag2086MCDdA2Wx/ZSbighLbw0VUkBe01H04zqnEUhMD1Nx9HIDXU2yF2hBPUIKMANYlEH/knTV2I EaWWmCMZciFKX3V0UHvs8YdIm9NB5Z6LK87ZjJ104BnpOajkxRsc5ZW0XqSMUtKShoeGdc1ybJYJ IHQPTJCol2pykmhSzMXVS0etihVqnYds+aaJXCIFU3NlbQRhIDCW6ZZyBO3jgJEOVHbZBh54sMGS Qv4zWQRO3hNBBQG1piQ7EWww220f3Jb/Iazh5SRRWYGwe868+dFohwYnUlXdJBUlSlVaOBl3r3LH 9YZKvqSE6R95Mu53mCmY7hGqnrmYyOhiGnWF8Fz0OWRgWngZai+c0Sh8KMNrfKUcvh/fOrEwxYh8 FMqXZGfxgCEuwp0Gwp0aIr0Z7ZdOx4zd7LFVEEeq4h9fvtviXoloxW5GA/8l8tJwwIhcxia2YQgf tllZ22yWxUOP2RQoEBAFss02Gwjnnlvt3LLd5kFZHQ7MhFZIobS1Lk9h8ihFIZlYJicimXT4QXyv aHOpAXMVk152eZ0TfcXh+iuzoGjJUL2Q+ER54Rb6xlZHiszbuMqEgc6J6DwXbrlS7X13/2JKKVU1 yjmDpPg6sJXjlBSsJAXsVDH+TpMzRnyf5Ffvyv2E4E3Sf7N86HGM7paqKj7FRMEmzndsNkcjRqBB 45hRBAPg0iPEAxE0oP789Ndv//3456///vz37///SUAABABIwAIa8IAITKACF8hALozjPG6omvfM ZzA6EIBDlTHbt8xWHwEZDhcebNwiKBhBVASHQBiyWPIsJ8FifM87JnxhrxQDOg96DYQnQhOYfhVB VIEjhUNpC3/ugymfCI+CyjFhrBgUORtSbWgDQ5DT5mDCTaEFajXE3NB6aB8XIjFi/VFGcB7ShvTQ yYtJ89PmfMbErThxYzdji1h2yDkufv+sPh1ihNbCpJCMZLAy2+IWAiYQpMmww48EGECQ0sZIdvyR HkOiAJbYJZ4S5cQmebpA4jp4tZdEkW9f8hsp5pU67v2GkjpkUfZ8IsJDubEsmIzEURRBya0B6l/T 4ZvQ8BXFQiWnN8aCGSWHArEcImouHwpmLO0wy0oxZTyx64OH2MK3WEaOcI+YXVzw5sliFoib7VqJ NoV5R3dVg5X+CuavalKXN1WNMV9KneC+M53GkMOUvGuJGyZgowP4UzSaeUcBWHO2doRmH6n5xwEQ MBooNVQzBPjAB0BQm7pV65nDyaRBbGYrQRjxfO3Sl+26SC+OAcwvDQqm0NSExEjJSzn/ZwFngBwn w04sJJUMQoomBHS0be6skyxNhq+ip8k5SvNj30QdSF2oLE7lInm47OksHNKTnrmUpPj6is2CeDSB 4aymMMspObOTHO7sLkMkOccELEJDetIBRifMhZLo4QBujaZbTdoMAipgSEdSgDWrAU079hGks4kr AqFhB4/cpoEO3I1zH/XPwypEVOSoMa7nWQ4rF+KgioXIiJ5KzKrUEloVRS4aC1krG/GzOEiNJ3od jRykcFmfEi6oUllRRdAyGpPYGiisQVGt0lg7HBIRjSHfjMv0OHvaPLLsLii11JseJpZRnNZMJ5ot QTr2NZJdl5wgUS2hxJdEV/LmYHHS/y5ItNYKVIDxApB0wAF6IlG4VYts8shvP/hRDwy4zQMhuEA8 MJDfe0i0WtTKDThaGomUwIqyTIVKJgwlwhA2IylGxYgslJqzlk4YMYvJHVh/gynICM0uDgIZpD4s qK08UU/XmdVxOAwgyKw4FyBOZfGWWuI6eK8v6HhtcHLMCQq+d7htVAxOqEMKvUDmF8RQ43w2HJek nuSWbd0Q50gLkzIeZHR7SkTPRAie98LozGhOM5pD0I55VOAeQopHBdRM5zrb+c54zrOe98znPvv5 z4AOtKAHTehCG/rQiE60ohddvx0xoIGQjrSkJ03pSlu6gYt2zAcmkOlOe/rToA61qP9HTepSm/rU qDY0Lr4nPK4Zprx40MNW+DAPV7RiceiAyqywQeMhPm5lTC4uVjJCouGy2jfFSc6RE9S8jugmdrg+ la47sSjuXcWSwWicc4BDbDzwjLcJY5a2mQfrmRJOaBFpk1AtsutUtbp2zpznytLd7aXWIVTcgbey kXyoczeqgpjAt6/JvWwa+VvY3I72iqYtjEW5G9krkQZC0r1ex/yOdf6BgH7nilhnQoADbyBXkOC8 Nmp9Kaci1CeNGlTUjZy43vN5Z+PC0a8RztSU2FspHp9xcgUjT1UOlpFx0pmyhdyLZjrdecUUTpEJ ROTpdAQGmjoU7THvIXfaDHrRX0L/9DJV6HOKydSWJ3HSm183LS+ver4yl83e4Px3v1WvMQmCdaDf dnHB7iqNvD6SZv8yhxXRGjFRu4YITMCwS+oH2qK1UAoMwB0JJVc/xjV5J9EdfBqme8w1HyYZRtze ssrKrHlupj+0tCEis1mfUCuTOCkcJNtBabm/Ec14Xa47iemZGHPopjWRL/VLNDbSXJ8Mrcq+4A05 9pZzU7pVO+grg7fpvT/Hy9OKcfMK1lKTwT7iziHM+a3HSPFj38EOZyN7n1WHIFChNZ3ppCWIJY2S CCqtAaSmHod8fDwyM4AdXQbx+TUP/8AjXxMnCRIHXeEXTFARa4UgTcQdurA02bEN/5fTJrOTKOp3 Aa6CQvciKBEoTxnIbQjIeQeicCVWVVXRW5LCCYUyB9vECBiGcBhIFBv4CQ+4gt1wMvFyFS4iNSUo GPyWGIAHc980Ve/nVqLAd2NBg0WBDRKSRz34PLyjDUqYEN80g1shEkQYDPOygxHUc9cTKx5zNB5U Hk7VbYIHVKSBf+PCGs6iGYc3D0kSDwJUJKkhLhRAAAelAO3gT/4kABM1G20jiBdQLWJCdii4CRyW WbuxLMGRPGPWe5UCiTLydpGQfIdzQrYXCHjBYMN2dA2yb8TAHY4IDLD3XXJhhky1fNewiMYBL7ID Ko6zIp0IE7EDinNQCbfUER0SU//DEIFIZHVyRG0vc0r8UYvggFH+8h4gFTWGAWFFBi99x2DJAyvE I27xwXt9VyF7NDnPQREY0FB8+COZAT/usCMEUFhmExr6sA9JMlh5aCRNglipsSPUcl93owH62FjM Qkq+915kBnjL0V1NWDSXCBy21yCrUh4PkRc5YwFOt13+0XdapiEdMj6PUBKjwINfuH7rsmXJISfY 91x3ACgMyRv0QROn8iVF0RPqkEfQEWJBqDMb2WKuRE0YKD4Z6BWjqJFadQ0n6ZAqOYvMcUZDqYBb 0YFyYZK8eFuplBznFTByAUa48xx24I8SKYQI2XsQ0n6BU1yW4SzxyI4IIAAI8CP/bWZY26IAdcUa f8WO6sgar9EaAnSPF8VHdrQmkOIXUJiAyGEBDJgL1RZtMKmKN+OKKlVLRpeVl4A6KzVGsxhhGUlF KcgUgjIxLtGK0oQL8pRLMuY6o2I7P+kzPPghSjaZ1UN4GBaaSrZrDiF7vYOYxdJKivIcNsGDNkMf qPcyKnUJQfdsaBVhj6mXWeI4DamMb7BWkgiRUBec9vRA0QcH/sAON9IAd8gjo+EACkAA1tJm+PcP ghQB2nk2a0MZddhm/9UHHdA1xYiMGZmIy8AXzLKDu9eBj4BTrTg71LaZYXQpbsKRLHFOEplvsweL zWOK3sZy3uFz1Kafh1I4tjR7/3LCKwB6nwKaCrxyDcR0kdA4QudFKp9IgstIhVAWSszjiXSEnwfZ jCEJobI4XvnWUjmZIbpRgJmojczDjRaHZW/wJKdhD3kVARVFYAAxnYNlnvFwX9eiQe5wAPUQAoa4 jxcpoevBif94VSjZRTZIeMlHDKPJTE1JQ8+mO74HMuZBoAUnWTX5We7HHiypk1OYlOeDTf9mOw5J SwBZT6pkpsA5lTPpFBFkCmM2Ea72lNNUXO/0O7j4dH9XhNBRFkUJcJUUTp8Qfbv4S8i5p1vTp0a5 RtMFovFCdp3zQm+aLKN4k30gNm5DUbPBpEyqePTgX20zNtUCpf/FWPmIR+I3ev9pQZwep34lEoLQ dFQT+amLmX15GT5JyIqR+XPxFpO75VXuRH1A9WWm2TW4dmIg2lm1FXUyQo0J6ay3Ba0YF0KEKny0 IKw41pnEUa3CSEXE8R0txSHq93nBKJARh6/J6o0G4hJNY5yhanvv8jwbxS/M8ADtBycKRxC28QEm Ry0doAEbgDZrE4BC+gG2imD6iAG4YYhhky4fYJmWg0XkM41VcTXyqZDKQDXWV07j2iJSqTLCgQgS 81vAl2HDZStVg2Lfk1TSqKXZ010SCFwdJno5GnYcUbPLc7Or1bQBF7NP5rMYpbBWCXodNiNQIzqn t5lWZLUv2AmYcjUFaLNLCTn/ukAi9JkRGVAgLueSYQcB6UM/DBAuFKBx9PBol5a3eru3fNu3fvu3 XTC3dQu4hFu4hnu4iJu4/zMZTaC4jvu4kBu5kju5C8AAEdC4lJu5mru5nNu5SABq8ZBqoju6pFu6 pnu6qJu6qru6ePYBCcC6sBu7sju7tFu7tiu7Cjaa/VYzylp9A4IAU1sc9EqRaBezB3qtBCt6jpkh 4cqgLRoRvKNzK8O7suC7ilNULJclT5YnkcWhPvNaHlO24dYbYDhzLplOG7MSulmn1tuazGua5su9 vXu0VyVZlPkzcNRDfLSNSxm9BkKw7Eth7hsfV4cd/vuQOHM626W8Fvi+37i9/21qvB0KFOB7v4qj MqPFIc+ZBjwxMp/gW2pRRumIjfolLfPgAQ6qY93nM+wRsGWLGGYloSBmH0B1ZIlam7wkvqoUVmCl wgzGjJhlWccSprAnwzbpbfBBS9d6Fbv5wt1VxDZsPj4MZaXSHzITZBM5ZIIiETUsi1frgju2NbDo e8gEki0Dxp5HKjEcxUosYj9cxZIKsJ70E3QSQfSCLI7BDACyOBP7Ds/ERRCwATnBAWkZJBUASZC1 DJLojWD4kiA1RStsFUtcjO8bbRYmWp5EglZ4rYewyJKswa+wHtF0ftXKr2GITUMZFFhJWy8IyeDK yYL5kL1KwIdDxyNIxtnUvP+ueFul4E3l5MpdYgkQYoaWPHeXYFXtsa+S/FuxPB6zrKV7/CnQo6Ce Sggw0iF+MRTmY8KT1w/C9XF9cMiJJy2GxSMUsFJ0cZtO5iA783XWMQc5aYlmqsad7EwuohGbczDM Sq/4PM92QSep+DTujJJgJXtfu1lSd4zg4SctbJRf+SH6HM9nJ8b/PDnTvDcDnRfmA1XCIV11cZF7 M79FDFobnc+9ItHPwRxl1jes2Y9qojpzNKIxWjgAfdHrLCwaTdLyZDI7fEd8kLDruhXy9y1rWDaJ ZyQGkCSGR3mt4UiWwYcRwAGHrI+5c5q8tq28Bq4S3Fk0W2F2lyKo46V7omH/PViBM6uyY4eZWd2y 34CFSDOf68u7LIKiSrY6Y/3WMel3SYsVaX04NNtWn7cJIpQx7rzX4BbUISLW6Sq+ypYIsGCnGQZH v7K1hf3XaSJifr3Wq5jY2TR3KdKFHaE1YlccFgAk8DB5Tj1YO5IAkkEBB5AA2aIk7TAZtG0P7lB+ 85vQ5sfMSqPNj/0zJck42Ya9x5pKeeqnEza1MDTRwdtJbhq2FvHbPVe9s6h9U5ivUeRK7hXGngWG esLc4BadDX3L0vddaoLQ0XkXejqf50HJZEWj7mpM9yGMVU17vA3du71Rs/kvohzckApv35As5+M1 RT3UCKA21yJASn1IBUAB/xUwX3No1IasAGpDLguFWPfgCyp4dWdkUx1OkpRKVskKe2VNO9GVyD6I z8M2yjvRQ2PqQowwovAMCVQm47q4PKUZRrhXDFKBNwC8B0o8MCK+CC9OTx3ecJxDFH+9LAS6zDjO RdFLxSe+TtkHT0HuLspac5XKlSj+4+4CwNJ7jLVDknG9a+kVCSimfiUNCGA4PJVyzZnnHpBXD+KM Le+AJAXweKetAPPlZj/iT+lo2/xVWJ1heIeteUZrHJadhGl0U0YVTMj90HoZTK9ZJgI7kcfLrUzc 2Ysun7+GFDWqWbpCRlReEFpYgZFqKvrt2DDk6KSZXZin6Czn6ZD6PTyDov940aFosRsoJYqTzk2s LiK6Xc8rYsN27OPHSOlYk+uv7noGmUSucDFBS8r3GlTLAtQwzo6JN3nbkkgBpXh5CFAN/g4EkAA/ Qo+iUVcNkLG0oY8dkGA8jQ7tJmYcIwvbJnSSDJl07djHzRvA6kOrFa3hwEu55KkW4qAIqsBc+zhe VwpC0y9sUOItsuG7IRHEQB0drggN/xcET00GT6Lng1lvSjMCH5nZ4WxzsYn+fvGYF4GsePD8ovJY tjPVFTOUFbAF//Lw4YPOPImeRQtlgu36mVj79X8E0ABO6objIoBKElD1cJaPh/QEdZYQpQEH1rDq Yo2ZnCAPYnMwBe1Gi4H/CqIL//om142otz4sKhks0O46K8n152rPz5pkpWxd941sp2KYnYiiPCXc Yu/2zRpzcb8gz9xkwUdc5TfkHQbSfE80QgRV3EqSGrX3yJX23oD4783MPXPqklqV9wxMw1R6r+iV 4tsLGoAB/bBQmwEa8sfabnYPA8UtouGW9LAZ57gPDkUAhfhft8GPWHI5E6/wNBSoj93xI1k7O/lq AT8qkQXcmqcve3lvoAghX+GT07sNDJytWT51tfPZ8k39z1ChrMBCpkkvzQT5FqYbcUqT+Nz8AuyK WqE6DvOKZmKuchTz0wz/b38yxA0EkIvlUhwai8SLppgRFh+P5+WBNFaL/0wk0TLVJo/fLlZDZBIh ympZaB5Opdni1KidwJFpOlaehJBHAgUflPyqhJgwECIQHCIKIggaBiIYIyAgIygqIxQYHSAWIw4I KEQpDg46QxFCMTE+NDxklzqWmLSqupas4p4etL6u6obEjCD+6MCsjNDypHR5o5D4mJWY4tTqkpWX odyohZ64eakQia3Y5qx2L5DjmIWB5YwtmJ5yq6uZpe6v/eYkY3bkCrgr4uZIOWcuHpQq85j9cbeE 3EAqhRIiC0ds2jCL5rChc2evF0J38Drmo8avWjeAJzVao2YQCsJ+atIUKwnlIjExU5zBFCQIGUae RTS5GlUgFScEBAioQv+waZOlSgUceELgidFWTQVYMWpQaYOHWLyE4UJyb9k/Je3ernTXpsnauGG6 WOAjb+8Wn2ByEuwHz1u6uF+wOHloJIM1Jo1X7urS2ChDPXUwlgEDeaI0CIjXTmRLD0y7C401dKum GTMY0Kcl8uHc7HGvN7fTMfRYrnWYOaZt92kW+gzu00v2UQnd+a7mMs8tqm1GR/rL3lkOe1SsvLCG fckNZQFP0ts0YUWGBpKmS0uXSqIiOHAAtQCBRqSaUq061ZGlAqa6osoSBP7jpBINPphFrfMak0C5 83gZZyErYsJnpGQo426Ju2oSbJuBpgHvJJT+8os1fSSyTLgNcUORDJr/DiKELXkgyNDFLQgbriUp iAgRwrmy8eu7eXoMBwtfVtSsnRtZjBCkKFy6AhhtYlyIx3KuLFJKDSkUiB0uQYpHMqC49DE3hqZk J0WQqKzpSJMgRGO7Ddc0Lpn2fAsSzCiKS2+Egbgx0JIDGhHFAaYKGIACDjShwNH9CDTFAVU00WQq R98jcJSqZulAA1yC4SdK3fioDItkkqvwyoN0+0gPXfrqZ5jMWtUrosAOKSRF1pzbSQ+XbK3GiSzu XIegmJSLVaLzbC2OIi6xASqaLRDS9Vg8AjsJu23P86ULYBdrM9S3viiKp2xFyugjZdubdrqJrD3K VHGAG0JZudzQsxpd/3Ed6ZgXt+WHGLq6paPOgIazKCY/b6XzgkdMIcWBRTKxJIQPOFgEU0c1toqR /wBsVFBOIAjBrFk8uEVUEaERz6KWZ7Rolyghqu6Ixs7J5TMoP0r2YI+4gDM0ul7etZuQekYSpoFm Fq4Q1oJ+YjYqtPjDu5+pJeNLNTtLC951jW5ojZdb6rlp3nTaCcSDrhYxvCYLA3FZ0XYbLMfpvLvb bKEHJkhurb3ozO8rzniCi+qUmHoXhqmAp+ouKK74k0zM+iCERvUb2cBLOalAgao6MZCCk2OxhTfT UtJy6ZTslNU1vXaVw1bP5JLjs3VySZcLuJkd+witebGnX3+QGBa5OP/uOWTr6YDf7Q3gizOpoDaq vluzvoJP4ozUBrcm9uBT04Z4xvDhOXnByzlc790sGIPbYtCFvQ9UBzdNGHLh7z44LYzP+3Ywj1KO 4qhuXL5xUx+2Nzx/vQth5cjJj7KRLSi9xmm78lP7KKSQJXBiYgQ6VAQwcLKLmaVSGwOQxuBzCct5 wAMYoIAnOGYgFibIU7YoGN02co4JdWgc60tNy6yhN9XBJDDYKFvSiAaNNQgPiMsDIA8zYqUd8mYf FsIN/Zj2jQxqRGccMdwT2Sa49vQQaxhhmUnI0cUz8QZpR0CjBl+mJjhGqw9ZAmNNxle1tLGKjA6p 4xGpoY84ZmQ8tdv/ySGm5Trv8cRtAQxKMhj3DO6UCxIHCGGCSJegD2yghI7iSuYw5QEQJMhkmjyZ WTYwOrPQYgN1AKKznic72yVMlrCRyznUoMHeoY17fPDS2sDAs4hQBEnOcp9yfnbM7QXwPEKoYiOP gsu3MScPzkzX0phWKuWg4R+3zF4skZkcZaYNe8fY0//MgTwt7dB9lZnLJFkSpdn97hjddN44CwGR f43qIfwUFTHekiJEek9r35FZ2D7SLIF1hnFVwNlyeJEyWcyQdCz0QAkxB7pNTAWEoxSlJjFpSlOe 7AKz8EvP0McTZiHNiuaBqLGoNZrdLcNxHBmOWs5mpG82c6HUBNQU/x9Em5qgy00G4akylkgdv8Tk CyFxVu70Bg2jUqinX/wp2qCApzLojYzNgyVSneRONFhRGjs9l2okkhPOGEx/TLWp35qqIZwQgo1U DY5PmYed2Dnjh7fb3V2ggQhlKsFPghRTFj6VoIla9FNMEJknMYe5D4T0lBYtyyZXGQsWfjOIGfxn 0WDSEnfKJE1ElVIaEIPOwBrCrdQzJ0bkuc0AsiMOqGGTvYrVOMOFhDwp9a1sDRvECd3ETX795W+O A1NzZjGRMqutZ5S02vNZyF3cg61zIyNccn5mrsaFR9B0EhRhYM0hLVXtL4kLO+QRC6VC8hBW+TqM bhnruMPs69eM4LMn/e6Xv/v9AFciG+D+DpjABTbwgRGcYAUvmMENdvCDIRxhCU+YwhW28IUxnGEN b1gEsNhYRquyYRGPmMQlNvGJUZxiFa+YxS1O8AJgHGMZz5jGNbZxjCvxKAYswFEQuPGPgRxkIQ+Z yEU28pGRnGQlL5nJTXbyk6EcZSlPmcpVtvKVq0yVCsSYAlj28pfBHGYxj5nMZTbzmdGcZjUDmQGO 2vGa4RxnOc+ZznW2853xnOQgAAA7 ------=_NextPart_000_0077_01C04F13.DCB29D40 Content-Type: image/jpeg; name="=?gb2312?B?yvfStrGzvrAuanBn?=" Content-Transfer-Encoding: base64 Content-ID: <007601c04ed0$ce87bc20$4d049c3d@yangyy> /9j/4AAQSkZJRgABAgEASABIAAD/7QZAUGhvdG9zaG9wIDMuMAA4QklNA+0AAAAAABAASAAAAAEA AQBIAAAAAQABOEJJTQPzAAAAAAAIAAAAAAAAAAA4QklNBAoAAAAAAAEAADhCSU0nEAAAAAAACgAB AAAAAAAAAAI4QklNA/UAAAAAAEgAL2ZmAAEAbGZmAAYAAAAAAAEAL2ZmAAEAoZmaAAYAAAAAAAEA MgAAAAEAWgAAAAYAAAAAAAEANQAAAAEALQAAAAYAAAAAAAE4QklNA/gAAAAAAHAAAP////////// //////////////////8D6AAAAAD/////////////////////////////A+gAAAAA//////////// /////////////////wPoAAAAAP////////////////////////////8D6AAAOEJJTQQIAAAAAAAQ AAAAAQAAAkAAAAJAAAAAADhCSU0ECQAAAAAEzwAAAAEAAACAAAAAgAAAAYAAAMAAAAAEswAYAAH/ 2P/gABBKRklGAAECAQBIAEgAAP/+ACdGaWxlIHdyaXR0ZW4gYnkgQWRvYmUgUGhvdG9zaG9wqCA0 LjAA/+4ADkFkb2JlAGSAAAAAAf/bAIQADAgICAkIDAkJDBELCgsRFQ8MDA8VGBMTFRMTGBEMDAwM DAwRDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAENCwsNDg0QDg4QFA4ODhQUDg4ODhQRDAwM DAwREQwMDAwMDBEMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwM/8AAEQgAgACAAwEiAAIRAQMR Af/dAAQACP/EAT8AAAEFAQEBAQEBAAAAAAAAAAMAAQIEBQYHCAkKCwEAAQUBAQEBAQEAAAAAAAAA AQACAwQFBgcICQoLEAABBAEDAgQCBQcGCAUDDDMBAAIRAwQhEjEFQVFhEyJxgTIGFJGhsUIjJBVS wWIzNHKC0UMHJZJT8OHxY3M1FqKygyZEk1RkRcKjdDYX0lXiZfKzhMPTdePzRieUpIW0lcTU5PSl tcXV5fVWZnaGlqa2xtbm9jdHV2d3h5ent8fX5/cRAAICAQIEBAMEBQYHBwYFNQEAAhEDITESBEFR YXEiEwUygZEUobFCI8FS0fAzJGLhcoKSQ1MVY3M08SUGFqKygwcmNcLSRJNUoxdkRVU2dGXi8rOE w9N14/NGlKSFtJXE1OT0pbXF1eX1VmZ2hpamtsbW5vYnN0dXZ3eHl6e3x//aAAwDAQACEQMRAD8A 6/v5hJJLhPYlA/glwklMpKVolP3pp7p++iSldvNKR3+SRS8klK+SU+CRSSUrv5JSOEo7pT2SUpKN EpMeJSJSUr4pJdkvjykp/9Dr+QkJIShKQT8E9iUEvJJLVJStfmkPw8UvglOsH70lK+PCUd0hwl8U lK8kvhwEvNL4JKUSkEtOEklKjxS0S58vNIpKUlB+SUa6duUoSU//0evTd0/YjhL569k9iUUkktJ8 0lKSBKR5S5SUrRLVIeSY68d0lL9vimGif+KXkkpWiXhHzS4S1RUoifIJaBKdPJL4oKV5/elOmiXw SnXQpKf/0uv14SOqQ8PuSPMp7EpLulKRn5JKUkPvT88pu89+ySlJQAl/rCRjg/JJS3h+Cf8AIkkf E/gkpXKQ8kvuSmPJJStO6RSS/KkpXhPdJKfH5JJKf//T69LjQpf6yl+RPYlf6hLzSB/3JdklK8+3 glz/ABKSUapKVPilx/sSB8PklISUqNP70vxCRSSUrRJKI80vNJSu6RS5S0+SSlJcaH70pCUJKf/U 6/4JDwS+CXKexK+KRMJaz8Eo7JKV3SidTwkkQkpRPyS7pSEklK5SS8+6SSla8pJtDpx5J0lLaJz/ ALwl240SJhJSo1+HZL8qXmlqR8UlP//V67wP4JylH3pTrHfunsSkuPNL8vZLySUrlJNyU6SlJdpS Snx7d0lK158UvMfclyNO6XCSlHRIJfxSSUpIpJQkpQ1SS1kSkkp//9br5180pHZKUpjT8U9iVyUu 2iXxCWqSldvBJLTsUuP4pKV2SA/2Jo08E6SlTokEuNEklKmEkw5TwOUlK8kkvwKRSUqfx4TpkuNB 80lP/9kAOEJJTQQGAAAAAAAHAAMBAQABAQD//gAnRmlsZSB3cml0dGVuIGJ5IEFkb2JlIFBob3Rv c2hvcKggNC4wAP/uACFBZG9iZQBkAAAAAAEDABADAgMGAAAAAAAAAAAAAAAA/9sAhAAKBwcHCAcK CAgKDwoICg8SDQoKDRIUEBASEBAUEQwMDAwMDBEMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwM AQsMDBUTFSIYGCIUDg4OFBQODg4OFBEMDAwMDBERDAwMDAwMEQwMDAwMDAwMDAwMDAwMDAwMDAwM DAwMDAwMDAz/wgARCADIAMgDAREAAhEBAxEB/8QAfgABAQEBAAAAAAAAAAAAAAAAAAECBgEBAQEB AAAAAAAAAAAAAAAAAAECAxABAAICAwEBAQEAAAAAAAAAAQARECEgMDFBAkASEQACAgIDAAIDAQEB AQAAAAAAAREhMUEQUWFxgZGxwaEi0RISAQAAAAAAAAAAAAAAAAAAAJD/2gAMAwEBAhEDEQAAAO04 bikKQpAUCpAUgWyKigVIpAAi0iUJGqghQCpLRI1QkQpagiLUAtiWKZtsgBSAFJZcVpBbZIW1JAUk tsgKkUAVYlIKsRakBSLUliWkFtSSFKQUJFpKQQ1bItkgFlzVkWhDSySLQEUi2ySLbKQQKublLaRC iipAoJF0kUJGiAhVtSQi6QsQAFBEtsgUAlVGbLAaJUjVFkSyyLpIWWWRagWoIUiGrZIFIUEBSAAR aiFWWI1UgAW2SAsssKCUiipFJLbIWxLELbBJaKEhSQqxm2pVkNEEFIAqrIWJRKsikQ1UEC1JZZVi USrEKLEFhSBDVSBFWWFJZZYhS1IAW1IqRSQoEC1FJVJFJF0kqrJCwokCgKspIAWpIW1M22KkUhVS KlIIVFokW2CFiKKQFCS2xAAUgWpBVgKRFqRCikFIpEKC2wjNVEXVkEQq2ySLUW2SBRUS5soAgqgE isrtIW2QCLRcpYhVWSKCFAsSrZJSFBC0gpFIUEAWsy1FUzFAtSC25LCkiggi2S1FpIWFUhJdWQKC BAAUiKssKCWWJbYktslIUyUssspKQhq2TNagsSyxJpYWpKsSLUC25Z1LAUlJZZYUgssslosgKCFI hRZVkBf/2gAIAQIAAQUAIvB43Di8bhF6Hh84srh86Xh5wOZzewxVdD7wOm4YXsOIcXoHrM1Lx87L xeXFR5XHF4OFc71weB0OQzXI5PXUeV9dS49PvTeXIcnocXzqV03lOlw4Hk4vFYeF4ZXK++8Vyeyp XOudwjn501m8HH5kIPO8ByZXA4E+4cJ1+SuusXPnJ43yvJkzUqXfCs3moPVUeF8w7L4BisOK4h0P vQuXoWf/2gAIAQMAAQUAcMviS4RzeLyS4Rw8jqrorBmuFdd5DjWLw5cV1L0vReDvDFQxXKsuPMOa zfA51ip8hK76wOb43KzX8Liug51/EuayS+Rwrg9FcTsZceN8CXyqpfZXC+dxxfA7jFx7GEcGXB11 hyub4Xi+VcbxfKo8CVj5wDhWaycSLLwcXJkOgl8F5s8x8vi9t32LiulwcmGHi5vNcL5EOLxOFcDs qViv4nj/AP/aAAgBAQABBQB3KK1LQ9B1W2jF78XcQDTN17Bmr1CXvxdyitRN6nsps3EIaLl2hWKh GiVPJ+Xe0BlQExUPFZbELusUEFly9u4bKUZQMbpqqi1EE8w2zcQvSm4XGbt8giaxe/SmXEubC9XB uaJW2VcJ5DcLpLmiBu5VzUqEWNk1B2T6tRKgBNRqW3aSyNSyVPJphG5uqAra/wCf02Mrfsqi5Uqb H47hRPv6LN1shufKI3Wp4nhYlMZutT/NR8FuJA/UEZaT8q4tEblg6nylZRYjKouVLhcQs9+1Ladw dBSEux/WtRu0YVaNghY4ojsBuUXGfm5VwoKx7C4XL3Re58LiDA2rC6Ze/taKZQpo3PES/Z5HT+bp LGA0JPI7gVKqPjU3ZcQumWkvcqo6Ft+lrPmrqXoVjTEQuwhWKLUw3C61EH9O0d/arHsChuWQlaib u3CWWEYfkjUslVDzYlM+toanksSkbYT8iS9sWJZYRnsq5e/Y7n0bmgu1CCTxFtI7l7Z8hVexLnsq 5e7lkPPJWnR/ot3ELqaIm/I+/l3tAZThtKlXCowGts3gES7hNxahbAoqoeLqF2gwsX38ui2IkVq9 CsdzcJuVtdiP5GimDSgu7fal4qoeem4Lfj+q/RWoCYqXr40wuos/IxALt9gVKJtjcLpJRAl1Ny7H FXNxN6on27xtiteT6lyowtbh5RZdK4TdF1YXTU1VDNBdqEu4x9+XumJZu1pKW9Rj6TyAMaIaKKik fH8wd0T7dTUoi6LIeOzyXEZe7qaI1NRowWxodMNKtg0yy/Volq1csIOkYk8jcKnr+jXw1jTGKyiN 1qbsGUW0z75FpG0uErZH9UEaZdN3PIlxRh+ZqbcUWI4fV15LbTXgu9M3QrA38XXy0al0E+t2DVRQ dMfC1QzbZuOwNkbq2eRDNt//2gAIAQICBj8AHH//2gAIAQMCBj8AHH//2gAIAQEBBj8AgghaIm++ MV2SSTJ50KLfRBHRR72RtEQekkpnnQot9EEELQoO+M0j4zx5xmHonJ6Si8mInohueHV9jimS/sp/ BesnpKLIIxw+uJmOz9Mt4EnXF0U4fEiapHpD3xPHpZWeJIWuLJRk/hGOLvo9McTMwJf5x2UuJyie f0KL7P4XkvJ6hLb1x+idk9FZ0Xksqy983ronTJR/rI0ecOiiyrP0OWT+CGRvQuxlCT3sUX2eFuij 9HyOcOyPwVh5Ksh48P8A562y6XZCr1CTyubK5yfI4wfBR+xfoon/AAUWtkf6LtFYGlbREcJ9Hmyh w76KI2LTRP5Jgg+eK+yiUeo7PCinHFqCe+HBOiNEaPT50Mtyxfvj0rJKqMk6I+zwrGx9PBDJeRQf sgvHHR/Bel/klOUyfwf+jjOkTt6474slYZ6RsSX2JHheDw8If0Q8n9Ieez4ou+jMHnRCZ7zWGTsZ Z1xTzwl3sjmBp/SJxx0YJVsT70WRw5Vd8x3hkTZOyetmbRZGivxxiCMoTj5LVlkdEJiivSHxars9 I2eMnZ4uPMnjHcJHq4umXZSlH8JQp/wgcX4yH+Sl9kHpGzx8TscqCSVokh0fOSiUUdvUmBa4hokp Vxk9RD+nxOxyoFURxD/PMvAl2Qvsnok+T4IL2Or7HFMl/YiCETvjqD+kPPZaI09lE95RZGirIJeh PRZKeSxVMiQiMEZIMQxMzkuuOjJEkcQj1Ek5Jynoql4Rh8fI4/HGBw+LP6eHfhDtekdEJl6yekov JOxdmMcUy/s7POz9Dl4JOhrehVfRkjOy8E7RKsspfZZTh9nRK4/0fR1HDKV9FcRkrAv2OVSwyZ4n D4rPXGaIzGxXZDyhTkr74+clEorifwK/khZEiE4YkQSvtMkU/nifwLfZ/CcPZWNkTPpZGxLbIE5t E/k84Z/zsmP+iXo7TPT0iD+FOCBn/JLJMcOU0xtk/jh96PdlEL8EYKox9n7Q+lokrBB8kkZIwQqY qvZiyehzoS6O+ysc5Op4XWyNEFmIjfMqhmJ8I+hdbLxw7nwV42UZyekY7PETB8E6JWDw/pEEctYj RVwTEEjg8I/0hI92T3ji8HjIbvs9QlviFkTxGUdrYqzgsnKeD0vJi9lYITtlo8Z2tirOCycp4P/Z ------=_NextPart_000_0077_01C04F13.DCB29D40-- From gcc-help-return-4100-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 15 07:03:32 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 13727 invoked by alias); 15 Nov 2000 07:03:32 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 13667 invoked from network); 15 Nov 2000 07:03:31 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 15 Nov 2000 07:03:31 -0000 Received: from cygnus.com (taarna.cygnus.com [205.180.230.102]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id XAA16816; Tue, 14 Nov 2000 23:03:02 -0800 (PST) Message-ID: <3A1237E0.A1BB4815@cygnus.com> Date: Tue, 14 Nov 2000 23:14:40 -0800 From: Eric Christopher X-Mailer: Mozilla 4.75 [en] (X11; U; Linux 2.2.16-22 i686) X-Accept-Language: en MIME-Version: 1.0 To: Yiyan Yang CC: gcc-help@gcc.gnu.org, gcc@gcc.gnu.org, Yiyan Yang Subject: Re: Where can I find a list of gcc option? References: <008001c04ed0$e25d8e00$4d049c3d@yangyy> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit http://gcc.gnu.org/onlinedocs/gcc_toc.html -eric From gcc-help-return-4101-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 15 08:21:45 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 29356 invoked by alias); 15 Nov 2000 08:21:43 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 28615 invoked from network); 15 Nov 2000 08:18:59 -0000 Received: from unknown (HELO roam.sd.cn.net) (61.133.0.13) by sourceware.cygnus.com with SMTP; 15 Nov 2000 08:18:59 -0000 Received: from yangyy ([61.156.4.77]) by roam.sd.cn.net (8.8.8+Sun/8.8.8) with SMTP id QAA12028; Wed, 15 Nov 2000 16:21:51 +0800 (CST) Message-ID: <010701c04edc$dd4ac390$4d049c3d@yangyy> From: "Yiyan Yang" To: , Cc: "Yiyan Yang" Subject: How to list all calls a library contained? Date: Wed, 15 Nov 2000 16:20:04 +0800 MIME-Version: 1.0 Content-Type: multipart/related; type="multipart/alternative"; boundary="----=_NextPart_000_0103_01C04F1F.EA3339A0" X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.2919.6700 Disposition-Notification-To: "Yiyan Yang" X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6700 This is a multi-part message in MIME format. ------=_NextPart_000_0103_01C04F1F.EA3339A0 Content-Type: multipart/alternative; boundary="----=_NextPart_001_0104_01C04F1F.EA3339A0" ------=_NextPart_001_0104_01C04F1F.EA3339A0 Content-Type: text/plain; charset="gb2312" Content-Transfer-Encoding: base64 19TIuyANCg0KSGksDQpJIHdyb3RlIGEgc21hbGwgcHJvZ3JhbSwgYnV0IGl0IGNhbiBub3QgYmUg bGlua2VkIHVzaW5nIA0KDQogICAgZ2NjIC1vIGEgYy5jDQogDQphbmQgZ2NjIHJlcG9ydCB0aGUg Zm9sbG93aW5nIGVycm9yczoNCiANClVuZGVmaW5lZCAgICAgICAgICAgICAgICAgICAgICAgZmly c3QgcmVmZXJlbmNlZA0KIHN5bWJvbCAgICAgICAgICAgICAgICAgICAgICAgICAgICAgaW4gZmls ZQ0KY291dCAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgL3Zhci90bXAvY2NydFBHY1ku bw0Kb3N0cmVhbTo6b3BlcmF0b3I8PChjaGFyIGNvbnN0ICopICAgL3Zhci90bXAvY2NydFBHY1ku bw0KbGQ6IGZhdGFsOiBTeW1ib2wgcmVmZXJlbmNpbmcgZXJyb3JzLiBObyBvdXRwdXQgd3JpdHRl biB0byBjDQpjb2xsZWN0MjogbGQgcmV0dXJuZWQgMSBleGl0IHN0YXR1cw0KDQpIb3cgY2FuIEkg ZGV0ZXJtaW5lIHdoaWNoIGxpYnJhcnkgc2hvdWxkIEkgbGluayB0byBpZiBJIGNhbGwgc29tZSBz dGFuZGFyZCBmdW5jdGlvbnM/DQoNClRoYW5rIHlvdSENCg0KDQpFZHdhcmQgWWFuZw0KDQpBSVNX LVBTTyBOT1JUSCBEZXAuDQpBc2lhaW5mbyBUZWNobm9sb2dpZXMgKENoaW5hKSwgSW5jLg0KDQo= ------=_NextPart_001_0104_01C04F1F.EA3339A0 Content-Type: text/html; charset="gb2312" Content-Transfer-Encoding: base64 PCFET0NUWVBFIEhUTUwgUFVCTElDICItLy9XM0MvL0RURCBIVE1MIDQuMCBUcmFuc2l0aW9uYWwv L0VOIj4NCjxIVE1MPjxIRUFEPjxUSVRMRT7X1Mi7PC9USVRMRT4NCjxNRVRBIGNvbnRlbnQ9InRl eHQvaHRtbDsgY2hhcnNldD1nYjIzMTIiIGh0dHAtZXF1aXY9Q29udGVudC1UeXBlPjxCQVNFIA0K aHJlZj0iZmlsZTovL0c6XFByb2dyYW0gRmlsZXNcQ29tbW9uIEZpbGVzXE1pY3Jvc29mdCBTaGFy ZWRcU3RhdGlvbmVyeVwiPg0KPFNUWUxFPkJPRFkgew0KCUNPTE9SOiAjMzMzMzk5OyBGT05ULUZB TUlMWTogy87M5SwgVHJlYnVjaGV0IE1TLCBWZXJkYW5hOyBGT05ULVNJWkU6IDlwdDsgTUFSR0lO LUxFRlQ6IDMwcHg7IE1BUkdJTi1UT1A6IDVweA0KfQ0KSU1HIHsNCglNQVJHSU4tTEVGVDogLTMw cHg7IE1BUkdJTi1UT1A6IDVweA0KfQ0KPC9TVFlMRT4NCg0KPE1FVEEgY29udGVudD0iTVNIVE1M IDUuMDAuMjkyMC4wIiBuYW1lPUdFTkVSQVRPUj48L0hFQUQ+DQo8Qk9EWSBiYWNrZ3JvdW5kPWNp ZDowMTAxMDFjMDRlZGMkZGI5YTU0NzAkNGQwNDljM2RAeWFuZ3l5PjxCR1NPVU5EIGJhbGFuY2U9 LTcwIA0KbG9vcD1pbmZpbml0ZSBzcmM9ImNpZDowMTAyMDFjMDRlZGMkZGJhODEwMTAkNGQwNDlj M2RAeWFuZ3l5IiB2b2x1bWU9LTExMD48SU1HIA0KYWxpZ249Ym90dG9tIHNyYz0iY2lkOjAxMDAw MWMwNGVkYyRkYjhlMWY3MCQ0ZDA0OWMzZEB5YW5neXkiPiANCjxQPjwvUD4NCjxESVY+DQo8RElW PjxGT05UIGNvbG9yPSMwMDAwMDAgc2l6ZT0zPkhpLDwvRk9OVD48L0RJVj4NCjxESVY+PEZPTlQg Y29sb3I9IzAwMDAwMCBzaXplPTM+SSB3cm90ZSBhIHNtYWxsIHByb2dyYW0sIGJ1dCBpdCBjYW4g bm90IGJlIA0KbGlua2VkIHVzaW5nIDwvRk9OVD48L0RJVj4NCjxESVY+Jm5ic3A7PC9ESVY+DQo8 RElWPjxGT05UIGNvbG9yPSMwMDAwMDAgc2l6ZT0zPiZuYnNwOzxFTT4mbmJzcDsmbmJzcDsgZ2Nj IC1vIGEgDQpjLmM8L0VNPjwvRk9OVD48L0RJVj4NCjxESVY+PEZPTlQgY29sb3I9IzAwMDAwMCBz aXplPTM+PC9GT05UPiZuYnNwOzwvRElWPg0KPERJVj48Rk9OVCBjb2xvcj0jMDAwMDAwIHNpemU9 Mz5hbmQgZ2NjIHJlcG9ydCB0aGUgZm9sbG93aW5nIA0KZXJyb3JzOjwvRk9OVD48L0RJVj4NCjxE SVY+PEZPTlQgY29sb3I9IzAwMDAwMCBzaXplPTM+PC9GT05UPiZuYnNwOzwvRElWPg0KPERJVj48 Rk9OVCBjb2xvcj0jMDAwMDAwIA0Kc2l6ZT0zPjxFTT5VbmRlZmluZWQmbmJzcDsmbmJzcDsmbmJz cDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsm bmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJz cDsgDQpmaXJzdCANCnJlZmVyZW5jZWQ8QlI+Jm5ic3A7c3ltYm9sJm5ic3A7Jm5ic3A7Jm5ic3A7 Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5i c3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7 Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7Jm5ic3A7IA0KaW4gDQpmaWxlPEJSPmNvdXQm bmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJz cDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsm bmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJzcDsmbmJz cDsmbmJzcDsmbmJzcDsgDQovdmFyL3RtcC9jY3J0UEdjWS5vPEJSPm9zdHJlYW06Om9wZXJhdG9y Jmx0OyZsdDsoY2hhciBjb25zdCAqKSZuYnNwOyZuYnNwOyANCi92YXIvdG1wL2NjcnRQR2NZLm88 QlI+bGQ6IGZhdGFsOiBTeW1ib2wgcmVmZXJlbmNpbmcgZXJyb3JzLiBObyBvdXRwdXQgd3JpdHRl biANCnRvIGM8QlI+Y29sbGVjdDI6IGxkIHJldHVybmVkIDEgZXhpdCBzdGF0dXM8QlI+PC9FTT48 L0ZPTlQ+PC9ESVY+DQo8RElWPjxGT05UIGNvbG9yPSMwMDAwMDAgc2l6ZT0zPkhvdyBjYW4gSSBk ZXRlcm1pbmUgd2hpY2ggbGlicmFyeSBzaG91bGQgSSBsaW5rIA0KdG8gaWYgSSBjYWxsIHNvbWUg c3RhbmRhcmQgZnVuY3Rpb25zPzwvRk9OVD48L0RJVj4NCjxESVY+Jm5ic3A7PC9ESVY+DQo8RElW PjxGT05UIGNvbG9yPSMwMDAwMDAgc2l6ZT0zPlRoYW5rIHlvdSE8L0ZPTlQ+PC9ESVY+DQo8RElW PiZuYnNwOzwvRElWPg0KPERJVj4mbmJzcDs8L0RJVj4NCjxESVY+PEZPTlQgY29sb3I9IzAwMDAw MCBzaXplPTM+RWR3YXJkIFlhbmc8L0ZPTlQ+PC9ESVY+DQo8RElWPiZuYnNwOzwvRElWPg0KPERJ Vj48Rk9OVCBjb2xvcj0jMDAwMDAwIHNpemU9Mz5BSVNXLVBTTyBOT1JUSCBEZXAuPEJSPkFzaWFp bmZvIFRlY2hub2xvZ2llcyANCihDaGluYSksIEluYy48QlI+PC9GT05UPjwvRElWPjwvRElWPjwv Qk9EWT48L0hUTUw+DQo= ------=_NextPart_001_0104_01C04F1F.EA3339A0-- ------=_NextPart_000_0103_01C04F1F.EA3339A0 Content-Type: image/gif; name="=?gb2312?B?x+/I1S5naWY=?=" Content-Transfer-Encoding: base64 Content-ID: <010001c04edc$db8e1f70$4d049c3d@yangyy> R0lGODlhWAI8ANX/AMDAwP//zP//mf//Zv//M//M///MzP/Mmf/MZv/MM//MAP+ZzP+ZZv+ZM8z/ /8z/zMz/mcz/Zsz/M8zM/8zMzMzMmczMZszMM8zMAMyZ/8yZzMyZmcyZZsyZM8yZAMxmZsxmM8xm AJn/zJn/mZnM/5nMzJnMmZnMZpnMM5mZ/5mZzJmZmZmZZpmZM5mZAJlmZplmM5lmAGaZmWaZZgAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACH5BAEAAAAALAAAAABYAjwAQAb/QIBw SCwajwDBQclcOpsCpnQ5jVKp1ezVys1Gv+CwGByIlgXnshrNXrvbcLUcLQ/Y7/i8fs/v+/+AgYKD AQB3hoV2houJjI6NkIuShZNIlpeYmZqbnJ2en6ChoqOkpZpSSk5PT1oIFwOpXUt5WFplWwG1tWNs vQdpAgbBZnHFbmttdclzBgHNv87Rzc500dB504Taf9l23X2PeIbZ5Irm54iMkJHs6ZSUj0Lv8vRC BkIFDwAT+A4GDhMmBOBHIWDBggAKTlCoMKDDgBlUPCxIYkKJCRkmVDQYUEVDjhMdkvj4cALAfSYn PFjYUUMJFSpKHPQo06NFjR8rXqQw0mBM/5cAbBYsUJKgSZgeKbjUQNMlhZ9PmcJ8WsIphZ0LKVxl qvSpVo8el9ZUKlNDV61m03ZVy3YthaAlSlRQUaHEiqp1N5TYwIHFBhaAN1AwocHEVQ4WEiu2gPhX hcWLL1iQjEKy4seI6TygEICzgQePQ1uogDhxaciPE29QXBoz49EcRK9eLZrDCdgnSI9WbWH1it27 RQOvEDp34gon/iJXbgJzhQ2haRMfXYHF9OYVTMQOjZ06dejTn+cmbt1C8+7ZiadXv5449uYbmq9Q byI+8fnY2UOnwP6++//zZWdfBStgB0EFEAy2AQQMEsfggeo1iKCDAcx3IIMUCFBgZzIVuP9BgHZV MJgh/OwTAEADDeRAAQCtpBVLC/nDEkApHcQRQ0XlyNBIKmjgEAU0rvQQQDQaBJCNQy5EAldgHbTP ikeapNBLVN6kJE9QzRjQA0Ttg1RVP8Hkkk0TIDWVlEQ+tORLJDHEU0NafZUBBXNWpZRZbuWpVpwa pMUWAHXFlZ0JBc63wnx0qWCCCiyc0ChggMnQwQUdoDDpaaUdMA1nEBgw2aeTflpBZ7mQyhlnpHqa WmqLlRYbb309B9trpDnHGKuvrdZbcI+tFturugV73HTBFasedRxo9xwL26kXAYLUhRcae6NZ19xo 461q7LCk1becBQH2Bx57Ab5HH4Hrxbf/XbjoeosfdB/291655fpHqIAXQhCfAA4eCB2EyPkHXgne UlAufwYTF59eKwDgAAD6TMBiQFCqdGOMWxp5pZVRXozTRCnQCRKcJJSQAZhUeUUTSA+BKZHDTwq0 Ij8rwizEwwHFnJJDbMZk00AF+czmjyFdtBNYZKaZUpEWIeUSjUAaJFPISOOZFUtofXVW1m21pScA BMdpAsFyyUXYYHINNtgJJkDKAqUXcHBBAh10YEHdk046KmcCPFDqAQ8IQMEBj3ljqjMPNMMZaMPa ceodfnvm2quMWccBX7XuNhutwQGLWOayijZda9aVfhxtyTZL2m0TWsBvhMT2591j1hEI/9xrkHl+ XHmhi6uwegMOWF9+55HLHqQWMMtBbON6O+Fz+a0XPXjQ/dpXX4B10Fqtv/aqmui8gnveYNnxR+ii FQzBJZcVP1yQAzYWScFKm7kIo41vXpXSSvBbbBJRBuEJS0aypJGkYGgO6dj9WEKlMQltBXDiB81Y BEAaReklX+LKRZoWEy3pw2FG+siU3rezGllwIUkJyEaUdBOjzYlHT+lRXMRiMPzFiU8vOouftmYW QJWtLiIS0dgMYxjiyGR8Isqe9i5VN0rV7W6TkkwFDtCpvv2iigHoVOL4E4BRgaYzfQtA5DqjRcVx qla42pxtlveazyFmjawaHXG696rN0f+mN9P5zQliw4LjIGYDG7jNbPZ4nAPt5kDPchC1ngWBep3m Aq5QjGVYg5pZ8WpatcvcecJVoEyqx0PQI43ylNeXxTzmNrlJ0AZewAJWMouVrmSB9lrAghb0xZa2 PM6u2giZ3PUyMQiowAAsEExTjmY+ZptL+oTAJZhFzX0Ss1//NmMx+mHMmkDSn/5kQrEaWUkkO8If R6LUMRjeLGcDlMpF7LdABgbkIj0h4JtSQAKJWOSAMFmBCkvQkzdRDCU7SUGZ3vcRlEgwainUGJIU ApaqDC1oXsGTWQpwQxzeaS19ytNb0tM21jgqeYtxlKNq2Ue2nQBub7tAC5zIAcIZIEH/Bxgcv7rY xWaM6qXCyFDiEgc4A7y0M57pTOK05SpcGfUyfzTNrSyXmN/oZgWfcx2CCCcA11ngAM/i167AF61j hWdbihQNwLr6n2MCD1fEXAwCKGka0UWPPc16q3vs8xfsXc9tzBpp8k7A1+q8klmABQwHVuBK7Am2 sLjsQAsWq1i8ORZucmMrB+xmmWEOUzGXnRaB5vMhg9mHLhAkkKI0UCDS6mVh8oFACQ70ACIaLEEq WAFpVyAYEyQIYYFLwNwugAEPJAABA/AADFzggg7EoAUeqJsHWhAC5k7KAxeA7gWmWzfkTtcDMYhi AnSLt+ROirvTpS4LTmaB5LogvHSz/1sFfGQRnlQgihjYbQIg0EKNWAC5HSiueTVAAnrCJAUp0EAL osjbDniAA2LyCAdckNwKEO1NtQyBC+pykAALdFQCgNtug9kVrLllT1nDoQYSMh+xyYR8MklbdVAJ mNuY4KSgohQK7hu3lV4qbig4zX13zNbUGCA1g9tMZz5TASJ/xjM7/TGmOMeY3LwxNMuL1RvBpUsL DGAAELAABBJJnETqajzbASv4pDW70ACMPmUG1nPkSC24/ic75oHzm3tnrwGpjrPoIo9t8qxIgB2I tpCC5WEFHcsBEcgE8ikevQ5Vr9ToGDFr1bFi1qqYha2ALjUUDHEG4yFklpi2jE4UYf/qoyhFFWov jOasoq6iF8PIdlEW2kyhGL1MUyBhwQIYQAIEgIDHNsMQd0NAFAiQayfiNzbyiK727gZdeNgDbxeI At0GLGxLGECx6N11hptr4LntOgEtsIAQLJBdA+e3AwhwxhHK8Ji6xSC76ba1ra2wilVAYQta6IIV vIEKJdyiC8IYhr+lgIwxAIMYAR/GLc4Q8Dc4HA5xUMYdqhEIOkBjGs0IhuHyQPFteDwPiBCEOwJQ gDuQAxH3OEQi1hGPdjQiHJKohMzh4ex1y/vmOM+5znfO854XYQMHiHcm7E1vVOD7AAcgpmTAwAo6 IKLkXzi6LP5N8Kjz4uC/GDgaqFD/qod73esUp4PYo4EGYWy8GWZHe9mpYTiKf2Mb33i7IOT+h5BH Y+MA6EbI956OvrfcEYBvBz3mUQ/Al9xhEzvRP/JB0f4phH8BMYDHchSSAZJkgT3CkUJoVJF+hsTx /ZsIQBw6Jm4WhaBW2iBF2tteGeKo8lpyGVd89BWnYO0mpWcKjIpyEZcM9Cd2kiFXdMhD4mf0+GjB U1AOnZ2qoA8t8sGro1YAKcmchtKv+TG7JTndyURxMQdSnDPEL+Qx72bKfhQOG/vYmqTeynOg2+Wv epOcrfYxfF/V1qpER1dwpWc7WfY8ZNVm0qIw5uF/+1cr0BFnygIenoQu4NEc2fI7/+nBLtgRgWfF HolmH/jhH6BhL+1yMIbyOheCIH6mIRPiZ9BRRPXRaR8SW/diPh9SIPswBBOweCiCJgFkMeJEQC9R JhoQEWTSEFXREx2BQT5jFgmkEReBFFThMylDQhhTQibhABXzJB5Rgw+jhWmiNGBCJR2UMUuTEgkx Tj9SEUGzFABAFFzRhVFTEC8xJkiyMfxEAVSzJG/BIjZCemthJxfFFl3DQwDgWoj2HHKBaXHifCYw A23TKHx1UqEyXZNlN8s2GjQlDH5DRcJQAdRliYlTKj+FZMIwHFN0Vc+TKkL1Y5NDO230KtvhRsKh K9MRSOExWO+nG9zSR6LhSZozK//EUVVZBiHhszloRGb+YUyVBBwBkjrQMy4CUmf9MWfYwS5+tUeD woFr1h7mMlcrqI1CBCDRSGV35FTlcUfwNzyIZj4KIh/kM2IP00wUQEErsQ8rQRRucjXZJDXtVTKm RzEF4SJQAyNMI08kYEAvsSa+N4ZzCBKkRyVzaDNDUCQzc1ADRHph2BBCcFAfsRM6cSVksoREQSTy UyZgchOPFxBM4VAwEXxLcRV34mG0d0N74jUiBihEVBdjcxUiojaCQjZCVDly40R541hDORq/kHUZ kguOkUXiNziHAzhQ6Tef0Qx+I0bT4De4eBmWxBjaoZXVsVW7wjy7g0ZJ5T2pwzv/u/IbsKEutWId CGBIXVYBEYBVAahlFaBVdlmAaDQZrhBJbKVUYKlZvIIe40KLHNUuCxNnnEQg10NLUXZ/1JEg/pGN AUJ9sSRYzEJLsrSZxcIaukE5vbRkUpV0vQJEhlIXyHQzKSJBCVGD10Q0PNg/RwI/2TQSRmMR/PVM 7tMxUWN6EqECS6ICc5IxoUc0BLQyRRIXMYEkxblQFjQxaFgyCwGGCYaESeOPKBE1LBFb7dN4IZmP AKFPBmGEl/cjMwQVMtQkGXUQcUJRxbdDEhUnYNMcZTMY23gtqGQbLlYBI7ACJ7BYkwhFS3Q3cqM9 lnGXSTkqUWkAGdKgpjINN4U4/2bHU3HUmachi7xUR7TyOXN0K75BK1hmgsZSHGU2LLAxR18piw5S SKHxLBbAZamRAMRkN5P2KZD0KX/pGqIzLXgUjXMEKaWEmUEKL8sTWHi1V48yUm7zAqxkV4CFPbQE A9eTla6CO5IGmL+EABGQVhGgpUa1MOWDKNlRGNlhKJ51LxC0GfeCIKCxGRDwAB+4WibwAIfCHxBQ RKBhWxTAWhegX90llBzgbBYAAwPWAXUxAcxWN4IREAUAADElQV2UAAPQa8JlqFIBEJzoRCzgTgIE TyyUFAHFh7J0bv1okhYxWdl1IE1jQQixe1RBHNXlYAwhAIrFATzBFfVkFQkxJ/82RCchFogyyTUb VWLzg2hFdEqK8Yh8lax81X2SQSkntVKUAkVx80QIglPBUEVT+QAxJaFHdjhTua1TWRu+hBjspxu6 Yj1t2UakEVUCwEhzeWbFknSkKTuCOWbSApewMzu1kyxuph/rES1l1i6a9Va8E44oeoE+Wh220WKN 0jYnAFVQZaSG1ReFxQLUd1iBFkszACl5M62/ZKWLYVkhqxqHAkQqcFr1wR+IUh974WofMmqI0mrx USDowmiEcijx4hGh1RwGg2h2kTCeNiKg0EUVMGC7JV/TFV/PFV7RlmsGtlKwQF3JtV1zk1zK1l3m FgMugFzbpVvRlbUuAAOTslb/HVpdvuVExfVd0kU30MVdjiV0eUeURkmU1ZVdx5Vd3uVEF3AAGiap Mjqp6aZkrtNzRRcLiIt097a4ROcEE7cFR7dwAxdwVJBwWHC5ZsB1mstwFmcHxvC5cxBxc+C5hJBx GLd2Gnd32oB20tC6rMu6d4dxZwdyKqcOdscHeycOK+cO8vByLvd3wEt4NIcJNTcEhOdzyJu8yru8 zHtzi5tv9vYEa/W8leu5+CYL2FsFkmt0bJB1TJAGS5BwnttwoEsMozt2yyB2shu7bUe600AH3UB3 Hze/fTANeYcH2VBy64C7K6dyu/u7ANx3Lzdz9XC8Q3APa2gPJiKPFORhMWKP/wsBwZS3kJT3IwZV wRjcTRr8JBPzIxVVUVlRnpXXq+z5IiV0Eh58Q7eXQyr8wSEcwiDMwjD8wTRcwzZcwzinuNRrddEr o327w3agv/92BVRHuVyQC/vGdFa3vUbMueZrvmCHDKN7DBKXdtUAu2UQd3jQcd3QcYGgxfiLDbMr xvh7u3enDnpwuyMXwH8XwMcbCTInc/fgDziDgzj4jxwxEBLjPyKkI2dohxixQppnegL0ehyxQUyD xyKMQj5TJnqhPzcSkPBUECFzEz2xagoheYwqMRWTEkyRkhnxFLiJQXLohDvxhBtUNFIhfD3DJBIV fBilJ8KafEqhCV2EdEh3Cf9NBwVcEL1KN731Zga/1r+6gMRSYMQC57278L1al3VZl8VfQL5RXAxj d76kqwbva3a0kMVsZ7phjA1eHMbhvHEmR8b1ew78q79mDA60iw6C53Lw3Lu+W3hFAAkswkxruCL8 8w//kI+bFz8RBHvlSRJoeD/Dt3un13kss3kaLIWNnDRW+McxYTRY4RAeoROkJRH5WBJKE0OfDCZL 4TOXlpA5MQFjMsEP8dFg0ZKZpxaZN8sf9ocUYABqQWI/azBBaxixxR9GCliIUgKStRiJIwAQgH2f MmNO20uj4gx7wxlFRgFeiVSQcUd+REjyx6545H5R5YphCWVOpUscUJfa4h3/iXEgghQtl4MfvSEd qqOL1DIu1HGwmvUbC0iWARNn0QIeXdWN+QEevzE8/+HX/1E8eWYoBcNnAnKy7SE8xLEZBFKCoAEB WQQ7JoggdroCDZIgJlAhm6azLRgfx9owb7GG7DMQ/8DHjrdAFLyQC2WbKK1CEGUQMMNAHRRO4iQk ZChB/TMmUIJ4Y2iFDVGdcEiS7HV7FDMxMWQ0BwFDMFEIHBQ1kIcj9eRQD8ZAJ5ObY3EjLV0WZCHT OxTTfwKq6fjIdzFqOO2wncQCHUspKyWao7EpXTQZznoBlQFM7y1G3jA/zqBFAVBl56djwuIrn2kB 1rg8q/JkJ4oY9ccbv6Gh/+VRpWMtHAkYLNWROWypSJH5GPr6HROoWRG4LatxgchyjBWOLrGxjQ9I V+sRIAMIIJv0Sc/zZ6FEKOYzmelxZnfpZq/zi8fCH0ZUgZ/EaiUmH+VjAvzwQUdOQS0SeSGkJfKz Qam8ekbjEZUsEhrBXxqtgzDShKWc3B4Repd3EjjjmjRCBI062yisNCQp0o0nkFX4Tv4Dm8stFUjC wUKSnGJS0YNsmx49jxR1NXayFF4DiOCNJ7WMNoOtYjX0E4TisI34NtimUipViYnhODnVRWiQGBdw AqFCHHe3OGSHKlqp1LfSoyISDeQKUmFpSRhKf7qEoQLuf3AEPsZBZV51f/8hPn9Upks8uqPQEy3E Ixz+PS3jgTkVjmcw/mbxYS2HCYKKLY1zho3dqIHyci6DHY35wS/z8R3J3qHAYy6cNi/lEx8PQwns kw8HtQ/ayccx4s8f43mSDCMF3RNBIu9XziPEHYeqxzLyLocqMTHPuYUwM+ZScsKwjUEVnTMk4o8j zKlC0e4mRIS4CROeNyalrO9iMRU5ZNJxwvHDaXzFp0MJIROHpjZjg5NAZPIsALEjFTdwQ4l8q15C JnYZgolJJxmdQpVWKUZObQcPcDvUgd9SmWTxna5h6SvKEixRVddg6YvmASy3kh1vVDtoCWWP4VRh NiHBxEhhtaO7cS0lfrD/JSvhmmXgvEON0Nho3U4u3SFLI8VZtPVmtOWzQRQ9HUjttgOwjHE9pW71 vME9vKIVm0XkhXgX0OEwAwExSq7b6P6GDmw/WpHayy0TAYkxDQF5ABGdDNGEwdkQS95OPLMVQmMm DgGREkSF/SMT053x9v4+AB8SAoQ1ttnBO0NONhImFd0TmjyerhwmW2EnMHyDcbIAVxOf8bkWgFLk aKOTarNphhEXGQsY4EJdBTqUk2itdjAqCqqgOiU4NbXzQxZGRObzVDmV+D0/P+aZuwQblzPquBgd 3/P0tp48AT4aGGrh9P8qUAU6cgkEFUtlAKlEKsZjUlhxOodP1nNjsSKs/1kLR7ttDi2bE+dUdW6o 0dXZ5GybNu+KnPrmsFh3zh0Pb7srVv4C5wCd1lb48O5a+PagtsaEqsKszLy0hLgO30o2SuZU5gAA HgAoABwACh4KHFwpXh8mJmZpbWNjaXNrJyhIKCZKhCmCHYJnU4N9hXeBgVUmSDJKNEqWdWm1g7mF VVSwVUrEl28nHJgnANRpj9Fpx8cpVKx158U1yGnX1fl9388FA/fOlrte53xF08Zs2MJhw4JVq0ZP Ij0KGqxpMFCgWDFfF30Z0FBsJMaLFwuMRGWCQqcKoGC+ZPmyxExQFViM6WChQ4cLPX/2BAr0gIAD Dw4YEKD0gYAAAioYCP9AAYKBqg8CQAjQlMJRARQMPJBKIcBUAxWwQspShUsWDhXagqkE98SkuZWq 5K0UxgQXNJbAfJlUZYoXFlmgIrEAQcDiIRCsKIb8pEJduEJ2XsBi4ULbzhY2W3krF1MZKJTRUGZT IQ6aOJTbvIbLosMe23ysHHbygPfZszhf5FkUXI/wOx1a1LYiZAvpuKKhi2aeqa2QlhQEFVqjypQB Vee8r4OFjlevZbMI/sNG4hqFa9cOngK4DNhFica2ISy3yxeJCeTWWccWEvIhwRb+yGMGP278a+aX eUhQAZgJrPlGnG8e3AUdUhAiLx953kFHxGDWyYWacgBSR0T+3MPoGnD/wBmnpJM+6ggsj04qacYZ iwHAjet+NAEmmyhAq6MVkFzBp9o6u+AnDnzi4KfOfLrAgqO8quApqsJSigIBHuhKLLGmKiupMrEy gCy4smDOLi82gY4Sv/aKAi+86rJihUjAWCOwIeJizbIw6LSgMCc4GCCJ5SyAyk4jFnNDNCs52ykB Cy5tq63QolvurUNTe2KNQlQbtZBBWHuiuOIa2QKPEyyA1QQ8aH3hhTuCywMG2vLgAIbaeA2Mi7ie 02JYY0EbAIEIlg0tAk8tuE7IT+ZYgyVrX8tOkCIhMCJMCB7wFq0HQHmgAmlbYmmEJP6AgCoKHjDB XHGcuCCGDioQQN8E/zrwYCct/3sxEQ/O1aYEVwJcxYEEibjAAxggYCbBCSr4KdpmGnqGwQklJDAe ZyroaQNaGvQPomcSCrGdAiZgBSEKITqIv5mDqQ8c91i+CBxmeOxoR5N2zPGkAHKC9TArTjjsBFhj 5XNpLfBwkrNKoZTSigMqOEDrA8rUsqqrjrLKy6/KJEssstA0QKoH9mizuk4pqeStYS+r5GhB5z7N CqiEYOxKJe5CVAgkmviiUTMEK9yxyZToWy2rsdAsiwauyILTNsFAXLUznKhLNsoWUWTVVfFo4bCi F0laOBaIM671XG/VbW63uji2C+g2a9uKASq3gHctEKiWNRPaEGWFIv8ROff45LELRINzqZqpSJba aEkAlrBbIzkP/MWg31a3CKonfz0IyskEgiq/AxfWh8FfJ5HjYIVoSJmq4gvQR9+nczUggYPkLuAC EPjrAN0YRn2EkIADDKAnLYhRBuYRsg7wywPoqwA8FlIBD7TAX/3CV4ZKAI0JBAABCYgBB6dkAISc QoMwOGEHwsQOBVUMKMVwgAo/oiAdkqQaFzGJjWw0Ix+BYgRtuAnTYEUGpD0tC0mbAXKqFMUWWEko j9EaUpDyJTFhyVxl0WIAxkKWsIBxKmARCyTYdDvqgGE0YMgDXPpCKEDtTQCMSQJUDgCBA0QAa8HD 49ZO07fAFI4ycqH/zGQKGchAvOUyqomCG0LlSDf9aXM4ccIUnlCXN6TmBKaajSJoxQITNG0MRisD 6zgQOz6sIDi5ohUoWefK5PAqikKpZWa6gAVl7c5yz8pC80ShAUTAoQKiEIUJNIBMQQiTEEhCHhwg UJMHbGuaJVjeBpa3AlCYAAIriGYJwrQGd2lzT66Ckk/4lT8CXGAA6CthCc9HgCrBLwHwRJ+TOrhB D9zrfOhrgMOQU74ElOUp/GJnAryHP/zlDwEYuIAAEIDP86HTJwEAwFNKqCyH5a+iFiXFRyXYL/x5 NAAh2yACPorRBPxKSx8FwFmQgwCPujQAB4hoPp0kUwFE8QAudWlL/7bVknMZMV2GWqIWVCeUKbXA Ao3oTHJQIKWqPYmp+SqS1p6ghZJqiSxiHNNYvlo2NhELE3RrTnNYA6gybKEvUECCoiADAUU9xnBZ TeQg9VZJQkoSEICqTGpY8BfNZdIQQhjEHzD5hjDARq+CC5WpPNkG1eXkCUbYgCJgxzpUanZ1ofSs Z1+QJFPZjnagOasaTasJ1ixTmc1LpvGwwxJRFAmbJphfMbX5CThYc7fFfEkgsJPM4xWjDeQsl7mQ VJMNYOUBqvDpc6Eb3Y+ic6EIWKf+8IecAQBAAO2coD470FOXDuCh5E2AAGiagA72JAHYRahMpevS /02wvejkF/vKh//PnuB3fAD1iXc9wL4l/cQpFzUwdBHQkwrEN74vWYE1fjs9crnnXE7Y5tIwTBsU WOkCU+wACjpwgg6woMMd5skYSsuT5sStCQbYgu5UNZ3TLierKyYNG8/ahNn5JU5WkKsJ5ipIHUeB kXcVDKP09pfGQmGUUMhLnkQ1BCgfQjV3uCSVLdnkzaEKNYGYAhlSc9jNGaFxqx3VBjYQSlfiAXa5 +pwnsLwGIBWpWsVVVYrVWJ3sYLm405sDBTYwzg1gxxOiTaYnbItbZMKhJa8NxHCT9AZR1CQ74OLN VniDCgZvmtM05Un59HUAnoxvSSjUn1NmalGCGgUBWEAAqjvdaQP/jO8tRnEYB3w601jvmte97nRR Qq0vowgb2MM2NrCRHexjozrZy3Z2s5WyFKPUlNpcs3a1sa0UpVhb2tzWtrS/HW5wLwWM5A43tbWN 7Wuvm9rkJne5yRhvqci7LPO2N0HxnW9975vf/e73RVVt4IAPXOD1I3hZAJ5whB+84ASv38MPTNKG TzzgEff1xTGecY1vnOMd9/jHPa41Yo9c2c9WdrOLUhSCJjvZNT35y11eFHGLe936are0n8K1abOb 59k2t7rLLZWe91wp+Ub1vlF9b3ov3d9Nd7pF7/3Sek+djApv+MIHTlCra13VDPf6wx0u8QNbnOE0 hbjZxw5yta+d/+1td/vbNV7slAd77nJ/OQJQPvdVG6XuwXb5sXPulL7PfOfjvra+vq3zoI/73Oye OdC5VnSdS/4pRZfKvJ9CxqMXnYxK9zzVP7/0e4de6VznusD5TXGAez3rqv+62LsOcdifPexjn72u 0Q533e+e9733/a+HjfKSCx+iVyI5slUd7bqrHPnTHna1C094bzul8E8hd8ohD/TGoxvcixd6Waif +fCH//KZp/q7K59+0YOe/euPN9UJivn4r17r8sd3AfDt+rLgH/Vbj/3rCw7sDE72CJDsTqEUWEE+ UKEWXEZBugFFFiI/1oMCUmA/JnCHUiBmHnCHcqgbZmEDjyECI//CQiwkH/6DBCEiItyjIxxEYyxk eb4hIDiQGUhQQr5hHGrQQiKkGiLkHr6hAnPwBoUwCL8hH/LBh3IEaIQmaJjwIkAu1Owu+KTQ2UDj 1V5u2FZPCv8O5QJv2CSP8QzP5ShP5myO57ot+67t+xwPDKUi/OAt/LgG/DjPTDov6dqP9OAvD99P D/kN/+6P3+aN/gDw//pv4QrR9QiQEFOtABfxAFvhompBPryjG0KwG9RhP2ZGBCNQGzLAQZpBGmpm Z8rBEnWoFMtjIZYhQXBwHjTAG4pQhAzIE4kBY2hBBR5sAlYAGNBhFngxHbjhY3wBB0kwIoCwIvIh BluxP6IhGnD/sASA8ASPMSPAQRrtQwmX8Bp5ZCQYrKaSotNGbu6Ojfh+59X6Lvj0DRybD9iUL/Bi jg3PkAypTQwRD/oSDw257/sI7/LcDd7aTfzizSmKzg47z/zcDw/xzf4Qst/kj/5W76WuLhAPbuH8 kOKwrusGsezKrgDTLgFvCAED4BUM4gN9oQHNIUUyMR02sUEwKEPSIUJ0URv8AxtQUkFMEhX/gQZL EDv0gRIjsCF+IRhrZhnG4T+yoTw2MGAuxD1O8EI+pBVjJmYmBGbqoQSGskLmYSLoAUN6iBWRMGhI AglPIgm/ctO4UWtw77mkUOToThyr8ALAEQo3b+WmMB2VLdq2/w3nzHD6nI/byk3w3DEfry/70i3y qA/zKO/oCDLf5rD84u8OHVMxIfMgp87+DvKipELq8g8iEfEiGzL/WM8QxS6lDNDhUsoBAmCEEtA7 XME7EIIjdEiFVmQTSRETN/EhZlIZ4UM/ZvAoIVAGLdBC5mED0UMb3sEnY1IpJ4Q9YoQ4cyFBRvFC mpEH90NCRtE/PmRnKhElf6EeCKQIJWIkJiIjvrIJw1IlekYkACBJYmKbVGBaPMsPjkdIBKF2MgG1 rMBJ8JNStOBZooJMvMrFMMFNRqMtzIBuhoUD8iJvEGWO/iJzMAHNeExu2AIv4iRx7ASvJmEwACUv LgNBPwU2iv/MyaIAkzaBrxYrCsSAQzmUEEIFDUwlNdagNQghVVyDCmz0Rg8Bm2o0RgMBm3rUNVZA R/csCZqHCSpLNbLiSJGLzNylm5LAXIDr0YrrD9ThNE/TEVczO2XSI17mJDdRNm3SEtdDHsoBF0pR h6LyHUiRITBEHDqEZdYBIGTkG6gBgw6oGCykPeC0Q8KhGS/kBjEmI3JTApURHCakBBIkJtUUK1uk hwRVCSGVPIPoJNLTBNrzOlrCmq7DmhZBOJDEUuEgOopFKWTsPuGnSYCHxtBm3tCmMbrgTTqUOTZh WAiDEi5BVjFnrTgUQctgE94IMG6VkhTnkRrJTpRsD+LAAvb/5FDeKJA4oA0GCZOWbJT2pDKcrMue IDb+YAiIic9qlHOwDMtclBD8IDXoDEZ7tFvPpTWIKdDqiAnEyV2ItFuowgj4pknpVZzyhVwgAJv6 NZtsCw6sBTvqZ4TW4UrR4TTFgjyckyfP1EvBdDe1QRzg4xVcU0O0AT3wA0y5ITaF4UPilGVegUNQ kSLcNIS4gRr0oSFaQQbJoQYrAkMmNjg1sT+KYSJO5h38w2SAoSFiEEecMiPE84e80hq9Mj1hIoKo R5iqR5vyIBHkJydE6TCK5ayOAoymg8M44wJOQD/lYivGqCneT8bipGzTaMVmlU3q5sgAI3MkYQwI IzBkB04M/wnJ7CSRUpRqm6wS9gSRIGXJDkWvUuORpKxzBCdV/MCwSEWyUmV4AMEyRAVxu2xUglTM IjdVeJQN0CwOYtQPjCA7zIUqmEAJyMwJuqVbdsOb5kAA4iC2BCEOdguoYBdJVC0STXOEEvYST8E3 Q5ADlZIqNcYmCWQaqDIV4YEqrdIXOMQHi9AWh5El5yNBQvYdvoFDFCZACsAf9IMpIyRgsKEcDtBL 1wMebvA7JOIk0eEhsnIYJgYVnwFG2OEBszEJVUJoxhMbUYEqjwcchGQOQKHRriERAiuUZmUFAGgn 1EhLyKQxpAY/t7YLwMRL0qRMyg217GJCXwwT7uRtAqcSYP/FLuAizbxAEu6kWBlFWAuJxoYsreBo rxolUu7WWhWJyQopVNtqyoiVy+yKeEoFEFAlNmbUzk6FVMC1sJBEVP6AzhiLiM2Fm0aXXU5XDN41 EPIoceMTm1qiPbE4XZ4H0TYAEq1UFlzmSptTYszDFB9iFGcGZWImRj4kYl8EB4+xTXeGRZT3IBYQ JNWBZUrgo87ho7I3ey/RIbIyIwAiQVTIFT7xTPfjY8jDJ22SBnFQGpoBIGKyAotRdx1wJKbxfq8R f8ESABINe1ZQm2xEm7yMBVaAVmaFNjwMxJBlMchm2EzVJx54CJziq8S2S8qiVAVjbjQFc9yiQ/9k NGLVQeH/Yk/Mqpzypi/21k0sdA4Coy++TIYDg3CySo+uZAq2dXPeYlQsoK3mJHG44A8gd69G5Q/U 9XKBuIfRING0g7Fg93O8lbZ0mMuc2Ei7xZtKqm8/13TfuTXcY1sOKztqoiXi4KKyFxVawRRiQTWb qxcYlhso2mAYeSGisgV/YVDnIyaHVxhr0Bry4yPiAV7YIUC0IUCci0NENk5bRk0/tnlNEh1cgSMG ImNvk3znAaY3FhlokNAwSEP84xm1khZO0zmPkDyL9pORcIj8dwUHmsKahyX6QJVZYAZKB4Bow2Kg w6rqKNpqamudBAWWoyyw4kvGgoKpwoKh4C1QTDqeoEhm/1U6GCVvGNRT1HaDLSltKWmQLrQJXsOY lbUtSJcJiDWvTsMMtNVwjJmRMAFaG6kJZiVbOaGx6JkyKjdy/8BaqIyHU6PM2FnO8JmI54ADPhcq 1oAFQFtxOSfReMvClEdanAD/dLcVPnISBWQ8uMEWzFSHKlYGd1aNfxJ6SSZDHoQEdvAYV5E4fRMe KuSlFfmlSWQVsHcfzkFkb3IXSnBQ4QN8e7cbMpp8l/OQKSC6v/tPi4E92INkosE/YgQftnKTyxOI fAaUzRMVpOU91nO4AsG2SoBWsHpqK0V8lkQLZlkrikIsoAI/yRogzxpsxwhtKOCE6TNEteTyikRu 7Loy/v+aEthEydjCLu7AQe/CkAipx3BiXO/CXvWocaB2r9CoWo9MVnXsNBIhNZ71rsR5DlLUcX10 nSvpdcsAWzjHWtq1nQ2Bh5UY0cKVsCyJm4fAT5pAxqVVsZNpXS21sgsBdl9KFlQkFsZDPY6Bt5sb j+3YHWiTQT5xQVjkQYoxT2VyRYzSFeXBFzdEkBUGTlWmQ9IBOKNBTVUBYYxXzenjQchBREJkGURW KJVbjWEGRryzKXuIHjjCRiCoI9Skfj2ZaMeyWt7DJhxs0LJ4oJOmgHMiP6WEigq8UUi1pL7CKapi wWHlanWZVcFILIR5Oc6kS77qLIDVUFQrUB4UOho7r0P/fC7oggv85ISHjFHS7K8eIwK6JY/ySFGy hq9oOJAGIZa/AA3oxJL0agoot7VzHBAiKVs8iVYad4iD1HFVQ52JWA7SOVUARcsSacn0KnFngnoG TVtNAP+ytxVut6EngDUjejjJvIx90Xt5Yc+Fsh3KvBn6Jzih80x5uhRJULljBMxJYUNSoUS+A6MF YgfpYUSYQWHy40Awnih3kR0iOhv44UX0AR4G3RukUR5gxEU0naIp4NI/Qk3u1yQopCN8JFNBPWmx R0iop5VZOT9VnUmgxAtCDSm0xGuKbgjCNvK2gmuwYipEDTG0xIvURE3ESi4uoS1Q7FgmaUIvwQza fjm+/6wNiqxBC2c0CvTKdKMJlAAqVjuy9eqR4qaucVXE2aQNCuMS0lk2LrvJ4/kMECGUGGmz1314 5IDO4F0O7nk0PMuxZ5w5grVwqmd4kGfQsnWEVIQVxlg9rLsXe/sghkEEbLY+dFEXUmRFdncbDrUZ 4HtnRBJjJxAYUuAGjZAieFKlP74dVPMTo4EChdEW3kNDarpjCXUXKrB3k8EYotsVd9IBHUQpJ14r dZ4efkhNOEIlLp0kgH5+wxIVZIJ6igQmriHpa8J/RekETGAMqIirhwJVhQ0IKoEDJFA8PARDISXw CBiKzYch0DxUiAZqoMutbisVy9hiJls4p3OFY9mYx//wNtn9Jo/lbE5evRHP8ZHN3Y2ZcLBYsFQI QAwwQlRAWEyORYqhiYmZaGaemSF8io65tZng5R1WnFRwmmycwqJqav5V2HK2arLw8rrx3r62rlQQ RxJzUtAKt8IWK7IgtnC0JL7loWVnkyrSqWmWiKncNiubrABQABQ4FDxMPLhPULTTTzhQwNvn58/j 48MjQUHghBLzVNybl/CeAQcAJ0Ds168EBRUUDKpQ8XCfQogkJghMUVGFhhIkVazg5wBixwkA7uF7 CXElRIsoVZhMCbGEhowGO7YD8HIlUXs7Wb6Dx3JmP5wD+XXMZzMfRYQkSmIlmZWCBgpeKRSgkIGC gXn/XL927XpWrVcNAMJRLGGCgglOJVbMrUBXrhi6anp1QNDhQgIOHTpYGNyBw4XGAQQIEQLZiBED AqpwofKEghIuTaBk3oLZQBMDZQjZqWNHD59SaVKXKVQHT50ytjkcinVNkKAVZKw1kkSrQqhLEVCh cYbnVGwzdlJ/il1KkKZXmZAVaxZrOC1im5yJQRTNl6801YfX5X5rxYpevqa9j4aNUHM4nlZry5RL GV5nr9KtA4ADZb3zTz4PvZNgPu/swyBNUFF0ET0PzsRSP1F9ZJCEJYi01FBQKTRQRgcCdFI/DylE YYUv0VORQib9tBNOPfFEAkD0yIQjRAKyVIJMMhG1/5RLFKRAUYgERVRQiCBpMMGMJmFVUZRmlUUa W2K1ddZaaKmjTFx62WXCXXpVEA6YeOFlhgkXDGZYmxcwZphhF1ASRRQBMPLAAQJQcIATftoJARZ4 EirEFo9RwSdmUJhmBhyCZLPBInG0lsl0cZxB3xrZ+EYbbW3MNyltj25zSSS0nTpcJifMccoZjDl3 AQLQQeccqI7q8QcxxLBqwiLgYafeJru4x0s1sK7BSiTKAEJmMSy80Eu04sHASwfjyWceGrVW+gkh ZwhgAWSOvvFKLq+UAEsBAbDzUgADrtRiPfEauFJSD3hFrz/8UFUQVOo8iM9H/ZBgUkYWzYOkS0wB RP8QTwgtTNMEJSF8z4kXLnSgxRcpqcFHL+I0lU0attQOTURBSU9YDrHDUpA7/ZtkgUvmk0EJD/PE U1cmWkRaWGFxZRZbahHNZTp2wSXmXEuDGc5cFJV5iBuNJYbYYlZfPZgFfxqBhJ+RRUHE13geYNpl pUHRxaFWdAEFN3DYhyl9g5B72hsnXLoKNnuzYWsdqnAA9yq7HYLHJGSEW0nis4hbQQR5YOJbAhZM bsEFDFiAAJyZi/IcGsS8Icgi2jWDnrB4nadLL+IlssYYrpPxQBaAQBstLy8gYns0L8A3HiLbvKqt G6nxJorxkZq7QbrhoKMOO/GoM0EA+67U0L4QJSj/84HbE/SUQRT9w6NKTxFpZEUrDZWQxtYnaZJL 60g8j0kXvmyPQANHpeRTIHmVMEZSmm8n3WNJOpx0s4pEz2TysNjCDqI+euXILN+TEVYetrMKkOQr YNngxLhStKFpqSsAKBNdLnIzuXipaa24C3vqQpE1JIBNiplT1q5GJwtogU9f69MQJnOAPkWmC6VB ghPStjY8YcM80KED5IAXm1uk4Q6Y0ptrkhMp5AxnUuRgFaswgY1UTaISh7uEF/lQATpNLhShQAxj BGM8UtXGUrmpwCK806zSLYM7roCFNDjAul5YwDfPScTuOPAC3EHLF4hEhHg4AAM/RjFTkYzi8CZJ /8njmWEAoOBGdlYAi7mwJ5SiHKUoOQEBvoyALhUQwQpGUBcXKu0ceJElLV3RCk6gRAaijJGECNKG FngAAf2zmGEs4KKg6CsfAsmgFTLGP/z9hCrKfIpABqKhgVCMYwlTRgfigsD7UVMj7IAX9hKSI/dd KB85otDDbIKQtlgkS1+Zx8+2lCUQ3nOEFEmlCy+ytLzYMj25YE8HWqCYw1hNhgjVmtb2ZBrLcMYy jOAMENnGtiZQ4AmaqUJGIeONS8ZxNnsTHRM3gDdPWGpvoKLDo8LTCjJAgDp44JUtCGkJmApHOJTg m31umMYbcg6ooQheHLwYOVosYhHm4gB27Nid6v+cAC++890v4POb9jDykOPRqiNZMA1GfnUaqsGU c4JXyU+kBgHHydxxhqpG2+yKArDYlQZMoIEVjGMcy9uACjiBlwfIzpSygwAEKHAJ2YXjAaibCwTy gq/Hyk52Y/BADDwwDXUAwADU4MABAFDNFTgSoY3RnOVIKCChCMUBLLKc5gZDGAEwhDASSEAM9QKS hPnrJ99rkgqqSYIRzSMxHuhmQRympNu2RUPtYgeJklQRI/2EQUNi50gopoF4mW+ebUlLWrR0Ty59 JQDs0cUJclFeC5zgBNZIlhlYoN70nsBqKBDtQdtUCjEM6oeXERSeBKBDPXkGT6KxghK2UJpIeI7/ kn04jTX4JrfZkLWskojDI2AaR1rYhziqwKLeMhGJx+1UVSE2Hp1aqzlZHW+JmHIDc7pBC1bkQj3Y Yh0j/1jjqSbid+pFb1b/qLtoLYaqeyBq50CKSQtoUq2cY+tQzeBJE6CEP52kQEpWkC5QUnlXxUCd GAabl0uYQLwBuEtfuywJZUj2AjHowHA94GZgdsAFCAiAUATAAct2IAHDxcBh2DTcMkGtoAJArQMO QBg2u0AxB7RcnhtjWdta6EhPyRwBWqC8+xVkBQa9gAfoNJHjpqvTjr7swFQQj4V04TAuaMGaEVCB pegpzjDowKuxmxHrIoS57wyRBjXQ3Sv9OoRc/xmhr9CL3vSaIVnuNbY1jL2KNcWXTZuW4ezKBgED D6oCEh3Ctfmkw9J4hjRK8EoXkKCMB9uKD4tQt7a0gQ07wC2KsUEABAQQgXBF4BGRICwk6EjWkWZC DqoSQyUs4UUQXyJT5Hj3GSoHVKLyzRDLEYN3Yswdp9IRx4wczxkAmQb1ssBXiyRPIg2ZyBn/zo/R GB4kaXXJBJ8BAZpk65LVGAe5nuMVF8FgMUA5JryoYK6ghHLUJAEByUqW4FbG6zlK0FgLrPrPuqia C6rO5sO0mc0XGIB/GxNDhLqAA1IZRwW+7vUEFNQDESAYlQfTado2pgMmsNAA4H4BAugZBi64gP+G MlSBPjua1pH2FwvoK6thgvrOcZchDKoxGLQn+rIY84dgYLBmvZBMIk2KmQaF5t2x/NrXZyH2V3yF 7NMj+xPKBiSd4MQmFsT9MDgUwg/xRFEfdjui2r4o20gDBcOCgQqcNKs3QJU3chWP3Sh13AEeB5kI 7FsSj4sEFjzRiSd2Ag+jI/invEiGx4GYEOBBBTH+8IcjT7H7ZGBFIIcFCIunoqYax1YZ3KOINWDV PYbcOAs2gEjbAeC0FB41FFR9KZTh0VcmKWAozNySkcE/2QUGOcOumEl/AF0obVlKxJhinVlKFMNd 3MU5VMADgBIErEBkcQI1wNmhDQYCnJgMydD/cHXAmg0X3L0dbdWdn8HZcLEJBsTQD2ZdCHgdYQyA YHRAZ6FWEgLAAfzgBTTA1QVGEtoZm3xdDNGZEgpFACBU1oFAol1hAODZQgkBahlAQfmJEj5GDP3Z F6IdniEAFsJhHMJhzy2NV8jFe6FXs50BfOFBY0ibYrRAYrQAm1QNrWVBn/QJgHmNnvweaPwQI9oJ aYQGF4QH8hlfEjWHbJSBG2RYHKQKGTyC44ji9EHGnnyKu3VfxHmKiF3f9eXC6MQYH7Cf+7WCGQ2c GGyfBcAfLpKDLejCH8TYKxRLsfjbe+HN7iAStpDc/kVLeyRjItlOC7TAfC0Um2wOkWHSzBVh/8yR gZbNEs95xzjY1TnQxV1BGXsEXc7xVTFsAJWVCc9F2dJh4AmqQGG54zuaRDDghY/IYRbS2QBoHULR lg1qHWGgHW35F9rl2UAOQA7SFt4plDXGXQI0JNf5IQEkpETWINbJCt7pWZ7JXA/G0AVgAGFcIQA8 BkceBp91AEoKwHC5AAiwQGtxGptxwEmO0GJ0ARYeANZpHUtCIdz94ABkIRImIaDdkoQ8gFy8wo6p XnpFA7L5oeVI5CBSjTUqRlF5xWXgCxLRgmlYAUeJxrVlVNlslJ4w0YUV1fBhwjdUEm7ARgUMwCSE CxZEQPM1n0e1gRk5kfdZn/Wp1OHQwix0wv+knAtuuJT56c1wsMJKxRh4bJ8u8GJ25IIvVhx4aAKY jY57URUHfEDJuUd7SIt7RIukzAALnOYMpCYvpJglmUGJgYK4pIHMOSAumUt29FU42maZsMdd3NV4 7coGWNkf5KZerUBJ8CZK9KaVJY1XfCDPARa+VEA/UidP9plQ1qRPBlNDCkbWGeSoDRdENqGshIub HEYLuAAMKMB3EoZBtg1KKmFPuhnc8ZmfwYAHfB0UQqGfyVCiyaBAEkBN/ucRopZ/GYac4WQX/F2i XYBRxmEdigm+1MXOuQJ7RSV8pdcFzNcgBqJrdQAKXADscagM2cFiUMcmUhKzQNSKBtgWmOX/gM3H fbybg22LEm0LEVCCbErCXNKGLXoKYE6RUQXpKX7KiUamUdXiZHqRxQ3CcNhiea2CLxqVd2CcJlwm thAmGdGRVo2m/t0OybmHep3mQFWmqpwVNsbmrBzPcy7WB8YVBg1dXaFEuozDeM2VrhAnPGIQleVm XeGFXMFFzwEWV6ALY2FWdSIqFg4AnVFkG+7gYexeFjYk2jUGAWiOQqZNYshK3SXASeLJFmqdDOLQ oMnhAWxaAuBdnx1GDClABwxAgEKhB9ynSrZg2whAdzZeYGTBe8ohTiYqnOYcXYiJKoXJLqyee/nh BcRXtH1o3MXXfM1XWb0GnSCGWW0NHeCB/35lAVqeomkwgR6gaPHEaB/cjX20lCW42iPM3Ow42aqo okoFnPrZBofVwgMGA1wKC3PQIuTkAejoii5qQhfVgvvhAhxg1WM25ixEX4yJpjIOo6TwAsadS3ZQ bHWwByyAR1qhVSS5HJncIzKAkl6YgzuOSV/V6TkI5zjSlcqGQ15RhCypkl5VgAboxRMU0aCWUKLq rBz+3ePd3UK1mTSGwKoKQBtaABneGUL5qhoihq/a6gEcgAW0QAgYlK+iVtKWJBEiwH/GHQIQwNFm IQIY1HTW2U7u7NnCYZSJSV+YwCkRqyqlUGJJyMYeWa1Iq2vWKBJg61tSEqS0FMdqAydeUqEe/G0U wUEikMJKBZxr8GuEpV+HXV+8el8TccdvEO71RSYnPKC9Tt3kDiwULRzGPsMujEH5xVj7vZ8p5RSZ oof5sccw6g5qPlnFtYI5AAKX2RXFfYcmnKnL3RwJDZ1eIIMGFgPO8UWWzQVdPFlFsAeVFaryxFWw YlAptZAoSYIA2OwDoO32xmEZcoAUCgCnOYd+5pmlWi33bi+eoO/6sm8QAAA7 ------=_NextPart_000_0103_01C04F1F.EA3339A0 Content-Type: image/jpeg; name="=?gb2312?B?19TIu7GzvrAuanBn?=" Content-Transfer-Encoding: base64 Content-ID: <010101c04edc$db9a5470$4d049c3d@yangyy> /9j/4AAQSkZJRgABAgEAYABgAAD/7QY8UGhvdG9zaG9wIDMuMAA4QklNA+0AAAAAABAAYAAAAAEA AQBgAAAAAQABOEJJTQPzAAAAAAAIAAAAAAAAAAA4QklNBAoAAAAAAAEAADhCSU0nEAAAAAAACgAB AAAAAAAAAAI4QklNA/UAAAAAAEgAL2ZmAAEAbGZmAAYAAAAAAAEAL2ZmAAEAoZmaAAYAAAAAAAEA MgAAAAEAWgAAAAYAAAAAAAEANQAAAAEALQAAAAYAAAAAAAE4QklNA/gAAAAAAHAAAP////////// //////////////////8D6AAAAAD/////////////////////////////A+gAAAAA//////////// /////////////////wPoAAAAAP////////////////////////////8D6AAAOEJJTQQIAAAAAAAQ AAAAAQAAAkAAAAJAAAAAADhCSU0ECQAAAAAEywAAAAEAAACAAAAAYAAAAYAAAJAAAAAErwAYAAH/ 2P/gABBKRklGAAECAQBIAEgAAP/+ACdGaWxlIHdyaXR0ZW4gYnkgQWRvYmUgUGhvdG9zaG9wqCA0 LjAA/+4ADkFkb2JlAGSAAAAAAf/bAIQADAgICAkIDAkJDBELCgsRFQ8MDA8VGBMTFRMTGBEMDAwM DAwRDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAENCwsNDg0QDg4QFA4ODhQUDg4ODhQRDAwM DAwREQwMDAwMDBEMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwM/8AAEQgAYACAAwEiAAIRAQMR Af/dAAQACP/EAT8AAAEFAQEBAQEBAAAAAAAAAAMAAQIEBQYHCAkKCwEAAQUBAQEBAQEAAAAAAAAA AQACAwQFBgcICQoLEAABBAEDAgQCBQcGCAUDDDMBAAIRAwQhEjEFQVFhEyJxgTIGFJGhsUIjJBVS wWIzNHKC0UMHJZJT8OHxY3M1FqKygyZEk1RkRcKjdDYX0lXiZfKzhMPTdePzRieUpIW0lcTU5PSl tcXV5fVWZnaGlqa2xtbm9jdHV2d3h5ent8fX5/cRAAICAQIEBAMEBQYHBwYFNQEAAhEDITESBEFR YXEiEwUygZEUobFCI8FS0fAzJGLhcoKSQ1MVY3M08SUGFqKygwcmNcLSRJNUoxdkRVU2dGXi8rOE w9N14/NGlKSFtJXE1OT0pbXF1eX1VmZ2hpamtsbW5vYnN0dXZ3eHl6e3x//aAAwDAQACEQMRAD8A 9LDTMd04rKK3lThG1ggEQrUw2FIkDlRNjfiha6gF0kg4FOkpiUx1TkhMSEUMDWPgo+l5qcpSkjRT WhuimIQ5SlJVpZCYuChKSVJtdxJQy1ymkkgi3//Q9RbyFMmBKYDVJ/0SkgbI3OLgZ+5RT9lEnukg lcOgyp7pEhBJTtcI1KKLZkpKJeAobjJg6FJFpEkOToe4Sk8+PKSrSJ0MSNEi5wiSkpInUWuMweOJ U2w4SEkrJKUJQkqn/9H1SEjqIPCSg7yMFJCN2hhQJ0T2l0a/IhAc5x0OiKwlkXjsma4nTkKHPCky ZSWs04SHwUg0FJKwHgpAJwD8U8SkuAWjxUXjgKeoTP1A7eSCqRifgiMsgweCdVDjX705GqSmyIcJ HBTwgUvgweOwVhJcH//S9UPCC46yjO4KrkyiFslnQeUNwjQ6qadFjQFnhonY1wdCnsIGpTgcd0FU oAqQBTgJSgvpUlKQmJKb4pKtnu+aZ4BHwUdFKDGhhJVsPxCQ4+CbX4ppI18EFJK/pI9ZPHggVlsn XngI1fJRXB//0/U7DDVXHKsPEhV+CiFk91OEFIIgAcIKXpoo4VgFL0+/CdohSQXAIUxRHubED8EF 8/moIKimUHbhzKbc4d0lqQFSBKg1wPx7hTCSQs9p5HzUIJRgkGNnjVJcxqrDwQR8PgrDWhogJNaA 0acKSSX/1PUHvgIRdKcukFQTgxSKRhRQZQGorUCuiWai5v7v3KSSS5CmPwRXNB17oTgRyEFpYOAJ 118lAt00MnwRCmKKGLGO3jjzKIAYB8eEqmncTMfBGCSQGAYdR4aojGRqU4ToLlEpiUxKG5yKCX// 2QA4QklNBAYAAAAAAAcABAEBAAEBAP/+ACdGaWxlIHdyaXR0ZW4gYnkgQWRvYmUgUGhvdG9zaG9w qCA0LjAA/+4AIUFkb2JlAGQAAAAAAQMAEAMCAwYAAAAAAAAAAAAAAAD/2wCEAAYEBAQFBAYFBQYJ BgUGCQsIBgYICwwKCgsKCgwQDAwMDAwMEAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwBBwcH DQwNGBAQGBQODg4UFA4ODg4UEQwMDAwMEREMDAwMDAwRDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwM DAwMDP/CABEIAJYAyAMBEQACEQEDEQH/xACOAAADAQEBAAAAAAAAAAAAAAABAgMABAgBAQEBAQEA AAAAAAAAAAAAAAABAgMEEAACAgEEAgICAgMAAAAAAAAAARECAxAgIRIwMUATUDJBImAjBBEAAQMD AwQCAQUBAAAAAAAAAQARIRAxQSBRYTCBkQJxEkChscEiQtESAQAAAAAAAAAAAAAAAAAAAID/2gAM AwEBAhEDEQAAAPTXk0aw+pTR9xqIAAgSzicihL2tY+hrCwmLPKeFNq7EOowawDAhYEuBACY1ENCB GACG0puNWFEkMr1gQsCBKARjGjUQBCasYr0hqcQkBisri5ogQDGMYJjGohMatVdzVzZgBCxotNaB ACAFYIQ1ghNWMNqU0U5pBCwIXNpK4hNBGogDWFK1a1qJjJTQ0pzZiQM2eSwQmMGsNRNWs54dKW9e q5jU1YWI5QyTKMJmGrLqNNTGsNGsQkFEc7daeiYERyllzYShJANXRa1NWprGt1mNUMzGAVru1omp co86sc2ZGEgIa6bW0Nj0awawKhmY1Y0dm7e3E8I8qsLEhEAidG61ho0DRqI1TkmCmMdVtrXqPOx5 BACRNYafUbTAgQpg1qUkhBVi9t7Xrn42eCxghoaCw6hoQIWNKA2GjUEUUpV7ezVY5eFTNaxMiPo+ x1ERRYXISgBhrDopFAX1e/VY0cvGzxbdIIENo+pTRScQzIZCFGKWtYdGoGOvVcwIli8/JTau41AJ qQjmLCRDJYBSr6Gm0aqF7cAnix5kzTZbopqGiIQkELAhJVSUNXRa2o9NV7cCBEedlirDFOkruNox hCGYkCFBKBq67TqPRrAhMlzY8yyiGqm5TZ9xjAEiGZOBKDFavqvY1atCQmLPL//aAAgBAgABBQAg gVRIXjS2tjYxnUVSCCCCPFJJJI3sjRbJJ8E+RaTskkkn4C3ST8JD2ST8CNr0nWSfBHjZOk+GNkb2 MbHtWkEEeFbGNj+Itbb4+AtLvfAvKtFpcW2CN86LatWWENaoSI8y2WWiHUgSFsZJO+CBbLaLSCNZ 0ZGxeGRskTF4HpBHhkkeiExbX4ELY2To9EIW571sYxn/2gAIAQMAAQUA/Lz/AIzOyfyE/KX45+Bf JX45fBn8pHyV8leH/9oACAEBAAEFAOSBVYqFalULYx+rY0y2Kx9dxYbMrTqkhaSh2LWLNjHjU1xq FjQqI6IhEDWrWzjTsdjudx21hDrXSi40+yo86K5pckkobRKG1pJJPip+pfKk8jbspRJiyMdh2Gyd y2LZBX9buK+3bljJ5raat6SplCsm3dJ2vWr7VhOsKyekbYF6y/oN82fMppsx2Sq7cfbUtZu02G2x t2EpF7hxVyVyW7dl2gggggXq6mr4H6bJL3itMqa7WQ+SHECbIhxDiT+Oa2V7J1yKa2rZwQQQNpKU ZqjZayVb3Y7NlVVuEcoTQkQdWhQJDTiynR+8Wa+N4r96QRoy9ObXypXbq73dlEqGirt2TFB1FUTa FDTqcolMaizUOJr/ABgs65K2VlpdwO3LZejQ8VWOtqtMo1KgSQuBEECtoyzsmnKrwyst47dXM6ZR +2y1VYvVKzrI8VWfX/sVRVOqOqOTtY7iskTJlSmJOzQ2UT7GFvoZXy2SSJF63tZ1shptKBEjbHZn 9mQQQZO6Xax2TVbQ8Ks7sw/oZnyh+9Eh4m7dWhLV7UWTdWmhtDhmP7bPHkva2OrrV+sjl193rxpV CR9aZkpWr4HA3y2Ns5E2cnJkx9jk6s/5Kt2pjrXRmSvK915VsYqNCRVCOlZzKbZGq1eSzbvc+26K 5ZIJFo8VWLDRGPHRU0bMik9OlhMhHU9H2Um+VjaZasn10Mi/tAzFkbEhCQjFRWZJI7F8nLtJVlWJ 6IyU7JpobY5JP61Hiq30s74sWT7lSzuqtuuNu1cTZWta6NjsOxf9hFGLZeisWq6nJEjSGkODA79k lNKpCSQhjY2OxyP2IqIWy8dbKmj04P8AniUL1raRyW7H/9oACAECAgY/AG3/AP/aAAgBAwIGPwBt /wD/2gAIAQEBBj8A6myhWoAOjFvyLafZ4+t1AUwo/DFGElOc3U0Y+SfwwiafIU3FIQLvzVsrlEZC AOcoPlO8J3UY6ARh6fon81n27J1KJGLeEPZ3K+2U5ui/hciafUmclAmwjsh65M6yAtmoFFCGk5Ra n7qFNt06dfsmynGVKfIKYF863HwaOYZEdlvwntzTdSuKR4TWKZRfC23C5CBRID/KBNzpJ9SyYh1/ XwuAuQnGUG7KRWLqax4KYwVxlPR0CMfynGpzI3UQuHZM10AZ41QmPmnKLymTYNkQgBlcG+qUwEMt 2WyAxzS2mQoMUcBlyp7FP5TDe9J1kgfCYmRdWnFLK1bst6RCgxtS3ZN/kpxAFz8L5TtfoEjKY9Jh +tOVEFA+rgi7f8Te3q3NkxvocaXKYKehdPlNQvDsx8p876WUaXIlDAUXUYV7K78pjd4pFGyuVuvU NselZwmdf180bFG5T+VOF9T2NI81L2GltfOiygJ3RDMB/pACwMlfUSUwuvr57L24UZv1XacJjpuo 9fs3akJ9/wAAvZFjGBOk79H/2Q== ------=_NextPart_000_0103_01C04F1F.EA3339A0 Content-Type: audio/mid; name="preserve.mid" Content-Transfer-Encoding: base64 Content-ID: <010201c04edc$dba81010$4d049c3d@yangyy> TVRoZAAAAAYAAQAKAHhNVHJrAAABDgD/AylUbyBDaGVyaXNoIHRoZSBQcmVjaW91cyBNb21lbnQg PENQMDAwMDA0PgD/AihBbGFuIExvayAtIChDKTE5OTQgQ2x1YmhvdXNlIFByb2R1Y3Rpb25zAP9Z AgMAAP9RAww1AAD/WAQEAhgIgpFg/1EDDDUAF/9RAwxfOhj/UQMMip0Y/1EDDLc1GP9RAwzlDhj/ UQMNFDYY/1EDDUS9GP9RAw12sBj/UQMNqiIY/1EDDd8iGP9RAw4VxBj/UQMOThwY/1EDDog8GP9R Aw7EPRj/UQMPAjYY/1EDD0JAGP9RAw+EdRj/UQMPyPIY/1EDEA/XGP9RAxBZRBj/UQMQpV0B/1ED C6mrAP8vAE1UcmsAABmhAP8DCE1lbG9kaWVzAP8ED1Buby9Wb3gvSHJuL1NheADAAgCwQAAAsEB/ ALBAAIFtkElDPZBKTAGQSQA8kExWBZBKADOQTAAFkEVFOpAmSgWQTksBsEB/A5BFADSQLTk0kCYA CJAyPgKQLQAjkE4AC5AyAAyQNkYBkE5MFpBOACOQNgACkE5HAJA5OzuQTFADkE4AE5A5ACaQSUkG kEwAN5BJAAGQR0w7kCg+AbBAACKwQH8YkC8kL5AoAA2QLwABkDQ+NZA0AAeQOD4AkERNAJBHACuQ RAAMkDgABZBETAGQOy4hkDsAGpBFTwWQRAA3kEUAAZBHTTaQRwAGkERJO7BAAAGQTFQBkCVFCpBE AA+wQH8jkCxHH5AlABWQLAAKkDEzBZBMACWQMQAPkExWAZA0NRuQNAAfkDg8AJBHTQCQTAA6kEcA AZBFTjyQRQACkERNB5A4ADSQRVMIkEQAL7BAAAWQKkUSsEB/K5AxRAmQKgAzkDEAApA2PBuQNgAc kEUAApA5RCaQOQAUkD0+ApBCTjyQREcBkEIAIpA9ABqQRU4EkEQAOJBCRwGQRQAxkEIACpBKVASQ LzsEsEAAHLBAfxaQNkM0kC8AB5A7QgCQNgAkkEoAFpA7AAOQPj8BkEpLPJBHUgGQSgBukD4AB5BH AAKQRUo3kEUAA5BEXTuwQAADkChIHLBAfx+QLzE5kC8AAJAoAAOQND4zkDQACJBATgGQOEwAkEQA PJA7RAGQRFcCkDgAAJBAADqQRVUHkEQANpBHYwqQRQAokEcABJA7AASQR109kC1aBLBAABWwQH8i kDRNApBJYwuQRwAnkC0ACZA0QQGQNAAykDQACJA5RACQRVUCkEkAOJBAPwiQOQCBK5BAAAOQRQBC sEAAg1zANkKQPU0tkD0AEpA9TTOQPQADkD5SIJA+AAWQQFWBBJBCSwiQQAA6kEBbBJBCAIQdkEAA OJA9UC6QPQAMkD1WOJA9AASQPlIkkD4AA5BAMFuQR1oFkEAAaJBJVAOQRwAskEkADZBJWz2QRVcL kEkABZBFAA+QRVqDGZBFAC+QQlsdkERUBJBCAB2QRVIAkEQANpBHVgGQRQAvkEcADJBHXTqQRV4G kEcAGZBATAGQRQCBEJBKZQCQQABZkElnApBKAFiQR2kGkEkAN5BFYQOQRwCBLZBJVgaQRQAZkEdd AZBJACSQRWABkEcAghqQRQASkEVbPJBJYQaQRQAhkEkAApBHZCSQRwADkEVgK5BHaBaQRQCDNpBH AErAPACQPVcxkD0ADpA9SzOQPQAGkD46JZBAVAGQPgCBD5BAAAKQQlM7kEBUBZBCAIQjkEAALJA9 YDCQPQAPkD1ZNpA9AAOQPjIhkEBaBJA+AFqQR2ECkEAAdJBJTQaQRwAwkEkADZBJZTmQRVQFkEkA DZBFAAqQRVSDC5BFADOQQk8dkERNAZBCAB2QRAACkEVTMpBFAASQR1s0kEcADZBHVTmQRVQAkEcA HpBFAAOQQFKBFZBKVwCQQABYkEliBZBKAFGQR2wDkEkAO5BFXgOQRwCBK5BJXASQRQAekEddBpBJ AB2QRV0AkEcAgiyQSVcCkEUAN5BMaAaQSQA2kEwAApBOZROQTgAJkE5uWZBMbAaQTgCDJ8BAC5BM AIFukElzOJBKZgSQSQA4kExjAJBKADaQTAADkEVgOpBOcQiQRQCBJ5BOAA2QTmwtkE4AC5BOZzOQ TF4FkE4AOpBJZwKQTAA9kEdZBpBJAIFokERXCZBHAC2QRAAGkERYOZBFTgOQRAA7kEdWBJBFADaQ RwAEkERfPJBMXgWQRACBIJBMAA+QTGFAkEdmApBMADaQRV0CkEcAN5BEbAaQRQA3kEVqB5BEAIIn kEJsBZBFADaQRHEIkEIANJBFYQeQRAA7kEJlApBFADKQSlkIkEIAgSWQSgAOkEpjOJBKAAKQR2xt kEVmBpBHADuQRGwMkEUAgWyQRAACkEBdNZBEaQaQQAA3kEVYAZBEADmQR1oHkEUAM5BKaAKQRwAx kEoACZBKaHOQSXMDkEoAgTuQR3UGkEkAMpBFbAKQRwA8kExsBZBFAIFF4D8+AeAePATgXz4B4ABA WJBJbAmQTAA2kEpsCZBJADSQTGghkEoAHZBMAAOQRWA4kE5pDZBFAIEakE4AC5BObDWQTgAHkE5f ILABAQGwAQAXkExjBpBOADiQTAABkElsPpBHXgeQSQCBZpBEcQmQRwAvkEQACpBEZzmQRWcJkEQA MJBHZQOQRQA4kEcAAZBEZz+QS2oAkExnAZBEABSQSwCBFZBMAAmQTGw2kEwAB5BMaDWQTAADkElp OpBMaAKQSQAEsAEBAbABBAGwAQcBsAEIAbABBwCwAQYBsAEDALABAAawAQEAsAECAbABBACwAQUB sAEGALABBwGwAQgBsAEGALABBAKwAQAqkE5xApBMAIEE4EBBAeADRwLgJEgB4ERIA+BDRgHgXz4B 4ABAgSGQTgACkEJmOZBEdQOQQgA4kEQABpBFbTaQQmQGkEUAPpBKbASQQgCBI5BKAAqQSmU1kEdr BZBKAHSQRWcEkEcAOZBEbgiQRQCBZJBAZQCQRAA7sAEBALABAwGwAQQBkERxAbABBgGwAQgBsAEG BbABBQCQQAADsAEGALABBwKwAQUAsAEDAbABAQCwAQAvkEQAA5BFYDaQR2ADsAEBALABAgGwAQMA sAEFAbABBgGwAQcBsAECAJBFAAGwAQA1kEcABJBHaIEBkElsDpBHAF+QSQABkEVlMLABAwCwAQQB sAEFALABBwGwAQkBsAELAbABCQGwAQYAsAEEAbABAQCwAQCBd5BFAIQTwDwAkD1lNZA9AAmQPWU3 kD5hBZA9AB+QQGkDkD4AgROQQmIGkEAAO5BAWwmQQgCEH5BAAC2QPWkykD0ACZA9XDuQPl0HkD0A HZBAaQWQPgBTkEdsBZBAAGuQSV8HkEcAM5BJAAmQSWE/kEVdB5BJABGQRQAIkEVrgy+QRQAHkEJk IpBEXweQQgAWkEQAAZBFZT2QR2kHkEUALJBHAAiQR107kEcAA5BFYx2QRQABkEBggRiQSmYCkEAA T5BKAAGQSXNfkEdsB5BJADOQRwABkEVggTCQSWkFkEUAHJBHZQeQSQAakEVmAJBHAIIrkElsBpBF ADSQTGADkEkAPJBOZQOQTAATkE4ADpBOaVCQTGwFkE4AgS6QTAAHwEABkElzO5BKag2QSQAzkExm BpBKAC+QTAADkEVbRZBOcQaQRQCBJZBOAAiQTl0rkE4AC5BOaTqQTF4IkE4AMJBMAASQSWU9kEdP BZBJAEGwAQEAsAEGAbABCAGwAQoAsAELAbABDAGwAQ0BsAEMALABCwGwAQgAsAEFAbABAgCwAQCB XpBEZwSQRwA5kEVYApBEAD6QR1YEkEUAMpBHAAKQRGU8kExeCJBEAIEVkEwAF5BMXTqQR2oMkEwA NJBFWQaQRwAvkEUAA5BEYz2QRV4GkEQAgiyQQmcDkEUANJBEWgaQQgA0kEVZA5BEADqQQloAkEUA PJBKYw6QQgCBKJBKAAWQSmA4kEdaBZBKAG+QRVoBkEcAO5BFAAOQRFZosAECAbABBACwAQYBsAEI ALABCQGwAQYBsAECAbABAEmwAQEBsAEANZBAZQSQRAA4kERpCZBAADKQRVsAkEQARZBHbAOQRQAy kEpmA5BHADWQSgAHkEpmd5BJcQCQSgCBMpBJAAKQR2E4kEVmA5BHADuQTGwDkEUAgXSwAQQAsAEG ALABCAGwAQkBsAEIALABBwGwAQUBsAECAbABAC6QSWwFkEwAOpBKWgKQSQA7kExhCZBKADiQRV4B kEwAN5BOcwmQRQCBH5BOAAmQTmk4kE4AB5BOaTaQTGMIkE4AMpBJZQGQTABBkEdSBpBJAIIIsAEC AbABAwCwAQQCsAEFArABBACwAQMBsAEBAbABABOQRGkKkEcANJBFbASQRAA7kEdqB5BFADOQRwAD kERtP5BEAAGQTG2BG5BMAA6QTG45kEwACJBMZjeQSWwBkEwAAbABBAGwAQUAsAEGAbABAQCwAQA5 kExqA5BJADqQTnEFkEwAgi+QTgACkEJsO5BEYwmQQgAxkEVjAZBEADqQRQADkEJpNpBKbgeQQgCB I5BKAAuQSmxAkEoAApBHeAGQRmMIkEYAZ5BFbgmQRwA1kERzB5BFAIFqkEQAApBAYDiQRG4KkEAA M5BFbAKQRAA7kEdoBZBFACyQRwAJkEdjObABAwCwAQUBsAEDALABAD6QSXEKkEcAbJBFYQKQSQCC KZBFAAXAHQCQR1t3kEcAAZBKbHeQSgABkEluO5BJAAGQSmU7kEoAAZBMYTuQTAABkEVYO+AhQwCQ RQABkEpZAJBObAHgQkQB4ENGAeAjRwLgBEkB4AVKAeAFSwHgBkwB4CZMAbABAQGwAQIAsAEDAbAB BAHgJUsB4GVKALABBQCwAQYB4GRJAuBESACwAQcB4GNGALABCALgYkUAsAEJALABCgHgYUMAsAEL ALABDAHgQUIAsAENAeAAQACwAQ4CsAEPArABEACwARIFsAERAbABEAGwAREAsAESAbABEQGwARAB sAERALABEgSwAREBsAEPALABDgGwAQwAsAELAbABCgGwAQkBsAEIALABBwGwAQYAsAEFAbABBACw AQMBsAECAbABAQGwAQAvsAEBAbABAgCwAQMBsAEEALABBQGwAQYBsAEIAbABCQGwAQoAsAELAbAB DACwAQ0BsAEOAbABDwGwARAAsAERAbABEgCwARMBsAEUALABFQGwARYBsAEYAbABGQCwARsBsAEc ALABHgGwAR8AsAEgAbABIQGwASICsAEjALABJAGwASUBsAEkArABIwGwASIAsAEhAbABIACwAR8B sAEeALABHQGwARwBsAEaAbABGQCwARgBsAEWALABFQGwARMAsAERAbABDwCwAQ0CsAELALABCQGw AQgAsAEHAbABBgGwAQUBsAEEAbABAwGwAQIBsAEBALABAB6wAQECsAECA7ABAwKwAQQBkE4AAJBK AAGQSlkAkE5sAbABBQKwAQYEsAEHArABCASwAQkEsAEKBrABCQOwAQgCsAEHAbABBgKwAQUAsAEE AbABAwKwAQIKsAEDALABBAGwAQUCsAEGAbABBwCwAQgBsAEJAbABCgCwAQsBsAENAbABEAGwARIA sAEUAbABFgCwARgBsAEaALABGwGwAR0BsAEfAbABIACwASIBsAEjAJBOAACQSgABsAEkALABJQCQ Sk0AkE5XArABJgKwAScBsAEoBbABJwGwASYAsAElAbABJAGwASMBsAEiALABIQGwASAAsAEfAbAB HQCwARsBsAEZAbABFwGwARYAsAEUAbABEwCwAREBsAEPAbABDgGwAQ0BsAEMAbABCwGwAQoJsAEJ AbABCAKwAQcAsAEGAbABBQCwAQQBsAEDAbABAgCwAQEBsAEAEZBOAACQSgABkElOAJBMWTuQTAAA kEkAAZBFVwCQSWk7kEkAAJBFAAGQRFIAkEdgabABAQCwAQIBsAEDALABBAGwAQYBsAEHAbABCACw AQoBsAELALABDAGwAQ0AsAEOAbABDwGwARACsAERA7ABEAGwAQ4AsAELAbABCQCwAQcBsAEFALAB AwGwAQEAsAEAKrABAQGwAQMAsAEFArABCACwAQsBsAENALABDwGwAREBsAETAbABFgCwARkBsAEc ALABHwGwASIAsAElAbABKACwASsBsAEuAbABMAGwATMAsAE2AbABOACwAToBsAE8ALABPgGwAUAA sAFCAbABRAGwAUUBsAFGALABRwGwAUgAsAFJArABSgGwAUsAsAFMArABTQGwAU4CsAFPAbABUACw AVECsAFSAbABUQGwAVABsAFOALABTAGwAUoAsAFIAbABRgCwAUQBsAFAALABPQKwAToAsAE3AbAB NACwATEBsAEtAbABKQGwASUAsAEiAbABHgCwARkBsAEVALABEAGwAQwAsAEIAbABBQGwAQEBsAEA VpBHAACQRAAB4GBBAJBAWQCQRGwB4AFCAuBgQQHgAEA3kEQAAJBAAAGQQkoAkEVTO5BFAACQQgAB kERXAJBHaDuQRwAAkEQAAZBAVgCQRGc54D48AeAcOQHgOzYAkEQAAJBAAAHgOjQAkERPAJBMWwPg ejUB4Hw4AeB9OwLgAECBLJBMAACQRAABkERSAJBMYDuQTAAAkEQAAZBEUgCQTGA7kEwAAJBEAAGQ SWc7kEkAAZBHWDuQRwABkEVeL+AfPgHgXTsB4Hw4AeAbNgLgWTMB4HkyAuBZMgHgOTIB4HkyAeB5 MwHgOzYAkEUAAZBETgCQR1kB4Fw5AeAePAHgAEA4kEcAAJBEAAGQRVQAkEljO5BJAACQRQABkEJR AJBFXlmQRQAAkEIAH5BCWACQRWo7kEUAAJBCAAGQRFgAkEdqO5BHAACQRAABkEVaAJBJbjngAUMC 4AJFAJBJAACQRQAB4GNGAJBCTwCQRVsB4CNHAuBjRwHgI0cB4ENGAeACRQLgYUIB4ABAMpBFAACQ QgAB4CBBAJBKWQCQTmwB4EFDAeBCRAHgIkUD4EJEAeAhQwHgAECBFeBBQgHgIUMB4GFDBOAhQwHg QUIB4ABADpBOAACQSgABkEpTAJBOYTuQTgAAkEoAAZBHVACQSmN3kEoAAJBHAAGQRVoAkEluO5BJ AACQRQABkERNAJBHWB3gIUMB4CNGAeAkSQHgBUsC4EZMAeBmTALgRUsC4AVKAeAESAHgYkUB4CFD AuAAQIE/4F49AuA+PAHgHjwBkEcAAJBEAAHgPjwAkDtOAJBAWQHgXj0C4ABAOJBAAACQOwABkERR AJBHXjuQRwAAkEQAAZBFVgCQSWcx4B49AeA9OwHgXDkB4Fw4AeAcOAPgPDgB4Bw5AuAdOgCQSQAA kEUAAeA+PACQR1IAkEpgAeAAQDqQSgAAkEcAAZBHWACQSmp3kEoAAJBHAAGQRVcAkElpc7ABAQGw AQIAsAEDAbABBAGwAQUBsAEGAJBJAACQRQABkEVaAJBJbgHgPz4AsAEHAeAePACwAQgAsAEJAeAd OwHgHToAsAEKALABCwHgXDkBsAEMAOA8OQGwAQ0BsAEOAbABDwKwARAC4Fw5ALABEQHgPToB4D07 AuBePAHgAEAEsAEQC7ABDw+wAQ4EsAENArABDAGwAQsBsAEKAbABCQawAQgEsAEHA7ABBgewAQUC sAEEAbABAwOwAQIBsAEBBLABABCwAQEMsAEAF7ABAQiwAQIJsAEDBbABBAewAQUHsAEGDbABBQKw AQQDsAEDA7ABAgOwAQEBsAEABLABAQWwAQIFsAEDBrABAgGwAQEBsAEAIbABAQOwAQINsAEDGLAB BASQSQAAkEUAA7ABAwGwAQIAsAEBAbABAINcwAKBKZBJQD2QSj8IkEkAOZBMTwGQSgA+kEwAA5BF OT2wQH8CkE43ApAmOhmQRQAlkC09MpBOAAWQJgACkC0ACpAyQiqQMgASkDY/BpBOPg2QTgAnkDlI B5BOTwCQNgA4kExaB5BOAAiwQAACsEB/LZBJVgCQOQACkEwAOpBJAAGQR0tBkChGEbBAAB6wQH8T kC8+PJAvAAGQKAACkDQ3N5A0AAmQOC45kEcAAZBERAKQO0QNkDgAMZBFSwaQOwAEkEQALJBFAAiQ R0s3kEcAB5BEU0SQRAABkCVAApBMQhKwQAAfsEB/DZAsQTqQLAADkCUAA5AxOQOQTAAvkDEADJBM UwGQNDMskDQAEZBHSgOQODoAkEwAN5BHAAGQRUY4kEUAAJA4AAiQREQ+kEVYB5BEADeQKkEXsEAA JJAxPwKwQH8YkCoAJZAxAASQNjYtkDYADZA5N0KQRQACkEJKAJA5AAKQPUI4kEIABZBEWCyQPQAR kEVWApBEADqQRQAEkEJQRJBKUQGQLzkDkEIACbBAACGwQH8WkDYsMpAvAAeQNgABkDtHIJBKABWQ OwAGkD5EA5BKRDuQR0ICkEoABZBCPwKQPgBykEcAApBFTAmQQgAskEUABpBETTyQRAACkEQ8AJAo PiCwQAAekC8uB7BAfzWQKAADkC8AApA0PTqQOEICkDQAAZBARgGQRAA8kDtGAZBETwSQQAAGkDgA MZBFUQiQRAA3kEUAAZBHUAGQOwAhkEcAHJBHVEOQLUINsEAAK7BAfwOQNDMDkElLDJBHADGQLQAA kDQAApA5Nj+QOQABkEVCApBJAAKQPTA7kEBJAZA9AH2QQAB1kDIyAJAmQROwQABdsEB/NZBFABiQ QD8IkCYABZAyADKQRDwBkCg9AJA0NwuwQAAFkEAAK7BAfwWQRAABkEVSM5AoAAGQRQAIkEdQA5A0 AAyQRwA+kEdaRpAtShSwQAAksEB/BpA0IQyQSUUUkEcAPZA5MiuQNAAEkC0AMpA9OgWQOQBwkEVE AZBJAAGQQD4JkD0AgRWQQAADkEUAgTKQRSsFkC0wApBJMgKQTDICkDkoA5BROhewQAAEsEB/ALBA ABmwQH8BsEAAA7BAfxWQNCkPkDkAJpBFAB6QOSQEkDQAAZAtAAKQUQA5kEkAEJA5AAWQPSIAkEwA SpBAPAqQPQBEkEUwVJBJMgiQRQAIkEkAYpBMMRiQTACBGJBRNQyQVUQRkFhAgxOQQAAJkFUAApBY AASQUQBcsEAABbBAfwawQAAA/y8ATVRyawAAFWQA/wMFQWNjby4A/wQIRWwgUGlhbm+dRJE7Tx2R OwABkT1JHZE9AAGRJkwAkTJGAJE+WRKxQH9HkT4AH5E+Th2RJgAekT4AAJEyAAGRRVI7kUUAAZEo WQCRNFIAkUBYArFAAEexQH8ukUAAAJE0AACRKAABkUBbO5FAAAGRPksdkT4AH5E5UACxQAAAkT1L AJEtVgCRQE51sUB/epFAAACROQAAkT0APZE5TDyRQEwdkUAAAJE5AAGRPUMdkT0AAZE5Sx2ROQAA kS0AH5E7VACROFMAkSg6AJE0TBKxQABNsUB/NpE0AB6ROwAAkTgAPZE7Wh2ROwA9kThdHZE4AD2R NEwdkTQAHpEoAAGRLVEAkTlMAJFAUgCRPU4bsUAAabFAf4EJkT0AAJFAAACROQAfkTlEO5E5AAGR PUcAkUBIO5FAAACRPQABkTlGHZE5AB6RLQABkSpOAJE4RACRNkkAkT1CAJE5UxqxQAADkTgAXbFA fxuRPQAAkSoAAJE2AACROQAfkSpMO5EqAAGRLVIAkT1TAJFAUACROU8JsUAAWLFAfzSROQAAkUAA AJEtAB6RPQABkS1MO5EtAAGROUwAkSZTAJE2SACRMkUAkT45FbFAAFmxQH+BAZEmADyRMgAAkTkA AJE2AACRPgABkSY8O5EmAAGRPkUAkTlKAJEyQQCRNkU7kTYAAJE+AACROQAAkTIAAZEmTB2RJgAe sUAAAbFAfwCRPUsAkSVFAJE1RwCROE4AkTFAWZExAACRJQA8kT0AAJE1AACROAAfkSVFNLFAAAeR JQABkSpNAJE2TgCROVYAkT1MQbFAf1SRPQAAkSoAAJE2AACROQAfkSpLO5EqAAGRNk0AkTJNAJEv TQCRO0gIsUAAf7FAf2iROwA9kTZEHZE2AB+RNk0AkTtYHZE7AACRLwAAkTYAAJEyAACRNgAfkS9B O5EvAAGRKE8AkThLAJE0PwCRO0oIsUAAY7FAf4EEkTsAHpE0AACROAAfkTRBPJE7RwCROEYAkUBM HZE0AB6ROAAAkSgAAJE7AACRQAABkShNO5EoAAGRNEgAkS1IAJE5UwCRPU0AkUBTBrFAAIEDsUB/ ZpFAAACROQAAkT0AAJE0AD2RNEE8kT1LAJE5TACRQE8dkTQAHpE5AACRLQAAkT0AAJFAAAGRNDcA kS1UHZE0AB6RLQABkUBMAJE0SgCRO1AAkThSAJEoVAuxQABWsUB/FpEoAD2RKFEdkTsAAJE4ABqx QAAFkTtcL7FAfyqRNAABkThMHZE7AB6RQAAekTgAAZE0TzuRNAAAkSgAAZFATgCRLUwAkTRRAJE9 TwCROVoIsUAAgQGxQH9mkS0AAZEtUR2RPQAAkTkAAJE0AB6RQAABkTRGO5E0AAGRPU0AkTlIAJFA Th2RLQAekT0AAJE5AACRQAABkTQ/AJEtSR2RNAAekS0AAZE2RwCRKk8AkTlTAJE9Ug2xQABTsUB/ F5EqAB6RNgAAkTkAAJE9AB+RKjo7kSoAAZEtTwCROVgAkT1QAJFAVoFRkUAAAJEtAACROQAesUAA AJE9AAGRNkkAkSZPAJE5WACRPlAAkTJGBbFAf1SRMgAAkSYAWpE2AACROQAAkT4AAZEmUQCRMkEd kTIAAJEmAB+RNFAAkTlYAJE9TwCRMUkAkSVTFrFAACSxQH8fkSUAAJExAB6RNAAAkTkAAJE9AD2R JUoAkTE5HZExAACRJQAfkSlLAJE1SgCROEIAkUFKAJE9VBSxQAAdsUB/RpEpAB6RQQAAkTUAAJE4 AACRPQAfkSlIHZEpAB+RNkgAkSpOAJE9UgCROT4AkUJWH7FAADKxQH8mkSoAAJE2AB6ROQAAkT0A AJFCAB+RKlIdkSoAH5E2SQCROVkAkSZGAJEyQgCRPlYRsUAAGbFAfy+RMgAAkSYAPJE2AACROQAA kT4AH5EmTgCRMkodkTIAAJEmAB+RNksAkT5YAJE7UwCRL0YAkSNJBrFAACCxQH9RkSMAAJEvADyR NgAAkT4AAJE7AAGRI1gdkSMAH5EoSgCROEwAkTRIAJE7WQCRQFIKsUAAJ7FAf4E+kTQAAJEoAD2R KEg7kUAAAJE4AAGRNEwdkTsAHpE0AACRKAABkThDHZE4AB+RKFYAkThXAJE0WQCRO1sAkUBbBbFA AHKRQAAAkTQAAJEoAACROAAAkTsAeZFAWQCROVoAkT1dAJEtXQCRIVN2sUB/H5EhAACRLQAekUAA AJE5AACRPQA8sUAAAZE+WgCRNk8AkTJQAJE5WQCRJlEQsUB/Z5EmAB6RMgAfkSZOHZEmAB+RJlZZ kTkAAJE+AACRNgAfkTZLAJE+UwCROVMdkSYAHpE2AACRPgAAkTkAPZE4TgCRPlYAkShVAJE7Wwux QAA+sUB/gQiRKACBF5EoWh2RKAAekTsAAJE+AACROAA9kT1PAJExSQCRJVMbsUAAA5E4DR6RNQ9K sUB/D5ElAB6RMQABkSVWHZElAB+RJVQ7kTUAPJElAB6ROAAAkT0AW5EqXACRNlYAkTldAJE9Vwux QABcsUB/LpEqAB+RKlodkSoAH5EqXx2RNgAAkTkAH5E5HR2ROQAekT0AAJEqAAGRNlAAkT1UAJE5 WjuROQAAkT0AAJE2AAGRKlMdkSoAH5EvWQCRNlcAkT5eAJE7WACRPT4XsUAABpE9AFmxQH8fkS8A H5EvUh2RLwAfkS9mWZEvAFqRNgAAkT4AAZEvXR2RLwAAkTsAH5E4VACRPl4AkTteAJE0QwCRJjoA kTI+CrFAABORMgAAkSYAAZEoD1uxQH86kSgAAJE0AAGRKFAdkSgAH5EoNjuROwAAkTgAAJE+AAGR OEg7kTgAAJEoAAGRO1AAkT5WO5E+AACROwABkThGAJEoSx2ROAAekSgAAZEtVQCRPU0AkTRMAJE5 WwqxQABksUB/J5EtAB+RLUsdkS0AH5EtbIEzkS0AAJE9AACRNAAAkTkAPZEtagCRPVIAkTRIAJE5 VASxQABssUB/JZEtAB+RLU4dkS0AH5EtbDuRNAAekTkAAJE9AB6RLQABkTRLAJE9UACROU8dkTkA AJE9AACRNAAfkS1YO5EtAAGRMjAAkSZOAJE2VACROV4AkT5eELFAAAOxQH89sUAAAbFAf0SRJgAe kTIAAZEmWTyRMlodkTYAHpE+AACROQABkTZDO5E2AAGRPl0AkTlPHZEyAB6RJgAAkT4AAJE5AAGR NlAAkTJPHZE2AB6RMgABkThTAJE7WgCRPlgAkShTB7FAAFixQH9UkSgAPZEoWneRKAAekT4AAJE7 AACROAAfkShSHZEoAB+ROFQAkT1LAJE0QQCRMUQAkSVSHbFAAACRNAABkTVGarFAfw2RJQAekTEA AZElVB2RJQAfkSVad5ElAB6ROAAAkT0AAJE1AB+RJVAdkSUAH5E2VACROV0AkSpdAJE9VxaxQABG sUB/OZEqAFuRKlJZkT0AAJE2AB6ROQABkTZSAJE5VgCRPU8dkSoAHpE2AACROQAAkT0AAZEqRjuR KgABkS9VAJE+WwCRNkwAkTtbJLFAAFexQH84kS8AAZEvUx2RLwAfkS9jWZE7AACRPgAAkTYAH5E7 WwCRNlgAkT5ZHZEvAB6ROwAAkTYAAJE+AAGRL1MdkS8AH5E4UwCRO14AkShQAJE+WxaxQABdsUB/ QJEoAD2RKGN3kSgAHpE+AACROwAAkTgAH5EoTDuRKAABkTRNAJE9SQCROVYAkUBMAJE+TQCRLVMW sUAAB5E+AGWxQH+BR5EtAB6ROQAAkTQAAJE9AACRQAB5kTZOAJE+VACROVETsUAAC5EyPwCRJk0x sUB/KJE5AACRNgAAkT4APJEyAD2RPlMAkThIAJE7UwCRKFUZsUAABJEmACyxQH9MkSgAPJE+AACR OAAAkTsAGrFAAAWRNEgAkS1IAJE5UwCRPU0AkUBTBrFAAIEDsUB/ZpFAAACROQAAkT0AAJE0AD2R NEE8kT1LAJE5TACRQE8dkTQAHpE5AACRLQAAkT0AAJFAAAGRNDcAkS1UHZE0AB6RLQABkUBMAJE0 SgCRO1AAkThSAJEoVAuxQABWsUB/FpEoAD2RKFEdkTsAAJE4ABqxQAAFkTtcL7FAfyqRNAABkThM HZE7AB6RQAAekTgAAZE0TzuRNAAAkSgAAZFATgCRLUwAkTRRAJE9TwCROVoIsUAAgQGxQH9mkS0A AZEtUR2RPQAAkTkAAJE0AB6RQAABkTRGO5E0AAGRPU0AkTlIAJFATh2RLQAekT0AAJE5AACRQAAB kTQ/AJEtSR2RNAAekS0AAZE2RwCRKk8AkTlTAJE9Ug2xQABTsUB/F5EqAB6RNgAAkTkAAJE9AB+R Kjo7kSoAAZEtTwCROVgAkT1QAJFAVoFRkUAAAJEtAACROQAesUAAAJE9AAGRNkkAkSZPAJE5WACR PlAAkTJGBbFAf1SRMgAAkSYAWpE2AACROQAAkT4AAZEmUQCRMkEdkTIAAJEmAB+RNFAAkTlYAJE9 TwCRMUkAkSVTFrFAACSxQH8fkSUAAJExAB6RNAAAkTkAAJE9AD2RJUoAkTE5HZExAACRJQAfkSlL AJE1SgCROEIAkUFKAJE9VBSxQAAdsUB/RpEpAB6RQQAAkTUAAJE4AACRPQAfkSlIHZEpAB+RNkgA kSpOAJE9UgCROT4AkUJWH7FAADKxQH8mkSoAAJE2AB6ROQAAkT0AAJFCAB+RKlIdkSoAH5E2SQCR OVkAkSZGAJEyQgCRPlYRsUAAGbFAfy+RMgAAkSYAPJE2AACROQAAkT4AH5EmTgCRMkodkTIAAJEm AB+RNksAkT5YAJE7UwCRL0YAkSNJBrFAACCxQH9RkSMAAJEvADyRNgAAkT4AAJE7AAGRI1gdkSMA H5EoVgCROFcAkTRZAJE7WwCRQFsFsUAAcpFAAACRNAAAkSgAAJE4AACROwB5kUBZAJE5WgCRPV0A kS1dAJEhU3axQH8fkSEAAJEtAB6RQAAAkTkAAJE9ADyxQAABkT5aAJE2TwCRMlAAkTlZAJEmURCx QH9nkSYAHpEyAB+RJk4dkSYAH5EmVlmROQAAkT4AAJE2AB+RNksAkT5TAJE5Ux2RJgAekTYAAJE+ AACROQA9kThOAJE+VgCRKFUAkTtbC7FAAD6xQH+BCJEoAIEXkShaHZEoAB6ROwAAkT4AAJE4AD2R PU8AkTFJAJElUxuxQAADkTgNHpE1D0qxQH8PkSUAHpExAAGRJVYdkSUAH5ElVDuRNQA8kSUAHpE4 AACRPQBbkSpcAJE2VgCROV0AkT1XC7FAAFyxQH8ukSoAH5EqWh2RKgAfkSpfHZE2AACROQAfkTkd HZE5AB6RPQAAkSoAAZE2UACRPVQAkTlaO5E5AACRPQAAkTYAAZEqUx2RKgAfkS9ZAJE2VwCRPl4A kTtYAJE9PhexQAAGkT0AWbFAfx+RLwAfkS9SHZEvAB+RL2ZZkS8AWpE2AACRPgABkS9dHZEvAACR OwAfkThUAJE+XgCRO14AkTRDAJEmOgCRMj4KsUAAE5EyAACRJgABkSgPW7FAfzqRKAAAkTQAAZEo UB2RKAAfkSg2O5E7AACROAAAkT4AAZE4SDuROAAAkSgAAZE7UACRPlY7kT4AAJE7AAGROEYAkShL HZE4AB6RKAABkS1VAJE9TQCRNEwAkTlbCrFAAGSxQH8nkS0AH5EtSx2RLQAfkS1sgTORLQAAkT0A AJE0AACROQA9kS1qAJE9UgCRNEgAkTlUBLFAAGyxQH8lkS0AH5EtTh2RLQAfkS1sO5E0AB6ROQAA kT0AHpEtAAGRNEsAkT1QAJE5Tx2ROQAAkT0AAJE0AB+RLVg7kS0AAZEyMACRJk4AkTZUAJE5XgCR Pl4QsUAAA7FAfz2xQAABsUB/RJEmAB6RMgABkSZZPJEyWh2RNgAekT4AAJE5AAGRNkM7kTYAAZE+ XQCROU8dkTIAHpEmAACRPgAAkTkAAZE2UACRMk8dkTYAHpEyAAGROFMAkTtaAJE+WACRKFMHsUAA WLFAf1SRKAA9kShad5EoAB6RPgAAkTsAAJE4AB+RKFIdkSgAH5E4VACRPUsAkTRBAJExRACRJVId sUAAAJE0AAGRNUZqsUB/DZElAB6RMQABkSVUHZElAB+RJVp3kSUAHpE4AACRPQAAkTUAH5ElUB2R JQAfkTZUAJE5XQCRKl0AkT1XFrFAAEaxQH85kSoAW5EqUlmRPQAAkTYAHpE5AAGRNlIAkTlWAJE9 Tx2RKgAekTYAAJE5AACRPQABkSpGO5EqAAGRL1UAkT5bAJE2TACRO1sksUAAV7FAfziRLwABkS9T HZEvAB+RL2NZkTsAAJE+AACRNgAfkTtbAJE2WACRPlkdkS8AHpE7AACRNgAAkT4AAZEvUx2RLwAf kThTAJE7XgCRKFAAkT5bFrFAAF2xQH9AkSgAPZEoY3eRKAAekT4AAJE7AACROAAfkShMO5EoAAGR NE0AkT1JAJE5VgCRQEwAkT5NAJEtUxaxQAAHkT4AZbFAf4FHkS0AHpE5AACRNAAAkT0AAJFAAIRZ kT5aAJE2TwCRMlAAkTlZAJEmURCxQH9nkSYAHpEyAB+RJk4dkSYAH5EmVlmROQAAkT4AAJE2AB+R NksAkT5TAJE5Ux2RJgAekTYAAJE+AACROQA9kThOAJE+VgCRKFUAkTtbC7FAAD6xQH+BCJEoAIEX kShaHZEoAB6ROwAAkT4AAJE4AD2RPU8AkTFJAJElUxuxQAADkTgNHpE1D0qxQH8PkSUAHpExAAGR JVYdkSUAH5ElVDuRNQA8kSUAHpE4AACRPQBbkSpcAJE2VgCROV0AkT1XC7FAAFyxQH8ukSoAH5Eq Wh2RKgAfkSpfHZE2AACROQAfkTkdHZE5AB6RPQAAkSoAAZE2UACRPVQAkTlaO5E5AACRPQAAkTYA AZEqUx2RKgAfkS9ZAJE2VwCRPl4AkTtYAJE9PhexQAAGkT0AWbFAfx+RLwAfkS9SHZEvAB+RL2ZZ kS8AWpE2AACRPgABkS9dHZEvAACROwAfkThUAJE+XgCRO14AkTRDAJEmOgCRMj4KsUAAE5EyAACR JgABkSgPW7FAfzqRKAAAkTQAAZEoUB2RKAAfkSg2O5E7AACROAAAkT4AAZE4SDuROAAAkSgAAZE7 UACRPlY7kT4AAJE7AAGROEYAkShLHZE4AB6RKAABkS1VAJE9TQCRNEwAkTlbCrFAAGSxQH8nkS0A H5EtSx2RLQAfkS1sgTORLQAAkT0AAJE0AACROQAA/y8ATVRyawAABdEA/wMGQ2hvcnVzAP8ECUNo b2lyIEFhaP9Ak0VEAJNKMwCTQj8Akz4og1+TPgAAk0UAAJNKAACTQgABk0RDAJNHRgCTQEEAk0ow g1+TSgAAk0QAAJNHAACTQAABk0RHAJM9QwCTQDwAk0lJg1+TSQAAk0QAAJM9AACTQAABkz1CAJNJ UACTRVIAk0I8g1+TQgAAkz0AAJNJAACTRQABkz5LAJNCQACTR0wAkztIg1+TOwAAkz4AAJNCAACT RwABk0Q+AJNKRwCTR1KBM5NHAACTSgAAk0QAAZNMWwCTRE0Ak0BmO5NAAACTRAAAk0wAAZNEaQCT UFYAk0dPO5NHAACTUAAAk0QAAZNFagCTST4Ak1FUO5NRAACTSQAAk0UAAZNKQwCTU1oAk0doO5NH AACTUwAAk0oAAZNTYQCTSloAk0dod5NHAACTSgAAk1MAAZNVXwCTTFQAk0lzd5NJAACTTAABk0Vw AJNRbACTSV8dk1UAgg6TRQAAk1EAAJNJAAGTQkYAkz45gW+TPgAAk0IAAZM7RoFvkzsAvAGTRUQA k0ozAJNCPwCTPiiDX5M+AACTRQAAk0oAAJNCAAGTREMAk0dGAJNAQQCTSjCDX5NKAACTRAAAk0cA AJNAAAGTREcAkz1DAJNAPACTSUmDX5NJAACTRAAAkz0AAJNAAAGTPUIAk0lQAJNFUgCTQjyDX5NC AACTPQAAk0kAAJNFAAGTPksAk0JAAJNHTACTO0iDX5M7AACTPgAAk0IAAJNHAAGTRD4Ak0pHAJNH UoEzk0cAAJNKAACTRAABk0xbAJNETQCTQGY7k0AAAJNEAACTTAABk0RpAJNQVgCTR087k0cAAJNQ AACTRAABk0VqAJNJPgCTUVQ7k1EAAJNJAACTRQABk0pDAJNTWgCTR2g7k0cAAJNTAACTSgABk1Nh AJNKWgCTR2h3k0cAAJNKAACTUwABk1VfAJNMVACTSXN3k0kAAJNMAAGTRXAAk1FsAJNJXx2TVQCC DpNFAACTUQAAk0kAg2GTRUQAk0ozAJNCPwCTPiiDX5M+AACTRQAAk0oAAJNCAAGTREMAk0dGAJNA QQCTSjCDX5NKAACTRAAAk0cAAJNAAAGTREcAkz1DAJNAPACTSUmDX5NJAACTRAAAkz0AAJNAAAGT PUIAk0lQAJNFUgCTQjyDX5NCAACTPQAAk0kAAJNFAAGTPksAk0JAAJNHTACTO0iDX5M7AACTPgAA k0IAAJNHAAGTRD4Ak0pHAJNHUoEzk0cAAJNKAACTRAABk0RNO5NEAAGTR087k0cAAZNJPjuTSQAB k0pDO5NKAAGTSlp3k0oAAZNMVHeTTAABk0lfAJNFXwCTQF8AkzlfgiyzC24EswttBLMLbAWzC2sE swtqBLMLaQWzC2gEswtnBLMLZgWzC2UEswtkBLMLYwWzC2IEswthBLMLYAWzC18EswteBbMLXQSz C1wEswtbBbMLWgSzC1kEswtYBbMLVwSzC1YEswtVBbMLVASzC1MEswtSBbMLUQSzC1AEswtPBbML TgSzC00FswtMBLMLSwSzC0oFswtJBLMLSASzC0cFswtGBLMLRQSzC0QFswtDBLMLQgSzC0EFswtA BLMLPwWzCz4Esws9BLMLPAWzCzsEsws6BLMLOQWzCzgEsws3BLMLNgWzCzUEsws0BLMLMwWzCzIE swsxBLMLMAWzCy8EswsuBbMLLQSzCywEswsrBbMLKgSzCykEswsoBbMLJwSzCyYEswslBbMLJASz CyMEswsiBbMLIQSzCyAFswsfBLMLHgSzCx0FswscBLMLGwSzCxoFswsZBLMLGASzCxcFswsWBLML FQSzCxQFswsTBLMLEgSzCxEFswsQBLMLDwWzCw4EswsNBLMLDAWzCwsEswsKBLMLCQWzCwgEswsH BLMLBgWzCwUEswsEBLMLAwWzCwIEswsBBbMLAACTOQAAk0kAAJNFAACTQAAA/y8ATVRyawAACj0A /wMGU3RyaW5nAP8EB1N0cmluZ3PhQJRdJgCUWh+BcJRWFoFwlFYfAJRcHQCUVgAAlF0AAJRaAINL lFYAAZRcABSUWB8AlGEdg0uUWAABlGEAFJRdHQCUUR6BcJRVIAmUUQCBZ5RaJgCUVh8AlFUAAJRd AIFwlFMWgXCUWCYAlFYfAJRTAACUVgAAlFoAgXCUUxaBcJRYJgCUVR8AlFMAAJRWAACUWACBcJRR FoFwlFEnAJRVFQCUUQAAlFUAAJRYAIFwlFgYAJRVJQCUUQAAlFUAgXCUXSYAlFofAJRYAACUVQCB cJRWFoFwlFgdAJRQHgCUVgAAlFoAAJRdAIFwlFMgCZRQAIFnlFwmAJRYHwCUUwAAlFgAgXCUVRaB cJRdHACUWiAAlFUAAJRYAACUXACDYJRaHQCUTh4AlF0AAJRaAIFwlFMgCZROAIFnlFwmAJRYHwCU UwAAlFoAgXCUUxaBcJRVHwCUXR0AlFMAAJRYAACUXACDS5RVAAGUXQAUlFYnAJRaFYFwlFNaAJRa AACUVgAdlFMAAZRVVB2UVQABlFNYHZRTAAGUUVsdlFEAAZRQbh2UUAABlE5nHZROAAGUTGAdlEwA AZRKYR2USgABlEVhAJRJYgC0C2QEtAtjBbQLYgW0C2EFtAtgBLQLXwW0C14FtAtdBbQLXAW0C1sE tAtaBbQLWQW0C1gFtAtXBbQLVgS0C1UFtAtUBbQLUwW0C1IFtAtRBLQLUAW0C08FtAtOBbQLTQS0 C0wFtAtLBbQLSgW0C0kFtAtIBLQLRwW0C0YFtAtFBbQLRAW0C0MEtAtCBbQLQQW0C0AFtAs/BbQL PgS0Cz0FtAs8BbQLOwW0CzoEtAs5BbQLOAW0CzcFtAs2BbQLNQS0CzQFtAszBbQLMgW0CzEFtAsw BLQLLwW0Cy4FtAstBbQLLAW0CysEtAsqBbQLKQW0CygFtAsnBLQLJgW0CyUFtAskBbQLIwW0CyIE tAshBbQLIAW0Cx8FtAseBbQLHQS0CxwFtAsbBbQLGgW0CxkFtAsYBLQLFwW0CxYFtAsVBbQLFAS0 CxMFtAsSBbQLEQW0CxAFtAsPBLQLDgW0Cw0FtAsMBbQLCwW0CwoEtAsJBbQLCAW0CwcFtAsGBbQL BQS0CwQFtAsDBbQLAgW0CwEFtAsAAJRJAACURQB5tAtkmSiUXSYAlFofgXCUVhaBcJRWHwCUXB0A lFYAAJRdAACUWgCDS5RWAAGUXAAUlFgfAJRhHYNLlFgAAZRhABSUXR0AlFEegXCUVSAJlFEAgWeU WiYAlFYfAJRVAACUXQCBcJRTFoFwlFgmAJRWHwCUUwAAlFYAAJRaAIFwlFMWgXCUWCYAlFUfAJRT AACUVgAAlFgAgXCUURaBcJRRJwCUVRUAlFEAAJRVAACUWACBcJRYGACUVSUAlFEAAJRVAIFwlF0m AJRaHwCUWAAAlFUAgXCUVhaBcJRYHQCUUB4AlFYAAJRaAACUXQCBcJRTIAmUUACBZ5RcJgCUWB8A lFMAAJRYAIFwlFUWgXCUXRwAlFogAJRVAACUWAAAlFwAg2CUWh0AlE4eAJRdAACUWgCBcJRTIAmU TgCBZ5RcJgCUWB8AlFMAAJRaAIFwlFMWgXCUVR8AlF0dAJRTAACUWAAAlFwAg0uUVQABlF0AFJRA XgCUNFAAlFNKAJRHUHeURwAAlFMAAZRWWgCUSlh3lEoAAJRAAACUNAAAlFYAAZQtWwCUOWEAlFVd AJRJXXeUSQAAlFUAAZRRVgCURVJ3lEUAAJQtAACUOQAAlFEAAZRdJgCUWh+BcJRWFoFwlFYfAJRc HQCUVgAAlF0AAJRaAINLlFYAAZRcABSUWB8AlGEdg0uUWAABlGEAFJRdHQCUUR6BcJRVIAmUUQCB Z5RaJgCUVh8AlFUAAJRdAIFwlFMWgXCUWCYAlFYfAJRTAACUVgAAlFoAgXCUUxaBcJRRPQCUQEcA lDlSAJRTAACUVgAAlFgAg2C0C2QEtAtjBbQLYgW0C2EFtAtgBLQLXwW0C14FtAtdBbQLXAW0C1sE tAtaBbQLWQW0C1gFtAtXBbQLVgS0C1UFtAtUBbQLUwW0C1IFtAtRBLQLUAW0C08FtAtOBbQLTQS0 C0wFtAtLBbQLSgW0C0kFtAtIBLQLRwW0C0YFtAtFBbQLRAW0C0MEtAtCBbQLQQW0C0AFtAs/BbQL PgS0Cz0FtAs8BbQLOwW0CzoEtAs5BbQLOAW0CzcFtAs2BbQLNQS0CzQFtAszBbQLMgW0CzEFtAsw BLQLLwW0Cy4FtAstBbQLLAW0CysEtAsqBbQLKQW0CygFtAsnBLQLJgW0CyUFtAskBbQLIwW0CyIE tAshBbQLIAW0Cx8FtAseBbQLHQS0CxwFtAsbBbQLGgW0CxkFtAsYBLQLFwW0CxYFtAsVBbQLFAS0 CxMFtAsSBbQLEQW0CxAFtAsPBLQLDgW0Cw0FtAsMBbQLCwW0CwoEtAsJBbQLCAW0CwcFtAsGBbQL BQS0CwQFtAsDBbQLAgW0CwEFtAsAAJRRAACUQAAAlDkAebQLbqcvlC0yAJRJKQC0CxkBlEU0ALQL GgGUTCYBtAsbAZQ5NQC0CxwClEAkALQLHQK0Cx4BtAsfArQLIAG0CyECtAsiArQLIwG0CyQCtAsl AbQLJgK0CycCtAsoAbQLKQK0CyoCtAsrAbQLLAK0Cy0BtAsuArQLLwK0CzABtAsxArQLMgG0CzMC tAs0ArQLNQG0CzYCtAs3ArQLOAG0CzkCtAs6AbQLOwK0CzwCtAs9AbQLPgK0Cz8BtAtAArQLQQK0 C0IBtAtDArQLRAG0C0UCtAtGArQLRwG0C0gCtAtJArQLSgG0C0sCtAtMAbQLTQK0C04CtAtPAbQL UAK0C1EBtAtSArQLUwK0C1QBtAtVArQLVgK0C1cBtAtYArQLWQG0C1oCtAtbArQLXAG0C10CtAte AbQLXwK0C2ACtAthAbQLYgK0C2MCtAtkgTS0C2QNtAtjDbQLYg60C2ENtAtgDrQLXw20C14NtAtd DrQLXA20C1sOtAtaDbQLWQ20C1gOtAtXDbQLVg60C1UNtAtUDbQLUw60C1INtAtRDrQLUA20C08N tAtODrQLTQ20C0wOtAtLDbQLSg20C0kOtAtIDbQLRw60C0YNtAtFDbQLRA60C0MNtAtCDrQLQQ20 C0ANtAs/DrQLPg20Cz0OtAs8DbQLOw20CzoOtAs5DbQLOA60CzcNtAs2DbQLNQ60CzQNtAszDrQL Mg20CzENtAswDrQLLw20Cy4OtAstDbQLLA20CysOtAsqDbQLKQ60CygNtAsnDbQLJg60CyUNtAsk DrQLIw20CyINtAshDrQLIA20Cx8OtAseDbQLHQ20CxwOtAsbDbQLGg60CxkNtAsYDbQLFw60CxYN tAsVDrQLFA20CxMNtAsSDrQLEQ20CxANlEkAAJQtAAG0Cw8AlEUAAZRMAAKUOQAClEAAAP8vAE1U cmsAAASxAP8DCFNmeCBQYWRzAP8ECFdhcm0gUGFkALVbQAC1XRgAtQsoALUHf4NglUI1AJUmRACV PiIAlTIpAJVFNACVSi0AtQsogTG1CymBMbULKn2VSgAAlSYAAJU+AACVQgAAlUUAAJUyAAGVQDcA lSg6AJVEOwCVRzgAlUo0AJU0MDO1CyuBMbULLIExtQstSpU0AACVKAAAlUQAAJVAAACVSgAAlUcA AZVJMgCVPTUAlSU4AJUxNQCVRDUAlUA6ZrULLoExtQsvgTG1CzAXlUAAAJU9AACVJQAAlUkAAJVE AACVMQABlT02AJU2OwCVQkUAlSpDAJVJOwCVRUyBGbULMYExtQsygRWVRQAAlTYAAJVCAACVPQAA lUkAAJUqAAGVL1MAlSNSAJVCRACVOz4AlT5PAJVHNRu1CzOBMbULNIExtQs1YpVHAACVIwAAlUIA AJUvAACVPgAAlTsAAZUoSQCVOEMAlTRCAJVASACVO1EAlT5TTrULNoExtQs3gTG1CzgvlT4AAJU4 AACVNAAAlSgAAJU7AACVQAABlUBEAJUtRACVPUkAlTk+AJU0N4EBtQs5gTG1CzqBLZU0AACVPQAA lUAAAJUtAACVOQABlUJHAJUmTgCVPlIAlUVVAJUySAO1CzuBMJUyAACVPgAAlUIAAJUmAACVRQAB lShNAJU0TwCVOD0AlTtSAJU+UwCVQFEAtQs8giuVQAAAlTQAAJU4AACVKAAAlT4AAJU7AIH2SbUL GUGVMjUDlSY+AZVCNgCVRTwAlT4pB7ULGk21CxtNtQscTbULHUy1Cx5NtQsfLZU+ACC1CyAGlSYA BZUyAA2VRz8AlURBAJVFAAKVNEcClShDAJVAIwKVQgAvtQshTLULIk21CyNNtQskTbULJUy1CyYQ lTQACZUoAACVRAAAlUAAJZVERwGVMToBlSVAAJU9OQ21CycAlUcACpVAHUO1CyhNtQspTLULKk21 CysElUAAJJVARCW1CywxlSUACJUxABS1Cy0ClUQAGJU9AASVRSUDlUJHAZU2PgGVQAAElSo8JbUL LhCVPRs9tQsvTbULME21CzFNtQsyAbULMmKVQgAJtQsxGpU9AA2VRQAHlUJBBJU7PgCVL0gBlT5C B5U2ABGVKgAhtQswbLULL2y1Cy5stQstUJU7AAGVQgAClT4AGJU0MwGVKDIAlTssALULLAKVRC4F lUBBA5UvAGK1CytstQsqbLULKWy1Cyg0lUQAAZU7AAaVQAAGlUAqBJUtRgSVPTUGlTk2AJU0ABqV KAADtQsnbLULJmy1CyVXlT0AFbULJGy1CyMGlTkABZVAAAWVOToClTIsAJVCQwKVJjcMlS0AIZU+ KSu1CyJstQshDJVCAA2VJgADlTkADpUyABSVOzUBlTRAAZVATQWVKDITlT4AFLULIGy1Cx8+lTsA LrULHg+VLUcDlTksBZU9JQqVKAAClTQASbULHWy1CxxstQsbbLULGmy1CxlstQsYbLULF2y1CxZs tQsVbLULFGy1CxNstQsSbLULEWy1CxBstQsPbLULDmy1Cw1stQsMbLULC0yVLQAElT0AAZVAAACV OQAbtQsKAP8vAE1UcmsAAAD3AP8DClNmeCAiVGluayIA/wQISWNlIFJhaW4AtltAALZdAAC2CygA tgd/l3SWWGo7llgAAZZcYTuWXAABll1qO5ZdAAGWX2o7ll8AAZZfaHeWXwABlmFxd5ZhAAGWXWqF T5ZdAPI1llhqOJZccQaWWAAyll1sCZZcADqWX24Ill0AKZZfAA2WX256lmFzAZZfAHqWXXUIlmEA gh+WXQD0G5ZYTDuWWACBNZZkTQCWXEwdllwAAJZkAFuWYkwAllpDHZZaAACWYgAflmFPAJZYN4Qb llgAAJZhAK5all0tDZZhOReWZDuDRpZkAAOWYQAEll0AAP8vAE1UcmsAAASMAP8DBEJhc3MA/wQN RnJldGxlc3MgQmFzc+FAxyMAlyZegSWXJgAPlyZXMJcmAAyXJlqBK5cmAAmXJkcylyYACpcoXoEl lygAD5coVzCXKAAMlyhagSuXKAAJlyhHMpcoAAqXJV6BJZclAA+XJVcwlyUADJclWoErlyUACZcl RzKXJQAKlypegSWXKgAPlypXMJcqAAyXKlqBK5cqAAmXKkcylyoACpcjXoEllyMAD5cjVzCXIwAM lyNagSuXIwAJlyNHMpcjAAqXKF6BJZcoAA+XKFcwlygADJcoWoErlygACZcoRzKXKAAKlyFegSWX IQAPlyFXMJchAAyXIVqBK5chAAmXIUcylyEACpchWoEvlyEABZchWjyXIVoAlyEAgS+XIQAFlyFa PJcmXgCXIQCBJZcmAA+XJlcwlyYADJcmWoErlyYACZcmRzKXJgAKlyhegSWXKAAPlyhXMJcoAAyX KFqBK5coAAmXKEcylygACpclXoEllyUAD5clVzCXJQAMlyVagSuXJQAJlyVHMpclAAqXKl6BJZcq AA+XKlcwlyoADJcqWoErlyoACZcqRzKXKgAKlyNegSWXIwAPlyNXMJcjAAyXI1qBK5cjAAmXI0cy lyMACpcoXoNflygAAZchXoNflyEAoWHHIwCXJl6BJZcmAA+XJlcwlyYADJcmWoErlyYACZcmRzKX JgAKlyhegSWXKAAPlyhXMJcoAAyXKFqBK5coAAmXKEcylygACpclXoEllyUAD5clVzCXJQAMlyVa gSuXJQAJlyVHMpclAAqXKl6BJZcqAA+XKlcwlyoADJcqWoErlyoACZcqRzKXKgAKlyNegSWXIwAP lyNXMJcjAAyXI1qBK5cjAAmXI0cylyMACpcoXoEllygAD5coVzCXKAAMlyhagSuXKAAJlyhHMpco AAqXIV6BJZchAA+XIVcwlyEADJchWoErlyEACZchRzKXIQAKlyFagS+XIQAFlyFaPJchWgCXIQCB L5chAAWXIVo8lyZeAJchAIEllyYAD5cmVzCXJgAMlyZagSuXJgAJlyZHMpcmAAqXKF6BJZcoAA+X KFcwlygADJcoWoErlygACZcoRzKXKAAKlyVegSWXJQAPlyVXMJclAAyXJVqBK5clAAmXJUcylyUA CpcqXoEllyoAD5cqVzCXKgAMlypagSuXKgAJlypHMpcqAAqXI16BJZcjAA+XI1cwlyMADJcjWoEr lyMACZcjRzKXIwAKlyheg1+XKAABly1egW+XLQCBcZcobIFvlygAAZchcIFvlyEAAZcmXoEllyYA D5cmVzCXJgAMlyZagSuXJgAJlyZHMpcmAAqXKF6BJZcoAA+XKFcwlygADJcoWoErlygACZcoRzKX KAAKlyVegSWXJQAPlyVXMJclAAyXJVqBK5clAAmXJUcylyUACpcqXoEllyoAD5cqVzCXKgAMlypa gSuXKgAJlypHMpcqAAqXI16BJZcjAA+XI1cwlyMADJcjWoErlyMACZcjRzKXIwAKlyheg1+XKAAB ly1egW+XLQAA/y8ATVRyawAAKrgA/wMFRHJ1bXMA/wQPPFRDSC9DUCBBTDAxOTQ+oWCZRRsAmSoy O5kqAACZRQABmUUjAJkqNDuZKgAAmUUAAZlFJQCZKi07mSoAAJlFAAGZRR8AmSoyO5kqAACZRQAB mTYyAJlFJQCZKjQ7mSoAAJlFAACZNgABmUUgO5lFAAGZRSAemUs0HZlLAACZRQABmUUfAJkqMh2Z KgABmSo5HZkqAACZRQABmUUbAJkqMjuZKgAAmUUAAZlFIwCZKjQ7mSoAAJlFAAGZRSUAmSotO5kq AACZRQABmUUfAJkqMjuZKgAAmUUAAZk2MgCZRSUAmSo0O5kqAACZRQAAmTYAAZlFIDuZRQABmUUg HplLNB2ZSwAAmUUAAZlFHwCZKjIdmSoAAZkqOR2ZKgAAmUUAAZlFGwCZKjI7mSoAAJlFAAGZRSMA mSo0O5kqAACZRQABmUUlAJkqLTuZKgAAmUUAAZlFHwCZKjI7mSoAAJlFAAGZNjIAmUUlAJkqNDuZ KgAAmUUAAJk2AAGZRSA7mUUAAZlFIB6ZSzQdmUsAAJlFAAGZRR8AmSoyHZkqAAGZKjkdmSoAAJlF AAGZRRsAmSoyO5kqAACZRQABmUUjAJkqNDuZKgAAmUUAAZlFJQCZKi07mSoAAJlFAAGZRR8AmSoy O5kqAACZRQABmTYyAJlFJQCZKjQ7mSoAAJlFAACZNgABmUUgO5lFAAGZRSAemUs0HZlLAACZRQAB mUUfAJkqMh2ZKgABmSo5HZkqAACZRQABmUUbAJkqMjuZKgAAmUUAAZlFIwCZKjQ7mSoAAJlFAAGZ RSUAmSotO5kqAACZRQABmUUfAJkqMjuZKgAAmUUAAZk2MgCZRSUAmSo0O5kqAACZRQAAmTYAAZlF IDuZRQABmUUgHplLNB2ZSwAAmUUAAZlFHwCZKjIdmSoAAZkqOR2ZKgAAmUUAAZlFGwCZKjI7mSoA AJlFAAGZRSMAmSo0O5kqAACZRQABmUUlAJkqLTuZKgAAmUUAAZlFHwCZKjI7mSoAAJlFAAGZNjIA mUUlAJkqNDuZKgAAmUUAAJk2AAGZRSA7mUUAAZlFIB6ZSzQdmUsAAJlFAAGZRR8AmSoyHZkqAAGZ KjkdmSoAAJlFAAGZRRsAmSoyO5kqAACZRQABmUUjAJkqNDuZKgAAmUUAAZlFJQCZKi07mSoAAJlF AAGZRR8AmSoyO5kqAACZRQABmTYyAJlFJQCZKjQ7mSoAAJlFAACZNgABmUUgO5lFAAGZRSAemUs0 HZlLAACZRQABmUUfAJkqMh2ZKgABmSo5HZkqAACZRQABmUUbAJkqMjuZKgAAmUUAAZlFIwCZKjQ7 mSoAAJlFAAGZRSUAmSotO5kqAACZRQABmUUfAJkqMjuZKgAAmUUAAZk2MgCZRSUAmSo0O5kqAACZ RQAAmTYAAZlFIDuZRQABmUUgHplLNB2ZSwAAmUUAAZlFHwCZKjIdmSoAAZkqOR2ZKgAAmUUAAZkk TQCZRRsAmSoyHZkkAB6ZKgAAmUUAAZlFIwCZKjQ7mSoAAJlFAAGZJTkAmUUlAJkqLR2ZJQAemSoA AJlFAAGZJEEAmUUfAJkqMh2ZJAAemSoAAJlFAAGZJDoAmTYyAJlFJQCZKjQdmSQAHpk2AACZRQAA mSoAAZlFIDuZRQABmSVTAJlFIB2ZJQABmUs0HZlLAACZRQABmUUfAJkqMh2ZKgABmSo5HZkqAACZ RQABmSRDAJlFGwCZKjIdmSQAHpkqAACZRQABmUUjAJkqNDuZKgAAmUUAAZklVQCZRSUAmSotHZkl AB6ZKgAAmUUAAZlFHwCZKjI7mSoAAJlFAAGZJD0AmTYyAJlFJQCZKjQdmSQAHpk2AACZRQAAmSoA AZlFIDuZRQABmSVSAJlFIB2ZJQABmUs0HZlLAACZRQABmUUfAJkqMh2ZKgABmSo5HZkqAACZRQAB mSQ/AJlFMACZLDAdmSwAAJkkAB6ZRQABmUUeAJkqNh2ZKgAemUUAAZklUgCZRSgAmSo2HZkqAACZ JQAemUUAAZkkOACZRS4AmSowHZkqAACZJAABmSouHZkqAACZRQABmSQ4AJk2LQCZRSsAmSwzHZks AACZJAAemUUAAJk2AAGZRSwAmSoyHZkqAAGZKjYdmSoAAJlFAAGZJUgAmUUtAJksLx2ZLAAAmSUA AZlLNACZKjIdmSoAAJlLAACZRQABmUs0AJlFLwCZKi8dmSoAAJlLAAGZKi4dmSoAAJlFAAGZJFQA mUsxAJlFMACZLDAdmSwAAJkkAACZSwAemUUAAZlFHgCZKjYdmSoAHplFAAGZJUsAmUUoAJkqNh2Z KgAAmSUAHplFAAGZJDoAmUUuAJkqMB2ZKgAAmSQAAZkqLh2ZKgAAmUUAAZkkPACZNi0AmUUrAJks Mx2ZLAAAmSQAHplFAACZNgABmUUsAJkqMh2ZKgABmSo2HZkqAACZRQABmSVIAJlFLQCZLC8dmSwA AJklAAGZSzQAmSoyHZkqAACZSwAAmUUAAZlLNACZRS8dmUsAAZkqLwCZKi4dmSoAAJkqAACZRQAB mSQ6AJlLMQCZRTAAmSwwHZksAACZJAAAmUsAHplFAAGZRR4AmSo2HZkqAB6ZRQABmSVQAJlFKACZ KjYdmSoAAJklAB6ZRQABmSQ+AJlFLgCZKjAdmSoAAJkkAAGZKi4dmSoAAJlFAAGZJDwAmTYtAJlF KwCZLDMdmSwAAJkkAB6ZRQAAmTYAAZlFLACZKjIdmSoAAZkqNh2ZKgAAmUUAAZklUACZRS0AmSwv HZksAACZJQABmUs0AJkqMh2ZKgAAmUsAAJlFAAGZSzQAmUUvHZlLAAGZKi8AmSouHZkqAACZKgAA mUUAAZkkPgCZSzEAmUUwAJksMB2ZLAAAmSQAAJlLAB6ZRQABmUUeAJkqNh2ZKgAemUUAAZklVQCZ RSgAmSo2HZkqAACZJQAemUUAAZlFLgCZKjAdmSoAAZkqLh2ZKgAAmUUAAZkkRwCZNi0AmUUrAJks Mx2ZLAAAmSQAHplFAACZNgABmUUsAJkqMh2ZKgABmSo2HZkqAACZRQABmSVQAJlFLQCZLC8dmSwA AJklAAGZSzQAmSoyHZkqAACZSwAAmUUAAZlLNACZRS8dmUsAAZkqLwCZKi4dmSoAAJkqAACZRQAB mSRJAJlFMACZLDAdmSwAAJkkAB6ZRQABmUUeAJkqNh2ZKgAemUUAAZklUwCZRSgAmSo2HZkqAACZ JQAemUUAAZlFLgCZKjAdmSoAAZkqLh2ZKgAAmUUAAZkkSACZNi0AmUUrAJksMx2ZLAAAmSQAHplF AACZNgABmUUsAJkqMh2ZKgABmSo2HZkqAACZRQABmSVGAJlFLQCZLC8dmSwAAJklAAGZSzQAmSoy HZkqAACZSwAAmUUAAZkkOQCZSzQAmUUvAJkqLx2ZKgAAmSQAAJlLAAGZKi4dmSoAAJlFAAGZJEIA mUsxAJlFMACZLDAdmSwAAJkkAACZSwAemUUAAZlFHgCZKjYdmSoAHplFAAGZJUwAmUUoAJkqNh2Z KgAAmSUAHplFAAGZJE0AmUUuAJkqMB2ZKgAAmSQAAZkqLh2ZKgAAmUUAAZkkYACZNi0AmUUrAJks Mx2ZLAAAmSQAHplFAACZNgABmUUsAJkqMh2ZKgABmSo2HZkqAACZRQABmSVVAJlFLQCZLC8dmSwA AJklAAGZSzQAmSoyHZkqAACZSwAAmUUAAZlLNACZRS8dmUsAAZkqLwCZKi4dmSoAAJkqAACZRQAB mSRgAJkzMh2ZMwAAmSQAgkuZJkgYmSYABpkmPh2ZJgABmSY+HZkmAAGZJmAdmSYAAZkjZACZKmQA mTFaAJlFZB6ZRQAAmSMAAJkqAACZMQAemSo8AJlFPB6ZRQAAmSoAHpkmZACZKmQAmSdQAJlFZB6Z RQAAmSYAAJkqAACZJwAemSNQAJkqPACZRTwemUUAAJkqAACZIwAemSNkAJkqZACZRWQemUUAAJkq AACZIwAemSo8AJlFPB6ZRQAAmSoAHpkmZACZKmQAmSdQAJlFZB6ZRQAAmSYAAJkqAACZJwAemSo8 AJlFPB6ZRQAAmSoAHpkjZACZKmQAmUVkHplFAACZKgAAmSMAHpkuSACZRTwemUUAAJkuAB6ZJmQA mSpkAJknUACZRWQemUUAAJkmAACZKgAAmScAHpkjUACZKjwAmUU8HplFAACZKgAAmSMAHpkjZACZ KmQAmTZaAJlFZB6ZRQAAmSMAAJkqAACZNgAemSo8AJk2UACZRTwemUUAAJk2AACZKgAemSZkAJkq ZACZJ1AAmUVkHplFAACZJgAAmSoAAJknAB6ZI1AAmSo8AJlFPB6ZRQAAmSoAAJkjAB6ZI2QAmSpk AJlFZB6ZRQAAmSoAAJkjAB6ZKjwAmUU8HplFAACZKgAemSZkAJkqZACZJ1AAmUVkHplFAACZJgAA mSoAAJknAB6ZI1AAmSo8AJlFPB6ZRQAAmSoAAJkjAB6ZI2QAmSpkAJlFZB6ZRQAAmSoAAJkjAB6Z KjwAmUU8HplFAACZKgAemSZkAJkqZACZJ1AAmUVkHplFAACZJgAAmSoAAJknAB6ZI1AAmSo8AJlF PB6ZRQAAmSoAAJkjAB6ZI2QAmSpkAJlFZB6ZRQAAmSoAAJkjAB6ZLkgAmUU8HplFAACZLgAemSZk AJkqZACZJ1AAmUVkHplFAACZJgAAmSoAAJknAB6ZI1AAmS5IAJlFPB6ZRQAAmS4AAJkjAB6ZI2QA mSpkAJk2WgCZRWQemUUAAJkjAACZKgAAmTYAHpkqPACZNlAAmUU8HplFAACZNgAAmSoAHpkmZACZ KmQAmSdQAJlFZB6ZRQAAmSYAAJkqAACZJwAemSNQAJkqPACZRTwemUUAAJkqAACZIwAemSNkAJkq ZACZRWQemUUAAJkqAACZIwAemSo8AJlFPB6ZRQAAmSoAHpkmZACZKmQAmSdQAJlFZB6ZRQAAmSYA AJkqAACZJwAemSNQAJkqPACZRTwemUUAAJkqAACZIwAemSNkAJkqZACZRWQemUUAAJkqAACZIwAe mS5IAJlFPB6ZRQAAmS4AHpkmZACZKmQAmSdQAJlFZB6ZRQAAmSYAAJkqAACZJwAemSNQAJkqPACZ RTwemUUAAJkqAACZIwAemSNkAJkqZACZRWQemUUAAJkqAACZIwAemSo8AJlFPB6ZRQAAmSoAHpkm ZACZKmQAmSdQAJlFZB6ZRQAAmSYAAJkqAACZJwAemSNQAJkqPACZRTwemUUAAJkqAACZIwAemSNk AJkqZACZNlAAmUVkHplFAACZIwAAmSoAAJk2AB6ZKjwAmTZkAJlFPB6ZRQAAmTYAAJkqAB6ZJmQA mSpkAJknUACZRWQemUUAAJkmAACZKgAAmScAHpkjUACZKjwAmUU8HplFAACZKgAAmSMAHpkjZACZ KmQAmUVkHplFAACZKgAAmSMAHpkqPACZRTwemUUAAJkqAB6ZJmQAmSpkAJknUACZRWQemUUAAJkm AACZKgAAmScAHpkjUACZKjwAmUU8HplFAACZKgAAmSMAHpkjZACZKmQAmUVkHplFAACZKgAAmSMA HpkqPACZRTwemUUAAJkqAB6ZJmQAmSpkAJknUACZRWQemUUAAJkmAACZKgAAmScAHpkjUACZKjwA mUU8HplFAACZKgAAmSMAHpkjZACZKmQAmUVkHplFAACZKgAAmSMAHpkwRgCZRTwemUUAAJkwAB6Z MFoAmSdQAJlFZB6ZRQAAmScAAJkwAB6ZI1AAmS1GAJlFPB6ZRQAAmS0AAJkjAB6ZI2QAmS1aAJk2 UACZRWQemUUAAJkjAACZLQAAmTYAHpkpRgCZNmQAmUU8HplFAACZNgAAmSkAHpkpWgCZJ1AAmUVk HplFAACZJwAAmSkAHpkjWgCZMVoAmUU8HplFAACZMQAAmSMAHpkjZACZKmQAmTFaAJlFZB6ZRQAA mSMAAJkqAACZMQAemSo8AJlFPB6ZRQAAmSoAHpkmZACZKmQAmSdQAJlFZB6ZRQAAmSYAAJkqAACZ JwAemSNQAJkqPACZRTwemUUAAJkqAACZIwAemSNkAJkqZACZRWQemUUAAJkqAACZIwAemSo8AJlF PB6ZRQAAmSoAHpkmZACZKmQAmSdQAJlFZB6ZRQAAmSYAAJkqAACZJwAemSo8AJlFPB6ZRQAAmSoA HpkjZACZKmQAmUVkHplFAACZKgAAmSMAHpkqPACZRTwemUUAAJkqAB6ZJmQAmSpkAJknUACZRWQe mUUAAJkmAACZKgAAmScAHpkjUACZKjwAmUU8HplFAACZKgAAmSMAHpkjZACZKmQAmTZQAJlFZB6Z RQAAmSMAAJkqAACZNgAemSo8AJk2ZACZRTwemUUAAJk2AACZKgAemSZkAJkqZACZJ1AAmUVkHplF AACZJgAAmSoAAJknAB6ZI1AAmSo8AJlFPB6ZRQAAmSoAAJkjAB6ZI2QAmSpkAJlFZB6ZRQAAmSoA AJkjAB6ZKjwAmUU8HplFAACZKgAemSZkAJkqZACZJ1AAmUVkHplFAACZJgAAmSoAAJknAB6ZI1AA mSo8AJlFPB6ZRQAAmSoAAJkjAB6ZI2QAmSpkAJlFZB6ZRQAAmSoAAJkjAB6ZKjwAmUU8HplFAACZ KgAemSZkAJkqZACZJ1AAmUVkHplFAACZJgAAmSoAAJknAB6ZI1AAmSo8AJlFPB6ZRQAAmSoAAJkj AB6ZI2QAmSpkAJlFZB6ZRQAAmSoAAJkjAB6ZKjwAmUU8HplFAACZKgAemSZkAJkqZACZJ1AAmUVk HplFAACZJgAAmSoAAJknAB6ZI1AAmSo8AJlFPB6ZRQAAmSoAAJkjAB6ZI2QAmSpkAJk2WgCZRWQe mUUAAJkjAACZKgAAmTYAHpkqPACZNlAAmUU8HplFAACZNgAAmSoAHpkmZACZKmQAmSdQAJlFZB6Z RQAAmSYAAJkqAACZJwAemSNQAJkqPACZRTwemUUAAJkqAACZIwAemSNkAJkqZACZRWQemUUAAJkq AACZIwAemSo8AJlFPB6ZRQAAmSoAHpkmZACZKmQAmSdQAJlFZB6ZRQAAmSYAAJkqAACZJwAemSNQ AJkqPACZRTwemUUAAJkqAACZIwAemSNkAJkqZACZRWQemUUAAJkqAACZIwAemSo8AJlFPB6ZRQAA mSoAHpkmZACZKmQAmSdQAJlFZB6ZRQAAmSYAAJkqAACZJwAemSNQAJkqPACZRTwemUUAAJkqAACZ IwAemTF5g1+ZMQABmTNpAJkkXjuZJAAAmTMAhwWZJGAAmSpWAJksbB2ZLAAAmSQAHpkqAAGZKl8A mSpfAJkqNh2ZKgAemSoAAJkqAAGZJUkAmSpfAJkqUh2ZKgAAmSUAHpkqAAGZJEEAmSpuAJkqUB2Z KgAAmSQAHpkqAAGZJDoAmSppAJk2bgCZKlIdmSoAAJk2AACZJAAemSoAAZkqXQCZKlIdmSoAHpkq AAGZJWcAmSplAJkqUx2ZKgAAmSUAAZkqTx2ZKgAAmSoAAZkqaQCZS2cAmSpXHZkqAACZSwABmUtu AJkqXR2ZKgAAmUsAAJkqAAGZJFQAmSppAJksbB2ZLAAAmSQAHpkqAAGZKmMAmSo2HZkqAB6ZKgAB mSVpAJkqYQCZS2cAmSpSHZkqAACZSwAAmSUAHpkqAAGZKl0AmSpQHZkqAB6ZKgABmSRNAJkqWACZ NnMAmSpSHZkqAACZNgAAmSQAHpkqAAGZKloAmSpSHZkqAB6ZKgABmSVlAJkqZwCZKlMdmSoAAJkl AAGZS2MAmSpPHZkqAACZSwAAmSoAAZkqbACZKlcdmSoAAZlLaQCZKl0dmSoAAJlLAACZKgABmSRQ AJkqVgCZLGwdmSwAAJkkAB6ZKgABmSpfAJkqXwCZKjYdmSoAHpkqAACZKgABmSVlAJkqXwCZKlId mSoAAJklAB6ZKgABmSRIAJkqbgCZKlAdmSoAAJkkAB6ZKgABmSRIAJkqaQCZNm4AmSpSHZkqAACZ NgAAmSQAHpkqAAGZKl0AmSpSHZkqAB6ZKgABmSVaAJkqZQCZKlMdmSoAAJklAAGZKk8dmSoAAJkq AAGZKmkAmUtnAJkqVx2ZKgAAmUsAAZlLbgCZKl0dmSoAAJlLAACZKgABmSRoAJkqaQCZLGwdmSwA AJkkAB6ZKgABmSpjAJkqNh2ZKgAemSoAAZklXQCZKmEAmUtnAJkqUh2ZKgAAmUsAAJklAB6ZKgAB mSRKAJkqXQCZKlAdmSoAAJkkAB6ZKgABmSRMAJkqWACZNnMAmSpSHZkqAACZNgAAmSQAHpkqAAGZ KloAmSpSHZkqAB6ZKgABmSVaAJkqZwCZKlMdmSoAAJklAAGZS2MAmSpPHZkqAACZSwAAmSoAAZkq bACZKlcdmSoAAZlLaQCZKl0dmSoAAJlLAACZKgABmSRKAJkqVgCZLGwdmSwAAJkkAB6ZKgABmSpf AJkqXwCZKjYdmSoAHpkqAACZKgABmSVjAJkqXwCZKlIdmSoAAJklAB6ZKgABmSRPAJkqbgCZKlAd mSoAAJkkAB6ZKgABmSRMAJkqaQCZNm4AmSpSHZkqAACZNgAAmSQAHpkqAAGZKl0AmSpSHZkqAB6Z KgABmSVjAJkqZQCZKlMdmSoAAJklAAGZKk8dmSoAAJkqAAGZKmkAmUtnAJkqVx2ZKgAAmUsAAZlL bgCZKl0dmSoAAJlLAACZKgABmSRPAJkqaQCZLGwdmSwAAJkkAB6ZKgABmSpjAJkqNh2ZKgAemSoA AZklaQCZKmEAmUtnAJkqUh2ZKgAAmUsAAJklAB6ZKgABmSpdAJkqUB2ZKgAemSoAAZkkWQCZKlgA mTZzAJkqUh2ZKgAAmTYAAJkkAB6ZKgABmSpaAJkqUh2ZKgAemSoAAZklYwCZKmcAmSpTHZkqAACZ JQABmUtjAJkqTx2ZKgAAmUsAAJkqAAGZKmwAmSpXHZkqAAGZS2kAmSpdHZkqAACZSwAAmSoAAZkk WwCZKlYAmSxsHZksAACZJAAemSoAAZkqXwCZKl8AmSo2HZkqAB6ZKgAAmSoAAZklZwCZKl8AmSpS HZkqAACZJQAemSoAAZkqbgCZKlAdmSoAHpkqAAGZJFoAmSppAJk2bgCZKlIdmSoAAJk2AACZJAAe mSoAAZkqXQCZKlIdmSoAHpkqAAGZJVgAmSplAJkqUx2ZKgAAmSUAAZkqTx2ZKgAAmSoAAZkkOQCZ KmkAmUtnAJkqVx2ZKgAAmUsAAJkkAAGZS24AmSpdHZkqAACZSwAAmSoAAZkkdQCZM3MdmTMAAJkk AIFTmShMApkmWBqZJgABmSgAAZkmXR2ZJgABmSZbHZkmAAGZJl4dmSYAAZkoUAKZJloamSYAAZko AAGZJk8dmSYAAZkmTh2ZJgABmSZXHZkmAAGZI2QAmSpkAJkxWgCZRWQemUUAAJkjAACZKgAAmTEA HpkqPACZRTwemUUAAJkqAB6ZJmQAmSpkAJknUACZRWQemUUAAJkmAACZKgAAmScAHpkjUACZKjwA mUU8HplFAACZKgAAmSMAHpkjZACZKmQAmUVkHplFAACZKgAAmSMAHpkqPACZRTwemUUAAJkqAB6Z JmQAmSpkAJknUACZRWQemUUAAJkmAACZKgAAmScAHpkqPACZRTwemUUAAJkqAB6ZI2QAmSpkAJlF ZB6ZRQAAmSoAAJkjAB6ZLkgAmUU8HplFAACZLgAemSZkAJkqZACZJ1AAmUVkHplFAACZJgAAmSoA AJknAB6ZI1AAmSo8AJlFPB6ZRQAAmSoAAJkjAB6ZI2QAmSpkAJk2WgCZRWQemUUAAJkjAACZKgAA mTYAHpkqPACZNlAAmUU8HplFAACZNgAAmSoAHpkmZACZKmQAmSdQAJlFZB6ZRQAAmSYAAJkqAACZ JwAemSNQAJkqPACZRTwemUUAAJkqAACZIwAemSNkAJkqZACZRWQemUUAAJkqAACZIwAemSo8AJlF PB6ZRQAAmSoAHpkmZACZKmQAmSdQAJlFZB6ZRQAAmSYAAJkqAACZJwAemSNQAJkqPACZRTwemUUA AJkqAACZIwAemSNkAJkqZACZRWQemUUAAJkqAACZIwAemSo8AJlFPB6ZRQAAmSoAHpkmZACZKmQA mSdQAJlFZB6ZRQAAmSYAAJkqAACZJwAemSNQAJkqPACZRTwemUUAAJkqAACZIwAemSNkAJkqZACZ RWQemUUAAJkqAACZIwAemS5IAJlFPB6ZRQAAmS4AHpkmZACZKmQAmSdQAJlFZB6ZRQAAmSYAAJkq AACZJwAemSNQAJkuSACZRTwemUUAAJkuAACZIwAemSNkAJkqZACZNloAmUVkHplFAACZIwAAmSoA AJk2AB6ZKjwAmTZQAJlFPB6ZRQAAmTYAAJkqAB6ZJmQAmSpkAJknUACZRWQemUUAAJkmAACZKgAA mScAHpkjUACZKjwAmUU8HplFAACZKgAAmSMAHpkjZACZKmQAmUVkHplFAACZKgAAmSMAHpkqPACZ RTwemUUAAJkqAB6ZJmQAmSpkAJknUACZRWQemUUAAJkmAACZKgAAmScAHpkjUACZKjwAmUU8HplF AACZKgAAmSMAHpkjZACZKmQAmUVkHplFAACZKgAAmSMAHpkuSACZRTwemUUAAJkuAB6ZJmQAmSpk AJknUACZRWQemUUAAJkmAACZKgAAmScAHpkjUACZKjwAmUU8HplFAACZKgAAmSMAHpkjZACZKmQA mUVkHplFAACZKgAAmSMAHpkqPACZRTwemUUAAJkqAB6ZJmQAmSpkAJknUACZRWQemUUAAJkmAACZ KgAAmScAHpkjUACZKjwAmUU8HplFAACZKgAAmSMAHpkjZACZKmQAmTZQAJlFZB6ZRQAAmSMAAJkq AACZNgAemSo8AJk2ZACZRTwemUUAAJk2AACZKgAemSZkAJkqZACZJ1AAmUVkHplFAACZJgAAmSoA AJknAB6ZI1AAmSo8AJlFPB6ZRQAAmSoAAJkjAB6ZI2QAmSpkAJlFZB6ZRQAAmSoAAJkjAB6ZKjwA mUU8HplFAACZKgAemSZkAJkqZACZJ1AAmUVkHplFAACZJgAAmSoAAJknAB6ZI1AAmSo8AJlFPB6Z RQAAmSoAAJkjAB6ZI2QAmSpkAJlFZB6ZRQAAmSoAAJkjAB6ZKjwAmUU8HplFAACZKgAemSZkAJkq ZACZJ1AAmUVkHplFAACZJgAAmSoAAJknAB6ZI1AAmSo8AJlFPB6ZRQAAmSoAAJkjAB6ZI2QAmSpk AJlFZB6ZRQAAmSoAAJkjAB6ZMEYAmUU8HplFAACZMAAemTBaAJknUACZRWQemUUAAJknAACZMAAe mSNQAJktRgCZRTwemUUAAJktAACZIwAemSNkAJktWgCZNlAAmUVkHplFAACZIwAAmS0AAJk2AB6Z KUYAmTZkAJlFPB6ZRQAAmTYAAJkpAB6ZKVoAmSdQAJlFZB6ZRQAAmScAAJkpAB6ZI1oAmTFaAJlF PB6ZRQAAmTEAAJkjAB6ZI2QAmSpkAJkxWgCZRWQemUUAAJkjAACZKgAAmTEAHpkqPACZRTwemUUA AJkqAB6ZJmQAmSpkAJknUACZRWQemUUAAJkmAACZKgAAmScAHpkjUACZKjwAmUU8HplFAACZKgAA mSMAHpkjZACZKmQAmUVkHplFAACZKgAAmSMAHpkqPACZRTwemUUAAJkqAB6ZJmQAmSpkAJknUACZ RWQemUUAAJkmAACZKgAAmScAHpkqPACZRTwemUUAAJkqAB6ZI2QAmSpkAJlFZB6ZRQAAmSoAAJkj AB6ZKjwAmUU8HplFAACZKgAemSZkAJkqZACZJ1AAmUVkHplFAACZJgAAmSoAAJknAB6ZI1AAmSo8 AJlFPB6ZRQAAmSoAAJkjAB6ZI2QAmSpkAJk2UACZRWQemUUAAJkjAACZKgAAmTYAHpkqPACZNmQA mUU8HplFAACZNgAAmSoAHpkmZACZKmQAmSdQAJlFZB6ZRQAAmSYAAJkqAACZJwAemSNQAJkqPACZ RTwemUUAAJkqAACZIwAemSNkAJkqZACZRWQemUUAAJkqAACZIwAemSo8AJlFPB6ZRQAAmSoAHpkm ZACZKmQAmSdQAJlFZB6ZRQAAmSYAAJkqAACZJwAemSNQAJkqPACZRTwemUUAAJkqAACZIwAemSNk AJkqZACZRWQemUUAAJkqAACZIwAemSo8AJlFPB6ZRQAAmSoAHpkmZACZKmQAmSdQAJlFZB6ZRQAA mSYAAJkqAACZJwAemSNQAJkqPACZRTwemUUAAJkqAACZIwAemSNkAJkqZACZRWQemUUAAJkqAACZ IwAemSo8AJlFPB6ZRQAAmSoAHpkmZACZKmQAmSdQAJlFZB6ZRQAAmSYAAJkqAACZJwAemSNQAJkq PACZRTwemUUAAJkqAACZIwAemSNkAJkqZACZNloAmUVkHplFAACZIwAAmSoAAJk2AB6ZKjwAmTZQ AJlFPB6ZRQAAmTYAAJkqAB6ZJmQAmSpkAJknUACZRWQemUUAAJkmAACZKgAAmScAHpkjUACZKjwA mUU8HplFAACZKgAAmSMAHpkjZACZKmQAmUVkHplFAACZKgAAmSMAHpkqPACZRTwemUUAAJkqAB6Z JmQAmSpkAJknUACZRWQemUUAAJkmAACZKgAAmScAHpkjUACZKjwAmUU8HplFAACZKgAAmSMAHpkj ZACZKmQAmUVkHplFAACZKgAAmSMAHpkqPACZRTwemUUAAJkqAB6ZJmQAmSpkAJknUACZRWQemUUA AJkmAACZKgAAmScAHpkjUACZKjwAmUU8HplFAACZKgAAmSMAHpkxc3eZMQCCaZkkcwCZM3Y7mTMA AJkkAIMlmTBzAJkvdTuZLwAAmTAAAZkvcwCZMHU7mTAAAJkvAAGZLXUAmStzO5krAACZLQABmS14 AJkrbjuZKwAAmS0AAZkreACZKXA7mSkAAJkrAAGZK3gAmSlzO5kpAACZKwABmStzAJkpcACZJmon mSYAAJkpAACZKwABmSt1AJkpcACZJnMnmSYAAJkpAACZKwABmSl1AJkreACZJnUnmSYAAJkrAACZ KQABmSR/AJkqZACZMVoAmUVkHplFAACZJAAAmSoAAJkxAB6ZKjwAmUU8HplFAACZKgAemSZkAJkq ZACZJ1AAmUVkHplFAACZJgAAmSoAAJknAB6ZI1AAmSo8AJlFPB6ZRQAAmSoAAJkjAB6ZI2QAmSpk AJlFZB6ZRQAAmSoAAJkjAB6ZKjwAmUU8HplFAACZKgAemSZkAJkqZACZJ1AAmUVkHplFAACZJgAA mSoAAJknAB6ZKjwAmUU8HplFAACZKgAemSNkAJkqZACZRWQemUUAAJkqAACZIwAemS5IAJlFPB6Z RQAAmS4AHpkmZACZKmQAmSdQAJlFZB6ZRQAAmSYAAJkqAACZJwAemSNQAJkqPACZRTwemUUAAJkq AACZIwAemSNkAJkqZACZNloAmUVkHplFAACZIwAAmSoAAJk2AB6ZKjwAmTZQAJlFPB6ZRQAAmTYA AJkqAB6ZJmQAmSpkAJknUACZRWQemUUAAJkmAACZKgAAmScAHpkjUACZKjwAmUU8HplFAACZKgAA mSMAHpkjZACZKmQAmUVkHplFAACZKgAAmSMAHpkqPACZRTwemUUAAJkqAB6ZJmQAmSpkAJknUACZ RWQemUUAAJkmAACZKgAAmScAHpkjUACZKjwAmUU8HplFAACZKgAAmSMAHpkjZACZKmQAmUVkHplF AACZKgAAmSMAHpkqPACZRTwemUUAAJkqAB6ZJmQAmSpkAJknUACZRWQemUUAAJkmAACZKgAAmScA HpkjUACZKjwAmUU8HplFAACZKgAAmSMAHpkjZACZKmQAmUVkHplFAACZKgAAmSMAHpkuSACZRTwe mUUAAJkuAB6ZJmQAmSpkAJknUACZRWQemUUAAJkmAACZKgAAmScAHpkjUACZLkgAmUU8HplFAACZ LgAAmSMAHpkjZACZKmQAmTZaAJlFZB6ZRQAAmSMAAJkqAACZNgAemSo8AJk2UACZRTwemUUAAJk2 AACZKgAemSZkAJkqZACZJ1AAmUVkHplFAACZJgAAmSoAAJknAB6ZI1AAmSo8AJlFPB6ZRQAAmSoA AJkjAB6ZI2QAmSpkAJlFZB6ZRQAAmSoAAJkjAB6ZKjwAmUU8HplFAACZKgAemSZkAJkqZACZJ1AA mUVkHplFAACZJgAAmSoAAJknAB6ZI1AAmSo8AJlFPB6ZRQAAmSoAAJkjAB6ZI2QAmSpkAJlFZB6Z RQAAmSoAAJkjAB6ZLkgAmUU8HplFAACZLgAemSZkAJkqZACZJ1AAmUVkHplFAACZJgAAmSoAAJkn AB6ZI1AAmSo8AJlFPB6ZRQAAmSoAAJkjAB6ZMXN3mTEAgi2ZLVs7mS0AAZkpWQCZO1YAmSRzAJkz dh2ZOwAemSkAAJkkAACZMwA9mTtwHZk7AB+ZO3AdmTsAW5k7bh2ZOwBbmTtBHZk7AAGZO1YdmTsA AZk7Xh2ZOwAA/y8ATVRyawAAAQsA/wMKSW5pdCBUcmFjawD/BAo8Q1AwMDAwMDQ+ALAHfwCxB38A sgd/ALMHfwC0B38AtQd/ALYHfwC5B38AsAtkALELXwCzC24AtAtkALYLbgC3C2QAuQtpALEKGACy Cl4AswpAALQKQAC1ClQAtgoiALcKLAC5CiYAsFtUALFbMACzWzAAtFtAALVbQAC2W0AAt1sYALlb MACwXQAAsV0AALNdGAC0XRAAtV0MALZdAAC3XQAAuV0AoWCwW0AAsAt4ALBdMACwCkCeALBdBgCw ClSfcLBdAACwCja9cLBdBgCwClSeALBdAACwCja4ILBdBgCwCiyhYLAKXgCwW1QAsF0AALALZAD/ LwA= ------=_NextPart_000_0103_01C04F1F.EA3339A0-- From gcc-help-return-4102-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 15 08:56:14 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 9648 invoked by alias); 15 Nov 2000 08:56:13 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 9588 invoked from network); 15 Nov 2000 08:56:11 -0000 Received: from vexpert.dbai.tuwien.ac.at (128.130.111.12) by sourceware.cygnus.com with SMTP; 15 Nov 2000 08:56:11 -0000 Received: from [128.130.111.2] (deneb [128.130.111.2]) by vexpert.dbai.tuwien.ac.at (8.9.3/8.9.3) with ESMTP id JAA24066; Wed, 15 Nov 2000 09:55:56 +0100 (MET) Date: Wed, 15 Nov 2000 09:55:56 +0100 (CET) From: Gerald Pfeifer To: Yiyan Yang cc: , , Yiyan Yang Subject: Re: How to list all calls a library contained? In-Reply-To: <010701c04edc$dd4ac390$4d049c3d@yangyy> Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII On Wed, 15 Nov 2000, Yiyan Yang wrote: > Hi, > I wrote a small program, but it can not be linked using > > gcc -o a c.c > > and gcc report the following errors: Name the program c.cc and use g++ instead of gcc. However, please note that these lists are for developing GCC and help on installing GCC (see for details); so basic questions like these are not appropriate here. Please read the manual and our instructions at and probably a good book on learning C++. Gerald -- Gerald "Jerry" pfeifer@dbai.tuwien.ac.at http://www.dbai.tuwien.ac.at/~pfeifer/ "Well, we have Haider, but you cannot become president with less than 50% of the votes, let alone less votes than your competitors, here in Austria." From gcc-help-return-4103-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 15 08:56:31 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 9964 invoked by alias); 15 Nov 2000 08:56:31 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 9902 invoked from network); 15 Nov 2000 08:56:30 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 15 Nov 2000 08:56:30 -0000 Received: from cygnus.com (taarna.cygnus.com [205.180.230.102]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id AAA21094; Wed, 15 Nov 2000 00:55:36 -0800 (PST) Message-ID: <3A125243.BA3A3625@cygnus.com> Date: Wed, 15 Nov 2000 01:07:15 -0800 From: Eric Christopher X-Mailer: Mozilla 4.75 [en] (X11; U; Linux 2.2.16-22 i686) X-Accept-Language: en MIME-Version: 1.0 To: Yiyan Yang CC: gcc-help@gcc.gnu.org, gcc@gcc.gnu.org, Yiyan Yang Subject: Re: How to list all calls a library contained? References: <010701c04edc$dd4ac390$4d049c3d@yangyy> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit You'll want to look at info to find out the number of functions in a library. Otherwise you need to write better questions. nm foo.a | wc -l or info nm. -eric From gcc-help-return-4104-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 15 09:31:34 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 17425 invoked by alias); 15 Nov 2000 09:31:33 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 17394 invoked from network); 15 Nov 2000 09:31:31 -0000 Received: from unknown (HELO lxserv01.iam.de) (193.22.99.32) by sourceware.cygnus.com with SMTP; 15 Nov 2000 09:31:31 -0000 Received: (from uucp@localhost) by lxserv01.iam.de (8.9.3/8.9.3) id KAA27472 for ; Wed, 15 Nov 2000 10:30:57 +0100 Received: from hrpc3104.iam.de(193.22.96.132), claiming to be "HRPC3843" via SMTP by smtp.iam.de, id smtpda27470; Wed Nov 15 10:30:47 2000 From: "Huub Strooij" To: Subject: GCC Buglist Date: Wed, 15 Nov 2000 10:32:41 +0100 Message-ID: MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit X-Priority: 3 (Normal) X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook IMO, Build 9.0.2416 (9.0.2911.0) Importance: Normal X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6700 Disposition-Notification-To: "Huub Strooij" Who can help me to the following information: The known buglist and/or reported buglist of the GCC compiler version 2.6-95Q2 (for C++ and Motorola 68360)? I need the information to produce a "proven in use" statement for this specific compiler version. Huub Strooij mailto:hstrooij@usa.net From gcc-help-return-4105-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 15 19:33:12 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 9024 invoked by alias); 15 Nov 2000 19:33:12 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 8994 invoked from network); 15 Nov 2000 19:33:07 -0000 Received: from lynx.lynx.com (207.21.185.2) by sourceware.cygnus.com with SMTP; 15 Nov 2000 19:33:07 -0000 Received: from newbast.lynuxworks.com (newbast.Lynuxworks.COM [207.21.185.6]) by lynx.Lynx.COM (8.9.3/8.9.3) with ESMTP id LAA00188 for ; Wed, 15 Nov 2000 11:33:04 -0800 Received: from lynuxworks.com (charon.Lynx.COM [207.21.185.1]) by newbast.lynuxworks.com (8.9.3/8.9.3) with ESMTP id LAA11120 for ; Wed, 15 Nov 2000 11:33:03 -0800 Message-ID: <3A12E4E3.ED3412D5@lynuxworks.com> Date: Wed, 15 Nov 2000 11:32:51 -0800 From: Peter Buckingham X-Mailer: Mozilla 4.75 [en] (X11; U; Linux 2.2.16-22 i686) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: 16-bit boot code with gcc for x86 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Hi, I am trying to compile a new boot loader for lynxos within lynxos. The tools that I have to use are gcc and gas. I am proting it from a compilation done with bcc, as86 and ld86. Can you tell me of some of the issues or things i need to do to ensure the output of 16-bit code from gcc. thanks, peter From gcc-help-return-4106-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 15 21:56:10 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 10001 invoked by alias); 15 Nov 2000 21:56:07 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 9966 invoked from network); 15 Nov 2000 21:56:06 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 15 Nov 2000 21:56:06 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id NAA18168; Wed, 15 Nov 2000 13:56:04 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAFLu3U12634; Wed, 15 Nov 2000 19:56:03 -0200 To: Anthony Lee Cc: GCC Help Subject: Re: GNU Assembler? References: <3A11D96B.F50126DA@energex.com.au> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 15 Nov 2000 19:56:02 -0200 In-Reply-To: Anthony Lee's message of "Wed, 15 Nov 2000 10:31:39 +1000" Message-ID: Lines: 14 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 14, 2000, Anthony Lee wrote: > Is it true that it is currently not possible to build GNU Assembler > on Digital Unix 4.0D? This mailing list is about GCC, and the GNU assembler is part of GNU binutils, a separate project. I don't think GNU assembler supports Digital Unix. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4107-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 15 21:58:06 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 10633 invoked by alias); 15 Nov 2000 21:58:06 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 10601 invoked from network); 15 Nov 2000 21:58:05 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 15 Nov 2000 21:58:05 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id NAA18429; Wed, 15 Nov 2000 13:58:03 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAFLw2K14149; Wed, 15 Nov 2000 19:58:02 -0200 To: "John Kyle" Cc: gcc-help@gcc.gnu.org Subject: Re: installation References: <20001115010148.21241.qmail@purina.chek.com> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 15 Nov 2000 19:58:02 -0200 In-Reply-To: "John Kyle"'s message of "15 Nov 2000 01:01:48 -0000" Message-ID: Lines: 23 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 14, 2000, "John Kyle" wrote: > Well, I'm a student in high school, and I take a computer science > course that uses c++. I heard gcc was a good compiler, but i can't > figure out how to 'build' the damned thing. i assume from what i > read that i need a fortran compiler, and i can't seem to find one in > the subdirectories i unzipped the gcc stuff, so i assume i have to > download one? what do i do then? To build GCC, you only need a C compiler. There are complete installation instructions in the distribution, as well as at gcc.gnu.org. If you find there's something missing in the docs, please let us know how we could improve them. > also, do i have to be running unix/linux for this to work? Nope. GCC works on a few platforms that are not Unix or similar. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4108-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 15 21:59:53 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 11123 invoked by alias); 15 Nov 2000 21:59:52 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 11093 invoked from network); 15 Nov 2000 21:59:52 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 15 Nov 2000 21:59:52 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id NAA18534; Wed, 15 Nov 2000 13:59:49 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAFLxfL14548; Wed, 15 Nov 2000 19:59:41 -0200 To: "Huub Strooij" Cc: Subject: Re: GCC Buglist References: From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 15 Nov 2000 19:59:41 -0200 In-Reply-To: "Huub Strooij"'s message of "Wed, 15 Nov 2000 10:32:41 +0100" Message-ID: Lines: 14 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 15, 2000, "Huub Strooij" wrote: > The known buglist and/or reported buglist of the GCC compiler version > 2.6-95Q2 (for C++ and Motorola 68360)? This is not a version number of any GCC compiler released as part of the GNU project. You'll have to ask this question to whoever provided you with this version of GCC. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4109-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 16 02:59:44 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 12150 invoked by alias); 16 Nov 2000 02:59:44 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 12117 invoked from network); 16 Nov 2000 02:59:42 -0000 Received: from unknown (HELO EPSNT1.epshq.eps.rwk.com) (fwuser@216.163.8.190) by sourceware.cygnus.com with SMTP; 16 Nov 2000 02:59:42 -0000 Message-ID: From: Mike Gill To: "'gcc-help@gcc.gnu.org'" Subject: Rookie Woes Date: Wed, 15 Nov 2000 20:56:12 -0600 MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" I hate not even knowing enough to ask the right question. I'm using Sun's WorkShop Compiler v4.2 with the following machine specs: Machine hardware: sun4u OS version: 5.5.1 Processor type: sparc Hardware: SUNW,Ultra-Enterprise My problem is that functions are defined like this: int main (argc, argv) int argc; char **argv; { } rather than like this: int main (int argc, char **argv) { } ...which is causing all kinds of problems. I don't even know what this kind of formatting is called and that has made looking for answers difficult. My guess would be there is a compiler option I can set (CC -make_it_work) but nothing I've tried has worked. Any ideas for this poor rookie? From gcc-help-return-4110-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 16 03:44:19 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 16619 invoked by alias); 16 Nov 2000 03:44:18 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 16588 invoked from network); 16 Nov 2000 03:44:15 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 16 Nov 2000 03:44:15 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id TAA14938; Wed, 15 Nov 2000 19:44:13 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAG3iCm05022; Thu, 16 Nov 2000 01:44:12 -0200 To: Mike Gill Cc: "'gcc-help@gcc.gnu.org'" Subject: Re: Rookie Woes References: From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 16 Nov 2000 01:44:12 -0200 In-Reply-To: Mike Gill's message of "Wed, 15 Nov 2000 20:56:12 -0600" Message-ID: Lines: 16 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 16, 2000, Mike Gill wrote: > int > main (argc, argv) > int argc; > char **argv; This is K&R C. I believe it's still well-defined in ISO C, but not in C++. If you want to compile this, use a C compiler, not a C++ compiler. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4111-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 16 07:45:09 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 3555 invoked by alias); 16 Nov 2000 07:45:08 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 3518 invoked from network); 16 Nov 2000 07:45:03 -0000 Received: from smtp1.mail.yahoo.com (128.11.69.60) by sourceware.cygnus.com with SMTP; 16 Nov 2000 07:45:03 -0000 Received: from unknown (HELO kcmahadev) (203.200.3.16) by smtp.mail.vip.suc.yahoo.com with SMTP; 15 Nov 2000 03:26:18 -0000 X-Apparently-From: Message-ID: <00e101c04eb4$90486fc0$a10100c8@kcmahadev> From: "Mahadev K Cholachagudda" To: "Rahul Sharma" Cc: References: <20001114173840.28628.qmail@web3501.mail.yahoo.com> Subject: Re: Address Change ! Date: Wed, 15 Nov 2000 08:58:42 +0530 MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.2919.6600 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6600 hello rahul, i think you need to send a mail to gcc-unsubscribe@gcc.gnu.org with the subject as "remove" by using ur old mail id. Then automatically your subscription is removed. After this you can again subscribe to the list by sending mail to gcc-subscribe@gcc.gnu.org with the subject as "subscribe" by using new mail id. hope this helps ----- Original Message ----- From: "Rahul Sharma" To: Sent: Tuesday, November 14, 2000 11:08 PM Subject: Address Change ! Hi, Please change my subscription address from maxutilpvt@yahoo.com to maxutillinux@yahoo.com . thanx. Regards Rahul Sharma. __________________________________________________ Do You Yahoo!? Yahoo! Calendar - Get organized for the holidays! http://calendar.yahoo.com/ _________________________________________________________ Do You Yahoo!? Get your free @yahoo.com address at http://mail.yahoo.com From gcc-help-return-4112-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 16 21:14:40 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 14934 invoked by alias); 16 Nov 2000 21:14:40 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 14891 invoked from network); 16 Nov 2000 21:14:39 -0000 Received: from corb.mc.mpls.visi.com (208.42.156.1) by sourceware.cygnus.com with SMTP; 16 Nov 2000 21:14:39 -0000 Received: from nomad (braemar.visi.com [209.98.4.167]) by corb.mc.mpls.visi.com (Postfix) with SMTP id 17C9A81A0 for ; Thu, 16 Nov 2000 15:14:13 -0600 (CST) Reply-To: From: "Gary R. Van Sickle" To: Subject: Cross-compile libgcc2.h problems Date: Thu, 16 Nov 2000 15:14:37 -0600 Message-ID: <000501c05012$3aaeedf0$1d01a8c0@BRAEMARINC.COM> MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit X-Priority: 3 (Normal) X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook CWS, Build 9.0.2416 (9.0.2911.0) Importance: Normal X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4133.2400 Hello, 1. gcc and all the GNU development and other tools are the greatest things ever in the history of the world. 2. I've been having trouble for quite a while now trying to get the cvs sources to build as a h8300 cross-compiler. The problem is in libgcc2.h; this is the error I get: /home/grvs/build-newgcc/gcc/xgcc -B/home/grvs/build-newgcc/gcc/ -nostdinc -B /home/grvs/build-newgcc/h8300-hms/newlib/ -isystem /home/grvs/build-newgcc/h8300-hms/newlib/targ-include -isystem /home/grvs/gcc/newlib/libc/include -B/usr/local/h8300-hms/bin/ -B/usr/local/ h8300-hms/lib/ -isystem /usr/local/h8300-hms/include -O2 -DCROSS_COMPILE -DIN_GCC -W -Wall -Wwri te-strings -Wstrict-prototypes -Wmissing-prototypes -isystem /include -DDF=SF -DDI=SI -g1 -DIN_LIBGCC2 -D__GCC_FLOAT_NOT_NEEDED -Dinhib it_libc -I. -I. -I/home/grvs/gcc/gcc -I/home/grvs/gcc/gcc/. -I/home/grvs/gcc /gcc/config -I/home/grvs/gcc/gcc/../include -DL_muldi3 -c /home/grvs/gcc/gcc/libgcc2.c -o libgcc/./_muldi3.o /home/grvs/gcc/gcc/libgcc2.h:260: parse error before "__absvdi2" /home/grvs/gcc/gcc/libgcc2.h:260: warning: type defaults to `int' in declaration of `__absvdi2' /home/grvs/gcc/gcc/libgcc2.h:260: warning: parameter names (without types) in function declaration /home/grvs/gcc/gcc/libgcc2.h:260: warning: data definition has no type or storage class [plus 10 or 20 errors of the same type] Here's my build process: cd build-newgcc ~/gcc/configure --prefix=/usr/local --target=h8300-hms -v \ --enable-languages=c \ --disable-nls \ --without-fp \ --with-gnu-as --with-gnu-ld \ --enable-target-optspace \ --with-headers=$NEWLIB_SRC/newlib/libc/include --with-newlib make I've searched the lists and found nothing about this sort of problem, so I have to assume that I have something wrong. Like I said, I've been having this problem for a while, probably 6 months now, so I'd have to assume if it was a real bug in gcc it'd at least have been seen by someone else by now. Can somebody tell me what I'm doing wrong? Gary R. Van Sickle (tiberius@braemarinc.com) Braemar Inc. 11481 Rupp Dr. Burnsville, MN 55337 From gcc-help-return-4113-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 17 14:08:09 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 14788 invoked by alias); 17 Nov 2000 14:08:09 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 14757 invoked from network); 17 Nov 2000 14:08:04 -0000 Received: from brown.verkkotieto.com (HELO mail.verkkotieto.com) (212.86.0.22) by sourceware.cygnus.com with SMTP; 17 Nov 2000 14:08:04 -0000 Received: from vaajasaari (adsl4-70.verkkotieto.fi [212.86.4.70]) by mail.verkkotieto.com (8.9.3+Sun/8.9.3) with SMTP id QAA10870 for ; Fri, 17 Nov 2000 16:08:01 +0200 (EET) Message-ID: <01a801c050a0$075256c0$0b080a0a@verkkotieto.com> From: "Mikko Vaajasaari" To: Subject: Gcc-2.95.2: error while making bootstrap Date: Fri, 17 Nov 2000 16:09:41 +0200 MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.2615.200 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2615.200 I'm using RedHat 7.0 and gcc 2.96. I'm experiencing some problems, e.g. when compiling the kernel and I want to make sure it's not gcc's fault so I tried to install version 2.95.2. During make bootstrap I got the following error: /usr/local/gcc-2.95.2/libio/indstream.cc: In method `struct streampos indirectbuf::seekoff(long long int, ios::seek_dir, int = 3)': /usr/local/gcc-2.95.2/libio/indstream.cc:82: `struct streampos' used where a `int' was expected /usr/local/gcc-2.95.2/libio/indstream.cc:85: `struct streampos' used where a `int' was expected /usr/local/gcc-2.95.2/libio/indstream.cc:87: `struct streampos' used where a `int' was expected /usr/local/gcc-2.95.2/libio/indstream.cc:89: conversion from `int' to non-scalar type `streampos' requested /usr/local/gcc-2.95.2/libio/indstream.cc: In method `struct streampos indirectbuf::seekpos(_G_fpos64_t, int = 3)': /usr/local/gcc-2.95.2/libio/indstream.cc:99: `struct streampos' used where a `int' was expected /usr/local/gcc-2.95.2/libio/indstream.cc:102: `struct streampos' used where a `int' was expected /usr/local/gcc-2.95.2/libio/indstream.cc:104: `struct streampos' used where a `int' was expected /usr/local/gcc-2.95.2/libio/indstream.cc:106: conversion from `int' to non-scalar type `streampos' requested make[2]: *** [indstream.o] Error 1 make[2]: Leaving directory `/usr/local/gcc-obj/i686-pc-linux-gnu/libio' make[1]: *** [all-target-libio] Error 2 make[1]: Leaving directory `/usr/local/gcc-obj' And in the FAQ it's said that ask from this address. Could you tell me why the error? Thanks, Mikko From gcc-help-return-4114-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 17 17:11:36 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 16843 invoked by alias); 17 Nov 2000 17:11:36 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 16730 invoked from network); 17 Nov 2000 17:11:25 -0000 Received: from nuxi.cs.ucdavis.edu (HELO relay.nuxi.com) (root@169.237.7.38) by sourceware.cygnus.com with SMTP; 17 Nov 2000 17:11:25 -0000 Received: from dragon.nuxi.com (root@trang.nuxi.com [209.152.133.57]) by relay.nuxi.com (8.9.3/8.9.3) with ESMTP id JAA00380 for ; Fri, 17 Nov 2000 09:11:13 -0800 (PST) (envelope-from obrien@NUXI.com) Received: (from obrien@localhost) by dragon.nuxi.com (8.11.1/8.11.1) id eAHHBCM23829 for gcc-help@gcc.gnu.org; Fri, 17 Nov 2000 09:11:12 -0800 (PST) (envelope-from obrien) Date: Fri, 17 Nov 2000 09:11:12 -0800 From: "David O'Brien" To: gcc-help@gcc.gnu.org Subject: Re: ezmlm warning Message-ID: <20001117091112.Q72452@dragon.nuxi.com> Reply-To: obrien@NUXI.com References: <974442017.7990.ezmlm-warn@gcc.gnu.org> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline User-Agent: Mutt/1.2.5i In-Reply-To: <974442017.7990.ezmlm-warn@gcc.gnu.org>; from gcc-help@gcc.gnu.org on Fri, Nov 17, 2000 at 06:20:17AM -0000 X-Operating-System: FreeBSD 5.0-CURRENT Organization: The NUXI BSD group X-Pgp-Rsa-Fingerprint: B7 4D 3E E9 11 39 5F A3 90 76 5D 69 58 D9 98 7A X-Pgp-Rsa-Keyid: 1024/34F9F9D5 Hello, Would it be possible to get the full bounced email. I cannot figure out why this is happening. On Fri, Nov 17, 2000 at 06:20:17AM -0000, gcc-help@gcc.gnu.org wrote: > Hi! This is the ezmlm program. I'm managing the > gcc@gcc.gnu.org mailing list. > > > Messages to you from the gcc mailing list seem to > have been bouncing. I've attached a copy of the first bounce > message I received. > > If this message bounces too, I will send you a probe. If the probe bounces, > I will remove your address from the gcc mailing list, > without further notice. > > > I've kept a list of which messages from the gcc mailing list have > bounced from your address. > > Copies of these messages may be in the archive. > To retrieve a set of messages 123-145 (a maximum of 100 per request), > send an empty message to: > > > To receive a subject and author list for the last 100 or so messages, > send an empty message to: > > > Here are the message numbers: > > 21656 > 21655 > 21660 > 21657 > 21662 > 21663 > 21665 > 21667 > 21671 > 21661 > 21664 > 21666 > 21659 > 21658 > 21670 > 21669 > 21720 > 21721 > 21724 > 21723 > 21725 > 21722 > > --- Enclosed is a copy of the bounce message I received. > > Return-Path: <> > Received: (qmail 11278 invoked for bounce); 5 Nov 2000 13:31:50 -0000 > Date: 5 Nov 2000 13:31:50 -0000 > From: MAILER-DAEMON@sourceware.cygnus.com > To: gcc-return-21656-@gcc.gnu.org > Subject: failure notice > > Hi. This is the qmail-send program at sourceware.cygnus.com. > I'm afraid I wasn't able to deliver your message to the following addresses. > This is a permanent error; I've given up. Sorry it didn't work out. > > : > Connected to 209.152.133.57 but sender was rejected. > Remote host said: 550 Access denied From gcc-help-return-4115-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 17 18:23:07 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 12964 invoked by alias); 17 Nov 2000 18:23:06 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 12580 invoked from network); 17 Nov 2000 18:22:31 -0000 Received: from unknown (HELO spmail.atiresearch.com) (38.154.182.3) by sourceware.cygnus.com with SMTP; 17 Nov 2000 18:22:31 -0000 Received: from pa00fsr01.atiresearch.com (pa00fsr01.pa.atitech.com [38.245.124.56]) by spmail.atiresearch.com (8.11.0/8.11.0) with ESMTP id eAHINVP07678; Fri, 17 Nov 2000 13:23:35 -0500 (EST) Received: by pa00fsr01.pa.atitech.com with Internet Mail Service (5.5.2448.0) id ; Fri, 17 Nov 2000 13:15:43 -0500 Message-ID: <5337D585DDD3D111996B0008C728F07DCE46A0@pa00fsr01.pa.atitech.com> From: Nick DiToro To: "'Peter Buckingham'" , gcc-help@gcc.gnu.org Subject: RE: 16-bit boot code with gcc for x86 Date: Fri, 17 Nov 2000 13:15:37 -0500 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2448.0) Content-Type: multipart/alternative; boundary="----_=_NextPart_001_01C050C2.65D8010A" This message is in MIME format. Since your mail reader does not understand this format, some or all of this message may not be legible. ------_=_NextPart_001_01C050C2.65D8010A Content-Type: text/plain; charset="iso-8859-1" www.delorie.com maintains an email group that may be able to provide some insight into this issue. -----Original Message----- From: Peter Buckingham [mailto:pbuckingham@LynuxWorks.COM] Sent: Wednesday, November 15, 2000 2:33 PM To: gcc-help@gcc.gnu.org Subject: 16-bit boot code with gcc for x86 Hi, I am trying to compile a new boot loader for lynxos within lynxos. The tools that I have to use are gcc and gas. I am proting it from a compilation done with bcc, as86 and ld86. Can you tell me of some of the issues or things i need to do to ensure the output of 16-bit code from gcc. thanks, peter ------_=_NextPart_001_01C050C2.65D8010A Content-Type: text/html; charset="iso-8859-1" RE: 16-bit boot code with gcc for x86

www.delorie.com maintains an email group that may be able to provide some insight into this issue.

 -----Original Message-----
From:   Peter Buckingham [mailto:pbuckingham@LynuxWorks.COM]
Sent:   Wednesday, November 15, 2000 2:33 PM
To:     gcc-help@gcc.gnu.org
Subject:        16-bit boot code with gcc for x86

Hi,

I am trying to compile a new boot loader for lynxos within lynxos. The tools
that I have to use are gcc and gas. I am proting it from a compilation done with
bcc, as86 and ld86. Can you tell me of some of the issues or things i need to do
to ensure the output of 16-bit code from gcc.

thanks,

peter

------_=_NextPart_001_01C050C2.65D8010A-- From gcc-help-return-4116-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Sat Nov 18 12:42:41 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 32244 invoked by alias); 18 Nov 2000 12:42:39 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 32194 invoked from network); 18 Nov 2000 12:42:38 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 18 Nov 2000 12:42:38 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id EAA03158; Sat, 18 Nov 2000 04:42:29 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAI4aFe01681; Sat, 18 Nov 2000 02:36:15 -0200 To: "Mikko Vaajasaari" Cc: Subject: Re: Gcc-2.95.2: error while making bootstrap References: <01a801c050a0$075256c0$0b080a0a@verkkotieto.com> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 18 Nov 2000 02:36:15 -0200 In-Reply-To: "Mikko Vaajasaari"'s message of "Fri, 17 Nov 2000 16:09:41 +0200" Message-ID: Lines: 13 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 17, 2000, "Mikko Vaajasaari" wrote: > Could you tell me why the error? GCC 2.95.2 is not compatible with glibc 2.2 (pre-release or otherwise). You need some patches available at the platform-specific installation instructions at gcc.gnu.org -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4117-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 20 10:38:20 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 16783 invoked by alias); 20 Nov 2000 10:38:20 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 16379 invoked from network); 20 Nov 2000 10:38:15 -0000 Received: from fencepost.gnu.org (we-refuse-to-spy-on-our-users@199.232.76.164) by sourceware.cygnus.com with SMTP; 20 Nov 2000 10:38:15 -0000 Received: from c000-h018.c000.snv.cp.net ([209.228.32.82] helo=c000.snv.cp.net) by fencepost.gnu.org with smtp (Exim 3.16 #1 (Debian)) id 13xoKv-0004hi-00 for ; Mon, 20 Nov 2000 05:38:09 -0500 Received: (cpmta 5052 invoked from network); 20 Nov 2000 02:38:07 -0800 Date: 20 Nov 2000 02:38:07 -0800 Message-ID: <20001120103807.5051.cpmta@c000.snv.cp.net> X-Sent: 20 Nov 2000 10:38:07 GMT Received: from [192.6.111.72] by mail.inexbee.com with HTTP; 20 Nov 2000 02:38:07 PST Content-Type: text/plain Content-Disposition: inline Mime-Version: 1.0 To: help-gcc@gnu.org From: diego.castillo@inexbee.com X-Mailer: Web Mail 3.7.1.6 Subject: Interoperation problem between GNU C and HP-UX assembler Hello, I am developing an application on a HP-UX machine where I have successfully installed GNU compiler collection and make. Version is: hppa2.0w-hp-hpux11.00 However, I am having trouble when compiling my sources. This is the error messages I get: [waves:nxadm]fireman/XApi $ make cmstime.o g++ -c -Iapi cmstime.c -o cmstime.o as: "/var/tmp/ccaEHkFc.s", line 379: warning 36: Use of %fr22L is incorrect for the current LEVEL of 1.0 as: "/var/tmp/ccaEHkFc.s", line 381: warning 36: Use of %fr24L is incorrect for the current LEVEL of 1.0 as: "/var/tmp/ccaEHkFc.s", line 382: warning 36: Use of %fr24L is incorrect for the current LEVEL of 1.0 as: "/var/tmp/ccaEHkFc.s", line 382: warning 36: Use of %fr22L is incorrect for the current LEVEL of 1.0 as: "/var/tmp/ccaEHkFc.s", line 382: warning 36: Use of %fr23 is incorrect for the current LEVEL of 1.0 as: "/var/tmp/ccaEHkFc.s", line 382: warning 36: Use of XMPYU is incorrect for the current LEVEL of 1.0 as: "/var/tmp/ccaEHkFc.s", line 383: warning 36: Use of %fr23L is incorrect for the current LEVEL of 1.0 I believe this is an interoperation problem due to the assembler shipped with HP-UX. According to http://www.cco.caltech.edu/cco/texinfo/gcc/gcc_9.html#SEC96 "taking the address of a label may generate errors from the HP-UX PA assembler; GAS for the PA does not have this problem". I can not find the GNU assembler, which seems to be necessary to solve my problems. Do you have any idea about where I can find it? Could something else produce such an error message? Thanks for any help that you can offer. Regards, Diego Castillo From gcc-help-return-4118-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 20 15:43:31 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 2546 invoked by alias); 20 Nov 2000 15:43:30 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 2506 invoked from network); 20 Nov 2000 15:43:28 -0000 Received: from smtp10.atl.mindspring.net (207.69.200.246) by sourceware.cygnus.com with SMTP; 20 Nov 2000 15:43:28 -0000 Received: from ENTACTNAIL (lazyjobs.com [199.174.17.114] (may be forged)) by smtp10.atl.mindspring.net (8.9.3/8.8.5) with SMTP id KAA23672 for ; Mon, 20 Nov 2000 10:43:25 -0500 (EST) Message-ID: <005601c05307$78c7a440$02c44720@ENTACTNAIL> From: "Robert Nail" To: References: <000801c043e1$895ab660$41217f8c@npust.edu.tw> <39FFE224.C833A8E@tin.it> Subject: I want to change password through C function calls Date: Mon, 20 Nov 2000 09:35:07 -0600 MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.50.4133.2400 X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4133.2400 What "C" functions calls are available on Linux 6.x to allow me to programmatically change a password for a user? I have seen the putpwent but I'm not sure if this will issue a change or just add an entry. I need to make sure I update or change the password, not add entries. All help would be very much appreciated. From gcc-help-return-4119-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 20 16:04:33 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 10143 invoked by alias); 20 Nov 2000 16:04:32 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 10110 invoked from network); 20 Nov 2000 16:04:31 -0000 Received: from fencepost.gnu.org (we-refuse-to-spy-on-our-users@199.232.76.164) by sourceware.cygnus.com with SMTP; 20 Nov 2000 16:04:31 -0000 Received: from runyon.cygnus.com ([205.180.230.5] helo=cygnus.com) by fencepost.gnu.org with esmtp (Exim 3.16 #1 (Debian)) id 13xtQe-00009u-00 for ; Mon, 20 Nov 2000 11:04:24 -0500 Received: from upchuck.cygnus.com (taarna.cygnus.com [205.180.230.102]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id IAA12048 for ; Mon, 20 Nov 2000 08:04:22 -0800 (PST) Received: from upchuck (law@localhost [127.0.0.1]) by upchuck.cygnus.com (8.8.7/8.8.7) with ESMTP id JAA03093; Mon, 20 Nov 2000 09:05:49 -0700 X-Mailer: exmh version 2.0.2 To: diego.castillo@inexbee.com cc: help-gcc@gnu.org Subject: Re: Interoperation problem between GNU C and HP-UX assembler Reply-To: law@redhat.com In-reply-to: Your message of 20 Nov 2000 02:38:07 PST. <20001120103807.5051.cpmta@c000.snv.cp.net> From: law@redhat.com Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Date: Mon, 20 Nov 2000 09:05:49 -0700 Message-ID: <3090.974736349@upchuck> In message <20001120103807.5051.cpmta@c000.snv.cp.net>you write: > Hello, > > I am developing an application on a HP-UX machine where I have successfully > installed GNU compiler collection and make. Version is: hppa2.0w-hp-hpux11 > .00 > > However, I am having trouble when compiling my sources. This is the error m > essages I get: These are not errors. they are warnings and have no effect on the resulting code. Basically HP changed specifications for their assembler a few years ago and older versions of GCC didn't know about the change. Updating to a more recent version of GCC should fix that problem, but as I mentioned before, it's just a warning and doesn't actually show any end-user effects. > I believe this is an interoperation problem due to the assembler shipped wi > th HP-UX. According to http://www.cco.caltech.edu/cco/texinfo/gcc/gcc_9.htm > l#SEC96 "taking the address of a label may generate errors from the HP-UX P > A assembler; GAS for the PA does not have this problem". No, these warnings have nothing to do with that issue. > I can not find the GNU assembler, which seems to be necessary to solve my p > roblems. Do you have any idea about where I can find it? Could something el > se produce such an error message? It's part of the GNU binutils package. jeff From gcc-help-return-4120-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 21 06:08:29 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 19547 invoked by alias); 21 Nov 2000 06:08:28 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 19517 invoked from network); 21 Nov 2000 06:08:28 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 21 Nov 2000 06:08:28 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id WAA23934; Mon, 20 Nov 2000 22:08:24 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAL68L115071; Tue, 21 Nov 2000 04:08:21 -0200 To: "Robert Nail" Cc: Subject: Re: I want to change password through C function calls References: <000801c043e1$895ab660$41217f8c@npust.edu.tw> <39FFE224.C833A8E@tin.it> <005601c05307$78c7a440$02c44720@ENTACTNAIL> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 21 Nov 2000 04:08:21 -0200 In-Reply-To: "Robert Nail"'s message of "Mon, 20 Nov 2000 09:35:07 -0600" Message-ID: Lines: 26 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 20, 2000, "Robert Nail" wrote: > What "C" functions calls are available on Linux 6.x to allow me to > programmatically change a password for a user? This mailing list is about GCC, and your question has absolutely nothing to do with GCC. GCC is a compiler. The C library is a separate project. > I have seen the putpwent but I'm not sure if this will issue a > change or just add an entry. It is my understanding that it will only write a new line to whatever stream you give it as an argument. Arranging for this entry to make it to /etc/passwd and/or /etc/shadow, an NIS server or whatever other password management scheme is in use is up to you. I don't think this is something that can be done easily in general. Maybe your best bet is to write a wrapper around the `passwd' program. Alternatively, take a look at the `pam' documentation. Maybe there's something generic enough in there. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4121-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 21 11:40:58 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 26378 invoked by alias); 21 Nov 2000 11:40:57 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 26342 invoked from network); 21 Nov 2000 11:40:46 -0000 Received: from unknown (HELO mail.aprilia.it) (194.243.103.228) by sourceware.cygnus.com with SMTP; 21 Nov 2000 11:40:46 -0000 Subject: Hitachi SH-2E support To: gcc-help@gcc.gnu.org From: Michael_Rausch@aprilia.it Date: Tue, 21 Nov 2000 12:37:58 +0100 Message-ID: X-MIMETrack: Serialize by Router on SrvNotes1/Aprilia S.p.A.(Release 5.0.5 |September 22, 2000) at 21/11/2000 12.38.02 MIME-Version: 1.0 Content-type: text/plain; charset=us-ascii We need to use the floating point capabilities of SH7055 (Hitachi SH-2E family). It features a Floating Point Unit which "supports single-precision floating point calculations as well as entirely PCAPI compatible emulation of double-precision floating point calculations" (see for example: http://www.hitachi.co.jp/Sicd/English/Products/micom/super_h/e602155B.pdf). Does GCC support this feature, or is it going to do it in the future? If not, what would be the easiest way to solve the problem? Thanks in advance for any information! Best Regards, Michael From gcc-help-return-4122-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 21 11:45:43 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 27511 invoked by alias); 21 Nov 2000 11:45:42 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 27481 invoked from network); 21 Nov 2000 11:45:42 -0000 Received: from wire.cadcamlab.org (?3tN3qyW2wZvQO4b91dUroQZG9C3PK+pc?@156.26.20.181) by sourceware.cygnus.com with SMTP; 21 Nov 2000 11:45:42 -0000 Received: from peter by wire.cadcamlab.org with local (Exim 3.16 #1 (Debian)) id 13yBrn-0004tf-00 for ; Tue, 21 Nov 2000 11:45:39 +0000 From: Peter Samuelson MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Message-ID: <14874.24674.154243.56191@wire.cadcamlab.org> Date: Tue, 21 Nov 2000 05:45:38 -0600 (CST) To: gcc-help@gcc.gnu.org Subject: gcc: how to optimize out dead strings? X-Mailer: VM 6.75 under 21.1 (patch 12) "Channel Islands" XEmacs Lucid X-Face: ?*2Jm8R'OlE|+C~V>u$CARJyKMOpJ"^kNhLusXnPTFBF!#8,jH/#=Iy(?ehN$jH }x;J6B@[z.Ad\Be5RfNB*1>Eh.'R%u2gRj)M4blT]vu%^Qq Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 24036 invoked by alias); 21 Nov 2000 13:23:41 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 23960 invoked from network); 21 Nov 2000 13:23:36 -0000 Received: from fencepost.gnu.org (we-refuse-to-spy-on-our-users@199.232.76.164) by sourceware.cygnus.com with SMTP; 21 Nov 2000 13:23:36 -0000 Received: from [61.133.0.13] (helo=roam.sd.cn.net) by fencepost.gnu.org with esmtp (Exim 3.16 #1 (Debian)) id 13yDOS-0007WY-00 for ; Tue, 21 Nov 2000 08:23:29 -0500 Received: from yangyy ([61.133.6.155]) by roam.sd.cn.net (8.8.8+Sun/8.8.8) with SMTP id VAA13075; Tue, 21 Nov 2000 21:20:40 +0800 (CST) Message-ID: <004f01c053bd$af31ba50$8900853d@yangyy> From: "Edward" To: , , "GCC Help" References: <000801c043e1$895ab660$41217f8c@npust.edu.tw><39FFE224.C833A8E@tin.it> <005601c05307$78c7a440$02c44720@ENTACTNAIL> Subject: Who can send me some documents about THREAD? Date: Tue, 21 Nov 2000 21:08:38 +0800 MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: base64 X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.2919.6700 Disposition-Notification-To: "Edward" X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6700 SGksDQpJIHdhbnQgdG8gbGVhcm4gVEhSRUFEKFBPU0lYIGNvbmZvcm1hYmx5KSB1bmRlciBVTklY LCBidXQgSSBjYW4ndCBmaW5kIGFueSBkb2N1bWVudHMgYWJvdXQgaXQsIHdobyBjYW4gc2VuZCBt ZSBzb21lID8NCg0KVGhhbmtzIGluIGFkdmFuY2UhDQoNCg0KRWR3YXJkDQoNCg== From gcc-help-return-4124-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 21 13:32:27 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 26900 invoked by alias); 21 Nov 2000 13:32:25 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 26663 invoked from network); 21 Nov 2000 13:32:02 -0000 Received: from unknown (HELO roam.sd.cn.net) (61.133.0.13) by sourceware.cygnus.com with SMTP; 21 Nov 2000 13:32:02 -0000 Received: from yangyy ([61.133.6.155]) by roam.sd.cn.net (8.8.8+Sun/8.8.8) with SMTP id VAA13075; Tue, 21 Nov 2000 21:20:40 +0800 (CST) Message-ID: <004f01c053bd$af31ba50$8900853d@yangyy> From: "Edward" To: , , "GCC Help" References: <000801c043e1$895ab660$41217f8c@npust.edu.tw><39FFE224.C833A8E@tin.it> <005601c05307$78c7a440$02c44720@ENTACTNAIL> Subject: Who can send me some documents about THREAD? Date: Tue, 21 Nov 2000 21:08:38 +0800 MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: base64 X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.2919.6700 Disposition-Notification-To: "Edward" X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6700 SGksDQpJIHdhbnQgdG8gbGVhcm4gVEhSRUFEKFBPU0lYIGNvbmZvcm1hYmx5KSB1bmRlciBVTklY LCBidXQgSSBjYW4ndCBmaW5kIGFueSBkb2N1bWVudHMgYWJvdXQgaXQsIHdobyBjYW4gc2VuZCBt ZSBzb21lID8NCg0KVGhhbmtzIGluIGFkdmFuY2UhDQoNCg0KRWR3YXJkDQoNCg== From gcc-help-return-4125-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 21 13:45:48 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 31682 invoked by alias); 21 Nov 2000 13:45:44 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 31619 invoked from network); 21 Nov 2000 13:45:41 -0000 Received: from c194.acutronic.nauticom.net (HELO aus-fs1) (209.195.177.194) by sourceware.cygnus.com with SMTP; 21 Nov 2000 13:45:41 -0000 Received: from armand (c196.acutronic.nauticom.net [209.195.177.196]) by aus-fs1; Tue, 21 Nov 2000 08:45:31 -0500 Message-ID: <003d01c053c1$afcf0ef0$c4b1c3d1@armand> From: "Armand Liberi" To: "Edward" , , , "GCC Help" References: <000801c043e1$895ab660$41217f8c@npust.edu.tw><39FFE224.C833A8E@tin.it> <005601c05307$78c7a440$02c44720@ENTACTNAIL> <004f01c053bd$af31ba50$8900853d@yangyy> Subject: Re: Who can send me some documents about THREAD? Date: Tue, 21 Nov 2000 08:48:10 -0500 MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.3018.1300 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.3018.1300 http://search.borders.com/fcgi-bin/db2www/search/search.d2w/Details?&mediaTy pe=Book&prodID=4356376 ----- Original Message ----- From: "Edward" To: ; ; "GCC Help" Sent: Tuesday, November 21, 2000 8:08 AM Subject: Who can send me some documents about THREAD? > Hi, > I want to learn THREAD(POSIX conformably) under UNIX, but I can't find any documents about it, who can send me some ? > > Thanks in advance! > > > Edward > > From gcc-help-return-4126-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 21 13:46:06 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 31889 invoked by alias); 21 Nov 2000 13:46:05 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 31830 invoked from network); 21 Nov 2000 13:46:00 -0000 Received: from fencepost.gnu.org (we-refuse-to-spy-on-our-users@199.232.76.164) by sourceware.cygnus.com with SMTP; 21 Nov 2000 13:46:00 -0000 Received: from c194.acutronic.nauticom.net ([209.195.177.194] helo=aus-fs1) by fencepost.gnu.org with smtp (Exim 3.16 #1 (Debian)) id 13yDk9-00083c-00 for ; Tue, 21 Nov 2000 08:45:54 -0500 Received: from armand (c196.acutronic.nauticom.net [209.195.177.196]) by aus-fs1; Tue, 21 Nov 2000 08:45:31 -0500 Message-ID: <003d01c053c1$afcf0ef0$c4b1c3d1@armand> From: "Armand Liberi" To: "Edward" , , , "GCC Help" References: <000801c043e1$895ab660$41217f8c@npust.edu.tw><39FFE224.C833A8E@tin.it> <005601c05307$78c7a440$02c44720@ENTACTNAIL> <004f01c053bd$af31ba50$8900853d@yangyy> Subject: Re: Who can send me some documents about THREAD? Date: Tue, 21 Nov 2000 08:48:10 -0500 MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.3018.1300 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.3018.1300 http://search.borders.com/fcgi-bin/db2www/search/search.d2w/Details?&mediaTy pe=Book&prodID=4356376 ----- Original Message ----- From: "Edward" To: ; ; "GCC Help" Sent: Tuesday, November 21, 2000 8:08 AM Subject: Who can send me some documents about THREAD? > Hi, > I want to learn THREAD(POSIX conformably) under UNIX, but I can't find any documents about it, who can send me some ? > > Thanks in advance! > > > Edward > > From gcc-help-return-4127-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 21 13:51:34 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 3148 invoked by alias); 21 Nov 2000 13:51:30 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 3107 invoked from network); 21 Nov 2000 13:51:27 -0000 Received: from fencepost.gnu.org (we-refuse-to-spy-on-our-users@199.232.76.164) by sourceware.cygnus.com with SMTP; 21 Nov 2000 13:51:27 -0000 Received: from c194.acutronic.nauticom.net ([209.195.177.194] helo=aus-fs1) by fencepost.gnu.org with smtp (Exim 3.16 #1 (Debian)) id 13yDpR-00088D-00 for ; Tue, 21 Nov 2000 08:51:22 -0500 Received: from armand (c196.acutronic.nauticom.net [209.195.177.196]) by aus-fs1; Tue, 21 Nov 2000 08:50:52 -0500 Message-ID: <004501c053c2$6f5053b0$c4b1c3d1@armand> From: "Armand Liberi" To: "Armand Liberi" , "Edward" , , , "GCC Help" Subject: Re: Who can send me some documents about THREAD? Date: Tue, 21 Nov 2000 08:53:31 -0500 MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.3018.1300 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.3018.1300 Pthreads Programming: A Posix Standard for Better Understanding Trade Paperback, 284 Pages, Reprint, Edition Number 000, O'Reilly & Associates, Incorporated, December 1999 ISBN: 1565921151 ----- Original Message ----- From: "Armand Liberi" To: "Edward" ; ; ; "GCC Help" Sent: Tuesday, November 21, 2000 8:48 AM Subject: Re: Who can send me some documents about THREAD? > http://search.borders.com/fcgi-bin/db2www/search/search.d2w/Details?&mediaTy > pe=Book&prodID=4356376 > ----- Original Message ----- > From: "Edward" > To: ; ; "GCC Help" > Sent: Tuesday, November 21, 2000 8:08 AM > Subject: Who can send me some documents about THREAD? > > > > Hi, > > I want to learn THREAD(POSIX conformably) under UNIX, but I can't find any > documents about it, who can send me some ? > > > > Thanks in advance! > > > > > > Edward > > > > > From gcc-help-return-4128-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 21 13:51:35 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 3215 invoked by alias); 21 Nov 2000 13:51:32 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 3147 invoked from network); 21 Nov 2000 13:51:30 -0000 Received: from c194.acutronic.nauticom.net (HELO aus-fs1) (209.195.177.194) by sourceware.cygnus.com with SMTP; 21 Nov 2000 13:51:30 -0000 Received: from armand (c196.acutronic.nauticom.net [209.195.177.196]) by aus-fs1; Tue, 21 Nov 2000 08:50:52 -0500 Message-ID: <004501c053c2$6f5053b0$c4b1c3d1@armand> From: "Armand Liberi" To: "Armand Liberi" , "Edward" , , , "GCC Help" Subject: Re: Who can send me some documents about THREAD? Date: Tue, 21 Nov 2000 08:53:31 -0500 MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.3018.1300 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.3018.1300 Pthreads Programming: A Posix Standard for Better Understanding Trade Paperback, 284 Pages, Reprint, Edition Number 000, O'Reilly & Associates, Incorporated, December 1999 ISBN: 1565921151 ----- Original Message ----- From: "Armand Liberi" To: "Edward" ; ; ; "GCC Help" Sent: Tuesday, November 21, 2000 8:48 AM Subject: Re: Who can send me some documents about THREAD? > http://search.borders.com/fcgi-bin/db2www/search/search.d2w/Details?&mediaTy > pe=Book&prodID=4356376 > ----- Original Message ----- > From: "Edward" > To: ; ; "GCC Help" > Sent: Tuesday, November 21, 2000 8:08 AM > Subject: Who can send me some documents about THREAD? > > > > Hi, > > I want to learn THREAD(POSIX conformably) under UNIX, but I can't find any > documents about it, who can send me some ? > > > > Thanks in advance! > > > > > > Edward > > > > > From gcc-help-return-4129-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 21 16:36:04 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 22636 invoked by alias); 21 Nov 2000 16:36:03 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 22600 invoked from network); 21 Nov 2000 16:36:02 -0000 Received: from pop3.web.de (HELO smtp.web.de) (212.227.116.81) by sourceware.cygnus.com with SMTP; 21 Nov 2000 16:36:02 -0000 Received: from tonline by smtp.web.de with smtp (freemail 4.2.1.0 #13) id m13yGOl-005Dz4C; Tue, 21 Nov 2000 17:35 +0100 From: "Andreas Schwarz" To: Subject: Compiling GCC for ADSP21xx Date: Tue, 21 Nov 2000 17:34:51 +0100 Message-ID: MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit X-Priority: 3 (Normal) X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook IMO, Build 9.0.2416 (9.0.2910.0) Importance: Normal X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4133.2400 Hello, i tried to compile the ADSP21XX c-compiler with cygwin, but ./configure doesn't work because the compiler is originally thought for a sparc-host. How can I compile it using cygwin? Andreas -- __ ___ ___ ___ /__\ / __) ___(__ )(__ ) /(__)\ \__ \(___)(_ \ (_ \ (__)(__)(___/ (___/(___/ From gcc-help-return-4130-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 21 16:50:15 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 29410 invoked by alias); 21 Nov 2000 16:50:14 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 29356 invoked from network); 21 Nov 2000 16:50:11 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 21 Nov 2000 16:50:11 -0000 Received: from upchuck.cygnus.com (taarna.cygnus.com [205.180.230.102]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id IAA24680 for ; Tue, 21 Nov 2000 08:50:10 -0800 (PST) Received: from upchuck (law@localhost [127.0.0.1]) by upchuck.cygnus.com (8.8.7/8.8.7) with ESMTP id JAA09669; Tue, 21 Nov 2000 09:51:24 -0700 X-Mailer: exmh version 2.0.2 To: Peter Samuelson cc: gcc-help@gcc.gnu.org Subject: Re: gcc: how to optimize out dead strings? Reply-To: law@redhat.com In-reply-to: Your message of Tue, 21 Nov 2000 05:45:38 CST. <14874.24674.154243.56191@wire.cadcamlab.org> From: law@redhat.com Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Date: Tue, 21 Nov 2000 09:51:24 -0700 Message-ID: <9666.974825484@upchuck> In message <14874.24674.154243.56191@wire.cadcamlab.org>you write: > > [not subscribed to gcc-help, please cc, no pun intended] > > gcc is pretty good at optimizing out dead code, but what about dead > string constants? > > void foo(int x) > { > if (0) > printf("bar"); > } > > As of 2.95.2 on i386-linux{-gnu(:}, the constant "bar\0" still takes up > unwanted space in my object file. Any way to get rid of it at compile > time? (cpp is not an option.) Look at current development snapshots. I believe they will eliminate dead constants. > Oh, by the way, the same applies to static variables. Dead static > variables are bad too. Yes, they're bad. The compiler will warn you about this kind of stuff, but it won't eliminate them at this time. jeff From gcc-help-return-4131-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 21 17:14:34 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 5411 invoked by alias); 21 Nov 2000 17:14:34 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 5376 invoked from network); 21 Nov 2000 17:14:33 -0000 Received: from motgate2.mot.com (136.182.1.10) by sourceware.cygnus.com with SMTP; 21 Nov 2000 17:14:33 -0000 Received: [from mothost.mot.com (mothost.mot.com [129.188.137.101]) by motgate2.mot.com (motgate2 2.1) with ESMTP id KAA25176 for ; Tue, 21 Nov 2000 10:14:08 -0700 (MST)] Received: [from emailsps.sps.mot.com (emailsps.sps.mot.com [216.8.10.1]) by mothost.mot.com (MOT-mothost 2.0) with ESMTP id KAA11642 for ; Tue, 21 Nov 2000 10:14:07 -0700 (MST)] Received: from mekb2.sps.mot.com (oban [221.170.160.82]) by mekb2.sps.mot.com (8.9.3/8.9.3) with ESMTP id RAA09954 for ; Tue, 21 Nov 2000 17:14:04 GMT Message-Id: <200011211714.RAA09954@mekb2.sps.mot.com> To: gcc-help@gcc.gnu.org Subject: right snapshot to use for HP-UX 11? Date: Tue, 21 Nov 2000 17:14:04 +0000 From: Will Partain Folks, the current GCC docs say: GCC 2.95.2 does not support HP-UX 11, and it cannot generate 64-bit object files. Current (as of late 2000) snapshots and GCC 3.0 do support HP-UX 11. Can anyone out there supply values for M and N in the following sentence: "I have been using GCC snapshot M with binutils snapshot N on HP-UX 11 with some success, including for C++; YMMV and no warranty expressed or implied... :-)" ? [Simply grabbing the latest snapshot(s) is probably unwise, because the recent V3 C++ ABI landing has shaken things up a bit (as I understand it).] I will summarize the replies if an "answer" emerges... Thanks, Will From gcc-help-return-4132-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 21 19:55:38 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 16498 invoked by alias); 21 Nov 2000 19:55:32 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 15807 invoked from network); 21 Nov 2000 19:54:00 -0000 Received: from unknown (HELO newton.pmf.unsa.ba) (root@195.130.44.3) by sourceware.cygnus.com with SMTP; 21 Nov 2000 19:54:00 -0000 Received: (from uucp@localhost) by newton.pmf.unsa.ba (8.9.3/8.9.3/SuSE Linux 8.9.3-0.1) id UAA19660 for ; Tue, 21 Nov 2000 20:57:36 +0100 Message-Id: <200011211957.UAA19660@newton.pmf.unsa.ba> Received: from unknown(195.130.44.83) by newton.pmf.unsa.ba via smap (V2.1+anti-relay+anti-spam) id xma019657; Tue, 21 Nov 00 20:57:13 +0100 From: "Pat Allen" To: gcc-help@gcc.gnu.org Date: Tue, 21 Nov 2000 20:53:45 -0800 MIME-Version: 1.0 Content-type: text/plain; charset=US-ASCII Content-transfer-encoding: 7BIT Subject: gcc can't find libstdc++ Reply-to: pat@pmf.unsa.ba Priority: normal X-mailer: Pegasus Mail for Win32 (v3.11) I'm trying to install gcc as a teaching platform for students here at the University of Sarajevo. I've installed gcc 2.95.2 on Solaris 7 (sparc), using the pre- compiled version available from Sun freeware. Whenever I try to run the executable file produced by g++, I get ld.so.1: a.out: fatal: libstdc++.so.2.10.0: open failed: No such file or directory The file libstdc++.so.2.10.0 exists, in the directory /usr/local/lib. I've tried changing the value of the environment variable LIBRARY_PATH, to no avail, and I've run out of ideas. I'd be extremely grateful for any help! Thanks, Pat Allen ----------------------------- Dr Pat Allen Prirodno-matematicki fakultet Zmaja od Bosne 33-35 Sarajevo Tel: +387 (0)33 651245 Fax: +387 (0)33 649342 From gcc-help-return-4133-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 22 10:44:31 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 25282 invoked by alias); 22 Nov 2000 10:44:28 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 25251 invoked from network); 22 Nov 2000 10:44:25 -0000 Received: from karman.lufmech.rwth-aachen.de (HELO lufmech.rwth-aachen.de) (@134.130.177.1) by sourceware.cygnus.com with SMTP; 22 Nov 2000 10:44:25 -0000 Received: from lufmech.rwth-aachen.de (markus@mises.lufmech.RWTH-Aachen.DE [134.130.177.107]) by lufmech.rwth-aachen.de with ESMTP (8.7.1/8.7.1) id LAA24830; Wed, 22 Nov 2000 11:44:22 +0100 (MEZ) Message-ID: <3A1BA385.8B870CF7@lufmech.rwth-aachen.de> Date: Wed, 22 Nov 2000 11:44:21 +0100 From: Markus Werle X-Mailer: Mozilla 4.5 [en] (X11; I; HP-UX B.10.20 9000/785) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: g++: what is use of `scope_ref' in template type unification? Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Hi! I got this message from g++ today: sorry, not implemented: use of `scope_ref' in template type unification. Dear compiler experts, could You please give me a tiny little example which has a scope_ref in template type unification? I would like to get an idea whether I really use it or if I made other errors leading to this message. best regards, Markus From gcc-help-return-4134-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 22 11:29:59 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 2036 invoked by alias); 22 Nov 2000 11:29:55 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 2002 invoked from network); 22 Nov 2000 11:29:49 -0000 Received: from unknown (HELO newton.pmf.unsa.ba) (root@195.130.44.3) by sourceware.cygnus.com with SMTP; 22 Nov 2000 11:29:49 -0000 Received: (from uucp@localhost) by newton.pmf.unsa.ba (8.9.3/8.9.3/SuSE Linux 8.9.3-0.1) id MAA21995; Wed, 22 Nov 2000 12:32:24 +0100 Message-Id: <200011221132.MAA21995@newton.pmf.unsa.ba> Received: from unknown(195.130.44.83) by newton.pmf.unsa.ba via smap (V2.1+anti-relay+anti-spam) id xma021993; Wed, 22 Nov 00 12:32:05 +0100 From: "Pat Allen" To: gcc-help@gcc.gnu.org, David Korn Date: Wed, 22 Nov 2000 12:28:33 -0800 MIME-Version: 1.0 Content-type: text/plain; charset=US-ASCII Content-transfer-encoding: 7BIT Subject: RE: gcc can't find libstdc++ Reply-to: pat@pmf.unsa.ba Priority: normal In-reply-to: <718D38CAB6E0D011B2C90060970C28A556FD29@exchangeserver.pixelpower.com> X-mailer: Pegasus Mail for Win32 (v3.11) On 22 Nov 00, at 9:39, David Korn wrote: > Did you try the environment variable LD_LIBRARY_PATH ? I have now, and it works! Many thanks! Pat Allen From gcc-help-return-4135-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 22 11:50:44 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 9728 invoked by alias); 22 Nov 2000 11:50:43 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 9697 invoked from network); 22 Nov 2000 11:50:42 -0000 Received: from karman.lufmech.rwth-aachen.de (HELO lufmech.rwth-aachen.de) (@134.130.177.1) by sourceware.cygnus.com with SMTP; 22 Nov 2000 11:50:42 -0000 Received: from lufmech.rwth-aachen.de (markus@mises.lufmech.RWTH-Aachen.DE [134.130.177.107]) by lufmech.rwth-aachen.de with ESMTP (8.7.1/8.7.1) id MAA27651; Wed, 22 Nov 2000 12:50:36 +0100 (MEZ) Message-ID: <3A1BB30C.EDC20C7C@lufmech.rwth-aachen.de> Date: Wed, 22 Nov 2000 12:50:36 +0100 From: Markus Werle X-Mailer: Mozilla 4.5 [en] (X11; I; HP-UX B.10.20 9000/785) X-Accept-Language: en MIME-Version: 1.0 To: Will Partain , gcc-help@gcc.gnu.org Subject: Re: right snapshot to use for HP-UX 11? Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Will Partain wrote: > Can anyone out there supply values for M and N in the > following sentence: "I have been using GCC snapshot M with > binutils snapshot N on HP-UX 11 with some success, including > for C++; YMMV and no warranty expressed or implied... :-)" ? I have been using a GCC snapshot fetched on 2000 Nov 17 (seems to be 20001113, see my specs) with binutils snapshot from the same day or some days later on HP-UX 11 with success for C++. g++ -v yields: Reading specs from /work/markus/opt/egcs-001117/lib/gcc-lib/hppa2.0w-hp-hpux11.00/2.97/specs Configured with: ../egcs/configure --prefix=/work/markus/opt/egcs-001117 --enable-languages=c++ --with-gnu-as --without-gnu-ld --disable-libstdcxx-v3 gcc version 2.97 20001113 (experimental) This means: It is a 32 bit version and relies on the hp-linker /bin/ld which takes 200 years to link a 50MB binary (sad enough: My project is compiled faster on a 80686 PC with 128M memory than on a hp-J7000 with 4 processors (gmake -j8) and 4GB(!) memory) It was - as we say in german (do not know if this idiom is allowed in eglish) - a hard birth. A lot of tears to dry. November 17, 2000 was the first day since my tries in January 2000 where everything was fine with gcc on hpux-11.0, even the linker accepted all stuff (though I heard people say there were versions which did the job before) If You subscribe to binutils-cvs@sourceware.cygnus.com You will see that they are working on the elf-64bit version for hpux which has its own linker (things are getting better from day to day). Some tricks: * My bootstrap is 4-fold: I used a bootstrapped egcs to build egcs again. * binutils are configured with the same prefix as egcs, and installed there before bootstrapping egcs (do not forget to add /your/path/to/egcs/and/binutils/bin to $PATH *before* configuring) *Before the second bootstrap I rebuild binutils with the new egcs and a new prefix /my/opt/egcs-today-2 (adding that one to $PATH again) *I used gmake-3.79 (I built it myself with cc, if I remember well) *gmake or Makefiles are broken in such a way that gmake -j fails. This means the impatient (like me) will not obtain any result with gmake option -j The following procedure worked for me (cvs logins omitted see gcc.gnu.org and sources.redhat.com for details) alias md=mkdir md BINUTILS cd BINUTILS cvs -z 9 -d :pserver:anoncvs@anoncvs.cygnus.com:/cvs/src checkout binutils md build cd build ../src/configure --prefix=/my/path/to/egcs-1 --with-gnu-as gmake gmake install cd ../.. md GCC cd GCC cvs -d :pserver:anoncvs@anoncvs.cygnus.com:/cvs/gcc -z 9 checkout egcs cd egcs ./contrib/gcc_update cd .. md build cd build setenv PATH my/path/to/egcs-1/bin:$PATH ../egcs/configure --prefix=/my/path/to/egcs-1 \ --enable-languages=c++ --with-gnu-as --without-gnu-ld \ --disable-libstdcxx-v3 (note: I had bootstrap failures without --disable-libstdcxx-v3, see my other messages in gcc mailing lists) gmake bootstrap gmake all gmake install (make sure the new g++ is called, so maybe:) rehash which gcc (now binutils are built using brand new g++ since PATH is already set to the right value) cd ../../BINUTILS md build2 cd build2 ../src/configure --prefix=/my/path/to/egcs-2 --with-gnu-as gmake gmake install cd ../../GCC md build2 cd build2 setenv PATH my/path/to/egcs-2/bin:$PATH ../egcs/configure --prefix=/my/path/to/egcs-2\ --enable-languages=c++ --with-gnu-as --without-gnu-ld \ --disable-libstdcxx-v3 gmake bootstrap gmake all gmake install cd /my/test/directory /my/path/to/egcs-2/bin/g++ HelloWorld.C You see, it is sooooooooooooo easy to build a new g++ :-) Maybe You take a look at directory contrib in the egcs tree. I think I saw a script which may help against wounded fingers but I did not have the time to examine it. Do not forget to put extern "C" { #include "Some_C_or_FORTRAN_Project.h" } around all headers from libraries with C-linkage (e.g. compiled with cc) otherwise the linker will not find the symbols (--> new ABI in g++) Good luck, Markus From gcc-help-return-4136-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 22 12:33:50 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 27255 invoked by alias); 22 Nov 2000 12:33:49 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 27199 invoked from network); 22 Nov 2000 12:33:47 -0000 Received: from karman.lufmech.rwth-aachen.de (HELO lufmech.rwth-aachen.de) (@134.130.177.1) by sourceware.cygnus.com with SMTP; 22 Nov 2000 12:33:47 -0000 Received: from lufmech.rwth-aachen.de (markus@mises.lufmech.RWTH-Aachen.DE [134.130.177.107]) by lufmech.rwth-aachen.de with ESMTP (8.7.1/8.7.1) id NAA29471; Wed, 22 Nov 2000 13:33:34 +0100 (MEZ) Message-ID: <3A1BBD1E.52D9F94C@lufmech.rwth-aachen.de> Date: Wed, 22 Nov 2000 13:33:34 +0100 From: Markus Werle X-Mailer: Mozilla 4.5 [en] (X11; I; HP-UX B.10.20 9000/785) X-Accept-Language: en MIME-Version: 1.0 To: Alexandre Oliva , gcc-help@gcc.gnu.org Subject: Re: GNU Assembler? Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit In http://gcc.gnu.org/ml/gcc-help/2000-11/msg00069.html Alexandre Oliva wrote: > This mailing list is about GCC, and the GNU assembler is part of GNU > binutils, a separate project. IMHO this distinction is artificial. IMHO this distinction is contraproductive. IMHO this distinction is only appropriate from a developer's point of view. >From a users point of view (well, at least from Markus Werle's point of view) gcc/binutils belong together in such a strong way, that most people would like to have them in the same package. (Yes, sometimes I dream about a single download-configure-make-makeinstall-procedure for all of it ... including the latest gmake, flex, and other bullshit, but *not* bash etc. as provided by the cygnus tree) I think by now that most of my problems I had with egcs snapshots had their root in the *interaction* of gcc and binutils. Whom to ask about this? binutils developers? gcc developers? hpux developers? Everyone points to the others (no, not everyone: hp sends no reply at all). Gave me a lot of disappointment. How can a non-expert decide where the error comes from? I believe a lot more people would use gcc if the user help desk (gcc-help@gcc.gnu.org) would include messages from mailing lists of binutils. We can't neglect the interaction of several packages. Divide and conquer is inappropriate here. Maybe http://gcc.gnu.org/lists.html should at least contain a link to binutils mailing lists archives (http://sources.redhat.com/ml/binutils/ and http://sources.redhat.com/ml/bug-gnu-utils/) Markus P.S.: It is the never ending story of the pros and cons of the cygnus tree, right? From gcc-help-return-4137-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 22 13:20:43 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 9926 invoked by alias); 22 Nov 2000 13:20:39 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 9868 invoked from network); 22 Nov 2000 13:20:34 -0000 Received: from unknown (HELO isgsrv3.hh.ffei.co.uk) (194.130.42.2) by sourceware.cygnus.com with SMTP; 22 Nov 2000 13:20:34 -0000 Received: from hhmail1.hh.ffei.co.uk (hhmail1.hh.ffei.co.uk [143.136.16.241]) by isgsrv3.hh.ffei.co.uk (8.9.1/8.9.1) with ESMTP id NAA28550 for ; Wed, 22 Nov 2000 13:19:03 GMT Received: by hhmail1.hh.ffei.co.uk with Internet Mail Service (5.5.2650.21) id ; Wed, 22 Nov 2000 13:19:02 -0000 Message-ID: <334D05460466D311A5E8009027AC7886016EA79A@hhmail1.hh.ffei.co.uk> From: Richard Clark To: "Gcc mailing list (E-mail)" Subject: GCC ANSI conformance Date: Wed, 22 Nov 2000 13:18:59 -0000 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2650.21) Content-Type: text/plain; charset="iso-8859-1" Dear all, can anyone tell me what is/where to find the number of significant characters for external and internal names for the GCC compiler? thanks in advance for your help. Richard From gcc-help-return-4138-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 22 17:33:07 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 1397 invoked by alias); 22 Nov 2000 17:33:06 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 1319 invoked from network); 22 Nov 2000 17:32:59 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 22 Nov 2000 17:32:59 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id JAA06932; Wed, 22 Nov 2000 09:32:29 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAMHWPI11073; Wed, 22 Nov 2000 15:32:25 -0200 To: Markus Werle Cc: gcc-help@gcc.gnu.org Subject: Re: GNU Assembler? References: <3A1BBD1E.52D9F94C@lufmech.rwth-aachen.de> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 22 Nov 2000 15:32:25 -0200 In-Reply-To: Markus Werle's message of "Wed, 22 Nov 2000 13:33:34 +0100" Message-ID: Lines: 56 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 22, 2000, Markus Werle wrote: > From a users point of view (well, at least from Markus Werle's > point of view) gcc/binutils belong together in such a strong way, > that most people would like to have them in the same package. Well, then you should try to get all maintainers of binutils to subscribe to this mailing list. If you post messages to the wrong forum, you're likely to miss the audience that would be most capable of answering your question. > Whom to ask about this? binutils developers? gcc developers? Both? > hpux developers? Everyone points to the others > (no, not everyone: hp sends no reply at all). :-) > I believe a lot more people would use gcc if the user help desk This mailing list is read and answered by volunteers, just like the rest of the GNU project. For one, answering messages posted here is not part of my job at Red Hat. I'm no binutils expert, but I try to answer questions about it as well as I can. But, while I do it, I also point out that people might get better help by addressing folks that know better than myself. > (gcc-help@gcc.gnu.org) would include messages from mailing lists > of binutils. We can't neglect the interaction of several packages. > Divide and conquer is inappropriate here. And then, we should get also the maintainers of glibc to subscribe. And, soon, the maintainers of any project that happens to be installed by default in any distribution of GNU/Linux, because the compiler just finds the headers and the libraries of that project, so the compiler folks must surely know about it, right? Sorry, this just can't work. The GNU project already has a generic newsgroup/mailing list in which volunteers direct message to the maintainers of each tool. gcc-help is not such a mailing list, and, if it became one, I'd probably unsubscribe. > P.S.: It is the never ending story of the pros and cons of the cygnus > tree, right? Well, the unified tree makes it easier for people to build stuff together, but it doesn't automatically make an expert in *one* of the projects an expert in all of them. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4139-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 22 17:36:44 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 3325 invoked by alias); 22 Nov 2000 17:36:43 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 3287 invoked from network); 22 Nov 2000 17:36:42 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 22 Nov 2000 17:36:42 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id JAA07400; Wed, 22 Nov 2000 09:36:35 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAMHaUk11105; Wed, 22 Nov 2000 15:36:30 -0200 To: Richard Clark Cc: "Gcc mailing list (E-mail)" Subject: Re: GCC ANSI conformance References: <334D05460466D311A5E8009027AC7886016EA79A@hhmail1.hh.ffei.co.uk> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 22 Nov 2000 15:36:30 -0200 In-Reply-To: Richard Clark's message of "Wed, 22 Nov 2000 13:18:59 -0000" Message-ID: Lines: 22 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 22, 2000, Richard Clark wrote: > can anyone tell me what is/where to find the number of significant > characters for external and internal names for the GCC compiler? I doubt GCC has any such limits. The GNU project recommends its projects to avoid hard-coded limits. So I'd like to believe that the size of names is only limited by the amount of virtual memory you have. You may, however, be in trouble if the assembler can't deal with names that are too long. Again, the GNU assembler and the GNU linker don't often impose (almost (*)) any limits on its users, but if you have to use an assembler or a linker that's supplied by the OS you're running, and the OS doesn't use the GNU utilities, then you may be subject to limitations imposed by them, and there's nothing GCC can do about it. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4140-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 22 18:06:42 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 15756 invoked by alias); 22 Nov 2000 18:06:41 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 15726 invoked from network); 22 Nov 2000 18:06:39 -0000 Received: from clsmtp.edf.fr (192.54.193.147) by sourceware.cygnus.com with SMTP; 22 Nov 2000 18:06:39 -0000 Received: from clserv01.edf.fr (clserv01.edf.fr [130.98.18.18]) by clsmtp.edf.fr (8.9.3/8.9.3) with ESMTP id TAA09942 for ; Wed, 22 Nov 2000 19:06:30 +0100 (MET) Received: from cli44qz.der.edf.fr (cli44qz.der.edf.fr [130.98.112.153]) by clserv01.edf.fr (8.9.3/8.9.3) with SMTP id TAA12945 for ; Wed, 22 Nov 2000 19:06:30 +0100 (MET) Received: from edf.fr by cli44qz.der.edf.fr (SMI-8.6/SMI-SVR4) id TAA16678; Wed, 22 Nov 2000 19:06:28 +0100 Message-ID: <3A1C0B8A.7B842953@edf.fr> Date: Wed, 22 Nov 2000 19:08:10 +0100 From: Bruno Zumella X-Mailer: Mozilla 4.72 [en] (X11; I; SunOS 5.7 sun4u) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: Threads problem after building gcc-2.95.2 on HP-UX 10.20 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Hello, After building gcc-2.95.2 on HP-UX 10.20, I get the following message when compiling in c++ or g++ : # /public-test/gcc/bin/g++ hello.cpp /usr/ccs/bin/ld: Unsatisfied symbols: pthread_once (code) pthread_setspecific (code) pthread_getspecific (code) pthread_keycreate (code) collect2: ld returned 1 exit status (Note : On HP-UX you have to use the built-in linker, there is no GNU ld available) But all works fine when I had the -threads option : # /public-test/gcc/bin/g++ hello.cpp -threads In that case, the created a.out executable works fine... What did I do wrong in the configure or following make phases : PATH=/opt/binutils/bin:/opt/gcc/bin:$PATH; export PATH ../gcc-2.95.2/configure --prefix=/public-test/gcc --with-as=/opt/binutils/bin/as --with-gnu-as [--enable-threads] [--enable-shared] (I try to compile with or without the enable-threads and enable-shared options...) make AS=/opt/binutils/bin/as bootstrap make install (My make is GNU make of course !) Any ideas ? Bruno. Thanks in advance... ``Only those who attempt the absurd can achieve the impossible.'' From gcc-help-return-4141-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 22 22:05:32 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 5172 invoked by alias); 22 Nov 2000 22:05:31 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 5127 invoked from network); 22 Nov 2000 22:05:30 -0000 Received: from soup.ece.ogi.edu (root@129.95.90.117) by sourceware.cygnus.com with SMTP; 22 Nov 2000 22:05:30 -0000 Received: from localhost (macon@localhost) by soup.ece.ogi.edu (8.11.0/8.11.0) with ESMTP id eAMNFgQ10453 for ; Wed, 22 Nov 2000 15:15:42 -0800 X-Authentication-Warning: soup.ece.ogi.edu: macon owned process doing -bs Date: Wed, 22 Nov 2000 15:15:42 -0800 (PST) From: Mike Macon To: gcc-help@gcc.gnu.org Subject: help with installation Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII I am trying to install gcc 2.7.2.3 on a i686 running RedHat Linux 7.0. I need this older version of the compiler for some C++ software that will not compile with newer versions of g++. I did ./configure --prefix=/usr/local/gcc-2.7.2.3 which prints the following: This appears to be a i686-unknown-linux system. Using `./config/i386/i386.c' to output insns. Using `./config/i386/i386.md' as machine description file. Using `./config/i386/linux.h' as target machine macro file. Using `./config/i386/xm-linux.h' as host machine macro file. Merged x-linux. Merged t-linux. Merged c++ fragment(s). Created `./Makefile'. Merged x-linux. Merged t-linux. Created `cp/Makefile'. Links are now set up to build a native compiler for i686-unknown-linux. I then did make LANGUAGES=c which prints c -DIN_GCC -g -I. -I. -I./config \ -DGCC_INCLUDE_DIR=\"/usr/local/gcc-2.7.2.3/lib/gcc-lib/i686-unknown-linux/2.7.2.3/include\" \ -DGPLUSPLUS_INCLUDE_DIR=\"/usr/local/gcc-2.7.2.3/include/g++\" \ -DLOCAL_INCLUDE_DIR=\"/usr/local/include\" \ -DCROSS_INCLUDE_DIR=\"/usr/local/gcc-2.7.2.3/lib/gcc-lib/i686-unknown-linux/2.7.2.3/sys-include\" \ -DTOOL_INCLUDE_DIR=\"/usr/local/gcc-2.7.2.3/i686-unknown-linux/include\" \ -c `echo ./cccp.c | sed 's,^\./,,'` cc -DIN_GCC -g -o cccp cccp.o cexp.o \ version.o obstack.o ` case "cc" in "cc") echo "" ;; esac ` rm -f cpp ln cccp cpp > /dev/null 2>&1 \ || cp cccp cpp cc -c -DIN_GCC -g -I. -I. -I./config bc-emit.c In file included from bc-emit.c:949: bc-typecd.def: In function `bc_emit_instruction': bc-typecd.def:17: `SFtype' is promoted to `double' when passed through `...' bc-typecd.def:17: (so you should pass `double' not `SFtype' to `va_arg') make: *** [bc-emit.o] Error 1 Any help? Mike Macon From gcc-help-return-4142-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 23 02:09:06 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 28889 invoked by alias); 23 Nov 2000 02:09:06 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 28859 invoked from network); 23 Nov 2000 02:09:05 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 23 Nov 2000 02:09:05 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id SAA24196; Wed, 22 Nov 2000 18:08:56 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAN28TD15672; Thu, 23 Nov 2000 00:08:29 -0200 To: Mike Macon Cc: gcc-help@gcc.gnu.org Subject: Re: help with installation References: From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 23 Nov 2000 00:08:29 -0200 In-Reply-To: Mike Macon's message of "Wed, 22 Nov 2000 15:15:42 -0800 (PST)" Message-ID: Lines: 16 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 22, 2000, Mike Macon wrote: > bc-typecd.def: In function `bc_emit_instruction': > bc-typecd.def:17: `SFtype' is promoted to `double' when passed through > `...' > bc-typecd.def:17: (so you should pass `double' not `SFtype' to `va_arg') Looks like a bug in this file, that older releases of GCC didn't catch. Replace `float' or `SFtype' with `double' in that line and all should be fine. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4143-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 23 08:54:09 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 16268 invoked by alias); 23 Nov 2000 08:54:08 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 16238 invoked from network); 23 Nov 2000 08:54:07 -0000 Received: from physalis.www.easynet.net (195.40.1.57) by sourceware.cygnus.com with SMTP; 23 Nov 2000 08:54:07 -0000 Received: by physalis.www.easynet.net (Postfix, from userid 1000) id 2BC071DBF1; Thu, 23 Nov 2000 08:54:04 +0000 (GMT) To: gcc-help@gcc.gnu.org From: colin.spier@ukonline.co.uk Subject: Mips Cross Compiler Problem Mime-Version: 1.0 Content-Type: text/plain X-Mailer: EA-Fastmail 0.6 beta X-Sender: colin.spier@ukonline.co.uk Message-Id: <20001123085404.2BC071DBF1@physalis.www.easynet.net> Date: Thu, 23 Nov 2000 08:54:04 +0000 (GMT) Dear All, I'm trying to build a mips-elf cross compiler on a Red Hat 6.2 Host. I'm using binutils-2.10.1 and gcc-2.95.2, and have configured/built them as follows: Binutils -------- ~/gnutools/binutils/binutils-2.10.1/configure --target=mips-elf -- prefix=/xusr/apps/tools --exec-prefix=/xusr/apps/tools/M-i686-pc-linux- gnu --program-prefix=mips-elf- -v 2>&1 | tee configure.out make -w all 2>&1 | tee make.out make -w install 2>&1 | tee install.out Gcc --- ~/gnutools/gcc/gcc-2.95.2/configure --target=mips-elf -- prefix=/xusr/apps/tools --exec-prefix=/xusr/apps/tools/M-i686-pc-linux- gnu --program-prefix=mips-elf- --with-gnu-as --with-gnu-ld --with- newlib --nfp -v 2>&1 | tee configure.out make -w all-gcc LANGUAGES="c c++" 2>&1 | tee make.out make -w install-gcc LANGUAGES="c c++" 2>&1 | tee install.out Everything seems to configure, build and install OK.... Now for the problem! I've got a simple "Hello World" program, which I build with: mips-elf-gcc -mcpu=r4000 -mips2 -msoft-float -g -c -O0 -Wall -I. - I../../../../../thirdparty/rtos/ecos/my_build/install/include - ffunction-sections -fdata-sections -D__ECOS hello.c -o hello.o mips-elf-gcc -mcpu=r4000 -mips2 -msoft-float -g -nostartfiles - L../../../../../thirdparty/rtos/ecos/my_build/install/lib -Wl,--gc- sections -o hello hello.o -nostdlib -Ttarget.ld This fails at the link stage with the following errors: /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: _ctors.o: ISA mismatch (-mips1) with previous modules (-mips3) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: _ctors.o: uses different e_flags (0x0) fields than previous modules (0x100) Bad value: failed to merge target specific data of file /xusr/apps/tools/M-i686-pc-linux-gnu/lib/gcc-lib/mips- elf/2.95.2/soft-float/libgcc.a(_ctors.o) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: _udivdi3.o: ISA mismatch (-mips1) with previous modules (-mips3) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: _udivdi3.o: uses different e_flags (0x0) fields than previous modules (0x100) Bad value: failed to merge target specific data of file /xusr/apps/tools/M-i686-pc-linux-gnu/lib/gcc-lib/mips- elf/2.95.2/soft-float/libgcc.a(_udivdi3.o) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: _umoddi3.o: ISA mismatch (-mips1) with previous modules (-mips3) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: _umoddi3.o: uses different e_flags (0x0) fields than previous modules (0x100) Bad value: failed to merge target specific data of file /xusr/apps/tools/M-i686-pc-linux-gnu/lib/gcc-lib/mips- elf/2.95.2/soft-float/libgcc.a(_umoddi3.o) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: dp-bit.o: ISA mismatch (-mips1) with previous modules (-mips3) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: dp-bit.o: uses different e_flags (0x0) fields than previous modules (0x100) Bad value: failed to merge target specific data of file /xusr/apps/tools/M-i686-pc-linux-gnu/lib/gcc-lib/mips- elf/2.95.2/soft-float/libgcc.a(dp-bit.o) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: fp-bit.o: ISA mismatch (-mips1) with previous modules (-mips3) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: fp-bit.o: uses different e_flags (0x0) fields than previous modules (0x100) Bad value: failed to merge target specific data of file /xusr/apps/tools/M-i686-pc-linux-gnu/lib/gcc-lib/mips- elf/2.95.2/soft-float/libgcc.a(fp-bit.o) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: opdel.o: ISA mismatch (-mips1) with previous modules (-mips3) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: opdel.o: uses different e_flags (0x0) fields than previous modules (0x100) Bad value: failed to merge target specific data of file /xusr/apps/tools/M-i686-pc-linux-gnu/lib/gcc-lib/mips- elf/2.95.2/soft-float/libgcc.a(opdel.o) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: opvdel.o: ISA mismatch (-mips1) with previous modules (-mips3) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: opvdel.o: uses different e_flags (0x0) fields than previous modules (0x100) Bad value: failed to merge target specific data of file /xusr/apps/tools/M-i686-pc-linux-gnu/lib/gcc-lib/mips- elf/2.95.2/soft-float/libgcc.a(opvdel.o) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: _eh.o: ISA mismatch (-mips1) with previous modules (-mips3) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: _eh.o: uses different e_flags (0x0) fields than previous modules (0x100) Bad value: failed to merge target specific data of file /xusr/apps/tools/M-i686-pc-linux-gnu/lib/gcc-lib/mips- elf/2.95.2/soft-float/libgcc.a(_eh.o) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: exception.o: ISA mismatch (-mips1) with previous modules (-mips3) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: exception.o: uses different e_flags (0x0) fields than previous modules (0x100) Bad value: failed to merge target specific data of file /xusr/apps/tools/M-i686-pc-linux-gnu/lib/gcc-lib/mips- elf/2.95.2/soft-float/libgcc.a(exception.o) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: frame.o: ISA mismatch (-mips1) with previous modules (-mips3) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: frame.o: uses different e_flags (0x0) fields than previous modules (0x100) Bad value: failed to merge target specific data of file /xusr/apps/tools/M-i686-pc-linux-gnu/lib/gcc-lib/mips- elf/2.95.2/soft-float/libgcc.a(frame.o) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: tinfo.o: ISA mismatch (-mips1) with previous modules (-mips3) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: tinfo.o: uses different e_flags (0x0) fields than previous modules (0x100) Bad value: failed to merge target specific data of file /xusr/apps/tools/M-i686-pc-linux-gnu/lib/gcc-lib/mips- elf/2.95.2/soft-float/libgcc.a(tinfo.o) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: tinfo2.o: ISA mismatch (-mips1) with previous modules (-mips3) /xusr/apps/tools/M-i686-pc-linux-gnu/mips-elf/bin/ld: tinfo2.o: uses different e_flags (0x0) fields than previous modules (0x100) Bad value: failed to merge target specific data of file /xusr/apps/tools/M-i686-pc-linux-gnu/lib/gcc-lib/mips- elf/2.95.2/soft-float/libgcc.a(tinfo2.o) collect2: ld returned 1 exit status make: *** [hello] Error 1 Am I missing something? Have I done something stupid? Does anyone have any ideas for how I can get around this problem? Thanks in advance! Colin. -- Colin Spier PipingHot Networks Ltd. Office: +44 (0)1364 655500 DDI: +44 (0)1364 655521 Fax: +44 (0)1364 654625 mailto:colin.spier@pipinghotnetworks.com http://www.pipinghotnetworks.com From gcc-help-return-4144-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 23 15:08:59 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 17942 invoked by alias); 23 Nov 2000 15:08:58 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 17909 invoked from network); 23 Nov 2000 15:08:56 -0000 Received: from unknown (HELO proxy.lind-waldock.com) (firewall-user@63.66.240.80) by sourceware.cygnus.com with SMTP; 23 Nov 2000 15:08:56 -0000 Received: by proxy.lind-waldock.com; id JAA18256; Thu, 23 Nov 2000 09:08:51 -0600 (CST) Received: from unknown(172.20.100.75) by proxy.lind-waldock.com via smap (V5.0) id xmaa18237; Thu, 23 Nov 00 09:07:58 -0600 Received: From SMTP.LIND-WALDOCK.COM (172.20.100.75[172.20.100.75 port:1074]) by smtp.lind-waldock.com Mail essentials (server 2.422) with SMTP id: <74846@smtp.lind-waldock.com> for ; Thu, 23 Nov 2000 9:08:32 AM -0600 smtpmailfrom Received: by mail.lind-waldock.com with Internet Mail Service (5.5.2650.21) id ; Thu, 23 Nov 2000 09:08:32 -0600 Message-ID: <123871EC37DCD3118DF900508B9B10012E07A6@chicago.lind-waldock.com> From: Tom Schultz To: "'gcc-help@gcc.gnu.org'" Subject: AIX 4.3.3 gcc install Date: Thu, 23 Nov 2000 09:04:53 -0600 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2650.21) Content-Type: multipart/alternative; boundary="----_=_NextPart_001_01C0555F.3E18C07C" This message is in MIME format. Since your mail reader does not understand this format, some or all of this message may not be legible. ------_=_NextPart_001_01C0555F.3E18C07C Content-Type: text/plain; charset="ISO-8859-1" Please help! I'm trying to install gcc on a RS6000/AIX4.3.3 box. After running configure the ./gcc/Makefile contains the following trouble-some lines, starting at line 600. (the asterisks are mine) **************************************************************************** ***** # Both 32-bit and 64-bit objects in archives AR_FOR_TARGET=ar -X32_64 ####cross overrides Server /usr/local/bin/nmbd has ended with exit status 0x100. ####build overrides Server /usr/local/bin/nmbd has ended with exit status 0x100. #L **************************************************************************** ****** I assume this indicates that nmbd failed. I commented out the two lines that begin with "Server ..." and did the "make bootstrap" The Makefile in ./gcc/cp are suffers from the same problem. Here is how I ran configure: ******************* /software/gnu/gcc-2.95/configure --prefix=/software/gcc/bin --enable-shared --enable-threads --without-gnu-as --without-gnu-ld -- enable-languages=chill,c++ ******************* After "fixing" the makefile and running it I get: ******************* rm -f collect2 cc -DIN_GCC -DHAIFA -g -DHAVE_CONFIG_H -o collect2 collect2.o tlink.o hash.o intl.o underscore.o version.o obstack.o alloca.o -lld ../libiberty/libibert y.a ld: 0711-317 ERROR: Undefined symbol: .alloca ****************** I'm using gnu/make-3.77 and IBM CSet Version 3.6.4 as the native compiler. I have CC defined to be cc (but it is only a symlink to xlc). I have read the IBM specific instructions where problems with alloca.o are discussed, but I'm not sure what to do about this. Any help you can offer will be much appreciated. I could download the prebuilt compiler for AIX, but I don't really want to install it into /usr/local/bin because I want to be able to easily remove it after I'm finished with my project and I'm not the system administrator. -- Tom Schultz Extreme Software Inc Saint Charles, IL 60175 +--------------------------------------------------------------------+ WARNING: All E-Mail sent to or from this user address will be accepted by the Lind-Waldock corporate E-Mail system and is subject to archival and review by someone other than the recipient. +--------------------------------------------------------------------+ ------_=_NextPart_001_01C0555F.3E18C07C Content-Type: text/html; charset="ISO-8859-1" Content-Transfer-Encoding: quoted-printable AIX 4.3.3 gcc install

Please help!

I'm trying to install gcc on a RS6000/= AIX4.3.3 box.

After running configure the  ../g= cc/Makefile contains the following trouble-some lines, starting at line= 600.
(the asterisks are mine)
*************************************= ********************************************
# Both 32-bit and 64-bit objects in a= rchives
AR_FOR_TARGET=3Dar -X32_64

####cross overrides


Server /usr/local/bin/nmbd has ended w= ith exit status 0x100.

####build overrides

Server /usr/local/bin/nmbd has ended w= ith exit status 0x100.
#L
*************************************= *********************************************

I assume this indicates that nmbd fail= ed.  I commented out the two lines that begin with "Server ..= ." and did the "make bootstrap" The Makefile in ./gcc/cp= are suffers from the same problem.

Here is how I ran configure:
*******************
/software/gnu/gcc-2.95/configure --pr= efix=3D/software/gcc/bin --enable-shared --enable-threads --without-gnu= -as --without-gnu-ld -- enable-languages=3Dchill,c++

*******************

After "fixing" the makefile = and running it I get:
*******************
rm -f collect2
cc  -DIN_GCC -DHAIFA  =   -g  -DHAVE_CONFIG_H  -o collect2 collect2.o tlink.o ha= sh.o intl.o underscore.o version.o  obstack.o alloca.o  =     -lld .../libiberty/libibert

y.a
ld: 0711-317 ERROR: Undefined symbol:= ..alloca
******************
I'm using gnu/make-3.77 and IBM CSet = Version 3.6.4 as the native compiler.  I have CC defined to be cc = (but it is only a symlink to xlc).  I have read the IBM specific i= nstructions where problems with alloca.o are discussed, but I'm not sur= e what to do about this.

Any help you can offer will be much ap= preciated.  I could download the prebuilt compiler for AIX, but I = don't really want to install it into /usr/local/bin because I want to b= e able to easily remove it after I'm finished with my project and I'm n= ot the system administrator.

-- Tom Schultz

Extreme Software Inc
Saint Charles, IL 60175


+--------------------------------------------------------------------+ WARNING: All E-Mail sent to or from this user address will be accepted = by the Lind-Waldock corporate E-Mail system and is subject to archival and review by someone other than the recipient. +--------------------------------------------------------------------+ ------_=_NextPart_001_01C0555F.3E18C07C-- From gcc-help-return-4145-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 23 18:43:52 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 31602 invoked by alias); 23 Nov 2000 18:43:52 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 31572 invoked from network); 23 Nov 2000 18:43:49 -0000 Received: from grasse.obs-azur.fr (192.134.15.2) by sourceware.cygnus.com with SMTP; 23 Nov 2000 18:43:49 -0000 Received: from obs-azur.fr (pc-sirc6.obs-azur.fr [192.134.15.141]) by grasse.obs-azur.fr (8.10.1/jtpda-5.3.3 dch-1.4) with ESMTP id eANIhkF31272 for ; Thu, 23 Nov 2000 19:43:46 +0100 (MET) Message-ID: <3A1D6562.CC576EF1@obs-azur.fr> Date: Thu, 23 Nov 2000 19:43:46 +0100 From: David Chapeau Organization: Observatoire de la =?iso-8859-1?Q?C=F4te?= d'Azur X-Mailer: Mozilla 4.76 [en] (Win98; U) X-Accept-Language: fr,en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: gcc 2.95.2: ld build problem on Tru64 4.0f Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Hi ! Trying to build gcc 2.95.2 on Tru64 Unix 4.0f (native cc & ld), but process stop with following: > # ./configure > # make bootstrap-lean > make CC="cc" libdir=/usr/local/lib LANGUAGES="c " > (cd intl && make all) > cc -DIN_GCC -DHAIFA -g -DHAVE_CONFIG_H -o cc1 toplev.o > version.o tree.o print-tree.o stor-layout.o fold-const.o function.o > stmt.o except.o expr.o calls.o expmed.o explow.o optabs.o intl.o > varasm.o rtl.o print-rtl.o rtlanal.o emit-rtl.o genrtl.o real.o > dbxout.o sdbout.o dwarfout.o dwarf2out.o xcoffout.o bitmap.o alias.o > gcse.o integrate.o jump.o cse.o loop.o unroll.o flow.o stupid.o > combine.o varray.o regclass.o regmove.o local-alloc.o global.o > reload.o reload1.o caller-save.o insn-peep.o reorg.o haifa-sched.o > final.o recog.o reg-stack.o insn-opinit.o insn-recog.o insn-extract.o > insn-output.o insn-emit.o lcm.o profile.o insn-attrtab.o alpha.o > getpwd.o convert.o mbchar.o dyn-string.o splay-tree.o graph.o > sbitmap.o resource.o hash.o c-parse.o c-lang.o c-lex.o c-pragma.o > c-decl.o c-typeck.o c-convert.o c-aux-info.o c-common.o c-iterate.o > obstack.o -lmld ../libiberty/libiberty.a > ld: > Object file format error in: toplev.o: local_is_complete: > iaux(3319) > iauxMax(176) for obj toplev.o > *** Exit 1 > Stop. Any help ? Regards, -David- From gcc-help-return-4146-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 24 16:19:50 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 9163 invoked by alias); 24 Nov 2000 16:19:49 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 9131 invoked from network); 24 Nov 2000 16:19:47 -0000 Received: from ns.hen.nl (HELO MailServer.hen.nl) (145.76.6.10) by sourceware.cygnus.com with SMTP; 24 Nov 2000 16:19:47 -0000 Received: by MailServer.hen.nl from sweers.fac.hen.nl via SMTP id QAA02444 (8.8.7/hen.nl-1.9); Fri Nov 24 16:19:40 2000 Received: from control-Message_Server by sweers.fac.hen.nl with Novell_GroupWise; Fri, 24 Nov 2000 17:19:49 +0100 Message-Id: X-Mailer: Novell GroupWise 5.2 Date: Fri, 24 Nov 2000 17:19:20 +0100 From: "Wieger Reitsema" To: Gcc-help@gcc.gnu.org Subject: GNU compiler Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: quoted-printable Content-Disposition: inline Dear Sir/Madam, Inspecting the GNU C++ Compiler features, we are interested in how you = worked with the 68K processor. We would like to use for our students an ec336V2 board. Sincerely, Wieger Reitsema. Ir. W.J.Reitsema Saxion Hogeschool Enschede Instituut ICT Postbus 70000 7500 KB Enschede Netherlands tel: 053 4871311 e-mail: w.j.reitsema@ict.hen.nl From gcc-help-return-4147-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 24 17:22:05 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 21600 invoked by alias); 24 Nov 2000 17:22:04 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 21404 invoked from network); 24 Nov 2000 17:21:59 -0000 Received: from kinaare.com (HELO bonsai.kinaare.net) (209.220.174.234) by sourceware.cygnus.com with SMTP; 24 Nov 2000 17:21:59 -0000 Message-ID: <3A1E96AD.32DE360E@kinaare.net> Date: Fri, 24 Nov 2000 11:26:21 -0500 From: Kevin Su MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: shared libraray Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Hi, I recently tried to create a shared library. I found that if I compile the source with g++, instead of gcc, symbol of functions in the shared library can not be found with dlsym(), it returns NULL with an error from dlerror(). With gcc, everything is working fine. To test it, I wrote two sample file, xxx.c and test.c, shown below. Compiling these two files using gcc like the following will work: $ gcc -fpic -c xxx.c $ ld -shared xxx.o -o xxx.so $ gcc test.c -ldl $ a.out xxxxxxxx Compiling these two files using g++ like the following will NOT work: $ g++ -fpic -c xxx.c $ ld -shared xxx.o -o xxx.so $ g++ test.c -ldl $ a.out dlsym:/tmp/xxx.so: undefined symbol: xxx Any help or hint on this problem is much appreciated. Thanks, Kevin file "xxx.c" ( the file to be built into a shared library): ==================================================== #include void xxx(void) { fprintf(stderr, "xxxxxxxx\n"); } file "test.c" (the file that loads the shared library) : ===================================================== #include #include typedef void (*func)(void); int main() { void* ptr; func f; void* handle; if((handle = dlopen("/tmp/xxx.so", RTLD_LAZY)) == 0){ fprintf(stderr, "dlopen:%s\n", dlerror()); return 0; if((ptr = dlsym(handle, "xxx")) == 0){ fprintf(stderr,"dlsym%s\n", dlerror()); return 0; } f = (func)ptr; f(); } From gcc-help-return-4148-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 24 17:30:44 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 23661 invoked by alias); 24 Nov 2000 17:30:44 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 23628 invoked from network); 24 Nov 2000 17:30:44 -0000 Received: from kinaare.com (HELO bonsai.kinaare.net) (209.220.174.234) by sourceware.cygnus.com with SMTP; 24 Nov 2000 17:30:44 -0000 Message-ID: <3A1E98BB.4CDC0527@kinaare.net> Date: Fri, 24 Nov 2000 11:35:07 -0500 From: Kevin Su MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: shared library Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Sorry, I forgot to mention in my previous email the platform on which the problem happened: Linux on Intel gcc version (gcc -v): Reading specs from /usr/lib/gcc-lib/i386-redhat-linux/egcs-2.91.66/specs gcc version egcs-2.91.66 19990314/Linux (egcs-1.1.2 release) Kevin From gcc-help-return-4149-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 24 20:55:39 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 5420 invoked by alias); 24 Nov 2000 20:55:38 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 5389 invoked from network); 24 Nov 2000 20:55:38 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 24 Nov 2000 20:55:38 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id MAA27731; Fri, 24 Nov 2000 12:55:33 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAOKtUE25755; Fri, 24 Nov 2000 18:55:30 -0200 To: David Chapeau Cc: gcc-help@gcc.gnu.org Subject: Re: gcc 2.95.2: ld build problem on Tru64 4.0f References: <3A1D6562.CC576EF1@obs-azur.fr> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 24 Nov 2000 18:55:30 -0200 In-Reply-To: David Chapeau's message of "Thu, 23 Nov 2000 19:43:46 +0100" Message-ID: Lines: 15 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 23, 2000, David Chapeau wrote: >> ld: >> Object file format error in: toplev.o: local_is_complete: >> iaux(3319) > iauxMax(176) for obj toplev.o > Any help ? Try `make clean' before re-trying `make bootstrap'. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4150-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Fri Nov 24 20:57:00 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 6283 invoked by alias); 24 Nov 2000 20:57:00 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 6253 invoked from network); 24 Nov 2000 20:57:00 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 24 Nov 2000 20:57:00 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id MAA27804; Fri, 24 Nov 2000 12:56:52 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAOKuiV25785; Fri, 24 Nov 2000 18:56:44 -0200 To: Kevin Su Cc: gcc-help@gcc.gnu.org Subject: Re: shared libraray References: <3A1E96AD.32DE360E@kinaare.net> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 24 Nov 2000 18:56:44 -0200 In-Reply-To: Kevin Su's message of "Fri, 24 Nov 2000 11:26:21 -0500" Message-ID: Lines: 15 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 24, 2000, Kevin Su wrote: > I recently tried to create a shared library. I found that if I > compile the source with g++, instead of gcc, symbol of functions in the > shared library can not be found with dlsym(), it returns NULL with an > error from dlerror(). With gcc, everything is working fine. Declare functions you want to dlsym() as extern "C", so that their names don't get mangled. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4151-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Sun Nov 26 11:53:15 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 22746 invoked by alias); 26 Nov 2000 11:53:14 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 22728 invoked from network); 26 Nov 2000 11:53:14 -0000 Received: from mail.jonker.nl (root@195.86.248.191) by sourceware.cygnus.com with SMTP; 26 Nov 2000 11:53:14 -0000 Received: from william (RPC13.Jonker.nl [213.46.80.53]) by mail.jonker.nl (8.9.3/TeG) with SMTP id MAA27308 for ; Sun, 26 Nov 2000 12:53:07 +0100 X-Authentication-Warning: MPC214.Jonker.nl: Host RPC13.Jonker.nl [213.46.80.53] claimed to be william Message-ID: <003e01c0579f$6b60daa0$0408a8c0@starba.net> From: "Gerjan Teselink" To: Subject: Making a m68k-coff crosscompiler Date: Sun, 26 Nov 2000 12:52:56 +0100 MIME-Version: 1.0 Content-Type: multipart/alternative; boundary="----=_NextPart_000_003B_01C057A7.CC436E20" X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.50.4133.2400 X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4133.2400 This is a multi-part message in MIME format. ------=_NextPart_000_003B_01C057A7.CC436E20 Content-Type: text/plain; charset="Windows-1252" Content-Transfer-Encoding: quoted-printable Hello, I have tried to compile m68k-coff on Debian 2.1 and 2.2. But it won't = compile. Binutils 2.10.1 and GCC 2..95.2 have both the prefix = /Local/Pro. In the 'configure' it detects the includefiles in /usr/include. When I = start to compile I get this errors:=20 ../../gcc-2.95/gcc/libgcc2.c:41: stdlib.h: No such file or directory ../../gcc-2.95/gcc/libgcc2.c:42: unistd.h: No such file or directory make[2]: *** [libgcc2.a] Error 1 make[2]: Leaving directory `/home/teg/gcc-build/gcc' make[1]: *** [stmp-multilib-sub] Error 2 make[1]: Leaving directory `/home/teg/gcc-build/gcc' make: *** [stmp-multilib] Error 1 I fixed it by copying the complete /usr/include directory to the = gcc-build directory. But that is not a solution because it later on the = same error is in another directory libio But if i copy it every time I it will compile till the next 2 errors = come and i don't know what i can do about it: checking whether the C compiler (/home/gerjan/build-gcc/gcc/xgcc = -B/home/gerjan/build-gcc/gcc/ -B/Local/Pro/m68k-coff/bin/ -g -O2 ) = works... no configure: error: installation or configuration problem: C compiler = cannot create executables. make[1]: Entering directory `/home/gerjan/build-gcc/m68k-coff/libio' test x"no" !=3D xyes ||\ /home/gerjan/build-gcc/gcc/xgcc -B/home/gerjan/build-gcc/gcc/ = -B/Local/Pro/m68k-coff/bin/ -c -g -O2 -I. -I../../../gcc-2.95.2/libio = ../../../gcc-2.95.2/libio/filedoalloc.c -o pic/filedoalloc.o /home/gerjan/build-gcc/gcc/xgcc -B/home/gerjan/build-gcc/gcc/ = -B/Local/Pro/m68k-coff/bin/ -c -g -O2 -I. -I../../../gcc-2.95.2/libio = ../../../gcc-2.95.2/libio/filedoalloc.c In file included from ../../../gcc-2.95.2/libio/libio.h:30, from ../../../gcc-2.95.2/libio/iolibio.h:1, from ../../../gcc-2.95.2/libio/libioP.h:47, from ../../../gcc-2.95.2/libio/filedoalloc.c:45: _G_config.h:43: parse error before `_G_sigset_t' _G_config.h:43: warning: data definition has no type or storage class make[1]: *** [filedoalloc.o] Error 1 make[1]: Leaving directory `/home/gerjan/build-gcc/m68k-coff/libio' make: *** [all-target-libio] Error 2 My questions are. Are there more people that have to copy the = /usr/include directory in e.g. the gcc directory? =20 Is this a serious problem? configure: error: installation or = configuration problem: C compiler cannot create executables. And what can i do about this _G_config.h file error?=20 Thanks, Gerjan Teselink ------=_NextPart_000_003B_01C057A7.CC436E20 Content-Type: text/html; charset="Windows-1252" Content-Transfer-Encoding: quoted-printable
Hello,
 
I have tried to compile m68k-coff on Debian 2.1 = and 2.2.=20 But it won't compile. Binutils 2.10.1 and GCC 2..95.2 have = both the=20 prefix /Local/Pro.
 
In the 'configure' it detects the includefiles in=20 /usr/include. When I start to compile I get this errors:
 
../../gcc-2.95/gcc/libgcc2.c:41: stdlib.h: No such = file or=20 directory
../../gcc-2.95/gcc/libgcc2.c:42: unistd.h: No such file or=20 directory
make[2]: *** [libgcc2.a] Error 1
make[2]: Leaving = directory=20 `/home/teg/gcc-build/gcc'
make[1]: *** [stmp-multilib-sub] Error=20 2
make[1]: Leaving directory `/home/teg/gcc-build/gcc'
make: ***=20 [stmp-multilib] Error 1
 
I fixed it by copying the complete /usr/include = directory to=20 the gcc-build directory. But that is not a solution because it later on = the same=20 error is in another directory libio
 
But if i copy it every time I it will=20 compile till the next 2 errors come and i don't know what = i can=20 do about it:
 
checking whether the C compiler=20 (/home/gerjan/build-gcc/gcc/xgcc -B/home/gerjan/build-gcc/gcc/=20 -B/Local/Pro/m68k-coff/bin/ -g -O2 ) works... no
configure: error:=20 installation or configuration problem: C compiler cannot create=20 executables.
make[1]: Entering directory=20 `/home/gerjan/build-gcc/m68k-coff/libio'
test x"no" !=3D xyes = ||\
 =20 /home/gerjan/build-gcc/gcc/xgcc -B/home/gerjan/build-gcc/gcc/=20 -B/Local/Pro/m68k-coff/bin/ -c -g -O2 -I.=20 -I../../../gcc-2.95.2/libio   = ../../../gcc-2.95.2/libio/filedoalloc.c=20 -o pic/filedoalloc.o
/home/gerjan/build-gcc/gcc/xgcc=20 -B/home/gerjan/build-gcc/gcc/ -B/Local/Pro/m68k-coff/bin/ -c -g -O2 -I.=20 -I../../../gcc-2.95.2/libio  = ../../../gcc-2.95.2/libio/filedoalloc.c
In=20 file included from=20 ../../../gcc-2.95.2/libio/libio.h:30,
     &n= bsp;          =20 from=20 ../../../gcc-2.95.2/libio/iolibio.h:1,
     &= nbsp;          =20 from=20 ../../../gcc-2.95.2/libio/libioP.h:47,
     &= nbsp;          =20 from ../../../gcc-2.95.2/libio/filedoalloc.c:45:
_G_config.h:43: = parse error=20 before `_G_sigset_t'
_G_config.h:43: warning: data definition has no = type or=20 storage class
make[1]: *** [filedoalloc.o] Error 1
make[1]: = Leaving=20 directory `/home/gerjan/build-gcc/m68k-coff/libio'
make: ***=20 [all-target-libio] Error 2
 
My questions are. Are there more people that have to = copy the=20 /usr/include directory in e.g. the gcc directory? =  
 
Is this a serious problem? configure: error: = installation or=20 configuration problem: C compiler cannot create = executables.
And what can i do about this _G_config.h file error? =
 
Thanks,
 
Gerjan Teselink
 
------=_NextPart_000_003B_01C057A7.CC436E20-- From gcc-help-return-4152-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 27 06:08:15 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 11147 invoked by alias); 27 Nov 2000 06:08:14 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 11113 invoked from network); 27 Nov 2000 06:08:13 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 27 Nov 2000 06:08:13 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id WAA16549; Sun, 26 Nov 2000 22:08:10 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAR68BS06942; Mon, 27 Nov 2000 04:08:11 -0200 To: "Gerjan Teselink" Cc: Subject: Re: Making a m68k-coff crosscompiler References: <003e01c0579f$6b60daa0$0408a8c0@starba.net> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 27 Nov 2000 04:08:11 -0200 In-Reply-To: "Gerjan Teselink"'s message of "Sun, 26 Nov 2000 12:52:56 +0100" Message-ID: Lines: 11 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 26, 2000, "Gerjan Teselink" wrote: > In the 'configure' it detects the includefiles in /usr/include. When I start to compile I get this errors: Get newlib. The native header files won't do for the cross build. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4153-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 27 12:03:34 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 26923 invoked by alias); 27 Nov 2000 12:03:34 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 26905 invoked from network); 27 Nov 2000 12:03:33 -0000 Received: from zeus.vortex.is (193.4.145.1) by sourceware.cygnus.com with SMTP; 27 Nov 2000 12:03:33 -0000 Received: from froskur.flaga.is (mail.flaga.is [193.4.144.1]) by zeus.vortex.is (Post.Office MTA v3.5.3 release 223 ID# 0-60460U3500L350S0V35) with ESMTP id is for ; Mon, 27 Nov 2000 12:03:28 +0000 Received: from kolkrabbi.flaga.is ([192.168.145.6]) by froskur.flaga.is (Post.Office MTA v3.5.3 release 223 ID# 0-0U10L2S100V35) with ESMTP id is for ; Mon, 27 Nov 2000 12:02:19 +0000 content-class: urn:content-classes:message Subject: Bug in G++? MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Date: Mon, 27 Nov 2000 12:02:19 -0000 X-MimeOLE: Produced By Microsoft Exchange V6.0.4417.0 Message-ID: X-MS-Has-Attach: X-MS-TNEF-Correlator: Thread-Topic: Bug in G++? Thread-Index: AcBYatJhypFtIsrIRwGe6uquVj+lHA== From: =?iso-8859-1?B?S+FyaSBEYXbt8HNzb24=?= To: "Gcc help maillist (E-mail)" Hi, I am not shure if this is the right mailing list to ask. If not redirect me to the correct forum. Anyway the following minimal c++ program (crash) crashes for me in the delete line, line 25, if Vectorsize is larger than 3. While the program "run" seem to run without problems. Is there a known fix for this bug, except for the obvius to skip the declaration/definition of the default contructor and destructor? The backtrace from gdb is: (gdb) bt #0 0x400c9b26 in free () from /lib/libc.so.6 #1 0x400c9a0d in free () from /lib/libc.so.6 #2 0x4003e434 in __builtin_delete () from /usr/lib/libstdc++-libc6.1-2.so.3 #3 0x8048659 in _._7MyClass (this=3D0x80499e4, __in_chrg=3D3) at = crash.c:17 #4 0x8048714 in main (argc=3D1, argv=3D0xbffffce4) at crash.c:25 g++ is bash-2.03$ g++ --version 2.95.2 Compile with g++ crash.c -o crash -g -DVECTORSIZE=3D4 Thanks, K.D. //Program crash begins #include class MyClass { public: MyClass(); ~MyClass(); private: int i; }; MyClass::MyClass(void) { }; MyClass::~MyClass(void) { }; int main(int argc, char** argv) { MyClass * ptr; ptr =3D new MyClass[VECTORSIZE]; delete ptr; } //Program carsh ends //Program run begins #include class MyClass { private: int i; }; int main(int argc, char** argv) { MyClass * ptr; ptr =3D new MyClass[VECTORSIZE]; delete ptr; } //Program run ends From gcc-help-return-4154-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 27 12:52:50 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 9957 invoked by alias); 27 Nov 2000 12:52:44 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 9865 invoked from network); 27 Nov 2000 12:52:37 -0000 Received: from relay1.mail.uk.psi.net (154.32.105.6) by sourceware.cygnus.com with SMTP; 27 Nov 2000 12:52:37 -0000 Received: from mail.pixelpower.com ([193.123.2.227] helo=pixelwww.pixelpower.com) by relay1.mail.uk.psi.net with esmtp (Exim 2.12 #2) id 140Nlq-0007OU-00 for gcc-help@gcc.gnu.org; Mon, 27 Nov 2000 12:52:34 +0000 Received: from exchangeserver.pixelpower.com (unverified) by pixelwww.pixelpower.com (Content Technologies SMTPRS 4.1.5) with ESMTP id ; Mon, 27 Nov 2000 12:54:19 +0000 Received: by EXCHANGESERVER with Internet Mail Service (5.5.2650.21) id ; Mon, 27 Nov 2000 12:55:11 -0000 Message-ID: <718D38CAB6E0D011B2C90060970C28A556FD41@EXCHANGESERVER> From: David Korn To: =?iso-8859-1?Q?=27K=E1ri_Dav=ED=F0sson=27?= , "Gcc help maillist (E-mail)" Subject: RE: Bug in G++? Date: Mon, 27 Nov 2000 12:55:10 -0000 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2650.21) Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable >-----Original Message----- >From: K=E1ri Dav=ED=F0sson [mailto:kd@flaga.is] >Sent: 27 November 2000 12:02 >To: Gcc help maillist (E-mail) >Subject: Bug in G++?=20 >int main(int argc, char** argv) >{ > MyClass * ptr; > ptr =3D new MyClass[VECTORSIZE]; > delete ptr; >} When allocating with operator new[], you MUST use operator delete[] to get rid of the array of objects. Although one version of your code runs=20 successfully, it's just luck. hth,=20 DaveK --=20 The Boulder Pledge: "Under no circumstances will I ever purchase anything= o ffered to me as the result of an unsolicited email message. Nor will I=20 forward chain letters, petitions, mass mailings, or virus warnings to large= n umbers of others. This is my contribution to the survival of the online community." ********************************************************************** This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the system manager. This footnote also confirms that this email message has been swept by MIMEsweeper for the presence of computer viruses. www.mimesweeper.com ********************************************************************** From gcc-help-return-4155-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Mon Nov 27 23:47:00 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 23495 invoked by alias); 27 Nov 2000 23:46:59 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 23447 invoked from network); 27 Nov 2000 23:46:58 -0000 Received: from mail13.bigmailbox.com (209.132.220.44) by sourceware.cygnus.com with SMTP; 27 Nov 2000 23:46:58 -0000 Received: œby mail13.bigmailbox.com (8.8.7/8.8.7) id PAA07678; Mon, 27 Nov 2000 15:46:57 -0800 Date: Mon, 27 Nov 2000 15:46:57 -0800 Message-Id: <200011272346.PAA07678@mail13.bigmailbox.com> Content-Type: text/plain Content-Disposition: inline Content-Transfer-Encoding: binary X-Mailer: MIME-tools 4.104 (Entity 4.116) Mime-Version: 1.0 X-Originating-Ip: [208.185.145.208] From: "Jeff Hammond" To: gcc-help@gcc.gnu.org Subject: Trouble building m68k cross compiler Hi, I'm trying to build cross compiler for m68k-coff on my WinNT platform. I'm using the 2.95 binaries and cygwin as a starting point. These are the last few lines of the errout during the build process. do \ echo ${name}; \ /obj-m68k/gcc/xgcc -B/obj-m68k/gcc/ -O2 -DCROSS_COMPILE -IN_GCC -g -O2 -I./include -g1 -DIN_LIBGCC2 -__GCC_FLOAT_NOT_NEEDED -I. -I/cygwincore/gcc -/cygwincore/gcc/config -c -DL${name} libgcc1.S; \ if [ $? -eq 0 ] ; then true; else exit 1; fi; \ mv libgcc1.o ${name}.o; \ m68k-5200-coff-ar rc tmplibgcc1.a ${name}.o; \ rm -f ${name}.o; \ done _mulsi3 as: unrecognized option `-c68020' make[1]: *** [libgcc1-asm.a] Error 1 make: *** [all-gcc] Error 2 What can I do to get past this? I either need to make sure that as understands this option or have it invoked with an option that it will accept. I invoke configure with --target=m68k-coff and I have tried some variations like --with-gnu-as. None of these has changed the error message I get from building. Any help would be appreciated, Jeff Hammond ------------------------------------------------------------ --== Sent via Deja.com http://www.deja.com/ ==-- Before you buy. From gcc-help-return-4156-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 28 03:45:04 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 10700 invoked by alias); 28 Nov 2000 03:45:04 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 10663 invoked from network); 28 Nov 2000 03:45:03 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 28 Nov 2000 03:45:03 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id TAA19189; Mon, 27 Nov 2000 19:45:01 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAS3j0u31785; Tue, 28 Nov 2000 01:45:00 -0200 To: "Jeff Hammond" Cc: gcc-help@gcc.gnu.org Subject: Re: Trouble building m68k cross compiler References: <200011272346.PAA07678@mail13.bigmailbox.com> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 28 Nov 2000 01:45:00 -0200 In-Reply-To: "Jeff Hammond"'s message of "Mon, 27 Nov 2000 15:46:57 -0800" Message-ID: Lines: 11 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 27, 2000, "Jeff Hammond" wrote: > as: unrecognized option `-c68020' Did you build a cross binutils first? -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4157-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 28 10:51:34 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 2397 invoked by alias); 28 Nov 2000 10:51:34 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 2379 invoked from network); 28 Nov 2000 10:51:33 -0000 Received: from gatekeeper3.sni.co.uk (HELO hubble.sni.co.uk) (194.42.250.68) by sourceware.cygnus.com with SMTP; 28 Nov 2000 10:51:33 -0000 Received: from bnls207a.sni.co.uk (bnls207a.sni.co.uk [137.223.11.67]) by hubble.sni.co.uk (8.9.3/AS) with SMTP id KAA00096 for ; Tue, 28 Nov 2000 10:51:26 GMT Received: from 137.223.4.24 by bnls207a.sni.co.uk (InterScan E-Mail VirusWall NT); Tue, 28 Nov 2000 10:51:26 -0000 (GMT Standard Time) Received: by bnls205a.sni.co.uk with Internet Mail Service (5.5.2650.21) id ; Tue, 28 Nov 2000 10:51:26 -0000 Message-ID: <7680FE003E6ED4119AF500104B55F34ED32AAD@bnls214a.sni.co.uk> From: "Philips, Shawn" To: "Gcc help maillist (E-mail)" Subject: GCC on Sequent/Dynix/X86 Date: Tue, 28 Nov 2000 10:51:26 -0000 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2650.21) Content-Type: text/plain; charset="iso-8859-1" HI, I'm having some problems with buildiing GCC under X86 Dynix on Sequent hardware. The ./configure works perfectly, detects the platform type and returns with no errors. On issuing the 'make' command the following message is returned: - # make test x"no" != xyes || \ cc -c -DHAVE_CONFIG_H -g -I. -I/b1/users/b12000/gcc/gcc-2.95.2/libiber ty/../include argv.c -o pic/argv.o cc -c -DHAVE_CONFIG_H -g -I. -I/b1/users/b12000/gcc/gcc-2.95.2/libiberty /../include argv.c command line: fatal: cannot open argv.c: No such file or directory *** Error code 1 Make: . Stop. *** Error code 2 Make: . Stop. I issued the following just to check its there: - # find / -name argv.c /b1/users/b12000/gcc/gcc-2.95.2/libiberty/argv.c Is this just a simple path issue or is there something I am missing, help would be greatly appreciated. Cheers SP From gcc-help-return-4158-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 28 17:19:06 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 32550 invoked by alias); 28 Nov 2000 17:19:06 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 32491 invoked from network); 28 Nov 2000 17:19:04 -0000 Received: from geos01.oslo.geco-prakla.slb.com (HELO oslo.Geco-Prakla.slb.com) (134.32.44.131) by sourceware.cygnus.com with SMTP; 28 Nov 2000 17:19:04 -0000 Received: from oslo.geco-prakla.slb.com (sunw259 [192.23.231.253]) by oslo.Geco-Prakla.slb.com (8.9.3/8.9.3) with ESMTP id SAA24594; Tue, 28 Nov 2000 18:19:12 +0100 (MET) Message-ID: <3A23E90F.9A3C9F06@oslo.geco-prakla.slb.com> Date: Tue, 28 Nov 2000 18:19:11 +0100 From: Herman Veldhuizen Organization: http://www.slb.com X-Mailer: Mozilla 4.61 [en] (X11; I; SunOS 5.6 sun4u) X-Accept-Language: en, Dutch, nl MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: SIGSTOP door_restart() Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit My multithreaed application (Solaris 7, gcc 2.95.2) sometimes stops due to SIGSTOP. It is a total mistory for me where this is coming from. In the debugger (ddd) I can see the following Program received signal SIGSTOP, Stopped (signal). [Switching to LWP 6 ] Program received signal SIGSTOP, Stopped (signal). 0xff21501c in door_restart () Does anybody know what door_restart() is doing? Backtrace only shows this function; so I have no idea where it originates. Thanks, Herman. From gcc-help-return-4159-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 28 17:39:48 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 6899 invoked by alias); 28 Nov 2000 17:39:47 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 6864 invoked from network); 28 Nov 2000 17:39:47 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 28 Nov 2000 17:39:47 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id JAA07439; Tue, 28 Nov 2000 09:39:42 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eASHdbC06118; Tue, 28 Nov 2000 15:39:37 -0200 To: "Philips, Shawn" Cc: "Gcc help maillist (E-mail)" Subject: Re: GCC on Sequent/Dynix/X86 References: <7680FE003E6ED4119AF500104B55F34ED32AAD@bnls214a.sni.co.uk> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 28 Nov 2000 15:39:36 -0200 In-Reply-To: "Philips, Shawn"'s message of "Tue, 28 Nov 2000 10:51:26 -0000" Message-ID: Lines: 13 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 28, 2000, "Philips, Shawn" wrote: > On issuing the 'make' command the following message is returned: - Use `make bootstrap', not just `make'. And use a POSIX-compliant make program, as per the installation instructions. GNU make will do; not all vendors' `make's support VPATH correctly. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4160-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 28 18:05:10 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 18468 invoked by alias); 28 Nov 2000 18:05:09 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 18434 invoked from network); 28 Nov 2000 18:05:09 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 28 Nov 2000 18:05:09 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id KAA09614; Tue, 28 Nov 2000 10:05:03 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eASI50k06357; Tue, 28 Nov 2000 16:05:00 -0200 To: Herman Veldhuizen Cc: gcc-help@gcc.gnu.org Subject: Re: SIGSTOP door_restart() References: <3A23E90F.9A3C9F06@oslo.geco-prakla.slb.com> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 28 Nov 2000 16:05:00 -0200 In-Reply-To: Herman Veldhuizen's message of "Tue, 28 Nov 2000 18:19:11 +0100" Message-ID: Lines: 15 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 28, 2000, Herman Veldhuizen wrote: > My multithreaed application (Solaris 7, gcc 2.95.2) > sometimes stops due to SIGSTOP. Is this within GDB? Just tell GDB to ignore this signal and deliver it to the application. I don't recall exactly how to do that, but the GDB manual should let you know. When in doubt, ask in a GDB-specific mailing list. gcc-help isn't such a list. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4161-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 28 19:39:39 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 24117 invoked by alias); 28 Nov 2000 19:39:39 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 24085 invoked from network); 28 Nov 2000 19:39:37 -0000 Received: from mmac2.jccbi.gov (162.58.35.104) by sourceware.cygnus.com with SMTP; 28 Nov 2000 19:39:37 -0000 Received: from mmac2.jccbi.gov (shara.jccbi.gov [162.58.35.105]) by mmac2.jccbi.gov with ESMTP id NAA09175 for ; Tue, 28 Nov 2000 13:39:56 -0600 (CST) Message-ID: <3A240ABE.4F5557FE@mmac2.jccbi.gov> Date: Tue, 28 Nov 2000 13:42:54 -0600 From: "0000-Admin(0000)" Organization: mmac X-Mailer: Mozilla 4.7 [en] (X11; I; SunOS 5.8 sun4m) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: config problems gcc2.95.2 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Hello, I am experiencing a problem installing the gcc compiler on a Solaris8 . I do not have a working compiler on the system. I downloaded and untared the gcc-core-2.95.2 file below is the error message i receive when doing the configure: # /usr/source/gcc/gcc-2.95.2/configure Configuring for a sparc-sun-solaris2.8 host. Created "Makefile" in /usr/gcc using "mh-frag" /usr/ucb/cc: language optional software package not installed *** The command 'cc -o conftest -g conftest.c' failed. *** You must set the environment variable CC to a working compiler. I am fairly new to unix from the MS environment so it is probably something simple. Tony D. System admin From gcc-help-return-4162-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 28 20:42:56 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 29434 invoked by alias); 28 Nov 2000 20:42:52 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 29318 invoked from network); 28 Nov 2000 20:42:46 -0000 Received: from ip252.uni-com.net (HELO spandex.nondot.org) (postfix@205.198.252.252) by sourceware.cygnus.com with SMTP; 28 Nov 2000 20:42:46 -0000 Received: by spandex.nondot.org (Postfix, from userid 501) id 6B7F64AE8; Tue, 28 Nov 2000 14:40:24 -0600 (CST) Received: from localhost (localhost [127.0.0.1]) by spandex.nondot.org (Postfix) with ESMTP id 3DAEA2BE2F for ; Tue, 28 Nov 2000 14:40:24 -0600 (CST) Date: Tue, 28 Nov 2000 14:40:23 -0600 (CST) From: Chris Lattner To: gcc-help@gcc.gnu.org Subject: G++ on solaris. Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Hi All, My problem is this, it seems that G++ on solaris likes to link with the system ld. In my particular case, gnu ld is installed as gld, and I need to use it (for the -export-dynamic option), but gcc insists on using ld. I have also tried linking the application with gld directly (ie gld xxx.o... -lstdc++ -lg++), but it claims to not be able to find libstdc++ or libg++. How do I tell G++ to link with a different linker than it was configured with? I can see how to do it when configuring, but in this case I don't have the option of reconfiguring g++/gcc. Barring that, what options do I need to pass to gld to get it to link g++ programs (ie including the standard libs and stuff)... Thanks! -Chris From gcc-help-return-4163-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 28 20:58:54 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 12769 invoked by alias); 28 Nov 2000 20:58:53 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 12734 invoked from network); 28 Nov 2000 20:58:53 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 28 Nov 2000 20:58:53 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id MAA28588; Tue, 28 Nov 2000 12:58:46 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eASKwin08076; Tue, 28 Nov 2000 18:58:44 -0200 To: "0000-Admin(0000)" Cc: gcc-help@gcc.gnu.org Subject: Re: config problems gcc2.95.2 References: <3A240ABE.4F5557FE@mmac2.jccbi.gov> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 28 Nov 2000 18:58:44 -0200 In-Reply-To: "0000-Admin's message of "Tue, 28 Nov 2000 13:42:54 -0600" Message-ID: Lines: 15 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 28, 2000, "0000-Admin(0000)" wrote: > I am experiencing a problem installing the gcc compiler on a > Solaris8 . > I do not have a working compiler on the system. You need one to compile anything at all, even another compiler. You may download a pre-compiled GCC from some web-sites listed in gcc.gnu.org. Also, I heard Solaris 8 comes with GCC built-in. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4164-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 28 21:03:14 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 19199 invoked by alias); 28 Nov 2000 21:03:13 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 19165 invoked from network); 28 Nov 2000 21:03:13 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 28 Nov 2000 21:03:13 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id NAA29246; Tue, 28 Nov 2000 13:03:07 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eASL34708127; Tue, 28 Nov 2000 19:03:04 -0200 To: Chris Lattner Cc: gcc-help@gcc.gnu.org Subject: Re: G++ on solaris. References: From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 28 Nov 2000 19:03:04 -0200 In-Reply-To: Chris Lattner's message of "Tue, 28 Nov 2000 14:40:23 -0600 (CST)" Message-ID: Lines: 38 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 28, 2000, Chris Lattner wrote: > My problem is this, it seems that G++ on solaris likes to link with the > system ld. In my particular case, gnu ld is installed as gld, and I need > to use it (for the -export-dynamic option), but gcc insists on using > ld. There are instructions in the FAQ about how to make sure GCC uses GNU as and/or ld instead of the system built-in counterparts. One of the options is to configure GCC --with-ld=/path/to/ld. > I have also tried linking the application with gld directly (ie gld > xxx.o... -lstdc++ -lg++), but it claims to not be able to find > libstdc++ or libg++. You don't want to use ld directly. If you do it, you're preventing GCC from linking in some run-time object files that deal with initialization of global objects. > I can see how to do it when configuring, but in this case I don't > have the option of reconfiguring g++/gcc. In this case, it's just a matter of creating some soft-links in the GCC install tree. I believe this is also covered in the FAQ. But it is recommended that you rebuild GCC anyway, at least using the switches --with-gnu-as and --with-gnu-ld. Not only will this result in a more efficient GCC, because it will know it can rely on the assembler and the linker to deal with certain issues, but also, on certain systems, GCC configured for the native as/ld won't work with the GNU counter-parts, and vice-versa. The GNU tools are often extended to accept system-specific flags, so this case is rare, and maybe it won't bite you. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4165-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 28 21:09:41 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 23302 invoked by alias); 28 Nov 2000 21:09:41 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 23235 invoked from network); 28 Nov 2000 21:09:38 -0000 Received: from ip252.uni-com.net (HELO spandex.nondot.org) (postfix@205.198.252.252) by sourceware.cygnus.com with SMTP; 28 Nov 2000 21:09:38 -0000 Received: by spandex.nondot.org (Postfix, from userid 501) id 5F6894AE8; Tue, 28 Nov 2000 15:07:45 -0600 (CST) Received: from localhost (localhost [127.0.0.1]) by spandex.nondot.org (Postfix) with ESMTP id 22E262BE2F; Tue, 28 Nov 2000 15:07:45 -0600 (CST) Date: Tue, 28 Nov 2000 15:07:45 -0600 (CST) From: Chris Lattner To: Alexandre Oliva Cc: gcc-help@gcc.gnu.org Subject: Re: G++ on solaris. In-Reply-To: Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Thanks for the reply... Here's some more info on my dillema. :) I'm the author of a GPL'd C++ program (http://www.nondot.org/MagicStats), and one of my users it trying to get it to work on Solaris. There the link step was whining about not having a -export-dynamic option (which I use because I have dlopen'd plugins that are also written in C++ that reference symbols in the main executable). I tracked it down to being this problem, and I reproduced it on a solaris box that I have access to. I don't know anything about this particular users config, but I'm trying to do a more or less portable fix. The problem is that he(and I in this case) don't have root access on the machine, so he can't modify the GCC install (by putting in a symlink or something). Also quotas are a problem so we can't rebuild GCC. :( I'm I just out of luck here, or is there anything that I can possibly do? Thanks for the help, -Chris On 28 Nov 2000, Alexandre Oliva wrote: > On Nov 28, 2000, Chris Lattner wrote: > > > My problem is this, it seems that G++ on solaris likes to link with the > > system ld. In my particular case, gnu ld is installed as gld, and I need > > to use it (for the -export-dynamic option), but gcc insists on using > > ld. > > There are instructions in the FAQ about how to make sure GCC uses GNU > as and/or ld instead of the system built-in counterparts. One of the > options is to configure GCC --with-ld=/path/to/ld. > > > I have also tried linking the application with gld directly (ie gld > > xxx.o... -lstdc++ -lg++), but it claims to not be able to find > > libstdc++ or libg++. > > You don't want to use ld directly. If you do it, you're preventing > GCC from linking in some run-time object files that deal with > initialization of global objects. > > > I can see how to do it when configuring, but in this case I don't > > have the option of reconfiguring g++/gcc. > > In this case, it's just a matter of creating some soft-links in the > GCC install tree. I believe this is also covered in the FAQ. But it > is recommended that you rebuild GCC anyway, at least using the > switches --with-gnu-as and --with-gnu-ld. Not only will this result > in a more efficient GCC, because it will know it can rely on the > assembler and the linker to deal with certain issues, but also, on > certain systems, GCC configured for the native as/ld won't work with > the GNU counter-parts, and vice-versa. The GNU tools are often > extended to accept system-specific flags, so this case is rare, and > maybe it won't bite you. > > -- > Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ > Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} > CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} > Free Software Evangelist *Please* write to mailing lists, not to me > From gcc-help-return-4166-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 28 21:22:05 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 26047 invoked by alias); 28 Nov 2000 21:22:05 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 26013 invoked from network); 28 Nov 2000 21:22:04 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 28 Nov 2000 21:22:04 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id NAA01360; Tue, 28 Nov 2000 13:21:59 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eASLLvZ08366; Tue, 28 Nov 2000 19:21:57 -0200 To: Chris Lattner Cc: gcc-help@gcc.gnu.org Subject: Re: G++ on solaris. References: From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 28 Nov 2000 19:21:57 -0200 In-Reply-To: Chris Lattner's message of "Tue, 28 Nov 2000 15:07:45 -0600 (CST)" Message-ID: Lines: 28 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 28, 2000, Chris Lattner wrote: > I'm I just out of luck here, or is there anything that I can possibly do? There is. But it's hackish. Create a directory that mirrors the structure of the install tree. Create links in it pointing to the actual install tree. Create links in it pointing to GNU ld. Replace `gcc' in the mirrored bin directory with: #! /bin/sh exec /path/to/install/tree/bin/gcc \ -B/directory/containing/the/link/to/gnu/ld \ ${1+"$@"} Then add the mirror tree to the front of the PATH. Now, the easier, right thing to do is to use GNU libtool, that supports the creation of shared libraries and dlopenable modules with -export-dynamic in a portable way. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4167-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 28 21:29:43 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 29128 invoked by alias); 28 Nov 2000 21:29:42 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 29033 invoked from network); 28 Nov 2000 21:29:36 -0000 Received: from ip252.uni-com.net (HELO spandex.nondot.org) (postfix@205.198.252.252) by sourceware.cygnus.com with SMTP; 28 Nov 2000 21:29:36 -0000 Received: by spandex.nondot.org (Postfix, from userid 501) id A42234B7C; Tue, 28 Nov 2000 15:27:38 -0600 (CST) Received: from localhost (localhost [127.0.0.1]) by spandex.nondot.org (Postfix) with ESMTP id 9D6E62BE2F; Tue, 28 Nov 2000 15:27:38 -0600 (CST) Date: Tue, 28 Nov 2000 15:27:38 -0600 (CST) From: Chris Lattner To: Alexandre Oliva Cc: gcc-help@gcc.gnu.org Subject: Re: G++ on solaris. In-Reply-To: Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Great! Thanks for the suggestion. I have been meaning to move to autoconf/automake/libtool for some time, but this is quite possibly enough to get me to actually do it. Thanks again, -Chris On 28 Nov 2000, Alexandre Oliva wrote: > On Nov 28, 2000, Chris Lattner wrote: > > > I'm I just out of luck here, or is there anything that I can possibly do? > > There is. But it's hackish. > > Create a directory that mirrors the structure of the install tree. > Create links in it pointing to the actual install tree. Create links > in it pointing to GNU ld. Replace `gcc' in the mirrored bin directory > with: > > #! /bin/sh > exec /path/to/install/tree/bin/gcc \ > -B/directory/containing/the/link/to/gnu/ld \ > ${1+"$@"} > > Then add the mirror tree to the front of the PATH. > > > Now, the easier, right thing to do is to use GNU libtool, that > supports the creation of shared libraries and dlopenable modules with > -export-dynamic in a portable way. > > -- > Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ > Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} > CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} > Free Software Evangelist *Please* write to mailing lists, not to me > From gcc-help-return-4168-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Tue Nov 28 21:34:30 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 30735 invoked by alias); 28 Nov 2000 21:34:30 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 30660 invoked from network); 28 Nov 2000 21:34:24 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 28 Nov 2000 21:34:24 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id NAA02760; Tue, 28 Nov 2000 13:34:18 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eASLYFo09263; Tue, 28 Nov 2000 19:34:15 -0200 To: Chris Lattner Cc: gcc-help@gcc.gnu.org Subject: Re: G++ on solaris. References: From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 28 Nov 2000 19:34:15 -0200 In-Reply-To: Chris Lattner's message of "Tue, 28 Nov 2000 15:27:38 -0600 (CST)" Message-ID: Lines: 13 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 28, 2000, Chris Lattner wrote: > I have been meaning to move to autoconf/automake/libtool for some > time, but this is quite possibly enough to get me to actually do it. That's definitely a good idea. Be sure to take a look at New Riders' GNU Autoconf, Automake and Libtool. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4169-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 29 09:53:14 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 4911 invoked by alias); 29 Nov 2000 09:53:12 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 4716 invoked from network); 29 Nov 2000 09:52:23 -0000 Received: from firewall.ddeorg.soft.net (164.164.74.3) by sourceware.cygnus.com with SMTP; 29 Nov 2000 09:52:23 -0000 Received: by firewall.ddeorg.soft.net (8.8.8/9.7) id PAA08271; Wed, 29 Nov 2000 15:25:31 +0530 (IST) Received: from madras.ddeorg.soft.net by ddeorg.soft.net (8.8.8/9.6) with ESMTP id PAA04141; Wed, 29 Nov 2000 15:25:30 +0530 (IST) Received: from localhost by madras.ddeorg.soft.net (8.8.5/9.7) with SMTP id PAA01391; Wed, 29 Nov 2000 15:20:54 +0530 (IST) Message-Id: <200011290950.PAA01391@madras.ddeorg.soft.net> X-Mailer: exmh version 2.0.1 12/23/97 To: gcc-help@gcc.gnu.org, gcc@gcc.gnu.org Subject: Why does this happen ?? Date: Wed, 29 Nov 2000 15:20:53 +0530 From: "Koundinya.K" Hi, While I have been trying to compile a large chunk of code I have the following piece of code ( to reverse a string - which I have simulated here to highlight the problem) #include #include main() { char *s="Hello World"; int c, i, j; for (i = 0, j = strlen(s) - 1; i < j; i++, j--) { c = s[i]; s[i] = s[j]; s[j] = (char)c; } fprintf(stdout,"Reversed string=%s\n",s); } When I compile this code with gcc, the resulting binary seg faults. This happens on 2 flavors of O.S that I tried ( My MIPS based SVR4.2, Redhat Linux) .. But when I compile the above code on using my native compiler, the resulting binary works. Any explanation for this ?. Why does gcc behave like this ?. Thanks for any pointers. Koundinya From gcc-help-return-4170-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 29 10:05:44 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 8528 invoked by alias); 29 Nov 2000 10:05:43 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 8457 invoked from network); 29 Nov 2000 10:05:40 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 29 Nov 2000 10:05:40 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id CAA18263; Wed, 29 Nov 2000 02:05:31 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eATA5Sn11097; Wed, 29 Nov 2000 08:05:29 -0200 To: "Koundinya.K" Cc: gcc-help@gcc.gnu.org, gcc@gcc.gnu.org Subject: Re: Why does this happen ?? References: <200011290950.PAA01391@madras.ddeorg.soft.net> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 29 Nov 2000 08:05:27 -0200 In-Reply-To: "Koundinya.K"'s message of "Wed, 29 Nov 2000 15:20:53 +0530" Message-ID: Lines: 17 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 29, 2000, "Koundinya.K" wrote: > char *s="Hello World"; > When I compile this code with gcc, the resulting binary seg > faults. GCC places string literals in read-only sections, unless you compile with -fwritable-strings. If you had written `static char s[]="..."', it wouldn't have crashed, because then s's storage would be the string's storage, and it would be placed in read&write memory. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4171-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 29 10:06:24 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 9133 invoked by alias); 29 Nov 2000 10:06:23 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 9019 invoked from network); 29 Nov 2000 10:06:21 -0000 Received: from cantor.suse.de (194.112.123.193) by sourceware.cygnus.com with SMTP; 29 Nov 2000 10:06:21 -0000 Received: from Hermes.suse.de (Hermes.suse.de [194.112.123.136]) by Cantor.suse.de (Postfix) with ESMTP id 1D55A1E18C; Wed, 29 Nov 2000 11:06:13 +0100 (MET) Received: from Wotan.suse.de (Wotan.suse.de [10.10.0.1]) by Hermes.suse.de (Postfix) with ESMTP id C2C483E45F; Wed, 29 Nov 2000 11:06:05 +0100 (MET) Received: from gee.suse.de (Gee.suse.de [10.10.1.56]) by Wotan.suse.de (Postfix) with ESMTP id 4C0B21C8259; Wed, 29 Nov 2000 11:06:05 +0100 (CET) Received: (from aj@localhost) by gee.suse.de (8.11.0/8.11.0/SuSE Linux 8.11.0-0.4) id eATA63H02900; Wed, 29 Nov 2000 11:06:03 +0100 X-Authentication-Warning: gee.suse.de: aj set sender to aj@suse.de using -f Mail-Copies-To: never To: "Koundinya.K" Cc: gcc-help@gcc.gnu.org, gcc@gcc.gnu.org Subject: Re: Why does this happen ?? References: <200011290950.PAA01391@madras.ddeorg.soft.net> From: Andreas Jaeger Date: 29 Nov 2000 11:06:02 +0100 In-Reply-To: <200011290950.PAA01391@madras.ddeorg.soft.net> Message-ID: Lines: 40 User-Agent: Gnus/5.0808 (Gnus v5.8.8) XEmacs/21.1 (Capitol Reef) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii >>>>> Koundinya K writes: > Hi, > While I have been trying to compile a large chunk of code I > have the following piece of code ( to reverse a string - which I > have simulated here to highlight the problem) > #include > #include > main() > { > char *s="Hello World"; > int c, i, j; > for (i = 0, j = strlen(s) - 1; i < j; i++, j--) { > c = s[i]; > s[i] = s[j]; > s[j] = (char)c; > } > fprintf(stdout,"Reversed string=%s\n",s); > } > When I compile this code with gcc, the resulting binary seg > faults. This happens on 2 flavors of O.S that I tried ( My MIPS > based SVR4.2, Redhat Linux) > .. > But when I compile the above code on using my native compiler, > the resulting binary works. > Any explanation for this ?. Why does gcc behave like this ?. Use -fwritable-strings, "Hello World" lives in read-only memory. Andreas -- Andreas Jaeger SuSE Labs aj@suse.de private aj@arthur.inka.de http://www.suse.de/~aj From gcc-help-return-4172-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 29 15:18:16 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 23809 invoked by alias); 29 Nov 2000 15:18:15 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 23791 invoked from network); 29 Nov 2000 15:18:13 -0000 Received: from fencepost.gnu.org (199.232.76.164) by sourceware.cygnus.com with SMTP; 29 Nov 2000 15:18:13 -0000 Received: from imsp211.netvigator.com ([205.252.144.55]) by fencepost.gnu.org with esmtp (Exim 3.16 #1 (Debian)) id 1418zp-0003Rw-00 for ; Wed, 29 Nov 2000 10:18:09 -0500 Received: from one4all.netvigator.com (one4all.netvigator.com [208.151.73.66]) by imsp211.netvigator.com (8.9.3/8.9.1) with ESMTP id XAA15677 for ; Wed, 29 Nov 2000 23:18:06 +0800 (HKT) Received: from localhost (yungp@localhost) by one4all.netvigator.com (8.8.8+Sun/8.8.8) with ESMTP id XAA00939 for ; Wed, 29 Nov 2000 23:18:05 +0800 (HKT) X-Authentication-Warning: one4all.netvigator.com: yungp owned process doing -bs Date: Wed, 29 Nov 2000 23:18:05 +0800 (HKT) From: Yung Kwong Wing To: help-gcc@gnu.org Subject: installing gcc Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Hi, I am trying to install my Apache server (ver. 1.3.6). Well, I have installed the "egcs" rpm from my RedHat 6.2 CD-ROM, but when I try to configure my Apache 1.3.6 by typing the following: ./configure --prefix=/usr/local/apache I get an error message saying the following: Configuring for Apache, Version 1.3.6 + using installation path layout: Apache (config.layout) Creating Makefile Creating Configuration.apaci in src ./helpers/TestCompile: make: command not found Creating Makefile in src + configured for Linux platform + setting C compiler to gcc + setting C pre-processor to gcc -E + checking for system header files + adding selected modules + doing sanity check on compiler and options ** A test compilation with your Makefile configuration ** failed. This is most likely because your C compiler ** is not ANSI. Apache requires an ANSI C Compiler, such ** as gcc. The above error message from your compiler ** will also provide a clue. Aborting! Isn't the "egcs" the correct package to install? Peter From gcc-help-return-4173-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 29 16:32:18 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 13080 invoked by alias); 29 Nov 2000 16:32:17 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 13043 invoked from network); 29 Nov 2000 16:32:14 -0000 Received: from gatekeeper.qms.com (161.33.3.1) by sourceware.cygnus.com with SMTP; 29 Nov 2000 16:32:14 -0000 Received: (qmail 14759 invoked from network); 29 Nov 2000 16:32:02 -0000 Received: from sun470.qms.com (HELO sun470.rd.qms.com) (161.33.128.1) by 161.33.254.2 with SMTP; 29 Nov 2000 16:32:02 -0000 Received: from boulder.qms.com by sun470.rd.qms.com (SMI-8.6/SMI-4.1) id KAA12379; Wed, 29 Nov 2000 10:32:01 -0600 Received: from boulder.qms.com by boulder.qms.com (SMI-8.6/37-42) id JAA06870; Wed, 29 Nov 2000 09:31:59 -0700 Message-ID: <3A252F7F.EFCE2462@boulder.qms.com> Date: Wed, 29 Nov 2000 09:31:59 -0700 From: Darrell Bellert X-Mailer: Mozilla 4.75 [en] (X11; U; Linux 2.2.16-22 i686) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: Problems building i686-mips cross compiler Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Hello. I'm trying to build a cross compiler for mips-ecoff on an i686 running Redhat 7.0. I've used the following script, which I modeled after section 4.1 of the FAQ: #################################################################################### #!/bin/sh delineate(){ echo echo echo echo $1 echo "<--------------------------------------------------------------------------------->" echo echo echo } TARGET=mips-ecoff PREFIX=`pwd`/Build HEADERS=`pwd`/Include LIBS=`pwd`/Lib mkdir build-binutils build-gcc build-newlib build-gdb cd build-binutils delineate "CONFIGURING BINUTILS" ../binutils-2.10.1/configure --target=$TARGET --prefix=$PREFIX -v delineate "MAKING BINUTILS" make all install delineate "CONFIGURING GCC" ../gcc-2.95.2/configure --target=$TARGET --prefix=$PREFIX -v --with-headers=$HEADERS --with-libs=$LIBS --with-gnu-as --with-gnu-ld delineate "MAKING GCC" make all install ######################################################################################### The directory structure where the script resides looks like: drwxr-xr-x 2 dbellert rd 4096 Nov 27 12:44 Build drwxr-xr-x 4 dbellert rd 4096 Nov 27 12:08 Include drwxr-xr-x 3 dbellert rd 4096 Nov 27 13:50 Lib drwxr-xr-x 14 dbellert rd 4096 Nov 7 03:26 binutils-2.10.1 drwxr-xr-x 13 dbellert rd 4096 Nov 22 10:18 binutils-2.9 drwxr-xr-x 16 dbellert rd 4096 Oct 25 1999 gcc-2.95.2 drwxr-xr-x 15 dbellert rd 4096 Nov 22 10:19 gdb-5.0 -rwxr--r-- 1 dbellert rd 742 Nov 29 08:09 install drwxr-xr-x 7 dbellert rd 4096 Nov 22 10:18 newlib-1.8.2 I am getting two errors along the way: The first one occurs while making gcc: -------------------------------------------------------------------- checking for gcc... /pika/dbellert/Stuff10/build-binutils/gcc/xgcc -B/pika/dbellert/Stuff10/build-binutils/gcc/ -B/pika/dbellert/Stuff10/Build/mips-ecoff/bin/ checking whether we are using GNU C... yes checking whether /pika/dbellert/Stuff10/build-binutils/gcc/xgcc -B/pika/dbellert/Stuff10/build-binutils/gcc/ -B/pika/dbellert/Stuff10/Build/mips-ecoff/bin/ accepts -g... yes checking for POSIXized ISC... no checking for a BSD compatible install... /usr/bin/install -c checking how to run the C preprocessor... /pika/dbellert/Stuff10/build-binutils/gcc/xgcc -B/pika/dbellert/Stuff10/build-binutils/gcc/ -B/pika/dbellert/Stuff10/Build/mips-ecoff/bin/ -E checking for sys/file.h... no checking for sys/param.h... yes checking for stdlib.h... yes checking for string.h... yes checking for unistd.h... yes checking for strings.h... no checking for sys/time.h... yes checking for sys/resource.h... no checking for sys/wait.h that is POSIX.1 compatible... no checking whether the C compiler (/pika/dbellert/Stuff10/build-binutils/gcc/xgcc -B/pika/dbellert/Stuff10/build-binutils/gcc/ -B/pika/dbellert/Stuff10/Build/mips-ecoff/bin/ -g -O2 -W -Wall ) works... no configure: error: installation or configuration problem: C compiler cannot create executables. make[1]: Entering directory `/pika/dbellert/Stuff10/build-binutils/mips-ecoff/libio' However, installation continues past this point until it crashes with this fatal error: --------------------------------------------------------------------------------------- . . . if [ x"no" = xyes ]; then \ /pika/dbellert/Stuff10/build-binutils/gcc/xgcc -B/pika/dbellert/Stuff10/build-binutils/gcc/ -B/pika/dbellert/Stuff10/Build/mips-ecoff/bin/ -c -g -O2 -fno-implicit-templates -I../../../gcc-2.95.2/libstdc++ -I../../../gcc-2.95.2/libstdc++/stl -I../libio -I../../../gcc-2.95.2/libstdc++/../libio -nostdinc++ -DLD \ `for N in MAIN ADDCC ADDCF ADDFC SUBCC SUBCF SUBFC MULCC MULCF MULFC DIVCC DIVCF DIVFC PLUS MINUS EQCC EQCF EQFC NECC NECF NEFC ABS ARG POLAR CONJ NORM COS COSH EXP LOG POWCC POWCF POWCI POWFC SIN SINH SQRT; do echo " -D${N}"; done` \ ../../../gcc-2.95.2/libstdc++/cinst.cc -o pic/ldcomplex.o; \ else true ; fi /pika/dbellert/Stuff10/build-binutils/gcc/xgcc -B/pika/dbellert/Stuff10/build-binutils/gcc/ -B/pika/dbellert/Stuff10/Build/mips-ecoff/bin/ -c -g -O2 -fno-implicit-templates -I../../../gcc-2.95.2/libstdc++ -I../../../gcc-2.95.2/libstdc++/stl -I../libio -I../../../gcc-2.95.2/libstdc++/../libio -nostdinc++ -DLD `for N in MAIN ADDCC ADDCF ADDFC SUBCC SUBCF SUBFC MULCC MULCF MULFC DIVCC DIVCF DIVFC PLUS MINUS EQCC EQCF EQFC NECC NECF NEFC ABS ARG POLAR CONJ NORM COS COSH EXP LOG POWCC POWCF POWCI POWFC SIN SINH SQRT; do echo " -D${N}"; done` \ ../../../gcc-2.95.2/libstdc++/cinst.cc -o ldcomplex.o echo ldcomio ldcomio if [ x"no" = xyes ]; then \ /pika/dbellert/Stuff10/build-binutils/gcc/xgcc -B/pika/dbellert/Stuff10/build-binutils/gcc/ -B/pika/dbellert/Stuff10/Build/mips-ecoff/bin/ -c -g -O2 -fno-implicit-templates -I../../../gcc-2.95.2/libstdc++ -I../../../gcc-2.95.2/libstdc++/stl -I../libio -I../../../gcc-2.95.2/libstdc++/../libio -nostdinc++ -DLD \ `for N in EXTRACT INSERT; do echo " -D${N}"; done` \ ../../../gcc-2.95.2/libstdc++/cinst.cc -o pic/ldcomio.o; \ else true ; fi /pika/dbellert/Stuff10/build-binutils/gcc/xgcc -B/pika/dbellert/Stuff10/build-binutils/gcc/ -B/pika/dbellert/Stuff10/Build/mips-ecoff/bin/ -c -g -O2 -fno-implicit-templates -I../../../gcc-2.95.2/libstdc++ -I../../../gcc-2.95.2/libstdc++/stl -I../libio -I../../../gcc-2.95.2/libstdc++/../libio -nostdinc++ -DLD `for N in EXTRACT INSERT; do echo " -D${N}"; done` \ ../../../gcc-2.95.2/libstdc++/cinst.cc -o ldcomio.o touch bigstmp-complx cd ../libiberty ; make "SHELL=/bin/sh" "INSTALL=/bin/sh /pika/dbellert/Stuff10/gcc-2.95.2/install-sh -c" "INSTALL_DATA=/bin/sh /pika/dbellert/Stuff10/gcc-2.95.2/install-sh -c -m 644" "INSTALL_PROGRAM=/bin/sh /pika/dbellert/Stuff10/gcc-2.95.2/install-sh -c " "prefix=/pika/dbellert/Stuff10/Build" "exec_prefix=/pika/dbellert/Stuff10/Build" "tooldir=/pika/dbellert/Stuff10/Build/mips-ecoff" "gxx_include_dir=/pika/dbellert/Stuff10/Build/include/g++-3" "libsubdir=/pika/dbellert/Stuff10/Build/lib/gcc-lib/mips-ecoff/2.95.2" "gcc_version=2.95.2" "gcc_version_trigger=/pika/dbellert/Stuff10/gcc-2.95.2/gcc/version.c" "AR=/pika/dbellert/Stuff10/build-binutils/binutils/ar" "AR_FLAGS=rc" "CC=/pika/dbellert/Stuff10/build-binutils/gcc/xgcc -B/pika/dbellert/Stuff10/build-binutils/gcc/ -B/pika/dbellert/Stuff10/Build/mips-ecoff/bin/" "CXX=/pika/dbellert/Stuff10/build-binutils/gcc/xgcc -B/pika/dbellert/Stuff10/build-binutils/gcc/ -B/pika/dbellert/Stuff10/Build/mips-ecoff/bin/" "CFLAGS=-g -O2 -W -Wall" "CXXFLAGS=-g -O2" "NM=/pika/dbellert/Stuff10/build-binutils/binutils/nm-new" "RANLIB=/pika/dbellert/Stuff10/build-binutils/binutils/ranlib" "LIBCFLAGS=-g -O2 -W -Wall" "LIBCXXFLAGS=-g -O2 -fno-implicit-templates" "LOADLIBES=" "LDFLAGS=" "MAKEINFO=/pika/dbellert/Stuff10/build-binutils/texinfo/makeinfo/makeinfo " "SHLIB=libstdc++.so.2.10.0" "SHCURSES=" "RUNTESTFLAGS=" make[2]: Entering directory `/pika/dbellert/Stuff10/build-binutils/mips-ecoff/libiberty' make[2]: *** No targets specified and no makefile found. Stop. make[2]: Leaving directory `/pika/dbellert/Stuff10/build-binutils/mips-ecoff/libiberty' make[1]: *** [../libiberty/libiberty.a] Error 2 make[1]: Leaving directory `/pika/dbellert/Stuff10/build-binutils/mips-ecoff/libstdc++' make: *** [all-target-libstdc++] Error 2 ------------------------------------------------------------------------------------------------------------ Can anyone please provide some insight as to the source of these errors and what I need to do to fix them? I'd be much appreciative. Thanks, Darrell From gcc-help-return-4174-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 29 17:27:37 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 6902 invoked by alias); 29 Nov 2000 17:27:36 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 6862 invoked from network); 29 Nov 2000 17:27:32 -0000 Received: from thanatos.delet.ufrgs.br (postfix@143.54.29.92) by sourceware.cygnus.com with SMTP; 29 Nov 2000 17:27:32 -0000 Received: from delet.ufrgs.br (styx.delet.ufrgs.br [143.54.30.65]) by thanatos.delet.ufrgs.br (Postfix) with ESMTP id A24F17887C for ; Wed, 29 Nov 2000 14:28:20 -0200 (BRST) Message-ID: <3A253CB6.C028DC38@delet.ufrgs.br> Date: Wed, 29 Nov 2000 15:28:22 -0200 From: Marcelo =?iso-8859-1?Q?G=F6tz?= Organization: UFRGS X-Mailer: Mozilla 4.73 [en] (X11; U; Linux 2.2.13 i686) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: Help for error Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Hello, My name is Marcelo. I'm looking for same explanation about a specific error message, when a try to compile a version of a uCLinux: "m68k-coff-gcc: Internal compiler error: program cc1 got fatal signal 11" I use a version 2.7.2.3 of gcc. Thank you, Marcelo Gotz From gcc-help-return-4175-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Wed Nov 29 22:17:32 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 15672 invoked by alias); 29 Nov 2000 22:17:31 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 15632 invoked from network); 29 Nov 2000 22:17:25 -0000 Received: from fencepost.gnu.org (we-refuse-to-spy-on-our-users@199.232.76.164) by sourceware.cygnus.com with SMTP; 29 Nov 2000 22:17:25 -0000 Received: from 200.49.33.19.addr.nap.com.ar ([200.49.33.19] helo=gogh.uyr.com.ar) by fencepost.gnu.org with esmtp (Exim 3.16 #1 (Debian)) id 141FXD-0006f0-00 for ; Wed, 29 Nov 2000 17:17:05 -0500 Received: from uyr.com.ar (200.49.33.27.addr.nap.com.ar [200.49.33.27]) by gogh.uyr.com.ar (8.9.1/8.9.1) with ESMTP id TAA07171; Wed, 29 Nov 2000 19:16:55 -0300 (ARG) Message-ID: <3A257FDE.352E0D49@uyr.com.ar> Date: Wed, 29 Nov 2000 19:14:54 -0300 From: Francisco Mancardi X-Mailer: Mozilla 4.72 [en] (WinNT; I) X-Accept-Language: en MIME-Version: 1.0 To: help-gcc@gnu.org Subject: [Fwd: Maybe a stupid question] Content-Type: multipart/signed; protocol="application/x-pkcs7-signature"; micalg=sha1; boundary="------------ms070992B244506E607B10C526" This is a cryptographically signed message in MIME format. --------------ms070992B244506E607B10C526 Content-Type: multipart/mixed; boundary="------------D292DAB5AE170F90E4806C98" This is a multi-part message in MIME format. --------------D292DAB5AE170F90E4806C98 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit --------------D292DAB5AE170F90E4806C98 Content-Type: message/rfc822 Content-Transfer-Encoding: 7bit Content-Disposition: inline Received: from agnostic.ebb.org (agnostic.ebb.org [206.112.217.56]) by gogh.uyr.com.ar (8.9.1/8.9.1) with ESMTP id TAA07122 for ; Wed, 29 Nov 2000 19:07:12 -0300 (ARG) Received: from atheist (mail@atheist [10.18.73.40]) by agnostic.ebb.org (8.9.3/8.8.7) with ESMTP id RAA07020 for ; Wed, 29 Nov 2000 17:06:54 -0500 Received: from bkuhn by atheist with local (Exim 3.12 #1 (Debian)) id 141FNN-0001RW-00; Wed, 29 Nov 2000 17:06:53 -0500 Date: Wed, 29 Nov 2000 17:06:53 -0500 From: Free Software Foundation To: Francisco Mancardi Subject: Re: Maybe a stupid question Message-ID: <20001129170653.O24166@ebb.org> References: <3A2431F7.8FE94A58@uyr.com.ar> Mime-Version: 1.0 Content-Disposition: inline User-Agent: Mutt/1.2.5i In-Reply-To: <3A2431F7.8FE94A58@uyr.com.ar>; from fman@uyr.com.ar on Tue, Nov 28, 2000 at 07:30:15PM -0300 X-Who-Answered: bkuhn Content-Type: multipart/signed; micalg=pgp-md5; protocol="application/pgp-signature"; boundary="pWvls6SgojIh1mq8" --pWvls6SgojIh1mq8 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline Francisco Mancardi wrote: > I have searched the GCC documentation looking for info about macro You should send this question to the GCC users' mailing list: help-gcc@gnu.org. This is gated to the news group, gnu.gcc.help. You can subscribe to the mailing list by sending the word "subscribe" to the address help-gcc-request@gnu.org. You can find a complete list of our mailing lists and newsgroups on our web site at http://www.gnu.org/prep/mailinglists.html. Good luck and happy hacking! > directives (#ifdef, #endif, ecc) and special predefined variables like > __FUNCTION__ (there is something like __FILE__, > and __LINE__) and I found nothing. > Do I search in the wrong place ? > Can you give me a hint ? > > Thanks a lot > > Francisco Mancardi -- Bradley M. Kuhn Free Software Foundation | Phone: +1-617-542-5942 59 Temple Place, Suite 330 | Fax: +1-617-542-2652 Boston, MA 02111-1307 USA | Web: http://www.gnu.org --pWvls6SgojIh1mq8 Content-Type: application/pgp-signature Content-Disposition: inline -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.0.4 (GNU/Linux) Comment: For info see http://www.gnupg.org iD8DBQE6JX3953XjJNtBs4cRAkKcAJ460aKYYzA0RW6vCAt8DMYnhDXsLgCdENMf EJGGMtOzL+gEsTsvB+67dRI= =M/WJ -----END PGP SIGNATURE----- --pWvls6SgojIh1mq8-- --------------D292DAB5AE170F90E4806C98-- --------------ms070992B244506E607B10C526 Content-Type: application/x-pkcs7-signature; name="smime.p7s" Content-Transfer-Encoding: base64 Content-Disposition: attachment; filename="smime.p7s" Content-Description: S/MIME Cryptographic Signature MIIG1wYJKoZIhvcNAQcCoIIGyDCCBsQCAQExCzAJBgUrDgMCGgUAMAsGCSqGSIb3DQEHAaCC BKAwggScMIIEBaADAgECAgEhMA0GCSqGSIb3DQEBBAUAMIHJMQswCQYDVQQGEwJBUjEOMAwG A1UECBYFQ0ZfQkExHzAdBgNVBAcTFkNpdWRhZCBkZSBCdWVub3MgQWlyZXMxHDAaBgNVBAoT E1V5UiBDb25zdWx0b3JlcyBTUkwxKDAmBgNVBAsTH0NlcnRpZmljYWRvciBkZSBjbGF2ZXMg cHVibGljYXMxHTAbBgNVBAMTFE9maWNpYWwgQ2VydGlmaWNhZG9yMSIwIAYJKoZIhvcNAQkB FhNhZG1pbkBjYS51eXIuY29tLmFyMB4XDTAwMDkyNTE4MDM1NloXDTAxMDkyNTE4MDM1Nlow PTEbMBkGA1UEAxMSRnJhbmNpc2NvIE1hbmNhcmRpMR4wHAYJKoZIhvcNAQkBFg9mbWFuQHV5 ci5jb20uYXIwgZ8wDQYJKoZIhvcNAQEBBQADgY0AMIGJAoGBAOp/r3eEIw7PZo6tfS22Xc5C qXUsBm7YFx9NUv3ZmeGApM4uTjvVfvvv1+WgAbJZ0Lcqx0BNQ2nk0yBo3agSsyeijNQ7BZWg 0DaXatQxJYtaCnJ9nVcKx9AO8/12eMRJOaRCki15onYUbCLzfxKreEtar8y0N6iAwliml05Y 0l45AgMBAAGjggIdMIICGTAJBgNVHRMEAjAAMBEGCWCGSAGG+EIBAQQEAwIFoDCBnAYJYIZI AYb4QgENBIGOFoGLTG9zIGRhdG9zIHF1ZSBmaWd1cmFuIGVuIGVzdGUgQ2VydGlmaWNhZG8g ZGUgUHJ1ZWJhcyBubyBoYW4gc2lkbyB2ZXJpZmljYWRvcyAtIERhdGEgc2hvd24gaW4gdGhp cyB0ZXN0IGNlcnRpZmljYXRlIHdlcmUgbm90IHZlcmlmaWVkIGF0IGFsbDAdBgNVHQ4EFgQU 4gWtm0F55+RemO0X2XCjxTfkccYwgfYGA1UdIwSB7jCB64AU2cV8mEM6/aZPt7v8C8odj+Ep zMyhgc+kgcwwgckxCzAJBgNVBAYTAkFSMQ4wDAYDVQQIFgVDRl9CQTEfMB0GA1UEBxMWQ2l1 ZGFkIGRlIEJ1ZW5vcyBBaXJlczEcMBoGA1UEChMTVXlSIENvbnN1bHRvcmVzIFNSTDEoMCYG A1UECxMfQ2VydGlmaWNhZG9yIGRlIGNsYXZlcyBwdWJsaWNhczEdMBsGA1UEAxMUT2ZpY2lh bCBDZXJ0aWZpY2Fkb3IxIjAgBgkqhkiG9w0BCQEWE2FkbWluQGNhLnV5ci5jb20uYXKCAQAw QgYJYIZIAYb4QgEEBDUWM2h0dHBzOi8vY2EyLnV5ci5jb20uYXIvcy9jYS11c2VyL2NoZWNr LXJldjA/c2VyaWFsPTANBgkqhkiG9w0BAQQFAAOBgQBAX3zQEwjSenkMZVlKZru/JVjsYzs1 aXb83NFHIz689b35OQmvn5sqgBIZtu95mcWB0ZGswyZGZU3I8RsfSlqXVnCFERy8Dxpytvb+ 38bcaggZNNVrEqDl0dtxbaT+dQRiQvZdzVEcXnmdv8bcOxZ8Sp83MlFbFx2BPER9jdIXqDGC Af8wggH7AgEBMIHPMIHJMQswCQYDVQQGEwJBUjEOMAwGA1UECBYFQ0ZfQkExHzAdBgNVBAcT FkNpdWRhZCBkZSBCdWVub3MgQWlyZXMxHDAaBgNVBAoTE1V5UiBDb25zdWx0b3JlcyBTUkwx KDAmBgNVBAsTH0NlcnRpZmljYWRvciBkZSBjbGF2ZXMgcHVibGljYXMxHTAbBgNVBAMTFE9m aWNpYWwgQ2VydGlmaWNhZG9yMSIwIAYJKoZIhvcNAQkBFhNhZG1pbkBjYS51eXIuY29tLmFy AgEhMAkGBSsOAwIaBQCggYYwGAYJKoZIhvcNAQkDMQsGCSqGSIb3DQEHATAcBgkqhkiG9w0B CQUxDxcNMDAxMTI5MjIxNDU1WjAjBgkqhkiG9w0BCQQxFgQUYjZbWEywGiMzKLk5cQU0X0Sv +BUwJwYJKoZIhvcNAQkPMRowGDAHBgUrDgMCBzANBggqhkiG9w0DAgIBKDANBgkqhkiG9w0B AQEFAASBgNBXNQerkOhHG5QhQi0jy0ziVnPdGEMv+UiBvLIMwxaz1dOuerTjoHIoODweHRyR nvdIjSAHDssbSZRaniYShUigSFEQji6FkBQxlEoMTVANvNEwApYYgkbW4MTiQCatboYrRfNY eesI570tNH7/7gIIUBSM5u9sk/SzIrXWnX0/ --------------ms070992B244506E607B10C526-- From gcc-help-return-4176-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 03:22:47 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 20927 invoked by alias); 30 Nov 2000 03:22:46 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 20896 invoked from network); 30 Nov 2000 03:22:45 -0000 Received: from mcs.ipc.ibaraki.ac.jp (157.80.76.51) by sourceware.cygnus.com with SMTP; 30 Nov 2000 03:22:45 -0000 Received: from mcs.ipc.ibaraki.ac.jp (geod1.sci.ibaraki.ac.jp [157.80.53.142]) by mcs.ipc.ibaraki.ac.jp (8.9.3/3.7W99030213) with ESMTP id MAA09362 for ; Thu, 30 Nov 2000 12:22:26 +0900 (JST) Message-ID: <3A25C8C3.BEBC8CE6@mcs.ipc.ibaraki.ac.jp> Date: Thu, 30 Nov 2000 12:25:55 +0900 From: vijaykumar X-Mailer: Mozilla 4.7 [en] (Win98; I) X-Accept-Language: en MIME-Version: 1.0 To: gnu Subject: f90 compilation on Ultra5 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit I have some fortran library archives compiled on Sun Ultra4 (older verstion of f90 compiler) and which are to be ported on to a new version of f90 compiler on Sun Ultra5 work staion. On compilation it gives errors "undefined symbol" Is there anyway I can overcome this.... Regards Vijay From gcc-help-return-4177-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 10:12:32 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 29013 invoked by alias); 30 Nov 2000 10:12:32 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 28986 invoked from network); 30 Nov 2000 10:12:27 -0000 Received: from gauntlet.didata.co.za (HELO zandfwsh2.DIDATA.CO.ZA) (196.33.55.162) by sourceware.cygnus.com with SMTP; 30 Nov 2000 10:12:27 -0000 Received: FROM zandfexc4.didata.co.za BY zandfwsh2.DIDATA.CO.ZA ; Thu Nov 30 12:09:57 2000 +0200 Received: by zandfexc4.didata.co.za with Internet Mail Service (5.5.2650.21) id ; Thu, 30 Nov 2000 12:11:23 +0200 Message-ID: From: Henry Kleynhans To: "'gcc-help@gcc.gnu.org'" Subject: Compiling libstdc++ on Solaris 7. Date: Thu, 30 Nov 2000 12:11:06 +0200 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2650.21) Content-Type: text/plain; charset="iso-8859-1" Hi All, I'm pretty new to building gcc. I've installed the gcc-2.95.2 package from http://www.sunfreeware.com. According to the documentation I need to rebuild libstdc++ on solaris with the -fsquangle option in order to be able to build libraries with the -fsquangle option. I've downloaded the gcc sources, but it seems that there is no configure script in the libstdc++ directory. Also Solaris 7 does not seem to have the build tools installed by default. Can someone please tell me what I need to do in order to be able to compile it. Thanks. Best regards, Henry From gcc-help-return-4178-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 12:27:32 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 8022 invoked by alias); 30 Nov 2000 12:27:31 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 7982 invoked from network); 30 Nov 2000 12:27:24 -0000 Received: from youzen.bishounen.st (root@212.246.224.34) by sourceware.cygnus.com with SMTP; 30 Nov 2000 12:27:24 -0000 Received: from localhost (mikil@localhost) by youzen.bishounen.st (8.9.3/8.9.3) with ESMTP id OAA04341 for ; Thu, 30 Nov 2000 14:27:43 +0200 Date: Thu, 30 Nov 2000 14:27:43 +0200 (EET) From: MiKiL To: gcc-help@gcc.gnu.org Subject: upgrading from RH6.0 egcs to gcc Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=ISO-8859-1 Content-Transfer-Encoding: QUOTED-PRINTABLE I have egcs-1.1.12 from Redhat 6.0 and I want to upgrade it to gcc-2.95.2 but there is some problems with libstdc++ . GCC compiles fine but now I have some difficulties.. EGCS & libstdc++ packages comes with their own share versions but GCC gives new version of libstdc++. If I take old libstdsc++ package off then I have lotsa non-working programs :P Is there any way keep old libstdc++ for older programs and compile new programs with gcc=B4s new library.. I tested compiling a program that links libstdc++ but it linked both new and old libs for it.. :P Any ideas to workaround this problem?? --=20 --- MiKiL --- From gcc-help-return-4179-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 13:02:11 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 18141 invoked by alias); 30 Nov 2000 13:02:08 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 18098 invoked from network); 30 Nov 2000 13:02:03 -0000 Received: from fencepost.gnu.org (we-refuse-to-spy-on-our-users@199.232.76.164) by sourceware.cygnus.com with SMTP; 30 Nov 2000 13:02:03 -0000 Received: from [200.9.212.21] (helo=infoviaplus.net.ar) by fencepost.gnu.org with esmtp (Exim 3.16 #1 (Debian)) id 141TK7-0003qj-00 for ; Thu, 30 Nov 2000 08:00:30 -0500 Received: from j5j6c9.cpsarg.com ([209.13.248.143]) by infoviaplus.net.ar (Tid InfoMail Exchanger v2.20) with SMTP id #975589058.045660003; Thu, 30 Nov 2000 09:57:38 -0300 Message-Id: <5.0.0.25.0.20001130095602.009db950@pop.infovia.com.ar> X-Sender: c1intech@pop.infovia.com.ar X-Mailer: QUALCOMM Windows Eudora Version 5.0 Date: Thu, 30 Nov 2000 09:59:23 -0300 To: help-gcc@gnu.org From: Sonia Cortassa Subject: I need some help with an stability analysis subroutine package (second part) Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=====================_2516153==_" X-Infomail-Id: 975589058.11D603AC1E03A8.49058 --=====================_2516153==_ Content-Type: multipart/alternative; boundary="=====================_2516163==_.ALT" --=====================_2516163==_.ALT Content-Type: text/plain; charset="us-ascii" Hello! I am writing because I am currently using a software for continuation and bifurcation analysis in ordinary differential equations. Its name is AUTO and was created in 1986 by E. Doedle at Caltech. I must admit I am not a program developer, neither am I familiar with fortran 77 synthaxis. I am just able to run this software as a tool for my studies of models of biological systems. Some people have helped me to install this software in a GNU/Linux operating system that I am now using with g77. My specific question is the following: I need to use it to evaluate stability in a large model (11 variables) and the problem is that the output files only display the first six variables. I know it is computing all the eleven variables since in the unit where the eigen values are stored there are 11 of them but the units 6, 7, 8 and 9 where the actual value of the variables is printed does not display them all. My question is how can I modify the software, since I know it is able to deal with up to 25 variables, for it to display all the variables I need? Attached you'll find the source code of the preprocessor of the AUTO package called "AUTPRPD.F" and the subroutines library "AUTLIBD.F" (due to size reasons this file was divided in two files AUTLIBDa .F and AUTLIBDb.F this second file is attached to a second part of the message) Thank you very much in advance for your help Sonia Cortassa ############################################ Sonia Cortassa, PhD Instituto Tecnologico de Chascomus, Casilla Correo 164 7130 - Chascomus, Pvcia Buenos Aires Tel: 54 2241 424049 Fax: 54 2241 424048 E-mail: maaon@criba.edu.ar ############################################ --=====================_2516163==_.ALT Content-Type: text/html; charset="us-ascii" Hello!
I am writing because I am currently using a software for continuation and bifurcation analysis in ordinary differential equations. Its name is AUTO and was created in 1986 by E. Doedle at Caltech. I must admit I am not a program developer, neither am I familiar with fortran 77 synthaxis. I am just able to run this software as a tool for my studies of models of biological systems. Some people have helped me to install this software in a GNU/Linux operating system that I am now using with g77.
My specific question is the following: I need to use it to evaluate stability in a large model (11 variables) and the problem is that the output files only display the first six variables. I know it is computing all the eleven variables since in the unit where the eigen values are stored there are 11 of them but the units 6, 7, 8 and 9 where the actual value of the variables is printed does not display them all. My question is how can I modify the software, since I know it is able to deal with up to 25 variables, for it to display all the variables I need?
Attached you'll find the source code of the preprocessor of the AUTO package called "AUTPRPD.F" and the subroutines library "AUTLIBD.F" (due to size reasons this file was divided in two files AUTLIBDa .F and AUTLIBDb.F this second file is attached to a second part of the message)
Thank you very much in advance for your help
Sonia Cortassa

############################################
Sonia Cortassa, PhD
Instituto Tecnologico de Chascomus,
Casilla Correo 164
7130 - Chascomus, Pvcia Buenos Aires

Tel: 54 2241 424049
Fax: 54 2241 424048

E-mail: maaon@criba.edu.ar
############################################ --=====================_2516163==_.ALT-- --=====================_2516153==_ Content-Type: text/plain; charset="us-ascii" C----------------------------------------------------------------------- C----------------------------------------------------------------------- C this document contains the second part of the library file AUTLIBD.F C C A U T O 8 6 C C C A Subroutine Package for the Bifurcation Analysis of C Autonomous Systems of Ordinary Differential Equations. C C C Author : Eusebius Doedel C Applied Mathematics 217-50 C California Institute of Technology C Pasadena, California 91125 C C (Further distribution requires notification of the author.) C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C Version January 1986 (Partially Vectorized). C Updated : August 1987 C C For Documentation see the AUTO 86 User Manual. C C------------------------------------------------------------------- C------------------------------------------------------------------- C------------------------------------------------------------------- C------------------------------------------------------------------- C Detection and Location of Bifurcations in Boundary Value Problems C------------------------------------------------------------------- C------------------------------------------------------------------- C C ---------- ------ SUBROUTINE LCSPBV(FNCS,FUNI,BCNI,ICNI,ISTOP,ITP,SP1,NITPS,IBR, * NTOT,M1AA,M2AA,AA,M1BB,M2BB,BB,M1CC,CC,M1DD,DD,WBRBD,M1U,UPS, * UOLDPS,UDOTPS,UPOLDP,RHSA,RHSD,DUPS,TM,DTM,U,F,M1DF,DFDU,DFDP, * UBC0,UBC1,M1BC,DBC,UICD,FICD,M1IC,DICD,IR,IC,IWBRBD,P0,P1,POIN, * EV,WKEV) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C This subroutine uses the Secant method to accurately locate limit C points, bifurcation points, and zero(es) of function(s) from USZR. C Such points are located as points on a solution branch where the C EXTERNAL function FNCS changes sign. C It involves calling the basic solution subroutines CONTBV and SOLVBV C with decreasing values of RDS (stepsize along branch). C The point is assumed to have been found with sufficient accuracy if C the ratio between RDS and the user supplied value of DS is less than C the user-supplied tolerance EPSS. C This subroutine is called from CNRLB, which controls the computation C of branches of solutions to general boundary value problems. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLTHT/ THETAL(20),THETAU COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLEPS/ EPSL(20),EPSU,EPSS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLDET/ DETGE,NINS C EXTERNAL FUNI,BCNI,ICNI C COMPLEX*16 EV(NDIM) CSGLE COMPLEX*8 EV(NDIM) C LOGICAL CHNG C DIMENSION AA(M1AA,M2AA,1),BB(M1BB,M2BB,1),CC(M1CC,1),DD(M1DD,1) DIMENSION UPS(M1U,1),UDOTPS(M1U,1),UPOLDP(M1U,1),UOLDPS(M1U,1) DIMENSION RHSA(M1U,1),RHSD(1),DUPS(M1U,1),TM(1),DTM(1),U(1),F(1) DIMENSION DFDU(M1DF,1),DFDP(M1DF,1),WBRBD(1),IWBRBD(1),IR(1),IC(1) DIMENSION UBC0(1),UBC1(1),DBC(M1BC,1),UICD(1),FICD(1),DICD(M1IC,1) DIMENSION P0(NDIM,1),P1(NDIM,1),POIN(NDIM,1),WKEV(NDIM) C SP10=SP1 C C Check for zero. C SP1=FNCS(CHNG,FUNI,BCNI,ICNI,ISTOP,ITP,NITPS,P0,P1,POIN,EV,WKEV, * IBR,NTOT,M1AA,M2AA,AA,M1BB,M2BB,BB,M1CC,CC,M1DD,DD,WBRBD, * M1U,UPS,UOLDPS,UDOTPS,UPOLDP,RHSA,RHSD,DUPS,TM,DTM,U,F,M1DF, * DFDU,DFDP,UBC0,UBC1,M1BC,DBC,UICD,FICD,M1IC,DICD,IR,IC,IWBRBD) C PSP1=SP10*SP1 NTOTP1=NTOT+1 IF(PSP1.GE.ZERO .OR. (.NOT. CHNG))RETURN C C Compute next RDS by a perturbed Secant method : C RDS=RDSOLD NITSP1=0 1 DSP1=SP10-SP1 IF(DSP1.EQ.ZERO)RDS=ZERO IF(DSP1.NE.ZERO)RDS=SP1/DSP1*RDS RDS=(ONE+HMACH)*RDS C C If requested write additional output on unit 9 : C IF(IID.GE.2)WRITE(9,102)NITSP1,RDS C C Return if tolerance has been met : C RRDS=DABS(RDS)/(ONE+DABS(DS)) CSGLE RRDS= ABS(RDS)/(ONE+ ABS(DS)) IF(RRDS.LT.EPSS) THEN ITP=-1 RETURN ENDIF C CALL CONTBV(FUNI,RDS,M1U,UPS,UOLDPS,UDOTPS,UPOLDP,U,F,M1DF,DFDU, * DFDP,DTM) CALL SOLVBV(FUNI,BCNI,ICNI,ISTOP,RDS,NITPS,IBR,NTOT,M1AA,M2AA,AA, * M1BB,M2BB,BB,M1CC,CC,M1DD,DD,WBRBD,M1U,UPS,UOLDPS,UDOTPS,UPOLDP, * RHSA,RHSD,DUPS,TM,DTM,U,F,M1DF,DFDU,DFDP,UBC0,UBC1,M1BC,DBC, * UICD,FICD,M1IC,DICD,IR,IC,IWBRBD) IF(ISTOP.NE.0)THEN SP1=ZERO RETURN ENDIF C C Check for zero. C SP10=SP1 SP1=FNCS(CHNG,FUNI,BCNI,ICNI,ISTOP,ITP,NITPS,P0,P1,POIN,EV,WKEV, * IBR,NTOT,M1AA,M2AA,AA,M1BB,M2BB,BB,M1CC,CC,M1DD,DD,WBRBD, * M1U,UPS,UOLDPS,UDOTPS,UPOLDP,RHSA,RHSD,DUPS,TM,DTM,U,F,M1DF, * DFDU,DFDP,UBC0,UBC1,M1BC,DBC,UICD,FICD,M1IC,DICD,IR,IC,IWBRBD) C NITSP1=NITSP1+1 IF(NITSP1.LE.ITMX)GOTO 1 C WRITE(9,101)IBR,NTOTP1 SP1=ZERO 101 FORMAT(' *** POSSIBLE SINGULAR POINT (BRANCH ',I3,' POINT ', * I4,')') 102 FORMAT(' * DETECTION OF SINGULAR POINT : ITERATION ',I3, * ' STEPSIZE =',E11.3) C RETURN END C C ------ --------- DOUBLE PRECISION CSGLE REAL *FUNCTION FNLPBV(CHNG,FUNI,BCNI,ICNI,ISTOP,ITP,NITPS,P0,P1,POIN,EV, * WKEV,IBR,NTOT,M1AA,M2AA,AA,M1BB,M2BB,BB,M1CC,CC,M1DD,DD,WBRBD, * M1U,UPS,UOLDPS,UDOTPS,UPOLDP,RHSA,RHSD,DUPS,TM,DTM,U,F,M1DF, * DFDU,DFDP,UBC0,UBC1,M1BC,DBC,UICD,FICD,M1IC,DICD,IR,IC,IWBRBD) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C RETURNS A QUANTITY THAT CHANGES SIGN AT A LIMIT POINT (BVP) C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLEPS/ EPSL(20),EPSU,EPSS COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C COMPLEX*16 EV(NDIM) CSGLE COMPLEX*8 EV(NDIM) C LOGICAL CHNG C EXTERNAL FUNI,BCNI,ICNI C DIMENSION AA(M1AA,M2AA,1),BB(M1BB,M2BB,1),CC(M1CC,1),DD(M1DD,1) DIMENSION UPS(M1U,1),UDOTPS(M1U,NROW),UPOLDP(M1U,1),UOLDPS(M1U,1) DIMENSION RHSA(M1U,NROW),RHSD(NDRHS),DUPS(M1U,1),TM(1),DTM(1),U(1) DIMENSION UBC0(1),UBC1(1),DBC(M1BC,1),UICD(1),FICD(1),DICD(M1IC,1) DIMENSION IR(1),IC(1),IWBRBD(1),F(1),DFDU(M1DF,1),DFDP(M1DF,1) DIMENSION P0(NDIM,1),P1(NDIM,1),POIN(NDIM,1),WKEV(NDIM),WBRBD(1) C C Find the direction vector. C IFST=0 IF(IID.LT.4)THEN IIBR=0 ELSE IF(IID.EQ.4)THEN IIBR=1 ELSE IIBR=2 ENDIF CALL BRBD(NTST,NROW,NCLM,M1AA,M2AA,AA,NFPAR,M1BB,M2BB,BB,NRC, * M1CC,CC,M1DD,DD,M1U,RHSA,RHSD,WBRBD,IIBR,IFST,IR,IC,IWBRBD,-1) C DO 1 I=1,NDIM UDOTPS(NTST+1,I)=RHSD(I) 1 CONTINUE DO 2 I=1,NFPAR RLDOT(I)=RHSD(NDIM+I) 2 CONTINUE C DO 4 J=1,NTST DO 3 I=1,NROW UDOTPS(J,I)=RHSA(J,I) 3 CONTINUE 4 CONTINUE C C Scale the direction vector. C CALL SCALEB(M1U,UDOTPS,RLDOT,DTM) IF(IID.GE.2)WRITE(9,101)RLDOT(1) C C Set the quantity to be returned. C FNLPBV=RLDOT(1) IF(IABS(ISP).EQ.3)FNLPBV=RLDOT(2) CHNG=.TRUE. C 101 FORMAT(' LIMIT POINT FUNCTION = ',E11.3) C RETURN END C C ------ --------- DOUBLE PRECISION CSGLE REAL *FUNCTION FNBPBV(CHNG,FUNI,BCNI,ICNI,ISTOP,ITP,NITPS,P0,P1,POIN,EV, * WKEV,IBR,NTOT,M1AA,M2AA,AA,M1BB,M2BB,BB,M1CC,CC,M1DD,DD,WBRBD, * M1U,UPS,UOLDPS,UDOTPS,UPOLDP,RHSA,RHSD,DUPS,TM,DTM,U,F,M1DF, * DFDU,DFDP,UBC0,UBC1,M1BC,DBC,UICD,FICD,M1IC,DICD,IR,IC,IWBRBD) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLEPS/ EPSL(20),EPSU,EPSS COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLDET/ DETGE,NINS C COMPLEX*16 EV(NDIM) CSGLE COMPLEX*8 EV(NDIM) C LOGICAL CHNG C EXTERNAL FUNI,BCNI,ICNI C DIMENSION AA(M1AA,M2AA,1),BB(M1BB,M2BB,1),CC(M1CC,1),DD(M1DD,1) DIMENSION UPS(M1U,1),UDOTPS(M1U,1),UPOLDP(M1U,1),UOLDPS(M1U,1) DIMENSION RHSA(M1U,1),RHSD(1),DUPS(M1U,1),TM(1),DTM(1),U(1) DIMENSION UBC0(1),UBC1(1),DBC(M1BC,1),UICD(1),FICD(1),DICD(M1IC,1) DIMENSION IR(1),IC(1),IWBRBD(1),F(1),DFDU(M1DF,1),DFDP(M1DF,1) DIMENSION P0(NDIM,1),P1(NDIM,1),POIN(NDIM,1),WKEV(NDIM),WBRBD(1) C C Save the determinant of the reduced system. C DET=DETGE C C Compute the determinant of P1. CALL GE(NDIM,NDIM,P1,0,1,U,1,F,IR,IC) C C Set the determinant of the normalized reduced system. C IF(DETGE.NE.ZERO)THEN FNBPBV=DET/DETGE CHNG=.TRUE. ELSE FNBPBV=ZERO CHNG=.FALSE. ENDIF C IF(IID.GE.2)WRITE(9,101)FNBPBV 101 FORMAT(' BIFURCATION FUNCTION = ',E11.3) C RETURN END C C ------ --------- DOUBLE PRECISION CSGLE REAL *FUNCTION FNSPBV(CHNG,FUNI,BCNI,ICNI,ISTOP,ITP,NITPS,P0,P1,POIN,EV, * WKEV,IBR,NTOT,M1AA,M2AA,AA,M1BB,M2BB,BB,M1CC,CC,M1DD,DD,WBRBD, * M1U,UPS,UOLDPS,UDOTPS,UPOLDP,RHSA,RHSD,DUPS,TM,DTM,U,F,M1DF, * DFDU,DFDP,UBC0,UBC1,M1BC,DBC,UICD,FICD,M1IC,DICD,IR,IC,IWBRBD) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C This function returns a quantity that changes sign when a complex C pair of eigenvalues of the linearized Poincare map moves in or out C of the unit circle. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLEPS/ EPSL(20),EPSU,EPSS COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLDET/ DETGE,NINS C COMPLEX*16 EV(NDIM),ZTMP CSGLE COMPLEX*8 EV(NDIM),ZTMP C LOGICAL CHNG C EXTERNAL FUNI,BCNI,ICNI C DIMENSION AA(M1AA,M2AA,1),BB(M1BB,M2BB,1),CC(M1CC,1),DD(M1DD,1) DIMENSION UPS(M1U,1),UDOTPS(M1U,1),UPOLDP(M1U,1),UOLDPS(M1U,1) DIMENSION RHSA(M1U,1),RHSD(1),DUPS(M1U,1),TM(1),DTM(1),U(1) DIMENSION UBC0(1),UBC1(1),DBC(M1BC,1),UICD(1),FICD(1),DICD(M1IC,1) DIMENSION IR(1),IC(1),IWBRBD(1),F(1),DFDU(M1DF,1),DFDP(M1DF,1) DIMENSION P0(NDIM,1),P1(NDIM,1),POIN(NDIM,1),WKEV(NDIM),WBRBD(1) C C Initialize. C FNSPBV=ZERO D=ZERO CHNG=.FALSE. C C Compute the linearization of the Poincare map. C CALL POINC(NDIM,P0,P1,POIN,IID,IR,IC) C C Compute the Floquet multipliers. C CALL EIG(NDIM,NDIM,POIN,EV,WKEV,IER) C C Order the Floquet multipliers by distance from z=1. C DO 2 I=1,NDIM-1 AMIN=RLARGE DO 1 J=I,NDIM AZM1=CDABS( EV(J) - ONE ) CSGLE AZM1= CABS( EV(J) - ONE ) IF(AZM1.GT.AMIN)GOTO 1 AMIN=AZM1 LOC=J 1 CONTINUE IF(LOC.NE.I) THEN ZTMP=EV(LOC) EV(LOC)=EV(I) EV(I)=ZTMP ENDIF 2 CONTINUE C C Find eigenvalue closest to the unit circle C (excluding the eigenvalue at z=1). C NINS1=IABS(ISP)-1 IF(NINS1.LT.1)NINS1=1 IF(NINS1.GT.NDIM)NINS1=NDIM C IF(NINS1.LT.NDIM)THEN AMIN=RLARGE DO 3 I=NINS1+1,NDIM D=CDABS(EV(I)) - ONE CSGLE D= CABS(EV(I)) - ONE AD=DABS(D) CSGLE AD= ABS(D) IF(AD.GT.AMIN)GOTO 3 AMIN=AD LOC=I 3 CONTINUE C Interchange, to put eigenvalue in ISP'th position. ISP1=ISP IF(ISP.EQ.1)ISP1=2 IF(LOC.NE.ISP1) THEN ZTMP=EV(LOC) EV(LOC)=EV(ISP1) EV(ISP1)=ZTMP ENDIF ENDIF C C Print error message if the Floquet multiplier at z=1 is inaccurate. C (ISP is set to negative and detection of bifurations is discontinued) C AMIN=CDABS( EV(1) - ONE ) CSGLE AMIN= CABS( EV(1) - ONE ) C IF(AMIN.GT.5.0E-2 .AND. ISP.GT.1) THEN NTOT1=NTOT+1 IF(IID.GE.2)WRITE(9,104) WRITE(9,105)IBR,NTOT1,(EV(I),I=1,NDIM) NINS=0 WRITE(9,101) ISP=-ISP RETURN ENDIF C C Restart automatic detection if the Floquet multiplier at z=1 is C sufficiently accurate again. C IF(ISP.LT.0)THEN IF(AMIN.LT.2.0E-2)THEN WRITE(9,102) ISP=-ISP ELSE NTOT1=NTOT+1 IF(IID.GE.2)WRITE(9,104) WRITE(9,105)IBR,NTOT1,(EV(I),I=1,NDIM) RETURN ENDIF ENDIF C C Count the number of Floquet multipliers inside the unit circle. C IF(NINS1.EQ.NDIM) THEN D=ZERO FNSPBV=D GOTO 5 ENDIF C NINS2=NINS1 DO 4 I=NINS2+1,NDIM IF(CDABS(EV(I)).LE.ONE)NINS1=NINS1+1 CSGLE IF( CABS(EV(I)).LE.ONE)NINS1=NINS1+1 4 CONTINUE C IF(ISP.GE.2) THEN D=CDABS(EV(ISP)) - ONE CSGLE D= CABS(EV(ISP)) - ONE FNSPBV=D IF(NINS1.NE.NINS)CHNG=.TRUE. ENDIF 5 NINS=NINS1 IF(IID.GE.2.AND.ISP.GE.1)WRITE(9,103)D,NINS C C Print the Floquet multipliers. C NTOT1=NTOT+1 IF(NINS.EQ.NDIM)NTOT1=-NTOT1 IF(IID.GE.2)WRITE(9,104) WRITE(9,105)IBR,NTOT1,(EV(I),I=1,NDIM) C 101 FORMAT(' *** FLOQUET MULTIPLIER AT 1 INACCURATE') 102 FORMAT(' *** FLOQUET MULTIPLIER AT 1 ACCURATE AGAIN') 103 FORMAT(' BIFURCATION FUNCTION = ',E11.3, * ' # OF MULTIPLIERS IN UNIT CIRCLE =',I3) 104 FORMAT(' FLOQUET MULTIPLIERS :') 105 FORMAT(' BRANCH ',I3,' POINT ',I4,2(2X,2E12.5), * 50(/,23X,2(2X,2E12.5))) C RETURN END C C ------ --------- DOUBLE PRECISION CSGLE REAL *FUNCTION FNUZBV(CHNG,FUNI,BCNI,ICNI,ISTOP,ITP,NITPS,P0,P1,POIN,EV, * WKEV,IBR,NTOT,M1AA,M2AA,AA,M1BB,M2BB,BB,M1CC,CC,M1DD,DD,WBRBD, * M1U,UPS,UOLDPS,UDOTPS,UPOLDP,RHSA,RHSD,DUPS,TM,DTM,U,F,M1DF, * DFDU,DFDP,UBC0,UBC1,M1BC,DBC,UICD,FICD,M1IC,DICD,IR,IC,IWBRBD) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLEPS/ EPSL(20),EPSU,EPSS COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLDET/ DETGE,NINS COMMON /BLUSZ/ IUZR C COMPLEX*16 EV(NDIM) CSGLE COMPLEX*8 EV(NDIM) C LOGICAL CHNG C EXTERNAL FUNI,BCNI,ICNI C DIMENSION AA(M1AA,M2AA,1),BB(M1BB,M2BB,1),CC(M1CC,1),DD(M1DD,1) DIMENSION UPS(M1U,1),UDOTPS(M1U,1),UPOLDP(M1U,1),UOLDPS(M1U,1) DIMENSION RHSA(M1U,1),RHSD(1),DUPS(M1U,1),TM(1),DTM(1),U(1) DIMENSION UBC0(1),UBC1(1),DBC(M1BC,1),UICD(1),FICD(1),DICD(M1IC,1) DIMENSION IR(1),IC(1),IWBRBD(1),F(1),DFDU(M1DF,1),DFDP(M1DF,1) DIMENSION P0(NDIM,1),P1(NDIM,1),POIN(NDIM,1),WKEV(NDIM),WBRBD(1) C FNUZBV=USZR(IUZR,NUZR,PAR) CHNG=.TRUE. C IF(IID.GE.2)WRITE(9,101)FNUZBV 101 FORMAT(' USZR FUNCTION = ',E11.3) C RETURN END C C ---------- ----- SUBROUTINE POINC(NDIM,P0,P1,POIN,IID,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Computes the linearized Poincare map. This map is extracted from the C decomposition of the Jacobian matrix as generated by BRBD. C DIMENSION P0(NDIM,1),P1(NDIM,1),POIN(NDIM,1) DIMENSION IR(1),IC(1) C DO 2 I=1,NDIM DO 1 J=1,NDIM P0(I,J)=-P0(I,J) 1 CONTINUE 2 CONTINUE C CALL GE(NDIM,NDIM,P1,NDIM,NDIM,POIN,NDIM,P0,IR,IC) C IF(IID.GT.2) THEN WRITE(9,101) DO 3 I=1,NDIM WRITE(9,102)(POIN(I,J),J=1,NDIM) 3 CONTINUE ENDIF C 101 FORMAT(' LINEARIZED POINCARE MAP') 102 FORMAT(1X,6E21.14) C RETURN END C C ---------- ------ SUBROUTINE TPSPBV(EV,ITP) C C Determines type of secondary periodic bifurcation. C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLEPS/ EPSL(20),EPSU,EPSS COMMON /BLITP/ ITPST,ITPSP,IBRSP C COMPLEX*16 EV(NDIM) CSGLE COMPLEX*8 EV(NDIM) C C Find the eigenvalue closest to z=1. C LOC=1 AMIN=RLARGE DO 1 I=1,NDIM AZM1=CDABS( EV(I) - ONE ) CSGLE AZM1= CABS( EV(I) - ONE ) IF(AZM1.GT.AMIN)GOTO 1 AMIN=AZM1 LOC=I 1 CONTINUE C C Find the eigenvalue closest to the unit circle C (excluding the eigenvalue at z=1). C LOC1=1 AMIN=RLARGE DO 2 I=1,NDIM IF(I.EQ.LOC)GOTO 2 D=CDABS(EV(I)) - ONE CSGLE D= CABS(EV(I)) - ONE AD=DABS(D) CSGLE AD= ABS(D) IF(AD.GT.AMIN)GOTO 2 AMIN=AD LOC1=I 2 CONTINUE C IF(DABS(DIMAG(EV(LOC1))).GT.DSQRT(EPSS))THEN CSGLE IF( ABS(AIMAG(EV(LOC1))).GT. SQRT(EPSS))THEN C ** torus bifurcation ITP=8+10*ITPST PAR(12)=DASIN(DIMAG(EV(LOC1))) CSGLE PAR(12)= ASIN(AIMAG(EV(LOC1))) ELSE IF(DREAL(EV(LOC1)).LT.-HALF)THEN CSGLE ELSE IF( REAL(EV(LOC1)).LT.-HALF)THEN C ** period doubling ITP=7+10*ITPST ELSE C ** ordinary bifurcation or something else... ITP=6+10*ITPST ENDIF C RETURN END C C------------------------------------------------------------------- C------------------------------------------------------------------- C Output (Boundary Value Problems) C------------------------------------------------------------------- C------------------------------------------------------------------- C C ---------- ------ SUBROUTINE STPLBV(ISTOP,ITP,NITPS,NTOT,LAB,IBR,M1U,UPS,UDOTPS,TM, * DTM,M1DF) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Writes the bifurcation diagram on unit 7 (Differential Equations) C (Also controls the writing of complete solutions on unit 8). C Every line written contains, in order, the following: C C IBR : The label of the branch. C NTOT : The index of the point on the branch. C (Points are numbered consecutively along a branch). C If IPS=2 or 3, then the sign of NTOT indicates stability : C - = stable , + = unstable, or unknown. C ITP : An integer indicating the type of point : C C 4 ( ) : Output point (Every NPR steps along branch). C -4 (UZ) : Output point (Zero of user function USZR). C 5 (LP) : Limit point (fold). C 6 (BP) : Bifurcation point. C 7 (PD) : Period doubling bifurcation. C 8 (TR) : Bifurcation to an invariant torus. C 9 (EP) : End point of branch, normal termination. C -9 (MX) : End point of branch, abnormal termination. C C LAB : The label of a special point. C PAR(ICP(1)): The principal parameter. C A : The L2-norm of the solution vector, or other measure of C the solution (see the user-supplied parameter IPLT). C MAX U(*) : The maxima of the first few solution components. C PAR(ICP(*)): Further free parameters (if any). C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLITP/ ITPST,ITPSP,IBRSP COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLDET/ DETGE,NINS COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC C DIMENSION UPS(M1U,NROW),UDOTPS(M1U,NROW) DIMENSION TM(NTSTP1),DTM(NTSTP1),UMX(7) C NTOT=NTOT+1 C C ITP is set to 4 every NPR steps along a branch of solns and the entire C solution is written on unit 8. C IF(MOD(NTOT,NPR).EQ.0 .AND. MOD(ITP,10).EQ.0)ITP=4+10*ITPST C C Check whether limits of the bifurcation diagram have been reached : C IAB=IABS(IPLT) IF(IAB.EQ.0.OR.IAB.GT.3*NDM)A=DSQRT(RNRMSQ(NDM,M1U,UPS,DTM)) CSGLE IF(IAB.EQ.0.OR.IAB.GT.3*NDM)A= SQRT(RNRMSQ(NDM,M1U,UPS,DTM)) IF(IPLT.GT.0.AND.IAB.LE.NDM)A=RMXUPS(M1U,IAB,UPS) IF(IPLT.GT.NDM.AND.IAB.LE.2*NDM)A=RINTG(M1U,IAB-NDM,UPS,DTM) IF(IPLT.GT.2*NDM.AND.IAB.LE.3*NDM)A=RNRM2(M1U,IAB-2*NDM,UPS,DTM) IF(IPLT.LT.0.AND.IAB.LE.NDM)A=RMNUPS(M1U,IAB,UPS) C IF(ISTOP.EQ.1)THEN C ** Maximum number of iterations reached somewhere. ITP=-9-10*ITPST ELSE IF(PAR(ICP(1)).LT.RL0.OR.PAR(ICP(1)).GT.RL1 * .OR. A.LT.A0.OR.A.GT.A1 .OR. NTOT.GE.NMX)THEN ISTOP=1 ITP=9+10*ITPST ENDIF ENDIF C C All special points receive label: C LAB1=0 IF(MOD(ITP,10).NE.0) THEN LAB=LAB+1 LAB1=LAB ENDIF C C Compute maxima of solution components. C N2=NDM IF(N2.GT.7)N2=7 DO 1 I=1,N2 ITMP=I UMX(I)=RMXUPS(M1U,ITMP,UPS) 1 CONTINUE C C Determine stability, and write output on units 7 and 8. C IBR1=IBR NTOT1=NTOT IF( (IPS.EQ.2.OR.IPS.EQ.3.OR.IPS.EQ.6.OR.IPS.EQ.12.OR.IPS.EQ.13) * .AND.IABS(ISW).NE.2)THEN IBR1=-IBR IF(NINS.EQ.NDIM)NTOT1=-NTOT ENDIF CALL WRLINE(IBR1,NTOT1,ITP,LAB1,A,UMX) C C Write plotting and restart data on unit 8. C IF(IRS.NE.0.AND.NTOT.EQ.1)RETURN IF(MOD(ITP,10).NE.0) * CALL WRTBV8(ITP,NTOT,LAB,IBR,M1U,UPS,UDOTPS,TM,DTM) C RETURN END C C ---------- ------ SUBROUTINE WRTBV8(ITP,NTOT,LAB,IBR,M1U,UPS,UDOTPS,TM,DTM) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Writes plotting and restart data on unit 8, viz.: C (1) data identifying the corresponding point on unit 7, C (2) the complete solution, C (3) the direction of the branch. C C Specifically the following is written: C C IBR : The index of the branch. C NTOT : The index of the point. C ITP : The type of point (see STPLBV above). C LAB : The label of the point. C NFPAR : The number of free parameters used in the computation. C ISW : The value of ISW used in the computation. C NTPL : The number of points in the time interval [0,1] for which C solution values are wriiten. C NAR : The number of values written per point. C (NAR=NDIM+1, since T and U(i), i=1,..,NDIM are written). C NROWPR: The number of lines printed following the identifying line C and before the next data set or the end of the file. C (Used for quickly skipping a data set when searching). C NTST : The number of time intervals used in the discretization. C NCOL : The number of collocation points used. C ICP : The indices of the free parameters in PAR(.). C C Following the above described identifying line there are NTPL lines C containing : C T , U-1(T) , U-2(T) , ... , U-NDIM(T), C where NDIM is the dimension of the system of differential equations. C C Following this is a line containing C RL-dot(i) , i=1,NFPAR, C C and following this are NTPL lines each containing C U-dot-1(T), U-dot-2(T), ... , U-dot-NDIM(T). C C Finally the parameter values PAR(i) , i=1,NPAR, are written. C C Above, RL-dot(.) and U-dot(.) specify the direction of the branch. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLDET/ DETGE,NINS COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLTIM/ TSETUB,TCONPA,TCONRH,TINFPA,TREDUC,TWR8 C DIMENSION UPS(M1U,NROW),UDOTPS(M1U,NROW),TM(NTSTP1),DTM(NTSTP1) C C Set initial time (for timing of this subroutine). C CALL AUTIM0(TIME0) C C Write information identifying the solution : C NTSTP1=NTST+1 NTPL=NCOL*NTST+1 NAR=NDIM+1 NRD=2+NDIM/7+NDIM/8 NROWPR=NRD*(NCOL*NTST+1) + NFPAR/8+1 + NPAR/8+1 WRITE(8,101)IBR,NTOT,ITP,LAB,NFPAR,ISW,NTPL,NAR,NROWPR,NTST,NCOL * ,(ICP(I),I=1,NFPAR) C C Write the entire solution on unit 8 : C DO 2 J=1,NTST RN=ONE/NCOL DO 1 I=1,NCOL K1=(I-1)*NDIM+1 K2=I*NDIM T=TM(J)+(I-1)*RN*DTM(J) WRITE(8,102)T,(UPS(J,K),K=K1,K2) 1 CONTINUE 2 CONTINUE WRITE(8,102)TM(NTSTP1),(UPS(NTSTP1,I),I=1,NDIM) C C Store the direction of the branch: C WRITE(8,102)(RLDOT(I),I=1,NFPAR) DO 4 J=1,NTST DO 3 I=1,NCOL K1=(I-1)*NDIM+1 K2=I*NDIM WRITE(8,102)(UDOTPS(J,K),K=K1,K2) 3 CONTINUE 4 CONTINUE WRITE(8,102)(UDOTPS(NTSTP1,K),K=1,NDIM) C C Write the parameter values. C WRITE(8,102)(PAR(I),I=1,NPAR) 101 FORMAT(11I5,20I3) 102 FORMAT(4X,1P7E18.10) C C Determine the time spent in this subroutine. C CALL AUTIM1(TIME1) TWR8=TWR8 + TIME1-TIME0 C RETURN END C C ---------- ------ SUBROUTINE WRTBV9(NITPS,IBR,NTOT,M1U,UPS,TM,DTM) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Writes additional output on unit 9. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION UPS(M1U,NROW),TM(NTSTP1),DTM(NTSTP1) C IAB=IABS(IPLT) IF(IAB.EQ.0.OR.IAB.GT.NDIM)A=DSQRT(RNRMSQ(NDM,M1U,UPS,DTM)) CSGLE IF(IAB.EQ.0.OR.IAB.GT.NDIM)A= SQRT(RNRMSQ(NDM,M1U,UPS,DTM)) IF(IPLT.GT.0.AND.IAB.LE.NDIM)A=RMXUPS(M1U,IAB,UPS) IF(IPLT.LT.0.AND.IAB.LE.NDIM)A=RMNUPS(M1U,IAB,UPS) IF(IID.GE.2)WRITE(9,101)IBR,NTOT+1,NITPS,A,(RL(I),I=1,NFPAR) C IF(.NOT.(IID.GE.5))RETURN C WRITE(9,103) DO 2 J=1,NTST RN=ONE/NCOL DO 1 I=1,NCOL T=TM(J)+(I-1)*RN*DTM(J) K1=(I-1)*NDIM+1 K2=I*NDIM WRITE(9,102)T,(UPS(J,K),K=K1,K2) 1 CONTINUE 2 CONTINUE C NTSTP1=NTST+1 WRITE(9,102)TM(NTSTP1),(UPS(NTSTP1,I),I=1,NDIM) C 101 FORMAT(' BRANCH ',I2,' N=',I4,1X,'IT=',I2,1X,'A=',1PE15.8, * 1X,' PAR= ',1P5E15.8,3(/,47X,1P5E15.8)) 102 FORMAT(1X,1P7E18.10) 103 FORMAT(' UPS :') C RETURN END C C------------------------------------------------------------------- C------------------------------------------------------------------- C Linear Equation Solver C------------------------------------------------------------------- C------------------------------------------------------------------- C C ---------- ---- SUBROUTINE BRBD(NA,NRA,NCA,MA1,MA2,A,NCB,MB1,MB2,B, * NRC,MC1,C,MD1,D,MFA1,FA,FC,WKDR,IDB,IFST,IR,IC,IWKDR,NLLV) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Solves linear systems with matrix profile: C C ----------------------------------------------- C !XXXXXXXXXX !XX! C !XXXXXXXXXX !XX! C !XXXXXXXXXX !XX! C !XXXXXXXXXX !XX! C !XXXXXXXXXX !XX! C !XXXXXXXXXX !XX! C !XXXXXXXXXX !XX! C !XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX !XX! C ! XXXXXXXXXX!XX! C ! XXXXXXXXXX!XX! C ! XXXXXXXXXX!XX! C ! XXXXXXXXXX!XX! C ! XXXXXXXXXX!XX! C ! XXXXXXXXXX!XX! C ! XXXXXXXXXX!XX! C ! XXXXXXXXXX!XX! C ----------------------------------------------- C !XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX!XX! C !XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX!XX! C !XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX!XX! C !XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX!XX! C ----------------------------------------------- C C C partioned as C C C --------- C ! ! ! ! ! ! ! C ! A !B! ! XA ! ! FA ! C ! ! ! . ! ! = ! ! . C !-----!-! !----! !----! C ! C !D! ! XC ! ! FC ! C ! ! ! ! XC ! ! FC ! C --------- C C C Input parameters : C C NA number of blocks in A, C NRA number of rows in each block of A, C NCA number of columns in each block of A, C MA1 first dimension of A from DIMENSION statement, C MA2 second dimension of A from DIMENSION statement, C A the matrix in the schematic representation above, C C NCB number of columns in each block of B, C (note that B is also three dimensional), C MB1 first dimension of B from DIMENSION statement, C MB2 second dimension of B from DIMENSION statement, C B the matrix in the schema above, C C NRC the number of rows of the two dimensional matrix C, C MC1 the first dimension of C from DIMENSION statement, C C the matrix C in the schema above, C C MD1 the first dimension of D from DIMENSION statement, C D the matrix D above, C C MFA1 the first dimension of FA from DIMENSION statement, C FA part of the right hand side vector, C (note that FA is also two dimensional), C FC part of the right hand side vector. C C WKDR: A one dimensional array used as workspace. C This array should be dimensioned at least C C (4*NOV+NCB+NRC+1)*NOV*NA+(NRC+NOV)**2+2*(NRC+2*NOV)+NRC*NOV C C with NOV defined by C C NA*(NCA-NRA)+NCB-NRC C NOV = -------------------- . C NA-1 C C IWKDR: Integer workspace array of dimension at least 3*NOV*(NA-1)+NA. C C IFST = 1 on first call, C = 0 on subsequent calls with the same right hand side. C (WKDR,IWKDR should not be modified between such calls). C C IDB = 0 no debug output, C = 1,2 debug output on unit 9, C = 3 print residuals for test problem (see PRINT2), C C IR, IC: Two integer arrays of dimension at least NRC+NOV. C C NLLV : If NLLV>0 then the system is assumed to have a NLLV- C dimensional nullspace. C In this case a null vector will be returned. C If NLLVC = -1 then the system will be solved with zero right C hand side, except for the last equation, for which the right C hand side entry will be set to 1 (i.e., the last entry of FC C will be set to 1, otherwise FA and FC are zero). C If the linear system is the same as in the preceding call C then IFST=0 may be used even if NLLV is nonzero. C C Returned values : C C FA Part of solution vector corresponding to XA in the diagram. C FC Part of solution vector corresponding to XC in the diagram. C C Note : The number of columns of overlap for every two consecutive C blocks should be equal to the number NOV defined above. C LOGICAL ERBRBD C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLBND/ NAM1,NAP1,NXE COMMON /BLCNT/ NDECOM,NBCKSB C DIMENSION A(MA1,MA2,NCA),B(MB1,MB2,NCB),C(MC1,NRC) DIMENSION D(MD1,NCB),WKDR(NWBR) DIMENSION FA(MFA1,NRA),FC(NDRHS) DIMENSION IR(NDIRC),IC(NDIRC),IWKDR(NIWBR) C C Check for consistency of data. C IF(ERBRBD(NA,NRA,NCA,NCB,NRC))STOP NOV=(NA*(NCA-NRA)+NCB-NRC)/(NA-1) NOV2=2*NOV C C Print debug output. C IF(IDB.GE.2)THEN WRITE(9,101)IFST,NLLV CALL PRINT1(NOV,NA,NRA,NCA,NCB,NRC, * MA1,MA2,A,MB1,MB2,B,MC1,C,MD1,D,MFA1,FA,FC) ENDIF C C Eliminate local variables by "Condensation of Parameters". C IF(IFST.NE.0)THEN NDECOM=NDECOM+1 CALL CONPAR(NOV,NA,NRA,NCA,MA1,MA2,A,NCB,MB1,MB2,B, * NRC,MC1,C,MD1,D,WKDR,IWKDR) C PRINT DEBUG OUTPUT IF(IDB.GE.2)CALL PRINT1(NOV,NA,NRA,NCA,NCB,NRC, * MA1,MA2,A,MB1,MB2,B,MC1,C,MD1,D,MFA1,FA,FC) ENDIF C C Allocate workspace. C LA1=1 LA2=LA1+NOV**2*NA LB=LA2+NOV**2*NA LC=LB+NOV*NCB*NA LFA=LC+NRC*NOV*(NA+1) LS=LFA+NOV*(NA+2) LE=LS+NOV**2*NA LRHSE=LE+(NRC+NOV)**2 LXE=LRHSE+NRC+NOV LT=LXE+NOV+NRC LNEXT=LT+NOV**2*NA C LIR=1 LIC=LIR+2*NOV*(NA-1) LLC=LIC+NOV*(NA-1) LNEXT=LLC+NA C NAM1=NA-1 NAP1=NA+1 NAP2=NA+2 NXE=NOV+NRC C C Copy the reduced system generated by CONPAR into the workspace area C for further processing by REDUCE. C IF(IFST.NE.0)THEN CALL COPYCP(NA,NOV,NRA,NCA,MA1,MA2,A,NCB,MB1,MB2,B, * NRC,MC1,C,WKDR(LA1),WKDR(LA2),WKDR(LB),WKDR(LC)) C Reduction of the system. CALL REDUCE(NA,NOV,NOV2,NCB,NRC,MD1,D,WKDR(LA1),WKDR(LA2), * WKDR(LB),WKDR(LC),WKDR(LS),WKDR(LT),IWKDR(LIR),IWKDR(LIC)) ENDIF C C Condensation of the right hand side following CONPAR. C IF(NLLV.EQ.0)THEN CALL CONRHS(NOV,NA,NRA,NCA,MA1,MA2,A,NRC,MC1,C,MFA1, * FA,FC,IWKDR(LLC)) C Copy the reduced right hand side into workspace. CALL CPYRHS(NA,NRA,NOV,MFA1,FA,WKDR(LFA)) C Print debug output. IF(IDB.GE.2)CALL PRINT3(NA,NOV,WKDR(LFA)) C Reduction of the right hand side following REDUCE. CALL REDRHS(NA,NOV,NOV2,NRC,WKDR(LA1),WKDR(LA2),WKDR(LC), * WKDR(LFA),FC,IWKDR(LIR)) ELSE C Set right hand sides to zero. DO 2 I=1,NA DO 1 J=1,NRA FA(I,J)=ZERO 1 CONTINUE 2 CONTINUE DO 3 I=1,NRC FC(I)=ZERO 3 CONTINUE DO 4 I=LFA,LS-1 WKDR(I)=ZERO 4 CONTINUE ENDIF C C Print debug output C IF(IDB.GE.2)THEN CALL PRINT2(IDB,NA,NOV,NCB,NRC,WKDR(LS),WKDR(LA1), * WKDR(LA2),WKDR(LT),WKDR(LB),WKDR(LC),WKDR(LFA)) CALL PRINT3(NA,NOV,WKDR(LFA)) ENDIF C NE=NRC+NOV C C Solve the system generated by REDUCE C by Gauss elimination with complete pivoting. C CALL DIMRGE(NA,NOV,NCA,WKDR(LS),WKDR(LA2),NCB,WKDR(LB), * WKDR(LC),NRC,MC1,C,MD1,D,WKDR(LFA),FC, * NE,WKDR(LE),WKDR(LRHSE),WKDR(LXE),IDB,IR,IC,NLLV) C C Backsubstitution in the reduction process. C CALL BCKSUB(NOV,NOV2,NA,NCB,WKDR(LS),WKDR(LA1),WKDR(LA2), * WKDR(LT),WKDR(LB),WKDR(LFA),WKDR(LXE),FC,IWKDR(LIR), * IWKDR(LIC)) C C Backsubstitution in the condensation of parameters process. C NBCKSB=NBCKSB+1 CALL INFPAR(NA,NOV,NRA,NCA,MA1,MA2,A,NCB,MB1,MB2,B, * MFA1,FA,NDRHS,FC,NAP2,WKDR(LFA)) C 101 FORMAT(' SUBROUTINE BRBD : IFST=',I1,1X,'NLLV=',I2) C RETURN END C C ------- -------- ------ LOGICAL FUNCTION ERBRBD(NA,NRA,NCA,NCB,NRC) C C Checks correctness of dimensions. C ERBRBD=.FALSE. C IN=NA*(NCA-NRA)+NCB-NRC ID=NA-1 IF(MOD(IN,ID).NE.0)THEN WRITE(9,101) ERBRBD=.TRUE. RETURN ENDIF C NOV=IN/ID NEX=NCA-2*NOV IF(NEX.GE.0)GOTO 1 C WRITE(9,101) ERBRBD=.TRUE. RETURN 101 FORMAT(' ERROR IN DATA IN SUBROUTINE -BRBD-',/, * ' (LINEAR EQUATION SOLVER)') C 1 RETURN END C C ---------- ------ SUBROUTINE COPYCP(NA,NOV,NRA,NCA,MA1,MA2,A,NCB,MB1,MB2,B, * NRC,MC1,C,A1,A2,BC,CC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLBND/ NAM1,NAP1,NXE COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR C DIMENSION A(MA1,MA2,NCA),B(MB1,MB2,NCB),C(MC1,NDCC) DIMENSION A1(NOV,NOV,NA),A2(NOV,NOV,NA) DIMENSION BC(NOV,NCB,NA),CC(NRC,NOV,NAP1) C C Copies the condensed system generated by CONPAR into the workspace. C DO 4 I=1,NA C DO 3 IR=1,NOV DO 1 IC=1,NOV A1(IR,IC,I)=A(I,NRA-NOV+IR,IC) A2(IR,IC,I)=A(I,NRA-NOV+IR,NCA-NOV+IC) 1 CONTINUE C DO 2 IC=1,NCB BC(IR,IC,I)=B(I,NRA-NOV+IR,IC) 2 CONTINUE C 3 CONTINUE C 4 CONTINUE C DO 7 I=1,NAP1 DO 6 IR=1,NRC DO 5 IC=1,NOV CC(IR,IC,I)=C((I-1)*(NCA-NOV)+IC,IR) 5 CONTINUE 6 CONTINUE 7 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE REDUCE(NA,NOV,NOV2,NCB,NRC,MD1,D,A1,A2,B,C,S,T, * IPR,IPC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLBND/ NAM1,NAP1,NXE COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLTIM/ TSETUB,TCONPA,TCONRH,TINFPA,TREDUC,TWR8 C DIMENSION A1(NOV,NOV,NA),A2(NOV,NOV,NA),S(NOV,NOV,NA) DIMENSION T(NOV,NOV,NA),IPR(NOV2,NAM1),IPC(NOV,NAM1) DIMENSION B(NOV,NCB,NA),C(NRC,NOV,NAP1),D(MD1,NCB) C C Set initial time (For timing of this subroutine). C CALL AUTIM0(TIME0) C NOVM1=NOV-1 NAM1=NA-1 C C CLEAR S AND T C DO 3 I1=1,NA DO 2 IR=1,NOV DO 1 IC=1,NOV T(IR,IC,I1)=ZERO S(IR,IC,I1)=ZERO 1 CONTINUE 2 CONTINUE 3 CONTINUE C C Equate first block of S with first block of A1. C DO 5 IR=1,NOV DO 4 IC=1,NOV S(IR,IC,1)=A1(IR,IC,1) 4 CONTINUE 5 CONTINUE C C Initialize pivot arrays. C DO 7 I1=1,NAM1 DO 6 I=1,NOV IPC(I,I1)=I 6 CONTINUE 7 CONTINUE C DO 32 I1=1,NAM1 C I2=I1+1 C DO 25 IC=1,NOV ICP1=IC+1 C C Pivoting : C RMXA2=ZERO DO 9 IR=IC,NOV DO 8 K=IC,IC DABA2=DABS(A2(IR,K,I1)) CSGLE DABA2= ABS(A2(IR,K,I1)) IF(DABA2.GT.RMXA2)THEN IRA2=IR ICA2=K RMXA2=DABA2 ENDIF 8 CONTINUE 9 CONTINUE C RMXA1=ZERO DO 11 IR=1,NOV DO 10 K=IC,IC DABA1=DABS(A1(IR,K,I2)) CSGLE DABA1= ABS(A1(IR,K,I2)) IF(DABA1.GT.RMXA1)THEN IRA1=IR ICA1=K RMXA1=DABA1 ENDIF 10 CONTINUE 11 CONTINUE C IF(RMXA2.GT.RMXA1)THEN IPR(IC,I1)=IRA2 ITMP=IPC(IC,I1) IPC(IC,I1)=IPC(ICA2,I1) IPC(ICA2,I1)=ITMP DO 12 K=1,NOV IF(K.GE.IC)THEN TMP=A2(IC,K,I1) A2(IC,K,I1)=A2(IRA2,K,I1) A2(IRA2,K,I1)=TMP ENDIF TMP=S(IC,K,I1) S(IC,K,I1)=S(IRA2,K,I1) S(IRA2,K,I1)=TMP TMP=T(IC,K,I1) T(IC,K,I1)=T(IRA2,K,I1) T(IRA2,K,I1)=TMP 12 CONTINUE DO 13 K=1,NCB TMP=B(IC,K,I1) B(IC,K,I1)=B(IRA2,K,I1) B(IRA2,K,I1)=TMP 13 CONTINUE C ELSE C IPR(IC,I1)=IRA1+NOV ITMP=IPC(IC,I1) IPC(IC,I1)=IPC(ICA1,I1) IPC(ICA1,I1)=ITMP DO 14 K=1,NOV IF(K.GE.IC)THEN TMP=A2(IC,K,I1) A2(IC,K,I1)=A1(IRA1,K,I2) A1(IRA1,K,I2)=TMP ENDIF TMP=S(IC,K,I1) S(IC,K,I1)=S(IRA1,K,I2) S(IRA1,K,I2)=TMP TMP=T(IC,K,I1) T(IC,K,I1)=A2(IRA1,K,I2) A2(IRA1,K,I2)=TMP 14 CONTINUE DO 15 K=1,NCB TMP=B(IC,K,I1) B(IC,K,I1)=B(IRA1,K,I2) B(IRA1,K,I2)=TMP 15 CONTINUE C C ENDIF C C End of pivoting. C IF(IC.NE.NOV)THEN DO 19 IR=ICP1,NOV RM=A2(IR,IC,I1)/A2(IC,IC,I1) A2(IR,IC,I1)=RM DO 16 K=ICP1,NOV A2(IR,K,I1)=A2(IR,K,I1)-RM*A2(IC,K,I1) 16 CONTINUE DO 17 K=1,NOV S(IR,K,I1)=S(IR,K,I1)-RM*S(IC,K,I1) T(IR,K,I1)=T(IR,K,I1)-RM*T(IC,K,I1) 17 CONTINUE DO 18 K=1,NCB B(IR,K,I1)=B(IR,K,I1)-RM*B(IC,K,I1) 18 CONTINUE 19 CONTINUE ENDIF C DO 24 IR=1,NOV RM=A1(IR,IC,I2)/A2(IC,IC,I1) A1(IR,IC,I2)=RM IF(ICP1.GT.NOV)GOTO 21 DO 20 K=ICP1,NOV A1(IR,K,I2)=A1(IR,K,I2)-RM*A2(IC,K,I1) 20 CONTINUE 21 DO 22 K=1,NOV S(IR,K,I2)=S(IR,K,I2)-RM*S(IC,K,I1) A2(IR,K,I2)=A2(IR,K,I2)-RM*T(IC,K,I1) 22 CONTINUE DO 23 K=1,NCB B(IR,K,I2)=B(IR,K,I2)-RM*B(IC,K,I1) 23 CONTINUE 24 CONTINUE C 25 CONTINUE C DO 31 IC=1,NOV ICP1=IC+1 DO 30 IR=1,NRC RM=C(IR,IC,I2)/A2(IC,IC,I1) C(IR,IC,I2)=RM IF(ICP1.GT.NOV)GOTO 27 DO 26 K=ICP1,NOV C(IR,K,I2)=C(IR,K,I2)-RM*A2(IC,K,I1) 26 CONTINUE 27 DO 28 K=1,NOV C(IR,K,1)=C(IR,K,1)-RM*S(IC,K,I1) C(IR,K,I2+1)=C(IR,K,I2+1)-RM*T(IC,K,I1) 28 CONTINUE DO 29 K=1,NCB D(IR,K)=D(IR,K)-RM*B(IC,K,I1) 29 CONTINUE 30 CONTINUE 31 CONTINUE C 32 CONTINUE C C Determine the time spent in this subroutine. C CALL AUTIM1(TIME1) TREDUC=TREDUC + TIME1-TIME0 C RETURN END C C ---------- ------ SUBROUTINE CPYRHS(NA,NRA,NOV,MFA1,FA,FAC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLBND/ NAM1,NAP1,NXE C DIMENSION FA(MFA1,NRA),FAC(NOV,NAP1) C DO 2 I=1,NA DO 1 IR=1,NOV FAC(IR,I)=FA(I,NRA-NOV+IR) 1 CONTINUE 2 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE REDRHS(NA,NOV,NOV2,NRC,A1,A2,C,FA,FC,IPR) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBND/ NAM1,NAP1,NXE C DIMENSION A1(NOV,NOV,NA),A2(NOV,NOV,NA),C(NRC,NOV,NAP1) DIMENSION FA(NOV,NAP1),FC(NDRHS) DIMENSION IPR(NOV2,NAM1) C NOVM1=NOV-1 C DO 6 I1=1,NAM1 I2=I1+1 C DO 3 IC=1,NOV ICP1=IC+1 C C Interchanges. C IF(IPR(IC,I1).LE.NOV)THEN TMP=FA(IC,I1) FA(IC,I1)=FA(IPR(IC,I1),I1) FA(IPR(IC,I1),I1)=TMP ELSE TMP=FA(IC,I1) FA(IC,I1)=FA(IPR(IC,I1)-NOV,I2) FA(IPR(IC,I1)-NOV,I2)=TMP ENDIF C C End interchanges. C IF(IC.NE.NOV)THEN DO 1 IR=ICP1,NOV RM=A2(IR,IC,I1) FA(IR,I1)=FA(IR,I1)-RM*FA(IC,I1) 1 CONTINUE ENDIF C DO 2 IR=1,NOV RM=A1(IR,IC,I2) FA(IR,I2)=FA(IR,I2)-RM*FA(IC,I1) 2 CONTINUE 3 CONTINUE C DO 5 IC=1,NOV DO 4 IR=1,NRC RM=C(IR,IC,I2) FC(IR)=FC(IR)-RM*FA(IC,I1) 4 CONTINUE 5 CONTINUE C 6 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE DIMRGE(NA,NOV,NCA,S,A2,NCB,B,CC,NRC,MC1,C, * MD1,D,FA,FC,NE,E,RHSE,XE,IDB,IR,IC,NLLV) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBND/ NAM1,NAP1,NXE COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION S(NOV,NOV,NA),A2(NOV,NOV,NA) DIMENSION B(NOV,NCB,NA),CC(NRC,NOV,NAP1),FA(NOV,NAP1) DIMENSION IR(NDIRC),IC(NDIRC) DIMENSION C(MC1,NDCC),D(MD1,NCB),FC(NDRHS) DIMENSION E(NE,NE),RHSE(NE),XE(NE) C DO 3 I=1,NOV C DO 1 J=1,NOV E(I,J)=S(I,J,NA) E(I,NOV+J)=A2(I,J,NA) 1 CONTINUE C DO 2 J=1,NCB E(I,2*NOV+J)=B(I,J,NA) 2 CONTINUE C RHSE(I)=FA(I,NA) C 3 CONTINUE C DO 6 I=1,NRC C DO 4 J=1,NOV E(NOV+I,J)=CC(I,J,1) E(NOV+I,NOV+J)=CC(I,J,NA+1) 4 CONTINUE C DO 5 J=1,NCB E(NOV+I,2*NOV+J)=D(I,J) 5 CONTINUE C RHSE(NOV+I)=FC(I) C 6 CONTINUE C IF(IDB.NE.0)THEN WRITE(9,101) DO 7 I=1,NE WRITE(9,102)(E(I,J),J=1,NE),RHSE(I) 7 CONTINUE ENDIF C IF(NLLV.EQ.0)THEN CALL GE(NE,NE,E,1,NE,XE,NE,RHSE,IR,IC) ELSEIF(NLLV.GT.0)THEN CALL NLVC(NE,NE,IABS(NLLV),E,XE,IR,IC) ELSE DO 8 I=1,NE-1 RHSE(I)=ZERO 8 CONTINUE RHSE(NE)=ONE CALL GE(NE,NE,E,1,NE,XE,NE,RHSE,IR,IC) ENDIF C IF(IDB.NE.0)WRITE(9,103)(XE(I),I=1,NE) C DO 9 I=1,NRC FC(I)=XE(NOV+I) 9 CONTINUE C 101 FORMAT(' REDUCED SYSTEM:') 102 FORMAT(1X,11E10.3) 103 FORMAT(' SOLUTION VECTOR :',/,10E10.3) C RETURN END C C ---------- ---- SUBROUTINE BCKSUB(NOV,NOV2,NA,NCB,S,A1,A2,T,B,FA,XE,FC,IPR,IPC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBND/ NAM1,NAP1,NXE C C Backsubstitution in the reduction process. C DIMENSION S(NOV,NOV,NA),A1(NOV,NOV,NA),A2(NOV,NOV,NA) DIMENSION T(NOV,NOV,NA),B(NOV,NCB,NA) DIMENSION FA(NOV,NAP1),XE(NXE),FC(NDRHS) DIMENSION IPR(NOV2,NAM1),IPC(NOV,NAM1) C DO 1 I=1,NOV FA(I,NA+1)=XE(NOV+I) 1 CONTINUE C DO 8 I=1,NAM1 I1=NA-I I2=I1+1 DO 7 J1=1,NOV J=NOV+1-J1 FA(J,I2)=FA(J,I1) DO 3 K=1,NOV FA(J,I2)=FA(J,I2)-S(J,K,I1)*XE(K) FA(J,I2)=FA(J,I2)-T(J,K,I1)*FA(K,I2+1) 3 CONTINUE DO 4 K=1,NCB FA(J,I2)=FA(J,I2)-B(J,K,I1)*FC(NOV+K) 4 CONTINUE IF(J.EQ.NOV)GOTO 6 K1=J+1 DO 5 K=K1,NOV FA(J,I2)=FA(J,I2)-A2(J,K,I1)*FA(K,I2) 5 CONTINUE 6 FA(J,I2)=FA(J,I2)/A2(J,J,I1) 7 CONTINUE 8 CONTINUE C DO 9 K=1,NOV FA(K,1)=XE(K) 9 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE PRINT1(NOV,NA,NRA,NCA,NCB,NRC, * MA1,MA2,A,MB1,MB2,B,MC1,C,MD1,D,MFA1,FA,FC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR C DIMENSION A(MA1,MA2,NCA),B(MB1,MB2,NCB),C(MC1,NDCC),D(MD1,NCB) DIMENSION FA(MFA1,NRA),FC(NDRHS) C WRITE(9,101) DO 2 I=1,NA WRITE(9,102)I DO 1 IR=1,NRA WRITE(9,103)(A(I,IR,IC),IC=1,NCA),(B(I,IR,IC),IC=1,NCB) * ,FA(I,IR) 1 CONTINUE 2 CONTINUE C WRITE(9,104) C DO 4 I=1,NA WRITE(9,102)I DO 3 IR=1,NRC IC1=(I-1)*(NCA-NOV)+1 IC2=IC1+NCA-NOV-1 WRITE(9,103)(C(IC,IR),IC=IC1,IC2) 3 CONTINUE 4 CONTINUE C WRITE(9,106) IC1=NA*(NCA-NOV)+1 IC2=IC1+NOV-1 DO 5 IR=1,NRC WRITE(9,103)(C(IC,IR),IC=IC1,IC2) 5 CONTINUE C WRITE(9,105) C DO 6 IR=1,NRC WRITE(9,103)(D(IR,IC),IC=1,NCB),FC(IR) 6 CONTINUE C 101 FORMAT(' A , B , FA (FULL DIMENSION) :') 102 FORMAT(' I=',I2) 103 FORMAT(1X,12E10.3) 104 FORMAT(' C (FULL DIMENSION) :') 105 FORMAT(' D , FC') 106 FORMAT(' LAST NOV COLUMNS OF C :') C RETURN END C C ---------- ------ SUBROUTINE PRINT2(IDB,NA,NOV,NCB,NRC,S,A1,A2,T,B,C,F) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLBND/ NAM1,NAP1,NXE C DIMENSION A1(NOV,NOV,NA),A2(NOV,NOV,NA),B(NOV,NCB,NA) DIMENSION S(NOV,NOV,NA),T(NOV,NOV,NA),F(NOV,NAP1) DIMENSION C(NRC,NOV,NAP1) C WRITE(9,101) C DO 2 I=1,NA WRITE(9,104)I DO 1 IR=1,NOV WRITE(9,102)(A1(IR,IC,I),IC=1,NOV),(A2(IR,IC,I),IC=1,NOV), * ( B(IR,IC,I),IC=1,NCB) 1 CONTINUE 2 CONTINUE C WRITE(9,105) DO 4 I=1,NA WRITE(9,104)I DO 3 IR=1,NOV WRITE(9,102)(S(IR,IC,I),IC=1,NOV),(T(IR,IC,I),IC=1,NOV) 3 CONTINUE 4 CONTINUE C WRITE(9,103) C DO 6 I=1,NA WRITE(9,104)I DO 5 IR=1,NRC WRITE(9,102)(C(IR,IC,I),IC=1,NOV) 5 CONTINUE 6 CONTINUE C C The following can be used if a linear system is given C for which all all solution components are equal to 1. C Compute residuals for test problem : C IF(IDB.EQ.3)THEN WRITE(9,106) DO 10 I1=1,NA DO 9 IR=1,NOV R=F(IR,I1) DO 7 IC=1,NOV R=R-S(IR,IC,I1) R=R-T(IR,IC,I1) IF(IC.GE.IR)R=R-A2(IR,IC,I1) 7 CONTINUE DO 8 IC=1,NCB R=R-B(IR,IC,I1) 8 CONTINUE WRITE(9,107)R 9 CONTINUE 10 CONTINUE ENDIF C 101 FORMAT(' A1 , A2 , B :') 102 FORMAT(1X,9E10.3) 103 FORMAT(' C :') 104 FORMAT(' I=',I2) 105 FORMAT(' S AND T : ') 106 FORMAT(' RESIDUALS IN PRINT2') 107 FORMAT(1X,E10.3) C RETURN END C C --------- ------ SUBROUTINE PRINT3(NA,NOV,FA) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C DIMENSION FA(NOV,NA) C WRITE(9,101) DO 1 I=1,NA WRITE(9,102)I WRITE(9,103)(FA(IR,I),IR=1,NOV) 1 CONTINUE C 101 FORMAT(' FA : ') 102 FORMAT(' I=',I3) 103 FORMAT(1X,9E10.3) C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Vectorized Subroutines for the Linear Equation Solver BRBD C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ------ SUBROUTINE CONPAR(NOV,NA,NRA,NCA,MA1,MA2,A,NCB,MB1,MB2,B, * NRC,MC1,C,MD1,D,RM,LC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLTIM/ TSETUB,TCONPA,TCONRH,TINFPA,TREDUC,TWR8 C DIMENSION A(MA1,MA2,NCA),B(MB1,MB2,NCB),C(MC1,NRC) * ,D(MD1,NCB),RM(NA),LC(NA) C C Set initial time (for timing of this subroutine). C CALL AUTIM0(TIME0) C NEX=NCA-2*NOV IF(NEX.EQ.0)RETURN C C Condensation of parameters ( Elimination of "local" variables ). C M1=NOV+1 M2=NOV+NEX C DO 9 IC=M1,M2 IR1=IC-NOV+1 IRP=IR1-1 ICP1=IC+1 C DO 4 IR=IR1,NRA DO 10 I=1,NA RM(I)=A(I,IR,IC)/A(I,IRP,IC) A(I,IR,IC)=RM(I) 10 CONTINUE DO 1 L=1,NOV DO 11 I=1,NA A(I,IR,L)=A(I,IR,L)-RM(I)*A(I,IRP,L) 11 CONTINUE 1 CONTINUE DO 2 L=ICP1,NCA DO 12 I=1,NA A(I,IR,L)=A(I,IR,L)-RM(I)*A(I,IRP,L) 12 CONTINUE 2 CONTINUE DO 3 L=1,NCB DO 13 I=1,NA B(I,IR,L)=B(I,IR,L)-RM(I)*B(I,IRP,L) 13 CONTINUE 3 CONTINUE 4 CONTINUE C DO 8 IR=1,NRC DO 40 I=1,NA LC(I)=(I-1)*(NCA-NOV)+IC 40 CONTINUE DO 50 I=1,NA RM(I)=C(LC(I),IR)/A(I,IRP,IC) C(LC(I),IR)=RM(I) 50 CONTINUE DO 5 L=1,NOV DO 51 I=1,NA LC(I)=(I-1)*(NCA-NOV)+L 51 CONTINUE DO 52 I=1,NA C(LC(I),IR)=C(LC(I),IR)-RM(I)*A(I,IRP,L) 52 CONTINUE 5 CONTINUE DO 6 L=ICP1,NCA DO 60 I=1,NA LC(I)=(I-1)*(NCA-NOV)+L 60 CONTINUE DO 61 I=1,NA C(LC(I),IR)=C(LC(I),IR)-RM(I)*A(I,IRP,L) 61 CONTINUE 6 CONTINUE DO 7 L=1,NCB DO 71 I=1,NA D(IR,L)=D(IR,L)-RM(I)*B(I,IRP,L) 71 CONTINUE 7 CONTINUE 8 CONTINUE C 9 CONTINUE C C Determine the time spent in this subroutine. C CALL AUTIM1(TIME1) TCONPA=TCONPA + TIME1-TIME0 C RETURN END C C ---------- ------ SUBROUTINE CONRHS(NOV,NA,NRA,NCA,MA1,MA2,A,NRC,MC1,C, * MFA1,FA,FC,LC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLTIM/ TSETUB,TCONPA,TCONRH,TINFPA,TREDUC,TWR8 C DIMENSION A(MA1,MA2,NCA),C(MC1,NDCC),FA(MFA1,NRA),FC(NDRHS),LC(NA) C C Set initial time (for timing of this subroutine). C CALL AUTIM0(TIME0) C C Condensation of the right hand side. C NEX=NCA-2*NOV IF(NEX.EQ.0)RETURN C M1=NOV+1 M2=NOV+NEX C DO 3 IC=M1,M2 IR1=IC-NOV+1 IRP=IR1-1 C DO 1 IR=IR1,NRA C Note that RM=A(I,IR,IC) is the multiplier. DO 11 I=1,NA FA(I,IR)=FA(I,IR)-A(I,IR,IC)*FA(I,IRP) 11 CONTINUE 1 CONTINUE C DO 2 IR=1,NRC DO 20 I=1,NA LC(I)=(I-1)*(NCA-NOV)+IC 20 CONTINUE C Note that RM=C(LC(I),IR) is the multiplier. DO 21 I=1,NA FC(IR)=FC(IR)-C(LC(I),IR)*FA(I,IRP) 21 CONTINUE 2 CONTINUE C 3 CONTINUE C C Determine the time spent in this subroutine, C CALL AUTIM1(TIME1) TCONRH=TCONRH + TIME1-TIME0 C RETURN END C C ---------- ------ SUBROUTINE INFPAR(NA,NOV,NRA,NCA,MA1,MA2,A,NCB,MB1,MB2,B, * MFA1,FA,NC,FC,NFADR,FADR) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBND/ NAM1,NAP1,NXE COMMON /BLTIM/ TSETUB,TCONPA,TCONRH,TINFPA,TREDUC,TWR8 C DIMENSION A(MA1,MA2,NCA),B(MB1,MB2,NCB),FA(MFA1,NRA),FC(NC) DIMENSION FADR(NOV,NFADR) C C Set initial time (for timing of this subroutine). C CALL AUTIM0(TIME0) C C Determine the "local" variables by backsubstitution. C NRAM=NRA-NOV DO 9 IR1=1,NRAM IR=NRAM+1-IR1 DO 1 K=1,NOV DO 11 I=1,NA FA(I,IR)=FA(I,IR)-A(I,IR,K)*FADR(K,I) 11 CONTINUE 1 CONTINUE DO 2 K=1,NOV FADR(K,NA+2)=FC(K) 2 CONTINUE DO 3 K=1,NOV DO 31 I=1,NA FA(I,IR)=FA(I,IR)-A(I,IR,NCA-NOV+K)*FADR(K,I+1) 31 CONTINUE 3 CONTINUE DO 6 K=1,NCB DO 61 I=1,NA FA(I,IR)=FA(I,IR)-B(I,IR,K)*FC(NOV+K) 61 CONTINUE 6 CONTINUE IF(IR1.EQ.1)GOTO 8 K1=NCA-NOV-IR1+2 K2=NCA-NOV DO 7 K=K1,K2 DO 71 I=1,NA FA(I,IR)=FA(I,IR)-A(I,IR,K)*FA(I,K) 71 CONTINUE 7 CONTINUE 8 CONTINUE DO 91 I=1,NA FA(I,IR+NOV)=FA(I,IR)/A(I,IR,NCA-NOV-IR1+1) 91 CONTINUE 9 CONTINUE C C Copy the solution generated by DRBSUB (stored in FADR) C into the final solution vector (stored in FA). C DO 22 J=1,NOV DO 21 I=1,NA FA(I,J)=FADR(J,I) 21 CONTINUE 22 CONTINUE C C Determine the time spent in this subroutine. C CALL AUTIM1(TIME1) TINFPA=TINFPA + TIME1-TIME0 C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Subroutines for the Continuation of Limit Points (Algebraic Problems) C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ---- SUBROUTINE FNLP(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the equations for the 2-par continuation of limit points. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U(NDIM),PAR(1) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1),ICP(1) C C Generate the function. C CALL FFLP(NDIM,U,UOLD,ICP,PAR,F,NDM,DFUXX,DFPXX) C IF(IJAC.EQ.0)RETURN C C Generate the Jacobian. C UMX=ZERO DO 1 I=1,NDIM IF(DABS(U(I)).GT.UMX)UMX=DABS(U(I)) CSGLE IF( ABS(U(I)).GT.UMX)UMX= ABS(U(I)) 1 CONTINUE C EP=HMACH*(ONE+UMX) C DO 4 I=1,NDIM DO 2 J=1,NDIM U1XX(J)=U(J) U2XX(J)=U(J) 2 CONTINUE U1XX(I)=U1XX(I)-EP U2XX(I)=U2XX(I)+EP CALL FFLP(NDIM,U1XX,UOLD,ICP,PAR,F1XX,NDM,DFUXX,DFPXX) CALL FFLP(NDIM,U2XX,UOLD,ICP,PAR,F2XX,NDM,DFUXX,DFPXX) DO 3 J=1,NDIM DFDU(J,I)=(F2XX(J)-F1XX(J))/(2*EP) 3 CONTINUE 4 CONTINUE C PAR(ICP(1))=PAR(ICP(1))+EP C CALL FFLP(NDIM,U,UOLD,ICP,PAR,F1XX,NDM,DFUXX,DFPXX) C DO 5 J=1,NDIM DFDP(J,ICP(1))=(F1XX(J)-F(J))/EP 5 CONTINUE C PAR(ICP(1))=PAR(ICP(1))-EP C RETURN END C C ---------- ---- SUBROUTINE FFLP(NDIM1,U,UOLD,ICP1,PAR1,F,NDM,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) C DIMENSION U(NDIM) DIMENSION F(NDIM),DFDU(NDM,NDM),DFDP(NDM,1) C IJAC=1 PAR(ICP(2))=U(NDIM) IF(IPS.EQ.-1) THEN CALL FNDS(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) ELSE CALL FUNI(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) ENDIF C DO 2 I=1,NDM F(NDM+I)=ZERO DO 1 J=1,NDM F(NDM+I)=F(NDM+I)+DFDU(I,J)*U(NDM+J) 1 CONTINUE 2 CONTINUE C F(NDIM)=-ONE CSGLE F(NDIM)=-ONE C DO 3 I=1,NDM F(NDIM)=F(NDIM)+U(NDM+I)*U(NDM+I) 3 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE STPNLP(IBR,U,NDM2,SMAT,DFDU,DFUXX,DFDP,V,F,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C LOGICAL FOUND C C Generates starting data for the continuation of limit points. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) C DIMENSION U(NDIM),V(NDMP1),F(NDM),SMAT(NDM2,NDM2) DIMENSION DFDU(NDM,NDM),DFUXX(NDMP1,NDMP1),DFDP(NDM,1) DIMENSION IR(1),IC(1) C CALL FINDL3(IRS,ITP,NFPAR1,FOUND) CALL READL3(IPS,IBR,U,PAR) C IJAC=1 IF(IPS.EQ.-1)THEN CALL FNDS(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) ELSE CALL FUNI(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) ENDIF CALL NLVC(NDM,NDM,1,DFDU,V,IR,IC) CALL NRMLZ(NDM,V) DO 1 I=1,NDM U(NDM+I)=V(I) 1 CONTINUE U(NDIM)=PAR(ICP(2)) C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Subroutines for the Optimization of Algebraic Systems C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ---- SUBROUTINE FNC1(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generate the equations for the continuation scheme used for C the optimization of algebraic systems (one parameter). C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U(NDIM),ICP(20),PAR(20) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,NPAR) C PAR(ICP(2))=U(NDIM) CALL FUNI(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C C Rearrange (Since dimensions in FNC1 and FUNI differ). C IF(IJAC.NE.0)THEN DO 2 J=NDM,1,-1 DO 1 I=NDM,1,-1 DFDU(I,J)=DFDU( (J-1)*NDM+I ,1 ) 1 CONTINUE 2 CONTINUE C DO 4 J=NPAR,1,-1 DO 3 I=NDM,1,-1 DFDP(I,J)=DFDP( (J-1)*NDM+I , 1 ) 3 CONTINUE 4 CONTINUE ENDIF C CALL FOPI(NDM,U,ICP,PAR,IJAC,F(NDIM),DDUXX,DDPXX) F(NDIM)=PAR(ICP(1))-F(NDIM) C IF(IJAC.NE.0)THEN DO 5 I=1,NDM DFDU(NDIM,I)=-DDUXX(I) DFDU(I,NDIM)=DFDP(I,ICP(2)) DFDP(I,ICP(1))=0 5 CONTINUE DFDU(NDIM,NDIM)=-DDPXX(ICP(2)) DFDP(NDIM,ICP(1))=1 ENDIF C RETURN END C C ---------- ------ SUBROUTINE STPNC1(IBR,U,NDM2,SMAT,DFDU,DFUXX,DFDP,V,F,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C LOGICAL FOUND C C Generate starting data for optimization problems (one parameter). C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) C DIMENSION U(NDIM),V(NDMP1),F(NDM),SMAT(NDM2,NDM2) DIMENSION DFDU(NDM,NDM),DFUXX(NDMP1,NDMP1),DFDP(NDM,1) DIMENSION IR(1),IC(1) C CALL STPNT(NDIM,U,PAR) CALL FOPI(NDM,U,ICP,PAR,0,FOP,DFDU,DFDP) PAR(ICP(1))=FOP U(NDIM)=PAR(ICP(2)) C RETURN END C C ---------- ---- SUBROUTINE FNC2(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generate the equations for the continuation scheme used for the C optimization of algebraic systems (more than one parameter). C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U(NDIM),ICP(1),PAR(1) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1) C C Generate the function. C CALL FFC2(NDIM,U,UOLD,ICP,PAR,F,DFUXX,DFPXX) C IF(IJAC.EQ.0)RETURN C C Generate the Jacobian. C UMX=ZERO DO 1 I=1,NDIM IF(DABS(U(I)).GT.UMX)UMX=DABS(U(I)) CSGLE IF( ABS(U(I)).GT.UMX)UMX= ABS(U(I)) 1 CONTINUE C EP=HMACH*(ONE+UMX) C DO 4 I=1,NDIM DO 2 J=1,NDIM U1XX(J)=U(J) U2XX(J)=U(J) 2 CONTINUE U1XX(I)=U1XX(I)-EP U2XX(I)=U2XX(I)+EP CALL FFC2(NDIM,U1XX,UOLD,ICP,PAR,F1XX,DFUXX,DFPXX) CALL FFC2(NDIM,U2XX,UOLD,ICP,PAR,F2XX,DFUXX,DFPXX) DO 3 J=1,NDIM DFDU(J,I)=(F2XX(J)-F1XX(J))/(2*EP) 3 CONTINUE 4 CONTINUE C DO 5 I=1,NDIM DFDP(I,ICP(1))=0 5 CONTINUE DFDP(NDIM,ICP(1))=1 C RETURN END C C ---------- ---- SUBROUTINE FFC2(NDIM,U,UOLD,ICP,PAR,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U(NDIM),ICP(1),PAR(1) DIMENSION F(NDIM),DFDU(NDM,NDM),DFDP(NDM,1) C IJAC=1 DO 1 I=2,NFPAR PAR(ICP(I))=U(2*NDM+I) 1 CONTINUE CALL FUNI(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) CALL FOPI(NDM,U,ICP,PAR,IJAC,FOP,DDUXX,DDPXX) C DO 3 I=1,NDM F(NDM+I)=DDUXX(I)*U(2*NDM+1) DO 2 J=1,NDM F(NDM+I)=F(NDM+I)+DFDU(J,I)*U(NDM+J) 2 CONTINUE 3 CONTINUE C NDM2=2*NDM ICPM=NFPAR-2 DO 4 I=1,ICPM F(NDM2+I)=DDPXX(ICP(I+1))*U(NDM2+1) 4 CONTINUE C DO 6 I=1,ICPM DO 5 J=1,NDM F(NDM2+I)=F(NDM2+I)+U(NDM+J)*DFDP(J,ICP(I+1)) 5 CONTINUE 6 CONTINUE C F(NDIM-1)=U(NDM2+1)*U(NDM2+1)-1 DO 7 J=1,NDM F(NDIM-1)=F(NDIM-1)+U(NDM+J)*U(NDM+J) 7 CONTINUE F(NDIM)=PAR(ICP(1))-FOP C RETURN END C C ---------- ------ SUBROUTINE STPNC2(IBR,U,NDM2,SMAT,DFDU,DFU,DFDP,V,F,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C LOGICAL FOUND C C Generates starting data for the continuation equations for C optimization of algebraic systems (More than one parameter). C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U(NDIM),V(NDMP1),F(NDM),SMAT(NDM2,NDM2) DIMENSION DFDU(NDM,NDM),DFU(NDMP1,NDMP1),DFDP(NDM,1) DIMENSION IR(1),IC(1) C CALL FINDL3(IRS,ITP,NFPAR,FOUND) NFPAR=NFPAR+1 CALL READL3(IPS,IBR,U,PAR) C IF(NFPAR.EQ.3)THEN IJAC=1 CALL FUNI(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) CALL FOPI(NDM,U,ICP,PAR,IJAC,FOP,DDUXX,DDPXX) C TRANSPOSE DO 2 I=1,NDM DO 1 J=1,NDM DFU(I,J)=DFDU(J,I) 1 CONTINUE 2 CONTINUE DO 3 I=1,NDM DFU(I,NDMP1)=DDUXX(I) DFU(NDMP1,I)=DFDP(I,ICP(2)) 3 CONTINUE DFU(NDMP1,NDMP1)=DDPXX(ICP(2)) CALL NLVC(NDMP1,NDMP1,1,DFU,V,IR,IC) CALL NRMLZ(NDMP1,V) DO 4 I=1,NDMP1 U(NDM+I)=V(I) 4 CONTINUE PAR(ICP(1))=FOP ENDIF C DO 5 I=1,NFPAR-1 U(NDIM-NFPAR+1+I)=PAR(ICP(I+1)) 5 CONTINUE C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Subroutines for Discrete Dynamical Systems C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ---- SUBROUTINE FNDS(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generate the equations for continuing fixed points. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(NDIM),ICP(1),PAR(1) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1) C CALL FUNI(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C DO 1 I=1,NDIM F(I)=F(I)-U(I) 1 CONTINUE C IF(IJAC.EQ.0)RETURN C DO 2 I=1,NDIM DFDU(I,I)=DFDU(I,I)-ONE 2 CONTINUE C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Subroutines for the Continuation of Hopf Bifurcation Points (Maps) C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ---- SUBROUTINE FNHD(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the equations for the 2-parameter continuation of Hopf C bifurcation points for maps. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U(NDIM),UOLD(NDIM),ICP(1),PAR(1) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1) C C Generate the function. C CALL FFHD(NDIM,U,UOLD,ICP,PAR,F,NDM,DFUXX,DFPXX) C IF(IJAC.EQ.0)RETURN C C Generate the Jacobian. C UMX=ZERO DO 2 I=1,NDIM IF(DABS(U(I)).GT.UMX)UMX=DABS(U(I)) CSGLE IF( ABS(U(I)).GT.UMX)UMX= ABS(U(I)) 2 CONTINUE C EP=HMACH*(ONE+UMX) C DO 5 I=1,NDIM DO 3 J=1,NDIM U1XX(J)=U(J) U2XX(J)=U(J) 3 CONTINUE U1XX(I)=U1XX(I)-EP U2XX(I)=U2XX(I)+EP CALL FFHD(NDIM,U1XX,UOLD,ICP,PAR,F1XX,NDM,DFUXX,DFPXX) CALL FFHD(NDIM,U2XX,UOLD,ICP,PAR,F2XX,NDM,DFUXX,DFPXX) DO 4 J=1,NDIM DFDU(J,I)=(F2XX(J)-F1XX(J))/(2*EP) 4 CONTINUE 5 CONTINUE C PAR(ICP(1))=PAR(ICP(1))+EP C CALL FFHD(NDIM,U,UOLD,ICP,PAR,F1XX,NDM,DFUXX,DFPXX) C DO 6 J=1,NDIM DFDP(J,ICP(1))=(F1XX(J)-F(J))/EP 6 CONTINUE C PAR(ICP(1))=PAR(ICP(1))-EP C RETURN END C C ---------- ---- SUBROUTINE FFHD(NDIM,U,UOLD,ICP,PAR,F,NDM,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(NDIM),ICP(20),PAR(20) DIMENSION F(NDIM),DFDU(NDM,NDM),DFDP(NDM,1) DIMENSION UOLD(NDIM) C NDM2=2*NDM C THETA=U(NDIM-1) S1=DSIN(THETA) CSGLE S1= SIN(THETA) C1=DCOS(THETA) CSGLE C1= COS(THETA) PAR(ICP(2))=U(NDIM) IJAC=1 CALL FUNI(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) DO 1 I=1,NDM F(I)=F(I)-U(I) DFDU(I,I)=DFDU(I,I)-C1 1 CONTINUE C DO 3 I=1,NDM F(NDM+I)=S1*U(NDM2+I) F(NDM2+I)=-S1*U(NDM+I) DO 2 J=1,NDM F(NDM+I)=F(NDM+I)+DFDU(I,J)*U(NDM+J) F(NDM2+I)=F(NDM2+I)+DFDU(I,J)*U(NDM2+J) 2 CONTINUE 3 CONTINUE C F(NDIM-1)=-ONE C DO 4 I=1,NDM F(NDIM-1)=F(NDIM-1)+U(NDM+I)*U(NDM+I)+U(NDM2+I)*U(NDM2+I) 4 CONTINUE C F(NDIM)=ZERO C DO 5 I=1,NDM F(NDIM)=F(NDIM)+UOLD(NDM2+I)*U(NDM+I)-UOLD(NDM+I)*U(NDM2+I) 5 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE STPNHD(IBR,U,NDM2,SMAT,DFDU,DFUXX,DFDP,V,F,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C LOGICAL FOUND C C Generates starting data for the continuation of Hopf bifurcation C points for maps. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(NDIM),V(NDMP1),F(NDM),SMAT(NDM2,NDM2) DIMENSION DFDU(NDM,NDM),DFUXX(NDMP1,NDMP1),DFDP(NDM,1) DIMENSION IR(1),IC(1) C CALL FINDL3(IRS,ITP,NFPAR1,FOUND) CALL READL3(IPS,IBR,U,PAR) C THETA=PI(TWO)/PAR(11) S1=DSIN(THETA) CSGLE S1= SIN(THETA) C1=DCOS(THETA) CSGLE C1= COS(THETA) IJAC=1 CALL FUNI(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C NDM2=2*NDM DO 2 I=1,NDM2 DO 1 J=1,NDM2 SMAT(I,J)=ZERO 1 CONTINUE 2 CONTINUE C DO 3 I=1,NDM SMAT(I,NDM+I)=S1 3 CONTINUE C DO 4 I=1,NDM SMAT(NDM+I,I)=-S1 4 CONTINUE C DO 6 I=1,NDM DO 5 J=1,NDM SMAT(I,J)=DFDU(I,J) SMAT(NDM+I,NDM+J)=DFDU(I,J) 5 CONTINUE SMAT(I,I)=SMAT(I,I)-C1 SMAT(NDM+I,NDM+I)=SMAT(NDM+I,NDM+I)-C1 6 CONTINUE CALL NLVC(NDM2,NDM2,2,SMAT,V,IR,IC) CALL NRMLZ(NDM2,V) C DO 7 I=1,NDM2 U(NDM+I)=V(I) 7 CONTINUE C U(NDIM-1)=THETA U(NDIM)=PAR(ICP(2)) C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Subroutines for the Continuation of Hopf Bifurcation Points (ODE) C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ---- SUBROUTINE FNHB(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the equations for the 2-parameter continuation of Hopf C bifurcation points in ODE. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U(NDIM),UOLD(NDIM),ICP(1),PAR(1) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1) C C Generate the function. C CALL FFHB(NDIM,U,UOLD,ICP,PAR,F,NDM,DFUXX,DFPXX) C IF(IJAC.EQ.0)RETURN C C Generate the Jacobian. C UMX=ZERO DO 2 I=1,NDIM IF(DABS(U(I)).GT.UMX)UMX=DABS(U(I)) CSGLE IF( ABS(U(I)).GT.UMX)UMX= ABS(U(I)) 2 CONTINUE C EP=HMACH*(ONE+UMX) C DO 5 I=1,NDIM DO 3 J=1,NDIM U1XX(J)=U(J) U2XX(J)=U(J) 3 CONTINUE U1XX(I)=U1XX(I)-EP U2XX(I)=U2XX(I)+EP CALL FFHB(NDIM,U1XX,UOLD,ICP,PAR,F1XX,NDM,DFUXX,DFPXX) CALL FFHB(NDIM,U2XX,UOLD,ICP,PAR,F2XX,NDM,DFUXX,DFPXX) DO 4 J=1,NDIM DFDU(J,I)=(F2XX(J)-F1XX(J))/(2*EP) 4 CONTINUE 5 CONTINUE C PAR(ICP(1))=PAR(ICP(1))+EP C CALL FFHB(NDIM,U,UOLD,ICP,PAR,F1XX,NDM,DFUXX,DFPXX) C DO 6 J=1,NDIM DFDP(J,ICP(1))=(F1XX(J)-F(J))/EP 6 CONTINUE C PAR(ICP(1))=PAR(ICP(1))-EP C RETURN END C C ---------- ---- SUBROUTINE FFHB(NDIM,U,UOLD,ICP,PAR,F,NDM,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(NDIM),ICP(20),PAR(20) DIMENSION F(NDIM),DFDU(NDM,NDM),DFDP(NDM,1) DIMENSION UOLD(NDIM) C NDM2=2*NDM C ROM=U(NDIM-1) PAR(11)=ROM*PI(TWO) PAR(ICP(2))=U(NDIM) IJAC=1 CALL FUNI(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C DO 2 I=1,NDM F(NDM+I)=U(NDM2+I) F(NDM2+I)=-U(NDM+I) DO 1 J=1,NDM F(NDM+I)=F(NDM+I)+ROM*DFDU(I,J)*U(NDM+J) F(NDM2+I)=F(NDM2+I)+ROM*DFDU(I,J)*U(NDM2+J) 1 CONTINUE 2 CONTINUE C F(NDIM-1)=-ONE C DO 3 I=1,NDM F(NDIM-1)=F(NDIM-1)+U(NDM+I)*U(NDM+I)+U(NDM2+I)*U(NDM2+I) 3 CONTINUE C F(NDIM)=ZERO C DO 4 I=1,NDM F(NDIM)=F(NDIM)+UOLD(NDM2+I)*(U(NDM+I)-UOLD(NDM+I)) - * UOLD(NDM+I)*(U(NDM2+I)-UOLD(NDM2+I)) 4 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE STPNHB(IBR,U,NDM2,SMAT,DFDU,DFUXX,DFDP,V,F,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C LOGICAL FOUND C C Generates starting data for the 2-parameter continuation of C Hopf bifurcation point (ODE). C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(NDIM),V(NDMP1),F(NDM),SMAT(NDM2,NDM2) DIMENSION DFDU(NDM,NDM),DFUXX(NDMP1,NDMP1),DFDP(NDM,1) DIMENSION IR(1),IC(1) C CALL FINDL3(IRS,ITP,NFPAR1,FOUND) CALL READL3(IPS,IBR,U,PAR) C IJAC=1 RHO=PAR(11) ROM=RHO/PI(TWO) CALL FUNI(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C NDM2=2*NDM DO 2 I=1,NDM2 DO 1 J=1,NDM2 SMAT(I,J)=ZERO 1 CONTINUE 2 CONTINUE C DO 3 I=1,NDM SMAT(I,NDM+I)=ONE 3 CONTINUE C DO 4 I=1,NDM SMAT(NDM+I,I)=-ONE 4 CONTINUE C DO 6 I=1,NDM DO 5 J=1,NDM SMAT(I,J)=ROM*DFDU(I,J) SMAT(NDM+I,NDM+J)=ROM*DFDU(I,J) 5 CONTINUE 6 CONTINUE CALL NLVC(NDM2,NDM2,2,SMAT,V,IR,IC) CALL NRMLZ(NDM2,V) C DO 7 I=1,NDM2 U(NDM+I)=V(I) 7 CONTINUE C U(NDIM-1)=ROM U(NDIM)=PAR(ICP(2)) C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Subroutines for the Continuation of Hopf Bifurcation Points (Waves) C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ---- SUBROUTINE FNHW(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the equations for the 2-parameter continuation of a C bifurcation to a traveling wave. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U(NDIM),UOLD(NDIM),ICP(1),PAR(1) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1) C C Generate the function. C CALL FFHW(NDIM,U,UOLD,ICP,PAR,F,NDM,DFUXX,DFPXX) C IF(IJAC.EQ.0)RETURN C C Generate the Jacobian. C UMX=ZERO DO 2 I=1,NDIM IF(DABS(U(I)).GT.UMX)UMX=DABS(U(I)) CSGLE IF( ABS(U(I)).GT.UMX)UMX= ABS(U(I)) 2 CONTINUE C EP=HMACH*(ONE+UMX) C DO 5 I=1,NDIM DO 3 J=1,NDIM U1XX(J)=U(J) U2XX(J)=U(J) 3 CONTINUE U1XX(I)=U1XX(I)-EP U2XX(I)=U2XX(I)+EP CALL FFHW(NDIM,U1XX,UOLD,ICP,PAR,F1XX,NDM,DFUXX,DFPXX) CALL FFHW(NDIM,U2XX,UOLD,ICP,PAR,F2XX,NDM,DFUXX,DFPXX) DO 4 J=1,NDIM DFDU(J,I)=(F2XX(J)-F1XX(J))/(2*EP) 4 CONTINUE 5 CONTINUE C PAR(ICP(1))=PAR(ICP(1))+EP C CALL FFHW(NDIM,U,UOLD,ICP,PAR,F1XX,NDM,DFUXX,DFPXX) C DO 6 J=1,NDIM DFDP(J,ICP(1))=(F1XX(J)-F(J))/EP 6 CONTINUE C PAR(ICP(1))=PAR(ICP(1))-EP C RETURN END C C ---------- ---- SUBROUTINE FFHW(NDIM,U,UOLD,ICP,PAR,F,NDM,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(NDIM),ICP(20),PAR(20) DIMENSION F(NDIM),DFDU(NDM,NDM),DFDP(NDM,1) DIMENSION UOLD(NDIM) C NDM2=2*NDM C ROM=U(NDIM-1) PAR(ICP(2))=U(NDIM) IJAC=1 CALL FNWS(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C DO 2 I=1,NDM F(NDM+I)=U(NDM2+I) F(NDM2+I)=-U(NDM+I) DO 1 J=1,NDM F(NDM+I)=F(NDM+I)+ROM*DFDU(I,J)*U(NDM+J) F(NDM2+I)=F(NDM2+I)+ROM*DFDU(I,J)*U(NDM2+J) 1 CONTINUE 2 CONTINUE C F(NDIM-1)=-ONE C DO 3 I=1,NDM F(NDIM-1)=F(NDIM-1)+U(NDM+I)*U(NDM+I)+U(NDM2+I)*U(NDM2+I) 3 CONTINUE C F(NDIM)=ZERO C DO 4 I=1,NDM F(NDIM)=F(NDIM)+UOLD(NDM2+I)*(U(NDM+I)-UOLD(NDM+I)) - * UOLD(NDM+I)*(U(NDM2+I)-UOLD(NDM2+I)) 4 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE STPNHW(IBR,U,NDM2,SMAT,DFDU,DFUXX,DFDP,V,F,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C LOGICAL FOUND C C Generates starting data for the continuation of a bifurcation to a C traveling wave. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(NDIM),V(NDMP1),F(NDM),SMAT(NDM2,NDM2) DIMENSION DFDU(NDM,NDM),DFUXX(NDMP1,NDMP1),DFDP(NDM,1) DIMENSION IR(1),IC(1) C CALL FINDL3(IRS,ITP,NFPAR1,FOUND) CALL READL3(IPS,IBR,U,PAR) C IJAC=1 RHO=PAR(11) ROM=RHO/PI(TWO) CALL FNWS(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C NDM2=2*NDM DO 2 I=1,NDM2 DO 1 J=1,NDM2 SMAT(I,J)=ZERO 1 CONTINUE 2 CONTINUE C DO 3 I=1,NDM SMAT(I,NDM+I)=ONE 3 CONTINUE C DO 4 I=1,NDM SMAT(NDM+I,I)=-ONE 4 CONTINUE C DO 6 I=1,NDM DO 5 J=1,NDM SMAT(I,J)=ROM*DFDU(I,J) SMAT(NDM+I,NDM+J)=ROM*DFDU(I,J) 5 CONTINUE 6 CONTINUE CALL NLVC(NDM2,NDM2,2,SMAT,V,IR,IC) CALL NRMLZ(NDM2,V) C DO 7 I=1,NDM2 U(NDM+I)=V(I) 7 CONTINUE C U(NDIM-1)=ROM U(NDIM)=PAR(ICP(2)) C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Subroutines for the Continuation of Periodic Limit Points C and Period Doubling Bifurcations C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ---- SUBROUTINE FNPL(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Subroutines for the 2-parameter continuation of of limit points C on branches of periodic solutions. C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U(NDIM),ICP(1),PAR(1) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1) C C Generate the function. C CALL FFPL(NDIM,U,UOLD,ICP,PAR,F,NDM,DFUXX,DFPXX) C IF(IJAC.EQ.0)RETURN C C Generate the Jacobian. C UMX=ZERO DO 1 I=1,NDIM IF(DABS(U(I)).GT.UMX)UMX=DABS(U(I)) CSGLE IF( ABS(U(I)).GT.UMX)UMX= ABS(U(I)) 1 CONTINUE C EP=HMACH*(ONE+UMX) C DO 4 I=1,NDIM DO 2 J=1,NDIM U1XX(J)=U(J) U2XX(J)=U(J) 2 CONTINUE U1XX(I)=U1XX(I)-EP U2XX(I)=U2XX(I)+EP CALL FFPL(NDIM,U1XX,UOLD,ICP,PAR,F1XX,NDM,DFUXX,DFPXX) CALL FFPL(NDIM,U2XX,UOLD,ICP,PAR,F2XX,NDM,DFUXX,DFPXX) DO 3 J=1,NDIM DFDU(J,I)=(F2XX(J)-F1XX(J))/(2*EP) 3 CONTINUE 4 CONTINUE C DO 6 I=1,NFPAR PAR(ICP(I))=PAR(ICP(I))+EP C CALL FFPL(NDIM,U,UOLD,ICP,PAR,F1XX,NDM,DFUXX,DFPXX) C DO 5 J=1,NDIM DFDP(J,ICP(I))=(F1XX(J)-F(J))/EP 5 CONTINUE C PAR(ICP(I))=PAR(ICP(I))-EP 6 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE FFPL(NDIM,U,UOLD,ICP,PAR,F,NDM,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(NDIM),ICP(20),PAR(20) DIMENSION F(NDIM),DFDU(NDM,NDM),DFDP(NDM,1) C IJAC=1 C1=PAR(ICP(3)) CSGLE C1=PAR(ICP(3)) C2=PAR(ICP(4)) CSGLE C2=PAR(ICP(4)) CALL FUNI(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C DO 2 I=1,NDM F(NDM+I)=ZERO DO 1 J=1,NDM F(NDM+I)=F(NDM+I)+DFDU(I,J)*U(NDM+J) 1 CONTINUE F(NDM+I)=C1*F(NDM+I)+C2*F(I) F(I)=C1*F(I) 2 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE BCPL(NDIM,PAR,ICP,NBC,U0,U1,F,IJAC,DBC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION PAR(1),ICP(1),U0(NBC),U1(NBC),F(NBC) DIMENSION DBC(NBC,1) C DO 1 I=1,NDIM F(I)=U0(I)-U1(I) 1 CONTINUE C IF(IJAC.EQ.0)RETURN C NN=2*NDIM+NPAR DO 3 I=1,NBC DO 2 J=1,NN DBC(I,J)=ZERO 2 CONTINUE 3 CONTINUE C DO 4 I=1,NDIM DBC(I,I)=ONE DBC(I,NDIM+I)=-ONE 4 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE BCPD(NDIM,PAR,ICP,NBC,U0,U1,F,IJAC,DBC) C C Generate boundary conditions for the 2-parameter continuation C of period doubling bifurcations. C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION PAR(1),ICP(1),U0(NBC),U1(NBC),F(NBC) DIMENSION DBC(NBC,1) C DO 1 I=1,NDM F(I)=U0(I)-U1(I) F(NDM+I)=U0(NDM+I)+U1(NDM+I) 1 CONTINUE C IF(IJAC.EQ.0)RETURN C NN=2*NDIM+NPAR DO 3 I=1,NBC DO 2 J=1,NN DBC(I,J)=ZERO 2 CONTINUE 3 CONTINUE C DO 4 I=1,NDIM DBC(I,I)=ONE IF(I.LE.NDM) THEN DBC(I,NDIM+I)=-ONE ELSE DBC(I,NDIM+I)=ONE ENDIF 4 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE ICPL(NDIM,PAR,ICP,NINT,U,UOLD,UDOT,UPOLD,F,IJAC, * DINT) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(1),UOLD(1),UDOT(1),UPOLD(1),F(3),DINT(NINT,1) DIMENSION ICP(20),PAR(20) C F(1)=ZERO F(2)=ZERO F(3)=PAR(ICP(4))**2-ONE C DO 1 I=1,NDM F(1)=F(1)+U(I)*UPOLD(I) F(2)=F(2)+U(NDM+I)*UPOLD(I) F(3)=F(3)+U(NDM+I)*U(NDM+I) 1 CONTINUE C IF(IJAC.EQ.0)RETURN C NN=NDIM+NPAR DO 3 I=1,NINT DO 2 J=1,NN DINT(I,J)=ZERO 2 CONTINUE 3 CONTINUE C DO 4 I=1,NDM DINT(1,I)=UPOLD(I) DINT(2,NDM+I)=UPOLD(I) DINT(3,NDM+I)=TWO*U(NDM+I) 4 CONTINUE C DINT(3,NDIM+ICP(4))=TWO*PAR(ICP(4)) C RETURN END C C ---------- ------ SUBROUTINE STPNPL(NTSTRS,NCOLRS,LAB,IBR,M1U,U,UPS,UDOTPS,UPOLDP, * TM,DTM,NDIM2,SMAT,RNLLV,IR,IC,F,DFDU,DFDP,NODIR) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates starting data for the 2-parameter continuation of limit C points on a branch of periodic solutions. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION UPS(M1U,1),UDOTPS(M1U,1),UPOLDP(M1U,1),TM(1),DTM(1) DIMENSION IR(NDIM2),IC(NDIM2),SMAT(NDIM2,NDIM2),RNLLV(NDIM2) DIMENSION U(NDIM),F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,NPAR) DIMENSION TEMP(7),ICPRS(20) C LOGICAL FOUND C CALL FINDL3(IRS,ITP1,NFPAR1,FOUND) READ(3,*)IBR,NTOT1,ITP1,LAB1,NFPAR1,ISW1,NTPL1,NAR1,NSKIP1, * NTSTRS,NCOLRS,ICPRS(1),ICPRS(2) NRSP1=NTSTRS+1 C DO 2 J=1,NTSTRS DO 1 I=1,NCOLRS K1=(I-1)*NDIM+1 K2=K1+NDM-1 READ(3,101)TEMP(I),(UPS(J,K),K=K1,K2) 1 CONTINUE TM(J)=TEMP(1) 2 CONTINUE READ(3,101)TM(NRSP1),(UPS(NRSP1,K),K=1,NDM) C READ(3,101)RLDOT(1),RLDOT(2) C C Read U-dot (derivative with respect to arclength). C DO 4 J=1,NTSTRS DO 3 I=1,NCOLRS K1=(I-1)*NDIM+NDM+1 K2=I*NDIM READ(3,101)(UPS(J,K),K=K1,K2) 3 CONTINUE 4 CONTINUE K1=NDM+1 READ(3,101)(UPS(NRSP1,K),K=K1,NDIM) C C Read the parameter values. C READ(3,101)(PAR(I),I=1,NPAR) PAR(ICP(4))=RLDOT(2) DO 5 I=1,NFPAR RL(I)=PAR(ICP(I)) 5 CONTINUE C NODIR=1 C 101 FORMAT(4X,1P7E18.10) C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Subroutines for the Continuation of Limit Points for BVP. C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ---- SUBROUTINE FNBL(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the equations for the 2-parameter continuation C of limit points (BVP). C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U(NDIM),ICP(1),PAR(1),F(NDIM) DIMENSION DFDU(NDIM,NDIM),DFDP(NDIM,1) C C Generate the function. C CALL FFBL(NDIM,U,UOLD,ICP,PAR,F,DFUXX,DFPXX) C IF(IJAC.EQ.0)RETURN C C Generate the Jacobian. C UMX=ZERO DO 1 I=1,NDIM IF(DABS(U(I)).GT.UMX)UMX=DABS(U(I)) CSGLE IF( ABS(U(I)).GT.UMX)UMX= ABS(U(I)) 1 CONTINUE C EP=HMACH*(ONE+UMX) C DO 4 I=1,NDIM DO 2 J=1,NDIM U1XX(J)=U(J) U2XX(J)=U(J) 2 CONTINUE U1XX(I)=U1XX(I)-EP U2XX(I)=U2XX(I)+EP CALL FFBL(NDIM,U1XX,UOLD,ICP,PAR,F1XX,DFUXX,DFPXX) CALL FFBL(NDIM,U2XX,UOLD,ICP,PAR,F2XX,DFUXX,DFPXX) DO 3 J=1,NDIM DFDU(J,I)=(F2XX(J)-F1XX(J))/(2*EP) 3 CONTINUE 4 CONTINUE C DO 6 I=1,NFPAR PAR(ICP(I))=PAR(ICP(I))+EP CALL FFBL(NDIM,U,UOLD,ICP,PAR,F1XX,DFUXX,DFPXX) DO 5 J=1,NDIM DFDP(J,ICP(I))=(F1XX(J)-F(J))/EP 5 CONTINUE PAR(ICP(I))=PAR(ICP(I))-EP 6 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE FFBL(NDIM,U,UOLD,ICP,PAR,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(NDIM),ICP(1),PAR(1),F(NDIM),DFDU(NDM,NDM),DFDP(NDM,1) C IJAC=1 CALL FUNI(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C NFPX=NFPAR/2-1 DO 3 I=1,NDM F(NDM+I)=ZERO DO 1 J=1,NDM F(NDM+I)=F(NDM+I)+DFDU(I,J)*U(NDM+J) 1 CONTINUE IF(NFPX.GT.0)THEN DO 2 J=1,NFPX F(NDM+I)=F(NDM+I) * + DFDP(I,ICP(1+J))*PAR(ICP(NFPAR-NFPX+J)) 2 CONTINUE ENDIF 3 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE BCBL(NDIM,PAR,ICP,NBC,U0,U1,F,IJAC,DBC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the boundary conditions for the 2-parameter continuation C of limit points (BVP). C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U0(NDIM),U1(NDIM),F(NBC),ICP(1),PAR(1),DBC(NBC,1) C C Generate the function. C CALL FBBL(NDIM,PAR,ICP,NBC,U0,U1,F,DFUXX) C IF(IJAC.EQ.0)RETURN C C Derivatives with respect to U0. C UMX=ZERO DO 1 I=1,NDIM IF(DABS(U0(I)).GT.UMX)UMX=DABS(U0(I)) CSGLE IF( ABS(U0(I)).GT.UMX)UMX= ABS(U0(I)) 1 CONTINUE EP=HMACH*(ONE+UMX) DO 4 I=1,NDIM DO 2 J=1,NDIM U1XX(J)=U0(J) U2XX(J)=U0(J) 2 CONTINUE U1XX(I)=U1XX(I)-EP U2XX(I)=U2XX(I)+EP CALL FBBL(NDIM,PAR,ICP,NBC,U1XX,U1,F1XX,DFUXX) CALL FBBL(NDIM,PAR,ICP,NBC,U2XX,U1,F2XX,DFUXX) DO 3 J=1,NBC DBC(J,I)=(F2XX(J)-F1XX(J))/(2*EP) 3 CONTINUE 4 CONTINUE C C Derivatives with respect to U1. C UMX=ZERO DO 5 I=1,NDIM IF(DABS(U1(I)).GT.UMX)UMX=DABS(U1(I)) CSGLE IF( ABS(U1(I)).GT.UMX)UMX= ABS(U1(I)) 5 CONTINUE EP=HMACH*(ONE+UMX) DO 8 I=1,NDIM DO 6 J=1,NDIM U1XX(J)=U1(J) U2XX(J)=U1(J) 6 CONTINUE U1XX(I)=U1XX(I)-EP U2XX(I)=U2XX(I)+EP CALL FBBL(NDIM,PAR,ICP,NBC,U0,U1XX,F1XX,DFUXX) CALL FBBL(NDIM,PAR,ICP,NBC,U0,U2XX,F2XX,DFUXX) DO 7 J=1,NBC DBC(J,NDIM+I)=(F2XX(J)-F1XX(J))/(2*EP) 7 CONTINUE 8 CONTINUE C DO 10 I=1,NFPAR PAR(ICP(I))=PAR(ICP(I))+EP CALL FBBL(NDIM,PAR,ICP,NBC,U0,U1,F2XX,DFUXX) DO 9 J=1,NBC DBC(J,2*NDIM+ICP(I))=(F2XX(J)-F(J))/EP 9 CONTINUE PAR(ICP(I))=PAR(ICP(I))-EP 10 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE FBBL(NDIM,PAR,ICP,NBC,U0,U1,F,DBC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION PAR(1),ICP(1),U0(NDIM),U1(NDIM),F(NBC) DIMENSION DBC(NBC0,1) C IJAC=1 NFPX=NFPAR/2-1 CALL BCNI(NDM,PAR,ICP,NBC0,U0,U1,F,IJAC,DBC) DO 3 I=1,NBC0 F(NBC0+I)=ZERO DO 1 J=1,NDM F(NBC0+I)=F(NBC0+I)+DBC(I,J)*U0(NDM+J) F(NBC0+I)=F(NBC0+I)+DBC(I,NDM+J)*U1(NDM+J) 1 CONTINUE IF(NFPX.NE.0) THEN DO 2 J=1,NFPX F(NBC0+I)=F(NBC0+I) * + DBC(I,NDIM+ICP(1+J))*PAR(ICP(NFPAR-NFPX+J)) 2 CONTINUE ENDIF 3 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE ICBL(NDIM,PAR,ICP,NINT,U,UOLD,UDOT,UPOLD,F,IJAC,DINT) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates integral conditions for the 2-parameter continuation of C limit points (BVP). C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U(1),UOLD(1),UDOT(1),UPOLD(1),F(NINT),DINT(NINT,1) DIMENSION ICP(1),PAR(1) C C Generate the function. C CALL FIBL(NDIM,PAR,ICP,NINT,U,UOLD,UDOT,UPOLD,F,DFUXX) C IF(IJAC.EQ.0)RETURN C C Generate the Jacobian. C UMX=ZERO DO 1 I=1,NDIM IF(DABS(U(I)).GT.UMX)UMX=DABS(U(I)) CSGLE IF( ABS(U(I)).GT.UMX)UMX= ABS(U(I)) 1 CONTINUE C EP=HMACH*(ONE+UMX) C DO 4 I=1,NDIM DO 2 J=1,NDIM U1XX(J)=U(J) U2XX(J)=U(J) 2 CONTINUE U1XX(I)=U1XX(I)-EP U2XX(I)=U2XX(I)+EP CALL FIBL(NDIM,PAR,ICP,NINT,U1XX,UOLD,UDOT,UPOLD,F1XX,DFUXX) CALL FIBL(NDIM,PAR,ICP,NINT,U2XX,UOLD,UDOT,UPOLD,F2XX,DFUXX) DO 3 J=1,NINT DINT(J,I)=(F2XX(J)-F1XX(J))/(2*EP) 3 CONTINUE 4 CONTINUE C DO 6 I=1,NFPAR PAR(ICP(I))=PAR(ICP(I))+EP CALL FIBL(NDIM,PAR,ICP,NINT,U,UOLD,UDOT,UPOLD,F1XX,DFUXX) DO 5 J=1,NINT DINT(J,NDIM+ICP(I))=(F1XX(J)-F(J))/EP 5 CONTINUE PAR(ICP(I))=PAR(ICP(I))-EP 6 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE FIBL(NDIM,PAR,ICP,NINT,U,UOLD,UDOT,UPOLD,F,DINT) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(1),UOLD(1),UDOT(1),UPOLD(1),F(NINT),DINT(NINT0,1) DIMENSION ICP(1),PAR(1) C IF(NINT0.GT.0) THEN NFPX=NFPAR/2-1 IJAC=1 CALL ICNI(NDM,PAR,ICP,NINT0,U,UOLD,UDOT,UPOLD,F,IJAC,DINT) DO 3 I=1,NINT0 F(NINT0+I)=ZERO DO 1 J=1,NDM F(NINT0+I)=F(NINT0+I)+DINT(I,J)*U(NDM+J) 1 CONTINUE IF(NFPX.NE.0) THEN DO 2 J=1,NFPX F(NINT0+I)=F(NINT0+I) * + DINT(I,NDM+ICP(1+J))*PAR(ICP(NFPAR-NFPX+J)) 2 CONTINUE ENDIF 3 CONTINUE ENDIF C F(NINT)=-ONE DO 4 I=1,NDM F(NINT)=F(NINT)+U(NDM+I)*U(NDM+I) 4 CONTINUE IF(NFPX.NE.0) THEN DO 5 I=1,NFPX F(NINT)=F(NINT)+PAR(ICP(NFPAR-NFPX+I))**2 5 CONTINUE ENDIF C RETURN END C C ---------- ------ SUBROUTINE STPNBL(NTSTRS,NCOLRS,LAB,IBR,M1U,U,UPS,UDOTPS,UPOLDP, * TM,DTM,NDIM2,SMAT,RNLLV,IR,IC,F,DFDU,DFDP,NODIR) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates starting data for the 2-parameter continuation of limit C points (BVP). C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION UPS(M1U,1),UDOTPS(M1U,1),UPOLDP(M1U,1),TM(1),DTM(1) DIMENSION IR(NDIM2),IC(NDIM2),SMAT(NDIM2,NDIM2),RNLLV(NDIM2) DIMENSION U(NDIM),F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,NPAR) DIMENSION TEMP(7),ICPRS(20) C LOGICAL FOUND C CALL FINDL3(IRS,ITP1,NFPAR1,FOUND) READ(3,*)IBR,NTOT1,ITP1,LAB1,NFPAR1,ISW1,NTPL1,NAR1,NSKIP1, * NTSTRS,NCOLRS,ICPRS(1) NRSP1=NTSTRS+1 C DO 2 J=1,NTSTRS DO 1 I=1,NCOLRS K1=(I-1)*NDIM+1 K2=K1+NDM-1 READ(3,101)TEMP(I),(UPS(J,K),K=K1,K2) 1 CONTINUE TM(J)=TEMP(1) 2 CONTINUE READ(3,101)TM(NRSP1),(UPS(NRSP1,K),K=1,NDM) C NFPAR0=NFPAR/2 READ(3,101)(RLDOT(I),I=1,NFPAR0) C C Read U-dot (Derivative with respect to arclength). C DO 4 J=1,NTSTRS DO 3 I=1,NCOLRS K1=(I-1)*NDIM+NDM+1 K2=I*NDIM READ(3,101)(UPS(J,K),K=K1,K2) 3 CONTINUE 4 CONTINUE K1=NDM+1 READ(3,101)(UPS(NRSP1,K),K=K1,NDIM) C C Read the parameter values. C READ(3,101)(PAR(I),I=1,NPAR) C NFPX=NFPAR/2-1 IF(NFPX.GT.0) THEN DO 5 I=1,NFPX PAR(ICP(NFPAR0+1+I))=RLDOT(I+1) 5 CONTINUE ENDIF C DO 6 I=1,NFPAR RL(I)=PAR(ICP(I)) 6 CONTINUE C NODIR=1 C 101 FORMAT(4X,1P7E18.10) C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Subroutines for the Continuation of Bifurcations to Tori C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ---- SUBROUTINE FNTR(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the equations for the 2-parameter continuation of C bifurcations to tori. C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U(NDIM),ICP(1),PAR(1) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1) C C Generate the function. C CALL FFTR(NDIM,U,UOLD,ICP,PAR,F,NDM,DFUXX,DFPXX) C IF(IJAC.EQ.0)RETURN C C Generate the Jacobian. C UMX=ZERO DO 1 I=1,NDIM IF(DABS(U(I)).GT.UMX)UMX=DABS(U(I)) CSGLE IF( ABS(U(I)).GT.UMX)UMX= ABS(U(I)) 1 CONTINUE C EP=HMACH*(ONE+UMX) C DO 4 I=1,NDIM DO 2 J=1,NDIM U1XX(J)=U(J) U2XX(J)=U(J) 2 CONTINUE U1XX(I)=U1XX(I)-EP U2XX(I)=U2XX(I)+EP CALL FFTR(NDIM,U1XX,UOLD,ICP,PAR,F1XX,NDM,DFUXX,DFPXX) CALL FFTR(NDIM,U2XX,UOLD,ICP,PAR,F2XX,NDM,DFUXX,DFPXX) DO 3 J=1,NDIM DFDU(J,I)=(F2XX(J)-F1XX(J))/(2*EP) 3 CONTINUE 4 CONTINUE C DO 6 I=1,NFPAR PAR(ICP(I))=PAR(ICP(I))+EP C CALL FFTR(NDIM,U,UOLD,ICP,PAR,F1XX,NDM,DFUXX,DFPXX) C DO 5 J=1,NDIM DFDP(J,ICP(I))=(F1XX(J)-F(J))/EP 5 CONTINUE C PAR(ICP(I))=PAR(ICP(I))-EP 6 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE FFTR(NDIM,U,UOLD,ICP,PAR,F,NDM,DFDU,DFDP) IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(NDIM),ICP(20),PAR(20) DIMENSION F(NDIM),DFDU(NDM,NDM),DFDP(NDM,1) C IJAC=1 C1=PAR(11) CALL FUNI(NDM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C NDM2=2*NDM DO 2 I=1,NDM F(NDM+I)=ZERO F(NDM2+I)=ZERO DO 1 J=1,NDM F(NDM+I)=F(NDM+I)+DFDU(I,J)*U(NDM+J) F(NDM2+I)=F(NDM2+I)+DFDU(I,J)*U(NDM2+J) 1 CONTINUE F(NDM+I)=C1*F(NDM+I) F(NDM2+I)=C1*F(NDM2+I) F(I)=C1*F(I) 2 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE BCTR(NDIM,PAR,ICP,NBC,U0,U1,F,IJAC,DBC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION PAR(20),ICP(20),U0(NBC),U1(NBC),F(NBC) DIMENSION DBC(NBC,1) C NDM2=2*NDM SIG=PAR(12) C SS=DSIN(SIG) CSGLE SS= SIN(SIG) CS=DCOS(SIG) CSGLE CS= COS(SIG) C DO 1 I=1,NDM F(I)=U0(I)-U1(I) F(NDM+I)=U1(NDM+I)-CS*U0(NDM+I)+SS*U0(NDM2+I) F(NDM2+I)=U1(NDM2+I)-CS*U0(NDM2+I)-SS*U0(NDM+I) 1 CONTINUE C IF(IJAC.EQ.0)RETURN C NN=2*NDIM+NPAR DO 3 I=1,NBC DO 2 J=1,NN DBC(I,J)=ZERO 2 CONTINUE 3 CONTINUE C DO 4 I=1,NDM DBC(I,I)=1 DBC(I,NDIM+I)=-1 DBC(NDM+I,NDM+I)=-CS DBC(NDM+I,NDM2+I)=SS DBC(NDM+I,NDIM+NDM+I)=1 DBC(NDM+I,2*NDIM+ICP(4))=CS*U0(NDM2+I)+SS*U0(NDM+I) DBC(NDM2+I,NDM+I)=-SS DBC(NDM2+I,NDM2+I)=-CS DBC(NDM2+I,NDIM+NDM2+I)=1 DBC(NDM2+I,2*NDIM+ICP(4))=SS*U0(NDM2+I)-CS*U0(NDM+I) 4 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE ICTR(NDIM,PAR,ICP,NINT,U,UOLD,UDOT,UPOLD,F,IJAC, * DINT) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(1),UOLD(1),UDOT(1),UPOLD(1),F(3),DINT(NINT,1) DIMENSION ICP(1),PAR(20) C F(1)=ZERO F(2)=ZERO F(3)=-PAR(13) C NDM2=2*NDM DO 1 I=1,NDM F(1)=F(1)+U(I)*UPOLD(I) F(2)=F(2)+U(NDM+I)*UOLD(NDM2+I)-U(NDM2+I)*UOLD(NDM+I) F(3)=F(3)+U(NDM+I)*U(NDM+I)+U(NDM2+I)*U(NDM2+I) 1 CONTINUE C IF(IJAC.EQ.0)RETURN C NN=NDIM+NPAR DO 3 I=1,NINT DO 2 J=1,NN DINT(I,J)=ZERO 2 CONTINUE 3 CONTINUE C DO 4 I=1,NDM DINT(1,I)=UPOLD(I) DINT(2,NDM+I)=UOLD(NDM2+I) DINT(2,NDM2+I)=-UOLD(NDM+I) DINT(3,NDM+I)=TWO*U(NDM+I) DINT(3,NDM2+I)=TWO*U(NDM2+I) 4 CONTINUE C DINT(3,NDIM+13)=-ONE C RETURN END C C ---------- ------ SUBROUTINE STPNTR(NTSTRS,NCOLRS,LAB,IBR,M1U,U,UPS,UDOTPS,UPOLDP, * TM,DTM,NDIM2,SMAT,RNLLV,IR,IC,F,DFDU,DFDP,NODIR) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates starting data for the 2-parameter continuation of torus C bifurcations. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION UPS(M1U,1),UDOTPS(M1U,1),UPOLDP(M1U,1),TM(1),DTM(1) DIMENSION IR(NDIM2),IC(NDIM2),SMAT(NDIM2,NDIM2),RNLLV(NDIM2) DIMENSION U(NDIM),F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,NPAR) DIMENSION TEMP(7),ICPRS(20) C LOGICAL FOUND,EOF3 C CALL FINDL3(IRS,ITP1,NFPAR1,FOUND) READ(3,*)IBR,NTOT1,ITP1,LAB1,NFPAR1,ISW1,NTPL1,NAR1,NSKIP1, * NTSTRS,NCOLRS,ICPRS(1),ICPRS(2) NRSP1=NTSTRS+1 C DO 3 J=1,NTSTRS DO 2 I=1,NCOLRS K1=(I-1)*NDIM+1 K2=K1+NDM-1 READ(3,101)TEMP(I),(UPS(J,K),K=K1,K2) C K2P1=K2+1 K3=K2+NDM DO 1 K=K2P1,K3 UPS(J,K)=RSMALL*DSIN(TEMP(I)) CSGLE UPS(J,K)=RSMALL* SIN(TEMP(I)) UPS(J,K+NDM)=ZERO 1 CONTINUE C 2 CONTINUE TM(J)=TEMP(1) 3 CONTINUE READ(3,101)TM(NRSP1),(UPS(NRSP1,K),K=1,NDM) C DO 4 I=1,NDM UPS(NRSP1,NDM+I)=ZERO UPS(NRSP1,2*NDM+I)=ZERO 4 CONTINUE C C READ(3,101)RLDOT(1),RLDOT(3) RLDOT(2)=ZERO RLDOT(4)=ZERO C C Read the direction vector and initialize the starting direction. C DO 7 J=1,NTSTRS DO 6 I=1,NCOLRS K1=(I-1)*NDIM+1 K2=K1+NDM-1 READ(3,101)(UDOTPS(J,K),K=K1,K2) C K2P1=K2+1 K3=K2+NDM DO 5 K=K2P1,K3 UDOTPS(J,K)=ZERO UDOTPS(J,K+NDM)=ZERO 5 CONTINUE C 6 CONTINUE 7 CONTINUE READ(3,101)(UDOTPS(NRSP1,K),K=1,NDM) C DO 8 I=1,NDM UDOTPS(NRSP1,NDM+I)=ZERO UDOTPS(NRSP1,2*NDM+I)=ZERO 8 CONTINUE C C Read the parameter values. C READ(3,101)(PAR(I),I=1,NPAR) PAR(13)=ZERO DO 9 I=1,NFPAR RL(I)=PAR(ICP(I)) 9 CONTINUE C NODIR=0 C 101 FORMAT(4X,1P7E18.10) C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Periodic Solutions and Fixed Period Orbits C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ---- SUBROUTINE FNPS(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the equations for the continuation of periodic orbits. C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC C DIMENSION U(NDIM),ICP(20),PAR(20) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1) C C Generate the function. C CALL FUNI(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C RHO=PAR(ICP(2)) DO 1 I=1,NDIM DFDP(I,ICP(2))=F(I) F(I)=RHO*DFDP(I,ICP(2)) 1 CONTINUE C IF(IJAC.EQ.0)RETURN C C Generate the Jacobian. C DO 3 I=1,NDIM DO 2 J=1,NDIM DFDU(I,J)=RHO*DFDU(I,J) 2 CONTINUE DFDP(I,ICP(1))=RHO*DFDP(I,ICP(1)) 3 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE FNFP(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the equations for the 2-parameter continuation of C periodic orbits of fixed period. COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC C DIMENSION U(NDIM),ICP(20),PAR(20) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1) C C Generate the function. C RHO=PAR(ICP(3)) CALL FUNI(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C DO 1 I=1,NDIM F(I)=RHO*F(I) 1 CONTINUE C IF(IJAC.EQ.0)RETURN C C Generate the Jacobian. C DO 4 I=1,NDIM DO 2 J=1,NDIM DFDU(I,J)=RHO*DFDU(I,J) 2 CONTINUE DO 3 J=1,2 DFDP(I,ICP(J))=RHO*DFDP(I,ICP(J)) 3 CONTINUE 4 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE BCPS(NDIM,PAR,ICP,NBC,U0,U1,F,IJAC,DBC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 C DIMENSION PAR(1),ICP(1),U0(NBC),U1(NBC),F(NBC) DIMENSION DBC(NBC,1) C DO 1 I=1,NDIM F(I)=U0(I)-U1(I) 1 CONTINUE C IF(IJAC.EQ.0)RETURN C NN=2*NDIM+NPAR DO 3 I=1,NBC DO 2 J=1,NN DBC(I,J)=ZERO 2 CONTINUE 3 CONTINUE C DO 4 I=1,NDIM DBC(I,I)=ONE DBC(I,NDIM+I)=-ONE 4 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE ICPS(NDIM,PAR,ICP,NINT,U,UOLD,UDOT,UPOLD,F,IJAC, * DINT) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(1),UOLD(1),UDOT(1),UPOLD(1),F(1),DINT(NINT,1) DIMENSION ICP(1),PAR(1) C F(1)=ZERO DO 1 I=1,NDIM F(1)=F(1)+U(I)*UPOLD(I) 1 CONTINUE C IF(IJAC.EQ.0)RETURN C NN=NDIM+NPAR DO 3 I=1,NINT DO 2 J=1,NN DINT(I,J)=ZERO 2 CONTINUE 3 CONTINUE C DO 4 I=1,NDIM DINT(1,I)=UPOLD(I) 4 CONTINUE C RETURN END C C ---------- ----- SUBROUTINE PDBLE(NDIM,NTST,NCOL,M1U,UPS,UDOTPS,TM,RHO) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Preprocesses restart data for switching branches at a period doubling C bifurcation. C COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE DIMENSION TM(1),UPS(M1U,1),UDOTPS(M1U,1) C RHO=TWO*RHO C DO 1 I=1,NTST TM(I)=HALF*TM(I) TM(NTST+I)=HALF+TM(I) 1 CONTINUE C TM(2*NTST+1)=ONE C DO 3 J=1,NTST+1 DO 2 I1=1,NDIM DO 2 I2=1,NCOL I=(I2-1)*NDIM+I1 UPS(NTST+J,I)= UPS(NTST+1,I1)+ UPS(J,I)- UPS(1,I1) UDOTPS(NTST+J,I)=UDOTPS(NTST+1,I1)+UDOTPS(J,I)-UDOTPS(1,I1) 2 CONTINUE 3 CONTINUE C NTST=2*NTST C RETURN END C C ---------- ------ SUBROUTINE STPNPS(NTSTRS,NCOLRS,LAB,IBR,M1U,U,UPS,UDOTPS,UPOLDP, * TM,DTM,NDIM2,SMAT,RNLLV,IR,IC,F,DFDU,DFDP,NODIR) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates starting data for the continuation of a branch of periodic C solutions from a Hopf bifurcation point. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION UPS(M1U,1),UDOTPS(M1U,1),UPOLDP(M1U,1),TM(1),DTM(1) DIMENSION IR(NDIM2),IC(NDIM2),SMAT(NDIM2,NDIM2),RNLLV(NDIM2) DIMENSION U(NDIM),F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,NPAR) DIMENSION ICPRS(20) C LOGICAL FOUND C CALL FINDL3(IRS,ITP,NFPAR1,FOUND) CALL READL3(IPS,IBR,U,PAR) C DO 1 I=1,NFPAR RL(I)=PAR(ICP(I)) 1 CONTINUE C RHO=PAR(11) TPI=PI(TWO) RIMHB=TPI/RHO NTSTRS=NTST NCOLRS=NCOL C DO 3 I=1,NDIM2 DO 2 J=1,NDIM2 SMAT(I,J)=ZERO 2 CONTINUE 3 CONTINUE C DO 4 I=1,NDIM SMAT(I,I)=-RIMHB SMAT(NDIM+I,NDIM+I)=RIMHB 4 CONTINUE C IJAC=1 CALL FUNI(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C DO 6 I=1,NDIM DO 5 J=1,NDIM SMAT(I,NDIM+J)=DFDU(I,J) SMAT(NDIM+I,J)=DFDU(I,J) 5 CONTINUE 6 CONTINUE C CALL NLVC(NDIM2,NDIM2,2,SMAT,RNLLV,IR,IC) CALL NRMLZ(NDIM2,RNLLV) C C Generate the (initially uniform) mesh. C CALL MSH(TM) DT=ONE/NTST C DO 8 J=1,NTST+1 T=TM(J) S=DSIN(TPI*T) CSGLE S=SIN(TPI*T) C=DCOS(TPI*T) CSGLE C=COS(TPI*T) DO 7 K=1,NDIM UDOTPS(J,K)=S*RNLLV(K)+C*RNLLV(NDIM+K) UPOLDP(J,K)=C*RNLLV(K)-S*RNLLV(NDIM+K) UPS(J,K)=U(K) 7 CONTINUE 8 CONTINUE C DO 11 I=1,NCOL-1 DO 10 J=1,NTST T=TM(J)+I*( TM(J+1)-TM(J) )/NCOL S=DSIN(TPI*T) CSGLE S=SIN(TPI*T) C=DCOS(TPI*T) CSGLE C=COS(TPI*T) DO 9 K=1,NDIM K1=I*NDIM+K UDOTPS(J,K1)=S*RNLLV(K)+C*RNLLV(NDIM+K) UPOLDP(J,K1)=C*RNLLV(K)-S*RNLLV(NDIM+K) UPS(J,K1)=U(K) 9 CONTINUE 10 CONTINUE 11 CONTINUE C RLDOT(1)=ZERO RLDOT(2)=ZERO C DO 12 I=1,NTST DTM(I)=DT 12 CONTINUE C CALL SCALEB(M1U,UDOTPS,RLDOT,DTM) C NODIR=-1 C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Travelling Wave Solutions to Diffusive Systems C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ---- SUBROUTINE FNWS(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Sets up equations for the continuation of spatially homogeneous C solutions to parabolic systems, for the purpose of finding C bifurcations to travelling wave solutions. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U(NDIM),PAR(1) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1),ICP(1) C C Generate the function. C NDM2=NDM/2 CALL FFWS(NDIM,U,UOLD,ICP,NFPAR,PAR,IJAC,F,DFDU,DFDP,NDM2, * DFUXX,DFPXX) C RETURN END C C ---------- ---- SUBROUTINE FFWS(NDIM,U,UOLD,ICP,NFPAR,PAR,IJAC,F,DFDU,DFDP, * NDM,DFUXX,DFPXX) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(NDIM),ICP(20),PAR(20) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1) DIMENSION DFUXX(NDM,NDM),DFPXX(NDM,20) C C=PAR(10) CALL FUNI(NDM,U,UOLD,ICP,PAR,IJAC,F,DFUXX,DFPXX) C DO 1 I=1,NDM F(NDM+I)=-( C*U(NDM+I) + F(I) )/PAR(14+I) F(I)=U(NDM+I) 1 CONTINUE C IF(IJAC.EQ.0)RETURN C DO 3 I=1,NDM DO 2 J=1,NDM DFDU(I,J) =ZERO DFDU(I,J+NDM) =ZERO DFDU(I+NDM,J) =-DFUXX(I,J)/PAR(14+I) DFDU(I+NDM,J+NDM)=ZERO 2 CONTINUE DFDU(I,I+NDM) =ONE DFDU(I+NDM,I+NDM)=-C/PAR(14+I) IF(ICP(1).LT.10)THEN DFDP(I,ICP(1)) =ZERO DFDP(I+NDM,ICP(1))=-DFPXX(I,ICP(1))/PAR(14+I) ENDIF IF(NFPAR.GT.1.AND.ICP(2).LT.10)THEN DFDP(I,ICP(2)) =ZERO DFDP(I+NDM,ICP(2))=-DFPXX(I,ICP(2))/PAR(14+I) ENDIF 3 CONTINUE C C Derivative with respect to the wave speed. C DO 4 I=1,NDM DFDP(I,10) =ZERO DFDP(I+NDM,10)=-U(NDM+I)/PAR(14+I) 4 CONTINUE C C Derivatives with respect to the diffusion coefficients. C DO 6 J=1,NDM DO 5 I=1,NDM DFDP(I,14+J) =ZERO DFDP(I+NDM,14+J)=ZERO 5 CONTINUE DFDP(J+NDM,14+J)=-F(J+NDM)/PAR(14+J) 6 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE FNWP(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Equations for the continuation of traveling waves. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(NDIM),PAR(1) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1),ICP(20) C C Generate the function and Jacobian. C CALL FNWS(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C RHO=PAR(ICP(2)) DO 1 I=1,NDIM DFDP(I,ICP(2))=F(I) F(I)=RHO*F(I) 1 CONTINUE C IF(IJAC.EQ.0)RETURN C DO 2 I=1,NDIM DO 2 J=1,NDIM DFDU(I,J)=RHO*DFDU(I,J) 2 CONTINUE C DO 3 I=1,NDIM DFDP(I,ICP(1))=RHO*DFDP(I,ICP(1)) 3 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE FNWF(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the equations for the two parameter continuation C of wavetrains of fixed wave length. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION U(NDIM),PAR(1) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1),ICP(20) C C Generate the function and Jacobian. C CALL FNWS(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C RHO=PAR(ICP(3)) DO 1 I=1,NDIM F(I)=RHO*F(I) 1 CONTINUE C IF(IJAC.EQ.0)RETURN C DO 2 I=1,NDIM DO 2 J=1,NDIM DFDU(I,J)=RHO*DFDU(I,J) 2 CONTINUE C DO 3 I=1,NDIM DO 3 J=1,2 DFDP(I,ICP(J))=RHO*DFDP(I,ICP(J)) 3 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE STPNWP(NTSTRS,NCOLRS,LAB,IBR,M1U,U,UPS,UDOTPS,UPOLDP, * TM,DTM,NDIM2,SMAT,RNLLV,IR,IC,F,DFDU,DFDP,NODIR) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates starting data for the continuation of a branch of periodic C solutions starting from a Hopf bifurcation point (Waves). C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION UPS(M1U,1),UDOTPS(M1U,1),UPOLDP(M1U,1),TM(1),DTM(1) DIMENSION IR(NDIM2),IC(NDIM2),SMAT(NDIM2,NDIM2),RNLLV(NDIM2) DIMENSION U(NDIM),F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,NPAR) DIMENSION ICPRS(20) C LOGICAL FOUND C CALL FINDL3(IRS,ITP,NFPAR1,FOUND) CALL READL3(IPS,IBR,U,PAR) C DO 1 I=1,NFPAR RL(I)=PAR(ICP(I)) 1 CONTINUE C RHO=PAR(11) TPI=PI(TWO) RIMHB=TPI/RHO NTSTRS=NTST NCOLRS=NCOL C DO 3 I=1,NDIM2 DO 2 J=1,NDIM2 SMAT(I,J)=ZERO 2 CONTINUE 3 CONTINUE C DO 4 I=1,NDIM SMAT(I,I)=-RIMHB SMAT(NDIM+I,NDIM+I)=RIMHB 4 CONTINUE C IJAC=1 CALL FNWS(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C DO 6 I=1,NDIM DO 5 J=1,NDIM SMAT(I,NDIM+J)=DFDU(I,J) SMAT(NDIM+I,J)=DFDU(I,J) 5 CONTINUE 6 CONTINUE C CALL NLVC(NDIM2,NDIM2,2,SMAT,RNLLV,IR,IC) CALL NRMLZ(NDIM2,RNLLV) C C Generate the (initially uniform) mesh. C CALL MSH(TM) DT=ONE/NTST C DO 8 J=1,NTST+1 T=TM(J) S=DSIN(TPI*T) CSGLE S=SIN(TPI*T) C=DCOS(TPI*T) CSGLE C=COS(TPI*T) DO 7 K=1,NDIM UDOTPS(J,K)=S*RNLLV(K)+C*RNLLV(NDIM+K) UPOLDP(J,K)=C*RNLLV(K)-S*RNLLV(NDIM+K) UPS(J,K)=U(K) 7 CONTINUE 8 CONTINUE C DO 11 I=1,NCOL-1 DO 10 J=1,NTST T=TM(J)+I*( TM(J+1)-TM(J) )/NCOL S=DSIN(TPI*T) CSGLE S=SIN(TPI*T) C=DCOS(TPI*T) CSGLE C=COS(TPI*T) DO 9 K=1,NDIM K1=I*NDIM+K UDOTPS(J,K1)=S*RNLLV(K)+C*RNLLV(NDIM+K) UPOLDP(J,K1)=C*RNLLV(K)-S*RNLLV(NDIM+K) UPS(J,K1)=U(K) 9 CONTINUE 10 CONTINUE 11 CONTINUE C RLDOT(1)=ZERO RLDOT(2)=ZERO C DO 12 I=1,NTST DTM(I)=DT 12 CONTINUE C CALL SCALEB(M1U,UDOTPS,RLDOT,DTM) C NODIR=-1 C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Diffusive Systems : Time Evolution C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ---- SUBROUTINE FNPE(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the equations for taking one time step (Implicit Euler). C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DIMENSION U(NDIM),UOLD(NDIM),PAR(1) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1),ICP(1) C C Generate the function and Jacobian. C CALL FFPE(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP, * NDM,DFUXX,DFPXX) C RETURN END C C ---------- ---- SUBROUTINE FFPE(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP, * NDM,DFUXX,DFPXX) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS C DIMENSION U(NDIM),UOLD(NDIM),ICP(20),PAR(20) DIMENSION F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,1) DIMENSION DFUXX(NDM,NDM),DFPXX(NDM,20) C RHO=PAR(11) T=PAR(ICP(1)) DT=T-RLOLD(1) IF(DABS(DT).LT.DSMIN)DT=DS CSGLE IF( ABS(DT).LT.DSMIN)DT=DS C CALL FUNI(NDM,U,UOLD,ICP,PAR,IJAC,F(NDM+1),DFUXX,DFPXX) C DO 1 I=1,NDM F(I)=RHO*U(NDM+I) F(NDM+I)=RHO*( (U(I)-UOLD(I))/DT - F(NDM+I) )/PAR(14+I) 1 CONTINUE C IF(IJAC.EQ.0)RETURN C DO 3 I=1,NDM DO 2 J=1,NDM DFDU(I,J) =ZERO DFDU(I,J+NDM) =ZERO DFDU(I+NDM,J) =-RHO*DFUXX(I,J)/PAR(14+I) DFDU(I+NDM,J+NDM)=ZERO 2 CONTINUE DFDU(I,I+NDM) =RHO DFDU(I+NDM,I) =DFDU(I+NDM,I) + RHO/(DT*PAR(14+I)) DFDP(I,ICP(1)) =ZERO DFDP(I+NDM,ICP(1))=-RHO*(U(I)-UOLD(I))/(DT**2*PAR(14+I)) 3 CONTINUE C RETURN END C SUBROUTINE ICPE(NDIM,PAR,ICP,NINT,U,UOLD,UDOT,UPOLD,F,IJAC,DINT) C ---------- ---- C C Dummy integral condition subroutine for parabolic systems. C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Routines for Interface with User Supplied Routines C (To generate Jacobian by differencing, if not supplied analytically) C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ---- SUBROUTINE FUNI(NDIM,U,UOLD,ICP,PAR,IJAC,F,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Interface subroutine to user supplied FUNC. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLDIF/ U1ZZ(50),U2ZZ(50),F1ZZ(50),F2ZZ(50) C DIMENSION U(NDIM),UOLD(NDIM),ICP(20),PAR(20),F(NDIM) DIMENSION DFDU(NDIM,NDIM),DFDP(NDIM,20) C C Generate the function. C CALL FUNC(NDIM,U,ICP,PAR,IJAC,F,DFDU,DFDP) C IF(JAC.EQ.1 .OR. IJAC.EQ.0)RETURN C C Generate the Jacobian by differencing. C UMX=ZERO DO 1 I=1,NDIM IF(DABS(U(I)).GT.UMX)UMX=DABS(U(I)) CSGLE IF( ABS(U(I)).GT.UMX)UMX= ABS(U(I)) 1 CONTINUE C EP=HMACH*(ONE+UMX) C DO 4 I=1,NDIM DO 2 J=1,NDIM U1ZZ(J)=U(J) U2ZZ(J)=U(J) 2 CONTINUE U1ZZ(I)=U1ZZ(I)-EP U2ZZ(I)=U2ZZ(I)+EP CALL FUNC(NDIM,U1ZZ,ICP,PAR,0,F1ZZ,DFDU,DFDP) CALL FUNC(NDIM,U2ZZ,ICP,PAR,0,F2ZZ,DFDU,DFDP) DO 3 J=1,NDIM DFDU(J,I)=(F2ZZ(J)-F1ZZ(J))/(2*EP) 3 CONTINUE 4 CONTINUE C DO 6 I=1,NFPAR EP=HMACH*( ONE +DABS(PAR(ICP(I))) ) CSGLE EP=HMACH*( ONE + ABS(PAR(ICP(I))) ) PAR(ICP(I))=PAR(ICP(I))+EP CALL FUNC(NDIM,U,ICP,PAR,0,F1ZZ,DFDU,DFDP) DO 5 J=1,NDIM DFDP(J,ICP(I))=(F1ZZ(J)-F(J))/EP 5 CONTINUE PAR(ICP(I))=PAR(ICP(I))-EP 6 CONTINUE C RETURN END C SUBROUTINE BCNI(NDIM,PAR,ICP,NBC,U0,U1,F,IJAC,DBC) C ---------- ---- C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Interface subroutine to the user supplied BCND. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLDIF/ U1ZZ(50),U2ZZ(50),F1ZZ(50),F2ZZ(50) C DIMENSION PAR(20),ICP(20),U0(NDIM),U1(NDIM),F(NBC),DBC(NBC,1) C C Generate the function. C CALL BCND(NDIM,PAR,ICP,NBC,U0,U1,F,IJAC,DBC) C IF(JAC.EQ.1 .OR. IJAC.EQ.0)RETURN C C Generate the Jacobian by differencing. C UMX=ZERO DO 1 I=1,NDIM IF(DABS(U0(I)).GT.UMX)UMX=DABS(U0(I)) CSGLE IF( ABS(U0(I)).GT.UMX)UMX= ABS(U0(I)) 1 CONTINUE C EP=HMACH*(ONE+UMX) C DO 4 I=1,NDIM DO 2 J=1,NDIM U1ZZ(J)=U0(J) U2ZZ(J)=U0(J) 2 CONTINUE U1ZZ(I)=U1ZZ(I)-EP U2ZZ(I)=U2ZZ(I)+EP CALL BCND(NDIM,PAR,ICP,NBC,U1ZZ,U1,F1ZZ,0,DBC) CALL BCND(NDIM,PAR,ICP,NBC,U2ZZ,U1,F2ZZ,0,DBC) DO 3 J=1,NBC DBC(J,I)=(F2ZZ(J)-F1ZZ(J))/(2*EP) 3 CONTINUE 4 CONTINUE C UMX=ZERO DO 5 I=1,NDIM IF(DABS(U1(I)).GT.UMX)UMX=DABS(U1(I)) CSGLE IF( ABS(U1(I)).GT.UMX)UMX= ABS(U1(I)) 5 CONTINUE C EP=HMACH*(ONE+UMX) C DO 8 I=1,NDIM DO 6 J=1,NDIM U1ZZ(J)=U1(J) U2ZZ(J)=U1(J) 6 CONTINUE U1ZZ(I)=U1ZZ(I)-EP U2ZZ(I)=U2ZZ(I)+EP CALL BCND(NDIM,PAR,ICP,NBC,U0,U1ZZ,F1ZZ,0,DBC) CALL BCND(NDIM,PAR,ICP,NBC,U0,U2ZZ,F2ZZ,0,DBC) DO 7 J=1,NBC DBC(J,NDIM+I)=(F2ZZ(J)-F1ZZ(J))/(2*EP) 7 CONTINUE 8 CONTINUE C DO 10 I=1,NFPAR EP=HMACH*( ONE +DABS(PAR(ICP(I))) ) CSGLE EP=HMACH*( ONE + ABS(PAR(ICP(I))) ) PAR(ICP(I))=PAR(ICP(I))+EP CALL BCND(NDIM,PAR,ICP,NBC,U0,U1,F1ZZ,0,DBC) DO 9 J=1,NBC DBC(J,2*NDIM+ICP(I))=(F1ZZ(J)-F(J))/EP 9 CONTINUE PAR(ICP(I))=PAR(ICP(I))-EP 10 CONTINUE C RETURN END C SUBROUTINE ICNI(NDIM,PAR,ICP,NINT,U,UOLD,UDOT,UPOLD,F,IJAC,DINT) C ---------- ---- C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLDIF/ U1ZZ(50),U2ZZ(50),F1ZZ(50),F2ZZ(50) C C Interface subroutine to user supplied ICND. C DIMENSION U(NDIM),UOLD(NDIM),UDOT(NDIM),UPOLD(NDIM) DIMENSION F(NINT),DINT(NINT,1),ICP(20),PAR(20) C C Generate the integrand. C CALL ICND(NDIM,PAR,ICP,NINT,U,UOLD,UDOT,UPOLD,F,IJAC,DINT) C IF(JAC.EQ.1 .OR. IJAC.EQ.0)RETURN C C Generate the Jacobian by differencing. C UMX=ZERO DO 1 I=1,NDIM IF(DABS(U(I)).GT.UMX)UMX=DABS(U(I)) CSGLE IF( ABS(U(I)).GT.UMX)UMX= ABS(U(I)) 1 CONTINUE C EP=HMACH*(ONE+UMX) C DO 4 I=1,NDIM DO 2 J=1,NDIM U1ZZ(J)=U(J) U2ZZ(J)=U(J) 2 CONTINUE U1ZZ(I)=U1ZZ(I)-EP U2ZZ(I)=U2ZZ(I)+EP CALL ICND(NDIM,PAR,ICP,NINT,U1ZZ,UOLD,UDOT,UPOLD,F1ZZ,0,DINT) CALL ICND(NDIM,PAR,ICP,NINT,U2ZZ,UOLD,UDOT,UPOLD,F2ZZ,0,DINT) DO 3 J=1,NINT DINT(J,I)=(F2ZZ(J)-F1ZZ(J))/(2*EP) 3 CONTINUE 4 CONTINUE C DO 6 I=1,NFPAR EP=HMACH*( ONE +DABS(PAR(ICP(I))) ) CSGLE EP=HMACH*( ONE + ABS(PAR(ICP(I))) ) PAR(ICP(I))=PAR(ICP(I))+EP CALL ICND(NDIM,PAR,ICP,NINT,U,UOLD,UDOT,UPOLD,F1ZZ,0,DINT) DO 5 J=1,NINT DINT(J,NDIM+ICP(I))=(F1ZZ(J)-F(J))/EP 5 CONTINUE PAR(ICP(I))=PAR(ICP(I))-EP 6 CONTINUE C RETURN END C SUBROUTINE FOPI(NDIM,U,ICP,PAR,IJAC,F,DFDU,DFDP) C ---------- ---- C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Interface subroutine to user supplied FOPT. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLDIF/ U1ZZ(50),U2ZZ(50),F1ZZ(50),F2ZZ(50) C DIMENSION U(NDIM),ICP(20),PAR(20),DFDU(NDIM),DFDP(20) C C Generate the objective function. C CALL FOPT(NDIM,U,ICP,PAR,IJAC,F,DFDU,DFDP) C IF(JAC.EQ.1 .OR. IJAC.EQ.0)RETURN C C Generate the Jacobian by differencing. C UMX=ZERO DO 1 I=1,NDIM IF(DABS(U(I)).GT.UMX)UMX=DABS(U(I)) CSGLE IF( ABS(U(I)).GT.UMX)UMX= ABS(U(I)) 1 CONTINUE C EP=HMACH*(ONE+UMX) C DO 4 I=1,NDIM DO 2 J=1,NDIM U1ZZ(J)=U(J) U2ZZ(J)=U(J) 2 CONTINUE U1ZZ(I)=U1ZZ(I)-EP U2ZZ(I)=U2ZZ(I)+EP CALL FOPT(NDIM,U1ZZ,ICP,PAR,0,F1,DFDU,DFDP) CALL FOPT(NDIM,U2ZZ,ICP,PAR,0,F2,DFDU,DFDP) DFDU(I)=(F2-F1)/(2*EP) 4 CONTINUE C DO 6 I=1,NFPAR EP=HMACH*( ONE +DABS(PAR(ICP(I))) ) CSGLE EP=HMACH*( ONE + ABS(PAR(ICP(I))) ) PAR(ICP(I))=PAR(ICP(I))+EP CALL FOPT(NDIM,U,ICP,PAR,0,F1,DFDU,DFDP) DFDP(ICP(I))=(F1-F)/EP PAR(ICP(I))=PAR(ICP(I))-EP 6 CONTINUE C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Installation Dependent Subroutines for Timing AUTO C----------------------------------------------------------------------- C----------------------------------------------------------------------- C SUBROUTINE AUTIM0(T) C ---------- ------ C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Set initial time for measuring CPU time used. C T=0 C RETURN END C SUBROUTINE AUTIM1(T) C ---------- ------ C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Set final time for measuring CPU time used. C T=0 C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- --=====================_2516153==_-- From gcc-help-return-4180-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 13:02:17 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 18305 invoked by alias); 30 Nov 2000 13:02:17 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 18216 invoked from network); 30 Nov 2000 13:02:13 -0000 Received: from fencepost.gnu.org (we-refuse-to-spy-on-our-users@199.232.76.164) by sourceware.cygnus.com with SMTP; 30 Nov 2000 13:02:13 -0000 Received: from [200.9.212.21] (helo=infoviaplus.net.ar) by fencepost.gnu.org with esmtp (Exim 3.16 #1 (Debian)) id 141TJk-0003oT-00 for ; Thu, 30 Nov 2000 08:00:05 -0500 Received: from j5j6c9.cpsarg.com ([209.13.248.143]) by infoviaplus.net.ar (Tid InfoMail Exchanger v2.20) with SMTP id #975588997.045660002; Thu, 30 Nov 2000 09:56:37 -0300 Message-Id: <5.0.0.25.0.20001130095058.009d8cd0@pop.infovia.com.ar> X-Sender: c1intech@pop.infovia.com.ar X-Mailer: QUALCOMM Windows Eudora Version 5.0 Date: Thu, 30 Nov 2000 09:59:17 -0300 To: help-gcc@gnu.org From: Sonia Cortassa Subject: I need some help with an stability analysis subroutine package (first part) Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=====================_2515359==_" X-Infomail-Id: 975588997.11D602AC1E03A8.48997 --=====================_2515359==_ Content-Type: multipart/alternative; boundary="=====================_2515368==_.ALT" --=====================_2515368==_.ALT Content-Type: text/plain; charset="us-ascii" Hello! I am writing because I am currently using a software for continuation and bifurcation analysis in ordinary differential equations. Its name is AUTO and was created in 1986 by E. Doedle at Caltech. I must admit I am not a program developer, neither am I familiar with fortran 77 synthaxis. I am just able to run this software as a tool for my studies of models of biological systems. Some people have helped me to install this software in a GNU/Linux operating system that I am now using with g77. My specific question is the following: I need to use it to evaluate stability in a large model (11 variables) and the problem is that the output files only display the first six variables. I know it is computing all the eleven variables since in the unit where the eigen values are stored there are 11 of them but the units 6, 7, 8 and 9 where the actual value of the variables is printed does not display them all. My question is how can I modify the software, since I know it is able to deal with up to 25 variables, for it to display all the variables I need? Attached you'll find the source code of the preprocessor of the AUTO package called "AUTPRPD.F" and the subroutines library "AUTLIBD.F" (due to size reasons this file was divided in two files AUTLIBDa .F and AUTLIBDb.F this second file is attached to another message) Thank you very much in advance for your help Sonia Cortassa ############################################ Sonia Cortassa, PhD Instituto Tecnologico de Chascomus, Casilla Correo 164 7130 - Chascomus, Pvcia Buenos Aires Tel: 54 2241 424049 Fax: 54 2241 424048 E-mail: maaon@criba.edu.ar ############################################ --=====================_2515368==_.ALT Content-Type: text/html; charset="us-ascii" Hello!
I am writing because I am currently using a software for continuation and bifurcation analysis in ordinary differential equations. Its name is AUTO and was created in 1986 by E. Doedle at Caltech. I must admit I am not a program developer, neither am I familiar with fortran 77 synthaxis. I am just able to run this software as a tool for my studies of models of biological systems. Some people have helped me to install this software in a GNU/Linux operating system that I am now using with g77.
My specific question is the following: I need to use it to evaluate stability in a large model (11 variables) and the problem is that the output files only display the first six variables. I know it is computing all the eleven variables since in the unit where the eigen values are stored there are 11 of them but the units 6, 7, 8 and 9 where the actual value of the variables is printed does not display them all. My question is how can I modify the software, since I know it is able to deal with up to 25 variables, for it to display all the variables I need?
Attached you'll find the source code of the preprocessor of the AUTO package called "AUTPRPD.F" and the subroutines library "AUTLIBD.F" (due to size reasons this file was divided in two files AUTLIBDa .F and AUTLIBDb.F this second file is attached to another message)
Thank you very much in advance for your help
Sonia Cortassa

############################################
Sonia Cortassa, PhD
Instituto Tecnologico de Chascomus,
Casilla Correo 164
7130 - Chascomus, Pvcia Buenos Aires

Tel: 54 2241 424049
Fax: 54 2241 424048

E-mail: maaon@criba.edu.ar
############################################ --=====================_2515368==_.ALT-- --=====================_2515359==_ Content-Type: text/plain; charset="us-ascii" C----------------------------------------------------------------------- C----------------------------------------------------------------------- C this document contains the First part of the library file AUTLIBD.F C C A U T O 8 6 C C C A Subroutine Package for the Bifurcation Analysis of C Autonomous Systems of Ordinary Differential Equations. C C C Author : Eusebius Doedel C Applied Mathematics 217-50 C California Institute of Technology C Pasadena, California 91125 C C (Further distribution requires notification of the author.) C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C Version January 1986 (Partially Vectorized). C Updated : August 1987 C C For Documentation see the AUTO 86 User Manual. C C------------------------------------------------------------------- C------------------------------------------------------------------- C Initialization C------------------------------------------------------------------- C------------------------------------------------------------------- C C ---------- ------ SUBROUTINE DFINIT C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Default values assigned to program constants are listed below. C These values may be changed in the user-supplied subroutine INIT, C provided that the common blocks (listed below) also appear. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLTHT/ THETAL(20),THETAU COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLEPS/ EPSL(20),EPSU,EPSS COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C CALL CNSTNT C NDIM=2 IPS=1 IRS=0 ILP=0 C DO 1 I=1,20 ICP(I)=I PAR(I)=ZERO 1 CONTINUE C NTST=10 NCOL=4 IAD=3 ISP=1 ISW=1 IPLT=0 NBC=NDIM NINT=0 C THETAL(1)=ONE DO 2 I=2,20 THETAL(I)=ZERO 2 CONTINUE THETAU=ONE C DS=0.01D 00 CSGLE DS=0.01E 00 DSMIN=0.001D 00 CSGLE DSMIN=0.001E 00 DSMAX=ONE IADS=1 C DO 3 I=1,20 EPSL(I)=1.0D-4 CSGLE EPSL(I)=1.0E-4 3 CONTINUE EPSU=1.0D-4 CSGLE EPSU=1.0E-4 EPSS=1.0D-4 CSGLE EPSS=1.0E-4 C NMX=100 NUZR=0 RL0=-1.0E+6 RL1= 1.0E+6 A0= -1.0E+6 A1= 1.0E+6 C NPR=20 MXBF=5 IID=2 ITMX=8 ITNW=5 CSGLE ITNW=5 NWTN=3 JAC=1 C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C The leading subroutines of AUTO C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ------ SUBROUTINE AUTOAE(W,IW,ITP,NCPP,FUNI,STPNT) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C This is the entry subroutine for algebraic systems. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C EXTERNAL FUNI,STPNT C DIMENSION W(1),IW(1) C C Distribute workspace. C NFPAR=NCPP CALL WSAE(ITP,NFPAR,LF,LDFDU,LDFDP,LAA,LSTUD,LSTU,LSTRL, * LSTRLD,LRHS,LDU,LUDOT,LU,LUOLD,LSMAT,LRNLLV,LU1,LEV,LWKEV,LW,LIR, * LIC,LIW,M1AA,M1STBF,NDIM2) C C Initialize workspace C DO 1 I=1,LW W(I)=ZERO 1 CONTINUE C DO 2 I=1,LIW IW(I)=0 2 CONTINUE C IBR=1 CALL CNRLAE(FUNI,STPNT,IBR,M1AA,W(LAA),M1STBF,W(LSTUD),W(LSTU), * W(LSTRL),W(LSTRLD),W(LU),W(LRHS),W(LDU),W(LUDOT),W(LUOLD), * NDIM2,W(LSMAT),W(LRNLLV),W(LF),NDIM,W(LDFDU),W(LDFDP),W(LU1), * W(LEV),W(LWKEV),IW(LIR),IW(LIC)) C RETURN END C C ---------- ------ SUBROUTINE AUTOBV(W,IW,ITP,NCPP,FUNI,BCNI,ICNI,STPNT,FNBPBV) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C THIS IS THE ENTRY ROUTINE FOR GENERAL BOUNDARY VALUE PROBLEMS. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C EXTERNAL FUNI,BCNI,ICNI,STPNT,FNBPBV C DIMENSION W(1),IW(1) C C Assign workspace. C NFPAR=NCPP CALL WSBV(ITP,NFPAR,LF,LDFDU,LDFDP,LAA,LBB,LCC, * LDD,LUPS,LULDPS,LUPLDP,LUDTPS,LWBRBD,LRHSA,LRHSD,LTINT,LUINT, * LDUPS,LEQF,LUNEQ,LTM,LDTM,LTM2,LU,LUBC0,LUBC1,LDBC,LUICD,LFICD, * LDICD,LW,LITM,LIAL,LIR,LIC,LIWBR,LIW,M1AA,M2AA,M1BB,M2BB,M1CC, * M1DD,M1U,M1BC,M1IC,LP0,LP1,LPOIN,LEV,LWKEV,LSMAT,LRNLLV) C C INITIALIZE C DO 1 I=1,LW W(I)=ZERO 1 CONTINUE C DO 2 I=1,LIW IW(I)=0 2 CONTINUE C C Compute the solution branch. C NDIM2=2*NDIM CALL CNRLBV(FUNI,BCNI,ICNI,STPNT,FNBPBV,IBR,M1AA,M2AA,W(LAA), * M1BB,M2BB,W(LBB),M1CC,W(LCC),M1DD,W(LDD),W(LWBRBD),M1U,W(LUPS), * W(LULDPS),W(LUPLDP),W(LUDTPS),W(LRHSA),W(LRHSD),W(LTINT), * W(LUINT),W(LDUPS),W(LEQF),W(LUNEQ),W(LTM),W(LDTM),W(LTM2),W(LU), * W(LF),NDIM,W(LDFDU),W(LDFDP),IW(LITM),IW(LIAL),W(LUBC0),W(LUBC1), * M1BC,W(LDBC),W(LUICD),W(LFICD),M1IC,W(LDICD),IW(LIR),IW(LIC), * IW(LIWBR),W(LP0),W(LP1),W(LPOIN),W(LEV),W(LWKEV),NDIM2,W(LSMAT), * W(LRNLLV)) C RETURN END C C ---------- ---- SUBROUTINE WSAE(ITP,NCPP,LF,LDFDU,LDFDP,LAA,LSTUD,LSTU,LSTRL, * LSTRLD,LRHS,LDU,LUDOT,LU,LUOLD,LSMAT,LRNLLV,LU1,LEV,LWKEV,LW, * LIR,LIC,LIW,M1AA,M1STBF,NDIM2) C C Assigns workspace for algebraic continuation problems. C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) C NFPAR=NCPP CALL INIT1(ITP) C C Assign array space. C LF=1 LDFDU=LF+NDIM LDFDP=LDFDU+NDIM**2 C LAA=LDFDP+NDIM*NPAR LSTUD=LAA+(NDIM+1)**2 LSTU=LSTUD+NDIM*20 LSTRL=LSTU+NDIM*20 LSTRLD=LSTRL+20 LRHS=LSTRLD+20 LDU=LRHS+NDIM+1 LUDOT=LDU+NDIM+1 LU=LUDOT+NDIM LUOLD=LU+NDIM LSMAT=LUOLD+NDIM LRNLLV=LSMAT+4*NDIM**2 LU1=LRNLLV+2*NDIM LEV=LU1+NDIM LWKEV=LEV+2*NDIM LNEXT=LWKEV+2*NDIM LW=LNEXT C LIR=1 LIC=LIR+2*NDIM+2 LNEXT=LIC+2*NDIM+2 LIW=LNEXT C M1AA=NDIM+1 NDIMP1=M1AA M1STBF=20 NDIM2=2*NDIM NDIRC=NDIM2+2 C RETURN END C SUBROUTINE CNSTNT C ---------- ------ C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Sets problem independent constants. These should not normally be C changed. C COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C HALF=0.5D 00 CSGLE HALF=0.5E 00 ZERO=0.0D 00 CSGLE ZERO=0.0E 00 ONE=1.0D 00 CSGLE ONE=1.0E 00 TWO=2.0D 00 CSGLE TWO=2.0E 00 C C Set approximate "half exponent machine accuracy". C HMACH=1.0D-7 CSGLE HMACH=1.0E-4 C C Set approximate "largest acceptable real number". C RLARGE=1.0D 30 CSGLE RLARGE=1.0E 30 C C Set approximate "smallest acceptable" real number. C RSMALL=1.0D-30 CSGLE RSMALL=1.0E-30 C RETURN END C C ---------- ----- SUBROUTINE INIT1(ITP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C General initialization. Redefinition of constants. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLITP/ ITPST,ITPSP,IBRSP COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLTHT/ THETAL(20),THETAU COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLDET/ DETGE,NINS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLTIM/ TSETUB,TCONPA,TCONRH,TINFPA,TREDUC,TWR8 COMMON /BLCNT/ NDECOM,NBCKSB C NPAR=20 NDM=NDIM NDMP1=NDM+1 NINS=1 ITPST=0 IBRSP=1 C IF(ISW.EQ.0)ISW=1 C IF(NBC.NE.0) THEN NBC0=NBC ELSE NBC0=1 ENDIF C IF(NINT.NE.0)THEN NINT0=NINT ELSE NINT0=1 ENDIF C C Check and perturb pseudo arclength stepsize and steplimits. C (Perturbed to avoid exact computation of certain bifurcation points). C IF(DS.EQ.ZERO)DS=0.1 IF(DSMIN.EQ.ZERO)DSMIN=1.0D-4*DABS(DS) CSGLE IF(DSMIN.EQ.ZERO)DSMIN=1.0E-4* ABS(DS) FC=ONE+HMACH DS=FC*DS DSMIN=DSMIN/FC DSMAX=FC*DSMAX C C Initialize timing constants and decomposition and backsubstitution C counters (For differential equations). TSETUB=0 TCONPA=0 TCONRH=0 TINFPA=0 TREDUC=0 TWR8=0 NDECOM=0 NBCKSB=0 C C Redefinition. C IF(IPS.EQ.11.OR.IPS.EQ.12.OR.IPS.EQ.13)THEN C **Wave Problems NDIM=2*NDIM NDM=NDIM NDMP1=NDM+1 ENDIF C IF((IPS.EQ.0.OR.IPS.EQ.1.OR.IPS.EQ.-1.OR.IPS.EQ.11) * .AND. ISW.EQ.1 )THEN C ** Algebraic Systems NFPAR=1 C ELSE IF((IPS.EQ.2.OR.IPS.EQ.12) * .AND. (ISW.EQ.1.OR.ISW.EQ.-1) )THEN C ** Periodic Solutions NBC=NDIM NINT=1 NFPAR=NBC+NINT-NDIM+1 C SET PARAMETER TO CONTAIN THE PERIOD ICP(2)=11 C ELSE IF(IPS.EQ.3.OR.IPS.EQ.13)THEN C ** Continuation of orbits of fixed period NBC=NDIM NINT=1 ICP(3)=11 NFPAR=NBC+NINT-NDIM+1 C ELSE IF( (IPS.EQ.4.OR.IPS.EQ.6) * .AND. (ISW.EQ.1.OR.ISW.EQ.-1) ) THEN C ** Boundary Value Problems NFPAR=NBC+NINT-NDIM+1 C ELSE IF(IPS.EQ.14)THEN C **Evolution calculations for Parabolic Systems NDIM=2*NDIM NBC=NDIM NINT=0 NFPAR=1 ILP=0 ISP=0 ICP(1)=14 C ELSE IF(IPS.EQ.5)THEN C ** Control Problems IF(NFPAR.EQ.2)THEN NDIM=NDIM+1 ICP(1)=11 ELSE NDIM=2*NDIM+NFPAR ICP(1)=11 ENDIF C ELSE IF(IRS.GT.0 .AND. IABS(ISW).EQ.2 )THEN C ** Two parameter continuation of singular points C IF((ITP.EQ.2.OR.(IABS(ITP)/10).EQ.2) .AND. IABS(IPS).LE.1)THEN C ** Limit point continuation (Algebraic Problems) NDIM=2*NDIM+1 NFPAR=2 C ELSE IF((ITP.EQ.3.OR.(IABS(ITP)/10).EQ.3) * .AND. (IABS(IPS).LE.1.OR.IPS.EQ.11))THEN C ** Hopf bifurcation continuation (Maps, ODE, Waves) NDIM=3*NDIM+2 NFPAR=2 C ELSE IF((ITP.EQ.5.OR.(IABS(ITP)/10).EQ.5) .AND. IPS.EQ.2)THEN C ** Limit point continuation (Periodic solutions) NDIM=2*NDIM NBC=NDIM NINT=3 NFPAR=NBC+NINT-NDIM+1 ICP(3)=11 ICP(4)=12 C ELSE IF((ITP.EQ.7.OR.(IABS(ITP)/10).EQ.7) .AND. IPS.EQ.2)THEN C ** Continuation of period doubling bifurcations NDIM=2*NDIM NBC=NDIM NINT=3 NFPAR=NBC+NINT-NDIM+1 ICP(3)=11 ICP(4)=12 C ELSE IF((ITP.EQ.8.OR.(IABS(ITP)/10).EQ.8) .AND. IPS.EQ.2)THEN C ** Continuation of bifurcations to Tori NDIM=3*NDIM NBC=NDIM NINT=3 NFPAR=NBC+NINT-NDIM+1 ICP(2)=13 ICP(3)=11 ICP(4)=12 C ELSE IF((ITP.EQ.5.OR.(IABS(ITP)/10).EQ.5) * .AND. (IPS.EQ.4.OR.IPS.EQ.6) )THEN C ** Continuation of limit points (Boundary Value Problems) NDIM=2*NDIM NBC=2*NBC NINT=2*NINT+1 NFPAR=NBC+NINT-NDIM+1 NXP=NFPAR/2-1 IF(NXP.GT.0)THEN DO 2 I=1,NXP ICP(NFPAR/2+I+1)=11+I 2 CONTINUE ENDIF ENDIF ENDIF C C Constants for the discretization C IF(IPS.EQ.0)THEN NTST=0 NROW=1 ELSE NROW=NDIM*NCOL NCLM=NROW+NDIM NRC=NBC+NINT+1 NCC=NTST*NROW+NDIM CALL GENWTS(NCOL) ENDIF C RETURN END C C ---------- ---- SUBROUTINE WSBV(ITP,NCPP,LF,LDFDU,LDFDP,LAA, * LBB,LCC,LDD,LUPS,LULDPS,LUPLDP,LUDTPS,LWBRBD,LRHSA,LRHSD,LTINT, * LUINT,LDUPS,LEQF,LUNEQ,LTM,LDTM,LTM2,LU,LUBC0,LUBC1,LDBC,LUICD, * LFICD,LDICD,LW,LITM,LIAL,LIR,LIC,LIWBR,LIW,M1AA,M2AA,M1BB,M2BB, * M1CC,M1DD,M1U,M1BC,M1IC,LP0,LP1,LPOIN,LEV,LWKEV,LSMAT,LRNLLV) C C Assigns workspace for boundary value problems C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) C NFPAR=NCPP CALL INIT1(ITP) C LF=1 LDFDU=LF+NDIM LDFDP=LDFDU+NDIM**2 LAA=LDFDP+NDIM*NPAR LBB=LAA+NTST*NROW*NCLM LCC=LBB+NTST*NROW*NFPAR LDD=LCC+NRC*( NTST*NROW+NDIM ) LUPS=LDD+NRC*NFPAR LULDPS=LUPS+(NTST+1)*NROW LUPLDP=LULDPS+(NTST+1)*NROW LUDTPS=LUPLDP+(NTST+1)*NROW LWBRBD=LUDTPS+(NTST+1)*NROW LRHSA=LWBRBD+(7*NDIM+2*NFPAR+1)*NDIM*NTST+(2*NDIM+NFPAR)**2 * +2*(2*NDIM+NFPAR)+(NFPAR+NDIM+2)*NDIM LRHSD=LRHSA+(NTST+1)*NROW LTINT=LRHSD+NBC+NINT+1 LUINT=LTINT+NTST+1 LDUPS=LUINT+(NTST+1)*NROW LEQF=LDUPS+(NTST+1)*NROW LUNEQ=LEQF+NTST+1 LTM=LUNEQ+NTST+1 LDTM=LTM+NTST+1 LTM2=LDTM+NTST+1 LU=LTM2+NTST+1 LUBC0=LU+NDIM LUBC1=LUBC0+NDIM LDBC=LUBC1+NDIM LUICD=LDBC+NBC*(2*NDIM+NPAR) LFICD=LUICD+4*NDIM LDICD=LFICD+NINT LPOIN=LDICD+NINT*(NDIM+NPAR) LEV=LPOIN+NDIM**2 LWKEV=LEV+2*NDIM LSMAT=LWKEV+2*NDIM LRNLLV=LSMAT+4*NDIM**2 LNEXT=LRNLLV+2*NDIM LW=LNEXT C C Compute the location of the matrices P0 and P1, C that implicitly define the linearized Poincare map. C LP1=LWBRBD+(2*NTST-1)*NDIM**2 LP0=LWBRBD+(3*NTST-1)*NDIM**2+NDIM*NFPAR*NTST * +NDIM*NRC*(NTST+1)+NDIM*(NTST+2) C LITM=1 LIAL=LITM+NTST+1 LIR=LIAL+NTST+1 LIC=LIR+NDIM+NBC+NINT+1 LIWBR=LIC+NDIM+NBC+NINT+1 LNEXT=LIWBR+3*NDIM*(NTST-1)+NTST LIW=LNEXT C M1AA=NTST M2AA=NROW M1BB=NTST M2BB=NROW M1CC=NTST*NROW+NDIM NDCC=NCC M1DD=NRC M1U=NTST+1 M1BC=NBC M1IC=NINT NDIRC=NDIM+NBC+NINT+1 NTSTP1=NTST+1 NDRHS=NBC+NINT+1 NDBC=2*NDIM*NPAR NUICD=4*NDIM NDICD=NDIM+NPAR NWBR=(7*NDIM+2*NFPAR+1)*NDIM*NTST+(2*NDIM+NFPAR)**2 * +2*(2*NDIM+NFPAR)+(NFPAR+NDIM+2)*NDIM NIWBR=3*NDIM*(NTST-1)+NTST C IF(M1BC.EQ.0)M1BC=1 IF(M1IC.EQ.0)M1IC=1 C RETURN END C C------------------------------------------------------------------- C------------------------------------------------------------------- C Algebraic Problems C------------------------------------------------------------------- C------------------------------------------------------------------- C C ---------- ----- SUBROUTINE CNRLAE(FUNI,STPNT,IBR,M1AA,AA,M1STBF,STUD,STU,STRL, * STRLD,U,RHS,DU,UDOT,UOLD,NDIM2,SMAT,RNLLV,F,M1DF,DFDU,DFDP, * U1,EV,WKEV,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Controls the bifurcation analysis of algebraic problems C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLITP/ ITPST,ITPSP,IBRSP COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLUSZ/ IUZR C EXTERNAL FUNI,STPNT,FNLPAE,FNHBAE,FNBPAE,FNUZAE C DIMENSION AA(M1AA,M1AA),STUD(M1STBF,1),STU(M1STBF,1),STRL(M1STBF) DIMENSION STRLD(M1STBF),RHS(1),DU(1),UDOT(1),UOLD(1),U(1),U1(1) DIMENSION F(1),DFDU(M1DF,1),DFDP(M1DF,1),WKEV(M1DF),SMAT(NDIM2,1) DIMENSION IR(1),IC(1),RNLLV(1) DIMENSION UZR(20) C COMPLEX*16 EV(M1DF) CSGLE COMPLEX*8 EV(M1DF) C DET=ZERO REV=ZERO RLP=ZERO IF(NUZR.GT.0)THEN DO 15 I=1,NUZR UZR(I)=ZERO 15 CONTINUE ENDIF RDS=DS RDSOLD=DS NIT=0 NBIF=0 NBFC=0 IPOS=1 NTOT=0 LAB=0 C C Generate the starting point C NDM2=2*NDM CALL STPNT(IBR,U,NDM2,SMAT,DFDU,AA,DFDP,UOLD,F,IR,IC) C C Determine a suitable starting label and branch number C IF(IRS.NE.0)CALL NEWLAB(ISW,IBR,LAB) C C Write constants C CALL STHD C C Write plotting data for the starting point C ISTOP=0 IF(IRS.EQ.0) THEN ITP=9+10*ITPST ELSE ITP=0 ENDIF RL(1)=PAR(ICP(1)) CALL STPLAE(ISTOP,ITP,NIT,NTOT,LAB,IBR,U) IF(ISTOP.EQ.1)GOTO 6 C C Starting procedure (to get second point on first branch) : C CALL STPRAE(FUNI,ISTOP,RDS,NIT,IBR,NTOT,M1AA,AA,RHS,DU,UDOT,UOLD, * U,F,M1DF,DFDU,DFDP,IR,IC) IF(ISTOP.EQ.1)GOTO 5 ITP=0 GOTO 3 C C Initialize computation of the next bifurcating branch. C 2 CALL SWPNT(NBIF,IPOS,RDS,M1STBF,STUD,STU,STRL,STRLD,UDOT,U) C IF(IPOS.EQ.1)THEN NBIF=NBIF-1 NBFC=NBFC+1 ENDIF C DET=ZERO REV=ZERO RLP=ZERO IF(NUZR.GT.0)THEN DO 25 I=1,NUZR UZR(I)=ZERO 25 CONTINUE ENDIF IF(IPOS.EQ.0 .OR. MXBF.LT.0 )IBR=IBR+1 C NTOT=0 ISTOP=0 ITP=0 NIT=0 RDSOLD=RDS C C Store plotting data for first point on the bifurcating branch C on unit 7 : C CALL STPLAE(ISTOP,ITP,NIT,NTOT,LAB,IBR,U) IF(ISTOP.EQ.1)GOTO 6 C C Determine the second point on the bifurcating branch C CALL SWPRC(FUNI,ISTOP,IBR,NTOT,NIT,M1AA,AA,RHS,DU,UDOT,UOLD,U,U1, * F,M1DF,DFDU,DFDP,RDS,IR,IC) IF(ISTOP.EQ.1)GOTO 5 C C Store plotting data for second point : C CALL STPLAE(ISTOP,ITP,NIT,NTOT,LAB,IBR,U) IF(ISTOP.EQ.1)GOTO 6 DET=ZERO REV=ZERO RLP=ZERO C C Provide initial approximation to the next point on the branch C 3 CALL CONTAE(RDS,UDOT,UOLD,U) C C Find the next solution point on the branch C CALL SOLVAE(FUNI,ISTOP,RDS,NIT,IBR,NTOT,M1AA,AA,RHS,DU,UOLD,U, * F,M1DF,UDOT,DFDU,DFDP,IR,IC) IF(ISTOP.EQ.1)GOTO 5 C C Check for limit point C IF(ILP.EQ.1)THEN CALL LCSPAE(FNLPAE,FUNI,ISTOP,ITP,RLP,IBR,NTOT,M1AA,AA, * RHS,DU,UDOT,UOLD,U,F,M1DF,DFDU,DFDP,EV,WKEV,IR,IC) IF(ITP.EQ.-1) THEN ITP=2+10*ITPST RLP=ZERO DET=ZERO REV=ZERO ENDIF ENDIF C C Check for bifurcation, and if so store data : C IF(ISP.NE.0)THEN CALL LCSPAE(FNBPAE,FUNI,ISTOP,ITP,DET,IBR,NTOT,M1AA,AA, * RHS,DU,UDOT,UOLD,U,F,M1DF,DFDU,DFDP,EV,WKEV,IR,IC) IF(ISTOP.EQ.1)GOTO 5 IF(ITP.EQ.-1)THEN ITP=1+10*ITPST NBIF=NBIF+1 CALL STBIF(NBIF,M1AA,AA,M1STBF,STUD,STU,STRL,STRLD,DU,UDOT, * U,M1DF,DFDU,DFDP,IR,IC) RLP=ZERO DET=ZERO REV=ZERO ENDIF ENDIF C C Check for Hopf bifurcation C IF((IPS.EQ.1.OR.IPS.EQ.-1.OR.IPS.EQ.11) * .AND. IABS(ISW).NE.2)THEN CALL LCSPAE(FNHBAE,FUNI,ISTOP,ITP,REV,IBR,NTOT,M1AA,AA, * RHS,DU,UDOT,UOLD,U,F,M1DF,DFDU,DFDP,EV,WKEV,IR,IC) IF(ISTOP.EQ.1)GOTO 5 IF(ITP.EQ.-1)THEN ITP=3+10*ITPST REV=ZERO ELSE PAR(11)=ZERO ENDIF ENDIF C C Check for zero of the user supplied function(s) USZR C IF(NUZR.LE.0) GOTO 5 C DO 45 I=1,NUZR IUZR=I CALL LCSPAE(FNUZAE,FUNI,ISTOP,ITP,UZR(I),IBR,NTOT,M1AA,AA, * RHS,DU,UDOT,UOLD,U,F,M1DF,DFDU,DFDP,EV,WKEV,IR,IC) IF(ISTOP.EQ.1)GOTO 5 C IF(ITP.EQ.-1)THEN ITP=-4-10*ITPST DO 4 K=1,NUZR UZR(K)=ZERO 4 CONTINUE GOTO 5 ENDIF 45 CONTINUE C C Store plotting data on unit 7 : C 5 CALL STPLAE(ISTOP,ITP,NIT,NTOT,LAB,IBR,U) C C Adapt the stepsize along the branch C IF(IADS.EQ.0.OR.MOD(ITP,10).NE.0)GOTO 6 IF(MOD(NTOT,IADS).EQ.0)CALL ADPTDS(RDS,NIT) C 6 ITP=0 IF(ISTOP.EQ.0)GOTO 3 C IF(NBIF.NE.0 .AND. NBFC.LT.IABS(MXBF))GOTO 2 C RETURN END C C ---------- ------ SUBROUTINE STPNUS(IBR,U,NDM2,SMAT,DFDU,DFUXX,DFDP,V,F,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C LOGICAL FOUND C C Gets the starting data from user supplied STPNT C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) C DIMENSION U(NDIM),V(NDMP1),F(NDM),SMAT(NDM2,NDM2) DIMENSION DFDU(NDM,NDM),DFUXX(NDMP1,NDMP1),DFDP(NDM,1) DIMENSION IR(1),IC(1) C CALL STPNT(NDIM,U,PAR) C RETURN END C C ---------- ------ SUBROUTINE STPNAE(IBR,U,NDM2,SMAT,DFDU,DFUXX,DFDP,V,F,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C LOGICAL FOUND C C Gets the starting data from unit 3 C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) C DIMENSION U(NDIM),V(NDMP1),F(NDM),SMAT(NDM2,NDM2) DIMENSION DFDU(NDM,NDM),DFUXX(NDMP1,NDMP1),DFDP(NDM,1) DIMENSION IR(1),IC(1) C CALL FINDL3(IRS,ITP1,NFPAR1,FOUND) CALL READL3(IPS,IBR,U,PAR) C RETURN END C C ---------- ------ SUBROUTINE STPRAE(FUNI,ISTOP,RDS,NIT,IBR,NTOT,M1AA,AA,RHS,DU, * UDOT,UOLD,U,F,M1DF,DFDU,DFDP,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Finds the second point on the initial solution branch. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLTHT/ THETAL(20),THETAU COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C EXTERNAL FUNI C DIMENSION AA(M1AA,M1AA),RHS(NDIMP1),DU(NDIMP1),UDOT(NDIMP1) DIMENSION UOLD(NDIM),U(NDIM),F(NDIM),DFDU(M1DF,NDIM) DIMENSION DFDP(M1DF,NPAR),IR(NDIRC),IC(NDIRC) C RLOLD(1)=PAR(ICP(1)) DO 1 I=1,NDIM UOLD(I)=U(I) 1 CONTINUE C C Determine the direction of the branch at the starting point C CALL FUNI(NDIM,U,UOLD,ICP,PAR,1,F,DFDU,DFDP) DO 2 I=1,NDIM AA(I,NDIMP1)=DFDP(I,ICP(1)) AA(NDIMP1,I)=ZERO DO 2 K=1,NDIM AA(I,K)=DFDU(I,K) 2 CONTINUE AA(NDIMP1,NDIMP1)=ZERO C CALL NLVC(NDIMP1,M1AA,1,AA,DU,IR,IC) C C Scale and make sure that the PAR(ICP(1))-dot is positive. C SS=ZERO DO 3 I=1,NDIM SS=SS+DU(I)*DU(I) 3 CONTINUE SS=THETAL(1)**2*DU(NDIMP1)*DU(NDIMP1)+THETAU**2*SS C SIGN=ONE IF(DU(NDIMP1).LT.ZERO)SIGN=-ONE SC=SIGN/DSQRT(SS) CSGLE SC=SIGN/ SQRT(SS) DO 4 I=1,NDIMP1 DU(I)=SC*DU(I) 4 CONTINUE C DO 5 I=1,NDIM UDOT(I)=DU(I) 5 CONTINUE RLDOT(1)=DU(NDIMP1) C C Set initial approximations to the second point on the branch C DO 6 I=1,NDIM U(I)=UOLD(I)+RDS*UDOT(I) 6 CONTINUE RL(1)=RLOLD(1)+RDS*RLDOT(1) C CALL SOLVAE(FUNI,ISTOP,RDS,NIT,IBR,NTOT,M1AA,AA,RHS,DU,UOLD,U,F, * M1DF,UDOT,DFDU,DFDP,IR,IC) C RETURN END C C ---------- ------ SUBROUTINE CONTAE(RDS,UDOT,UOLD,U) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C This subroutine determines an initial approximation to the next C solution on a branch by extrapolating from the two preceding points. C The step used in the preceding step has been stored in RDSOLD. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLTHT/ THETAL(20),THETAU COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 C DIMENSION UDOT(NDIM),UOLD(NDIM),U(NDIM) C RLDOT(1)=(RL(1)-RLOLD(1))/RDSOLD DO 1 I=1,NDIM UDOT(I)=(U(I)-UOLD(I))/RDSOLD 1 CONTINUE C RLOLD(1)=RL(1) RL(1)=RL(1)+RDS*RLDOT(1) DO 2 I=1,NDIM UOLD(I)=U(I) U(I)=U(I)+UDOT(I)*RDS 2 CONTINUE C RETURN END C C ---------- ----- SUBROUTINE SOLVAE(FUNI,ISTOP,RDS,NIT,IBR,NTOT,M1AA,AA,RHS,DU,UOLD, * U,F,M1DF,UDOT,DFDU,DFDP,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C This is the subroutine for computing solution branches. It solves C the equations for finding the next point on the branch at distance DS C from the current point. An initial approximation to the new point C ( i.e. to PAR(ICP(1)) and U ) has been supplied by CONT. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLTHT/ THETAL(20),THETAU COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLEPS/ EPSL(20),EPSU,EPSS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION AA(M1AA,M1AA),RHS(NDIMP1),DU(NDIMP1),UOLD(NDIM),U(NDIM) DIMENSION UDOT(NDIMP1),IR(NDIRC),IC(NDIRC) DIMENSION F(NDIM),DFDU(M1DF,NDIM),DFDP(M1DF,NPAR) C 1 RDSOLD=RDS DDS=ONE/RDS NIT=0 NTOTP1=NTOT+1 NDMR=NDIM IF(NDMR.GT.6)NDMR=6 IF(IID.GE.2)WRITE(9,101)IBR,NTOTP1,NIT,ICP(1),RL(1), * (U(I),I=1,NDMR) 101 FORMAT(' BRANCH ',I2,' N=',I4,1X,'IT=',I2,1X,'PAR(',I2,')=', * 1PE11.3,1X,'U=',7E11.3) C C Call user-supplied FUNC to evaluate the right hand side of the C differential equation and its derivatives : C DO 7 NIT1=1,ITNW C NIT=NIT1 PAR(ICP(1))=RL(1) CALL FUNI(NDIM,U,UOLD,ICP,PAR,1,F,DFDU,DFDP) C C Set up the Jacobian matrix and the right hand side : C DO 2 I=1,NDIM AA(I,NDIMP1)=DFDP(I,ICP(1)) RHS(I)=-F(I) DO 2 K=1,NDIM AA(I,K)=DFDU(I,K) 2 CONTINUE DO 3 K=1,NDIM AA(NDIMP1,K)=TWO*THETAU**2*(U(K)-UOLD(K)) *DDS 3 CONTINUE AA(NDIMP1,NDIMP1)=TWO*THETAL(1)**2*(RL(1)-RLOLD(1))*DDS SS=ZERO DO 4 I=1,NDIM SS=SS+(U(I)-UOLD(I))**2 4 CONTINUE RHS(NDIMP1)=RDS-THETAU**2*DDS*SS-THETAL(1)**2*DDS* * (RL(1)-RLOLD(1))**2 C C Use Gauss elimination with pivoting to solve the linearized system : C CALL GE(NDIMP1,M1AA,AA,1,NDIMP1,DU,NDIMP1,RHS,IR,IC) DRLM=DU(NDIMP1) C C Add the Newton increments : C DO 5 I=1,NDIM U(I)=U(I)+DU(I) 5 CONTINUE RL(1)=RL(1)+DRLM DUMX=ZERO UMX=ZERO DO 6 I=1,NDIM ADU=DABS(DU(I)) CSGLE ADU= ABS(DU(I)) AU=DABS(U(I)) CSGLE AU= ABS(U(I)) IF(AU.GT.UMX)UMX=AU IF(ADU.GT.DUMX)DUMX=ADU 6 CONTINUE C IF(IID.GE.2)WRITE(9,101)IBR,NTOTP1,NIT,ICP(1),RL(1), * (U(I),I=1,NDMR) C C Check whether relative error has reached user-supplied tolerance : C RDRLM= ABS(DRLM)/(ONE+ ABS(RL(1))) RDUMX=DUMX/(ONE+UMX) IF(RDRLM.LE.EPSL(1).AND.RDUMX.LE.EPSU)RETURN C IF(NIT.EQ.1)THEN DELREF=20*DMAX1(RDRLM,RDUMX) CSGLE DELREF=20*AMAX1(RDRLM,RDUMX) ELSE DELMAX=DMAX1(RDRLM,RDUMX) CSGLE DELMAX=AMAX1(RDRLM,RDUMX) IF(DELMAX.GT.DELREF)GOTO 8 ENDIF C 7 CONTINUE C C Maximum number of iterations has been reached C 8 CONTINUE IF(IADS.EQ.0)WRITE(9,102) 102 FORMAT(' *** NO CONVERGENCE WITH FIXED STEPSIZE') IF(IADS.EQ.0)GOTO 11 C C Reduce stepsize and try again C MXT=ITNW CALL ADPTDS(RDS,MXT) IF(DABS(RDS).LT.DSMIN)GOTO 10 CSGLE IF( ABS(RDS).LT.DSMIN)GOTO 10 RL(1)=RLOLD(1)+RDS*RLDOT(1) DO 9 I=1,NDIM U(I)=UOLD(I)+RDS*UDOT(I) 9 CONTINUE IF(IID.GE.2)WRITE(9,103) 103 FORMAT(' STEP FAILED : TRY AGAIN WITH REDUCED STEPSIZE') GOTO 1 C C Minimum stepsize reached C 10 WRITE(9,104) 104 FORMAT(' *** NO CONVERGENCE USING MINIMUM STEPSIZE') 11 RL(1)=RLOLD(1) PAR(ICP(1))=RL(1) DO 12 I=1,NDIM U(I)=UOLD(I) 12 CONTINUE ISTOP=1 RETURN END C C------------------------------------------------------------------- C------------------------------------------------------------------- C Detection of Bifurcations C------------------------------------------------------------------- C------------------------------------------------------------------- C C ---------- ------ SUBROUTINE LCSPAE(FNCS,FUNI,ISTOP,ITP,QCS,IBR,NTOT,M1AA,AA, * RHS,DU,UDOT,UOLD,U,F,M1DF,DFDU,DFDP,EV,WKEV,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C This subroutine uses the secant method to accurately locate special C points (bifurcations, limit points, Hopf bifurcations, user zeroes). C These are characterized as zeroes of the function FNCS supplied in the C call. C This subroutine calls CONT and SOLVAE with varying stepsize RDS. C The special point is assumed to have been found with sufficient C accuracy if the ratio between RDS and the user supplied value of C DS is less than the user-supplied toler EPSS. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLEPS/ EPSL(20),EPSU,EPSS COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C EXTERNAL FUNI C DIMENSION AA(M1AA,M1AA),RHS(1),DU(1),UDOT(1),UOLD(1),U(1) DIMENSION F(1),DFDU(M1DF,1),DFDP(M1DF,1),WKEV(M1DF) DIMENSION IR(1),IC(1) C COMPLEX*16 EV(M1DF) CSGLE COMPLEX*8 EV(M1DF) C LOGICAL CHNG C C Check whether FNCS has changed sign (FNCS is EXTERNAL). C QCS0=QCS QCS=FNCS(CHNG,FUNI,M1AA,AA,U,UOLD,UDOT,RHS,M1DF,DFDU,DFDP,EV, * WKEV,IR,IC,IBR,NTOT) PQCS=QCS0*QCS NTOTP1=NTOT+1 IF(PQCS.GE.ZERO .OR. (.NOT. CHNG)) RETURN C C Compute next RDS by the Secant method : C RDS=RDSOLD ITLCSP=0 2 DQCS=QCS0-QCS IF(DQCS.EQ.ZERO)RDS=ZERO IF(DQCS.NE.ZERO)RDS=QCS/DQCS*RDS RDS=(ONE+HMACH)*RDS C C If requested write addtional output on unit 9 : C IF(IID.GE.2)WRITE(9,101)ITLCSP,RDS C C Return if tolerance has been met : C RRDS=DABS(RDS)/(ONE+DABS(DS)) CSGLE RRDS= ABS(RDS)/(ONE+ ABS(DS)) IF(RRDS.LT.EPSS)THEN ITP=-1 QCS=ZERO RETURN ENDIF C CALL CONTAE(RDS,UDOT,UOLD,U) CALL SOLVAE(FUNI,ISTOP,RDS,NIT,IBR,NTOT,M1AA,AA,RHS,DU,UOLD,U,F, * M1DF,UDOT,DFDU,DFDP,IR,IC) IF(ISTOP.EQ.1)THEN QCS=ZERO RETURN ENDIF C QCS0=QCS QCS=FNCS(CHNG,FUNI,M1AA,AA,U,UOLD,UDOT,RHS,M1DF,DFDU,DFDP,EV, * WKEV,IR,IC,IBR,NTOT) ITLCSP=ITLCSP+1 IF(ITLCSP.LE.ITMX)THEN GOTO 2 ELSE WRITE(9,102)IBR,NTOT+1 QCS=ZERO RETURN ENDIF 101 FORMAT(' * DETECTION OF SINGULAR POINT : ITERATION ',I3, * ' STEPSIZE =',E11.3) 102 FORMAT(' *** POSSIBLE SINGULAR POINT (BRANCH ',I3,' POINT ', * I4,')') END C C -------- ------- DOUBLE PRECISION CSGLE REAL *FUNCTION FNBPAE(CHNG,FUNI,M1AA,AA,U,UOLD,UDOT,RHS,M1DF,DFDU,DFDP, * EV,WKEV,IR,IC,IBR,NTOT) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLDET/ DETGE,NINS COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) C EXTERNAL FUNI C DIMENSION AA(M1AA,M1AA),RHS(1),U(1),UOLD(1),UDOT(1) DIMENSION DFDU(M1DF,1),DFDP(M1DF,1),WKEV(M1DF) DIMENSION IR(1),IC(1) C COMPLEX*16 EV(M1DF) CSGLE COMPLEX*8 EV(M1DF) C LOGICAL CHNG C FNBPAE=DETGE CHNG=.TRUE. C C If requested write additional output on unit 9 : C IF(IID.GE.2)WRITE(9,101)FNBPAE 101 FORMAT(' BIFURCATION POINT FUNCTION = ',E11.3) C RETURN END C C -------- ------- DOUBLE PRECISION CSGLE REAL *FUNCTION FNLPAE(CHNG,FUNI,M1AA,AA,U,UOLD,UDOT,RHS,M1DF,DFDU,DFDP, * EV,WKEV,IR,IC,IBR,NTOT) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLDET/ DETGE,NINS COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 C EXTERNAL FUNI C DIMENSION AA(M1AA,M1AA),RHS(NDIMP1),U(1),UOLD(1),UDOT(NDIMP1) DIMENSION DFDU(M1DF,NDIM),DFDP(M1DF,NPAR),WKEV(NDIMP1) DIMENSION IR(1),IC(1) C COMPLEX*16 EV(M1DF) CSGLE COMPLEX*8 EV(M1DF) C LOGICAL CHNG C PAR(ICP(1))=RL(1) CALL FUNI(NDIM,U,UOLD,ICP,PAR,1,RHS,DFDU,DFDP) DO 2 I=1,NDIM AA(I,NDIMP1)=DFDP(I,ICP(1)) DO 1 K=1,NDIM AA(I,K)=DFDU(I,K) 1 CONTINUE 2 CONTINUE DO 3 K=1,NDIM AA(NDIMP1,K)=UDOT(K) RHS(K)=ZERO 3 CONTINUE AA(NDIMP1,NDIMP1)=RLDOT(1) RHS(NDIMP1)=ONE C CALL GE(NDIMP1,M1AA,AA,1,NDIMP1,WKEV,NDIMP1,RHS,IR,IC) CALL NRMLZ(NDIMP1,WKEV) FNLPAE=WKEV(NDIMP1) CHNG=.TRUE. C C If requested write additional output on unit 9 : C IF(IID.GE.2)WRITE(9,101)FNLPAE 101 FORMAT(' LIMIT POINT FUNCTION = ',E11.3) C RETURN END C C -------- ------- DOUBLE PRECISION CSGLE REAL *FUNCTION FNHBAE(CHNG,FUNI,M1AA,AA,U,UOLD,UDOT,RHS,M1DF,DFDU,DFDP, * EV,WKEV,IR,IC,IBR,NTOT) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLDET/ DETGE,NINS COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C EXTERNAL FUNI C DIMENSION AA(M1AA,M1AA),RHS(1),U(1),UOLD(1),UDOT(1) DIMENSION DFDU(M1DF,1),DFDP(M1DF,1),WKEV(M1DF) DIMENSION IR(1),IC(1) C COMPLEX*16 EV(M1DF) CSGLE COMPLEX*8 EV(M1DF) C LOGICAL CHNG C C INITIALIZE C CHNG=.FALSE. C C Compute the eigenvalues of the Jacobian C CALL EIG(NDIM,NDIM,DFDU,EV,WKEV,IER) IF(IPS.EQ.-1)THEN DO 1 I=1,NDIM IF(EV(I).NE.DCMPLX(-ONE,ZERO))THEN CSGLE IF(EV(I).NE. CMPLX(-ONE,ZERO))THEN EV(I)=CDLOG(DCMPLX(ONE,ZERO)+EV(I)) CSGLE EV(I)= CLOG( CMPLX(ONE,ZERO)+EV(I)) ELSE EV(I)=DCMPLX(-RLARGE,ZERO) CSGLE EV(I)= CMPLX(-RLARGE,ZERO) ENDIF 1 CONTINUE ENDIF C C Compute the smallest real part. C RIMHB=ZERO AREV=RLARGE REV=ZERO DO 2 I=1,NDIM IF(DIMAG(EV(I)).EQ.ZERO)GOTO 2 CSGLE IF(AIMAG(EV(I)).EQ.ZERO)GOTO 2 AR=DABS(DREAL(EV(I))) CSGLE AR= ABS( REAL(EV(I))) IF(AR.GT.AREV)GOTO 2 AREV=AR REV=DREAL(EV(I)) CSGLE REV= REAL(EV(I)) RIMHB=DABS(DIMAG(EV(I))) CSGLE RIMHB= ABS(AIMAG(EV(I))) IF(RIMHB.NE.ZERO)PAR(11)=PI(TWO)/RIMHB 2 CONTINUE C C Compute the number of eigenvalues with negative real part. C NINS1=0 DO 3 I=1,NDIM IF(DREAL(EV(I)).LE.ZERO)NINS1=NINS1+1 CSGLE IF( REAL(EV(I)).LE.ZERO)NINS1=NINS1+1 3 CONTINUE C FNHBAE=REV IF(NINS1.NE.NINS)CHNG=.TRUE. NINS=NINS1 C IF(IID.GE.2)WRITE(9,101)FNHBAE NTOT1=NTOT+1 IF(NINS1.EQ.NDIM)NTOT1=-NTOT1 IF(IID.GE.2)WRITE(9,102) C IF(IPS.EQ.-1)THEN WRITE(9,103)IBR,NTOT1,(CDEXP(EV(I)),I=1,NDIM) CSGLE WRITE(9,103)IBR,NTOT1,( CEXP(EV(I)),I=1,NDIM) ELSE WRITE(9,103)IBR,NTOT1,(EV(I),I=1,NDIM) ENDIF C 101 FORMAT(' HOPF BIFURCATION FUNCTION = ',E10.3) 102 FORMAT(' EIGENVALUES OF JACOBIAN :') 103 FORMAT(' BRANCH ',I3,' POINT ',I4,2(2X,2E12.5), * 50(/,23X,2(2X,2E12.5))) C RETURN END C C -------- ------- DOUBLE PRECISION CSGLE REAL *FUNCTION FNUZAE(CHNG,FUNI,M1AA,AA,U,UOLD,UDOT,RHS,M1DF,DFDU,DFDP, * EV,WKEV,IR,IC,IBR,NTOT) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLDET/ DETGE,NINS COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLUSZ/ IUZR C EXTERNAL FUNI C DIMENSION AA(M1AA,M1AA),RHS(NDIMP1),U(1),UOLD(1),UDOT(NDIMP1) DIMENSION DFDU(M1DF,NDIM),DFDP(M1DF,NPAR),WKEV(NDIMP1) DIMENSION IR(1),IC(1) C COMPLEX*16 EV(M1DF) CSGLE COMPLEX*8 EV(M1DF) C LOGICAL CHNG C FNUZAE=USZR(IUZR,NUZR,PAR) CHNG=.TRUE. C C If requested write additional output on unit 9 : C IF(IID.GE.2)WRITE(9,101)FNUZAE 101 FORMAT(' UZR FUNCTION = ',E11.3) C RETURN END C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C Branch Switching for Algebraic Problems C----------------------------------------------------------------------- C----------------------------------------------------------------------- C C ---------- ----- SUBROUTINE STBIF(NBIF,M1AA,AA,M1STBF,STUD,STU,STRL,STRLD,DU, * UDOT,U,M1DF,DFDU,DFDP,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Stores bifurcation data in the following arrays : C STU ( the solution vector U ) C STUD ( U-dot ) C STRL ( PAR(ICP(1)) ) C STRLD ( PAR(ICP(1))-dot ) C Here the vector ( PAR(ICP(1))-dot , U-dot ) lies in the 2-d nullspace C at bifurcation point and is perpendicular to the direction vector of C known branch at this point. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLTHT/ THETAL(20),THETAU COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLEPS/ EPSL(20),EPSU,EPSS COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 C DIMENSION AA(M1AA,M1AA),DU(NDIMP1),UDOT(NDIMP1),U(NDIM) DIMENSION DFDU(M1DF,NDIM),DFDP(M1DF,NPAR) DIMENSION STUD(M1STBF,NDIM),STU(M1STBF,NDIM),STRL(M1STBF) DIMENSION STRLD(M1STBF),IR(NDIRC),IC(NDIRC) C C Keep track of the number of bifurcations stored (maximum is 20). C IF(NBIF.EQ.20)WRITE(9,101) IF(NBIF.GT.20)THEN NBIF=20 RETURN ENDIF C DO 1 I=1,NDIM DO 1 J=1,NDIM AA(I,J)=DFDU(I,J) 1 CONTINUE C ND1=NDIMP1 DO 2 I=1,NDIM AA(I,ND1)=DFDP(I,ICP(1)) AA(ND1,I)=UDOT(I) 2 CONTINUE AA(ND1,ND1)=RLDOT(1) C CALL NLVC(ND1,M1AA,1,AA,DU,IR,IC) C SS=ZERO DO 3 I=1,NDIM SS=SS+DU(I)**2 3 CONTINUE SS=THETAU**2*SS+THETAL(1)**2*DU(ND1)**2 SC=ONE/DSQRT(SS) CSGLE SC=ONE/ SQRT(SS) C DO 4 I=1,ND1 DU(I)=SC*DU(I) 4 CONTINUE C STRLD(NBIF)=DU(ND1) DO 5 I=1,NDIM STU(NBIF,I)=U(I) STUD(NBIF,I)=DU(I) 5 CONTINUE STRL(NBIF)=RL(1) C RETURN 101 FORMAT(' *** NO MORE BIFURCATION POINTS CAN BE STORED') END C C ---------- ----- SUBROUTINE SWPNT(NBIF,IPOS,RDS,M1STBF,STUD,STU,STRL,STRLD,UDOT,U) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C This subroutine retrieves the bifurcation data U, U-dot, PAR(ICP(1)), C PAR(ICP(1))-dot. If this initialization corresponds to the computation C bifurcating branch in its second direction, then only the sign of the C stepsize ( DS ) along the branch is reversed. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLTHT/ THETAL(20),THETAU COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT C DIMENSION STUD(M1STBF,NDIM),STU(M1STBF,NDIM),STRL(M1STBF) DIMENSION STRLD(M1STBF),UDOT(NDIMP1),U(NDIM) C RDS=DS IF(IPOS.EQ.0)RDS=-DS RL(1)=STRL(1) PAR(ICP(1))=RL(1) RLDOT(1)=STRLD(1) DO 1 I=1,NDIM U(I)=STU(1,I) UDOT(I)=STUD(1,I) 1 CONTINUE IF(IABS(ISW).EQ.2)PAR(ICP(2))=U(NDIM) C IF(MXBF.GE.0)IPOS=1-IPOS IF(IPOS.EQ.0)RETURN C DO 2 I=1,NBIF STRL(I)=STRL(I+1) STRLD(I)=STRLD(I+1) DO 2 I1=1,NDIM STU(I,I1)=STU(I+1,I1) STUD(I,I1)=STUD(I+1,I1) 2 CONTINUE C RETURN END C C ---------- ----- SUBROUTINE SWPRC(FUNI,ISTOP,IBR,NTOT,NIT,M1AA,AA,RHS,DU,UDOT,UOLD, * U,U1,F,M1DF,DFDU,DFDP,RDS,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Controls the computation of the second point on a bifurcating branch. C This point is required to lie in a hyper-plane at distance DS from the C bifurcation point. This hyper-plane is parallel to the tangent of the C known branch at the bifurcation point. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLTHT/ THETAL(20),THETAU COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLEPS/ EPSL(20),EPSU,EPSS COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLICN/NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 C DIMENSION AA(M1AA,M1AA),RHS(NDIMP1),DU(NDIMP1),UDOT(NDIMP1) DIMENSION UOLD(NDIM),U(NDIM),IR(NDIRC),IC(NDIRC) DIMENSION U1(NDIM),F(NDIM),DFDU(M1DF,NDIM),DFDP(M1DF,NPAR) C C Initialize and provide initial guess : C RLOLD(1)=RL(1) RL(1)=RLOLD(1)+RDS*RLDOT(1) DO 1 I=1,NDIM UOLD(I)=U(I) U(I)=UOLD(I)+RDS*UDOT(I) 1 CONTINUE C 2 RDSOLD=RDS NIT=0 C C Write additional output on unit 9 if requested : C NTOTP1=NTOT+1 NDMR=NDIM IF(NDMR.GT.6)NDMR=6 IF(IID.GE.2)WRITE(9,101)IBR,NTOTP1,NIT,ICP(1),RL(1), * (U(I),I=1,NDMR) C RLM1=RL(1) DO 3 I=1,NDIM U1(I)=U(I) 3 CONTINUE C DO 9 NIT1=1,ITNW C NIT=NIT1 PAR(ICP(1))=RL(1) CALL FUNI(NDIM,U,UOLD,ICP,PAR,1,F,DFDU,DFDP) DO 4 I=1,NDIM AA(I,NDIMP1)=DFDP(I,ICP(1)) RHS(I)=-F(I) DO 4 K=1,NDIM AA(I,K)=DFDU(I,K) 4 CONTINUE DO 5 K=1,NDIM AA(NDIMP1,K)=THETAU**2*UDOT(K) 5 CONTINUE AA(NDIMP1,NDIMP1)=THETAL(1)**2*RLDOT(1) SS=ZERO DO 6 I=1,NDIM SS=SS+(U(I)-U1(I))*UDOT(I) 6 CONTINUE RHS(NDIMP1)=-THETAU**2*SS-THETAL(1)**2*(RL(1)-RLM1)*RLDOT(1) C C Use Gauss elimination with pivoting to solve the linearized system : C CALL GE(NDIMP1,M1AA,AA,1,NDIMP1,DU,NDIMP1,RHS,IR,IC) DRLM=DU(NDIMP1) C C Add the Newton increments : C DO 7 I=1,NDIM U(I)=U(I)+DU(I) 7 CONTINUE RL(1)=RL(1)+DRLM DUMX=ZERO UMX=ZERO DO 8 I=1,NDIM ADU=DABS(DU(I)) CSGLE ADU= ABS(DU(I)) IF(ADU.GT.DUMX)DUMX=ADU AU=DABS(U(I)) CSGLE AU= ABS(U(I)) IF(AU.GT.UMX)UMX=AU 8 CONTINUE C IF(IID.GE.2)WRITE(9,101)IBR,NTOTP1,NIT,ICP(1),RL(1), * (U(I),I=1,NDMR) C C Check whether relative error has reached user-supplied tolerance : C RDRLM=DABS(DRLM)/(ONE+DABS(RL(1))) CSGLE RDRLM= ABS(DRLM)/(ONE+ ABS(RL(1))) RDUMX=DUMX/(ONE+UMX) IF(RDRLM.LT.EPSL(1).AND.RDUMX.LT.EPSU)RETURN 9 CONTINUE C C Maximum number of iterations reached. Reduce stepsize and try again. C IF(IADS.EQ.0)WRITE(9,102) IF(IADS.EQ.0)GOTO 12 C MXT=ITNW CALL ADPTDS(RDS,MXT) IF(DABS(RDS).LT.DSMIN)GOTO 11 CSGLE IF( ABS(RDS).LT.DSMIN)GOTO 11 RL(1)=RLOLD(1)+RDS*RLDOT(1) DO 10 I=1,NDIM U(I)=UOLD(I)+RDS*UDOT(I) 10 CONTINUE IF(IID.GE.2)WRITE(9,103) GOTO 2 C C Minimum stepsize reached. C 11 WRITE(9,104) 12 RL(1)=RLOLD(1) PAR(ICP(1))=RL(1) DO 13 I=1,NDIM U(I)=UOLD(I) 13 CONTINUE ISTOP=1 C RETURN 101 FORMAT(' BRANCH ',I2,' N=',I4,1X,'IT=',I2,1X,'PAR(',I2,')=', * 1PE11.3,1X,'U=',1P7E11.3) 102 FORMAT(' *** NO CONVERGENCE WHEN SWITCHING BRANCHES, USING FIXED * STEPSIZE') 103 FORMAT(' STEP FAILED : TRY AGAIN WITH REDUCED STEPSIZE') 104 FORMAT(' *** NO CONVERGENCE WHEN SWITCHING BRANCHES, USING * MINIMUM STEPSIZE') END C C------------------------------------------------------------------- C------------------------------------------------------------------- C Output (Algebraic Problems) C------------------------------------------------------------------- C------------------------------------------------------------------- C C ---------- ---- SUBROUTINE STHD C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Write the values of the user defined parameters on unit 7. C This identifying information is preceded by a ' 0' on each line. C The first line in the file contains the (generally) user-supplied C limits of the bifurcation diagram, viz. RL0,RL1,A0 and A1. C These are often convenient for an initial plot of the diagram. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLTHT/ THETAL(20),THETAU COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLEPS/ EPSL(20),EPSU,EPSS COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC C WRITE(7,101)RL0,RL1,A0,A1 WRITE(7,102)(PAR(I),I=1,NPAR) WRITE(7,103)EPSU,EPSS,EPSL(1),EPSL(2) WRITE(7,104)DS,DSMIN,DSMAX WRITE(7,105)THETAU,THETAL(1),THETAL(2) WRITE(7,106)NDIM,IPS,IRS,ILP WRITE(7,107)NTST,NCOL,IAD,ISP,ISW,IPLT WRITE(7,108)NBC,NINT,NMX,NPR,MXBF,IID WRITE(7,109)ITMX,ITNW,NWTN,JAC,NUZR WRITE(7,110)(ICP(I),I=1,NFPAR) C 101 FORMAT(' 0',1P4E12.4) 102 FORMAT(' 0 PAR(.):',1PE11.4,3(8X,1PE11.4),/, * ' 0 ',1PE11.4,3(8X,1PE11.4),/, * ' 0 ',1PE11.4,3(8X,1PE11.4),/, * ' 0 ',1PE11.4,3(8X,1PE11.4),/, * ' 0 ',1PE11.4,3(8X,1PE11.4)) 103 FORMAT(' 0',' EPSU=',1PE11.4,' EPSS=',1PE11.4, * ' EPSL(1)=',1PE11.4,' EPSL(2)=',1PE11.4) 104 FORMAT(' 0',' DS=',1PE11.4,' DSMIN=',1PE11.4, * ' DSMAX=',1PE11.4) 105 FORMAT(' 0',' THETAU=',1PE11.4, * ' THETAL(1)=',1PE11.4,' THETAL(2)=',1PE11.4) 106 FORMAT(' 0 NDIM=',I4,' IPS=',I4,' IRS=',I4, * ' ILP=',I4) 107 FORMAT(' 0 NTST=',I4,' NCOL=',I4,' IAD=',I4,' ISP=',I4, * ' ISW=',I4,' IPLT=',I4) 108 FORMAT(' 0 NBC=',I4,' NINT=',I4,' NMX=',I4,' NPR=',I4, * ' MXBF=',I4,' IID=',I4) 109 FORMAT(' 0 ITMX=',I4,' ITNW=',I4,' NWTN=',I4,' JAC=',I4, * ' NUZR=',I4) 110 FORMAT(' 0 ICP( . )= ',20I3) C RETURN END C C ---------- ------ SUBROUTINE HEADNG(IUNIT,N1,N2) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Prints headings above columns on unit 6 and 7. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC C CHARACTER*14 COL(9),TMP CHARACTER*1 CNVRT C DO 1 I=1,9 COL(I)=' ' 1 CONTINUE C IF(IUNIT.EQ.6)WRITE(6,100) IF(IUNIT.EQ.7)WRITE(7,101) C J=0 DO 2 I=1,N1 J=J+1 IF(J.EQ.2.)J=J+1+N2 COL(J)(1:7)=' PAR(' IF(ICP(I).GT.9)THEN COL(J)(8:8)=CNVRT(ICP(I)/10) COL(J)(9:9)=CNVRT( MOD(ICP(I),10) ) COL(J)(10:14)=') ' ELSE COL(J)(8:8)=CNVRT(ICP(I)) COL(J)(9:14)=') ' ENDIF 2 CONTINUE C IF(IPLT.GT.NDM.AND.IPLT.LE.2*NDM) THEN COL(2)(1:12)=' INTEGRAL U(' COL(2)(13:13)=CNVRT(IPLT-NDM) COL(2)(14:14)=')' ELSE IF(IPLT.GT.2*NDM.AND.IPLT.LE.3*NDM) THEN COL(2)(1:11)=' L2-NORM U(' COL(2)(12:12)=CNVRT(IPLT-2*NDM) COL(2)(13:14)=') ' ELSE IF(IPLT.GT.0.AND.IPLT.LE.NDM) THEN IF(IPS.EQ.0.OR.IPS.EQ.1.OR.IPS.EQ.-1.OR.IPS.EQ.5.OR.IPS.EQ.11) * THEN COL(2)(1:7)=' U(' COL(2)(8:8)=CNVRT(-IPLT) COL(2)(9:14)=') ' ELSE COL(2)(1:9)=' MAX U(' COL(2)(10:10)=CNVRT(IPLT) COL(2)(11:14)=') ' ENDIF ELSE IF(IPLT.LT.0.AND.IPLT.GE.-NDM) THEN IF(IPS.EQ.0.OR.IPS.EQ.1.OR.IPS.EQ.-1.OR.IPS.EQ.5.OR.IPS.EQ.11) * THEN COL(2)(1:7)=' U(' COL(2)(8:8)=CNVRT(-IPLT) COL(2)(9:14)=') ' ELSE COL(2)(1:9)=' MIN U(' COL(2)(10:10)=CNVRT(-IPLT) COL(2)(11:14)=') ' ENDIF ELSE COL(2)=' L2-NORM ' ENDIF C IF(N2.GT.0)THEN DO 3 I=1,N2 COL(2+I)(1:7)=' U(' ITMP=I COL(2+I)(8:8)=CNVRT(ITMP) COL(2+I)(9:14)=') ' 3 CONTINUE IF(IPS.EQ.2.OR.IPS.EQ.3.OR.IPS.EQ.4.OR.IPS.EQ.6 * .OR.IPS.EQ.12.OR.IPS.EQ.13.OR.IPS.EQ.14)THEN DO 4 I=3,2+N2 TMP=COL(I) COL(I)(3:14)=TMP(1:12) COL(I)(4:6)='MAX' 4 CONTINUE ENDIF ENDIF C IF(IPS.EQ.2.OR.IPS.EQ.12) THEN IF(IABS(ISW).EQ.2) THEN COL(N2+4)=' PERIOD ' ELSE COL(N2+3)=' PERIOD ' ENDIF ENDIF C IF(IPS.EQ.5) COL(1)=' FOPT ' IF(IPS.EQ.14)COL(1)=' TIME ' C IF(IUNIT.EQ.6)THEN WRITE(6,102)(COL(I),I=1,N1+N2+1) ELSE WRITE(7,103)(COL(I),I=1,N1+N2+1) ENDIF C 100 FORMAT(' ') 101 FORMAT(' 0') 102 FORMAT( ' BR PT TY LAB ',8A14) 103 FORMAT(' 0 PT TY LAB ',8A14) C RETURN END C C ----------- -------- ----- CHARACTER*1 FUNCTION CNVRT(I) C CNVRT=' ' C GOTO(1,2,3,4,5,6,7,8,9,10)I+1 1 CNVRT='0' RETURN 2 CNVRT='1' RETURN 3 CNVRT='2' RETURN 4 CNVRT='3' RETURN 5 CNVRT='4' RETURN 6 CNVRT='5' RETURN 7 CNVRT='6' RETURN 8 CNVRT='7' RETURN 9 CNVRT='8' RETURN 10 CNVRT='9' RETURN END C C ---------- ------ SUBROUTINE STPLAE(ISTOP,ITP,NIT,NTOT,LAB,IBR,U) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Stores the bifurcation diagram on unit 7 (Algebraic Problems). C Every line written contains, in order, the following: C C IBR : The label of the branch. C NTOT : The index of the point on the branch. C (Points are numbered consecutively along a branch). C If IPS=1 or -1, then the sign of NTOT indicates stability : C - = stable , + = unstable, unknown, or not relevant. C ITP : An integer indicating the type of point : C C 1 (BP) : Bifurcation point. C 2 (LP) : Limit point. C 3 (HB) : Hopf bifurcation point. C 4 ( ) : Output point (Every NPR steps along branch). C -4 ( ) : Output point (Zero of user function USZR). C 9 (EP) : End point of branch, normal termination. C -9 (MX) : End point of branch, abnormal termination. C C LAB : The label of a special point. C PAR(ICP(1)): The principal parameter. C A : The L2-norm of the solution vector, or other measure of C the solution (see the user-supplied parameter IPLT). C U : The first few components of the solution vector. C PAR(ICP(*)): Further free parameters (if any). C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLITP/ ITPST,ITPSP,IBRSP COMMON /BLTHT/ THETAL(20),THETAU COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLDET/ DETGE,NINS C DIMENSION U(NDIM) C NTOT=NTOT+1 C C ITP is set to 4 every NPR steps along a branch, and the entire C solution is written on unit 8. C IF(MOD(NTOT,NPR).EQ.0 .AND. MOD(ITP,10).EQ.0)ITP=4+10*ITPST C C CHECK WHETHER LIMITS OF THE BIFURCATION DIAGRAM HAVE BEEN REACHED : C IAB=IABS(IPLT) C IF(IAB.LE.NDIM .AND. IAB.GT.0)THEN A=U(IAB) ELSE IF(IPLT.GT.NDIM.AND.IPLT.LE.2*NDIM)THEN A=U(IPLT-NDIM) ELSE IF(IPLT.GT.2*NDIM.AND.IPLT.LE.3*NDIM)THEN A=U(IPLT-2*NDIM) ELSE SS=ZERO DO 1 I=1,NDM SS=SS+U(I)*U(I) 1 CONTINUE A=DSQRT(SS) CSGLE A= SQRT(SS) ENDIF C IF(ISTOP.EQ.1)THEN C Maximum number of iterations reached somewhere. ITP=-9-10*ITPST ELSE IF(RL(1).LT.RL0.OR.RL(1).GT.RL1 .OR. A.LT.A0.OR.A.GT.A1 * .OR. NTOT.EQ.NMX) THEN ISTOP=1 ITP=9+10*ITPST ENDIF ENDIF C LAB1=0 IF(MOD(ITP,10).NE.0)THEN LAB=LAB+1 LAB1=LAB ENDIF C C Determine stability and print output on units 6 and 7. C NTOT1=NTOT IF((IPS.EQ.1.OR.IPS.EQ.-1.OR.IPS.EQ.11) * .AND. IABS(ISW).NE.2 .AND. NTOT.GT.1)THEN IF(NINS.EQ.NDIM)NTOT1=-NTOT ENDIF CALL WRLINE(IBR,NTOT1,ITP,LAB1,A,U) C C Write restart information for multi-parameter analysis : C IF(LAB1.NE.0)CALL WRTSP8(ITP,NTOT,LAB1,IBR,U) C RETURN END C C ---------- ------ SUBROUTINE WRLINE(IBR,NTOT,ITP,LAB,VAXIS,U) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Write one line of output on unit 6 and 7. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC C DIMENSION U(NDIM) CHARACTER*2 ATYPE C IF(IABS(ISW).NE.2) THEN N1=NFPAR ELSE N1=NFPAR/2+1 ENDIF C N2=NDM NT=N1+N2 C IF(N1.GT.7)THEN N1=7 N2=0 ELSEIF(NT.GT.7)THEN N2=7-N1 ENDIF C C Write a heading above the first line. C IF(IABS(NTOT).EQ.1)CALL HEADNG(6,N1,N2) IF(IABS(NTOT).EQ.1)CALL HEADNG(7,N1,N2) C IF(MOD(ITP,10).EQ.1)THEN ATYPE='BP' ELSE IF(MOD(ITP,10).EQ.2)THEN ATYPE='LP' ELSE IF(MOD(ITP,10).EQ.3)THEN ATYPE='HB' ELSE IF(MOD(ITP,10).EQ.4)THEN ATYPE=' ' ELSE IF(MOD(ITP,10).EQ.-4)THEN ATYPE='UZ' ELSE IF(MOD(ITP,10).EQ.5)THEN ATYPE='LP' ELSE IF(MOD(ITP,10).EQ.6)THEN ATYPE='BP' ELSE IF(MOD(ITP,10).EQ.7)THEN ATYPE='PD' ELSE IF(MOD(ITP,10).EQ.8)THEN ATYPE='TR' ELSE IF(MOD(ITP,10).EQ.9)THEN ATYPE='EP' ELSE IF(MOD(ITP,10).EQ.-9)THEN ATYPE='MX' ELSE ATYPE=' ' ENDIF C IF(N2.EQ.0)THEN IF(MOD(ITP,10).NE.0) * WRITE(6,101)IBR,NTOT,ATYPE,LAB,PAR(ICP(1)),VAXIS, * (PAR(ICP(I)),I=2,N1) WRITE(7,102)IBR,NTOT,ITP,LAB,PAR(ICP(1)),VAXIS, * (PAR(ICP(I)),I=2,N1) ELSE IF(N1.EQ.1)THEN IF(MOD(ITP,10).NE.0) * WRITE(6,101)IABS(IBR),IABS(NTOT),ATYPE,LAB,PAR(ICP(1)),VAXIS, * (U(I),I=1,N2) WRITE(7,102)IBR,NTOT,ITP,LAB,PAR(ICP(1)),VAXIS, * (U(I),I=1,N2) ELSE IF(MOD(ITP,10).NE.0) * WRITE(6,101)IABS(IBR),IABS(NTOT),ATYPE,LAB,PAR(ICP(1)),VAXIS, * (U(I),I=1,N2),(PAR(ICP(I)),I=2,N1) WRITE(7,102)IBR,NTOT,ITP,LAB,PAR(ICP(1)),VAXIS, * (U(I),I=1,N2),(PAR(ICP(I)),I=2,N1) ENDIF ENDIF C 101 FORMAT(I4,I5,1X,A2,I4,1P8E14.6) 102 FORMAT(I4,I5,I4,I4,1P8E14.6) C RETURN END C C ---------- ------ SUBROUTINE WRTSP8(ITP,NTOT,LAB,IBR,U) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C C Write restart information on singular points, plotting points, etc., C on unit 8. C DIMENSION U(NDIM) C NTPL=1 NAR=NDIM+1 NROWPR=NDIM/7+1 + NPAR/8+1 PAR(ICP(1))=RL(1) T=ZERO A=ZERO WRITE(8,101)IBR,NTOT,ITP,LAB,NFPAR,ISW,NTPL,NAR,NROWPR WRITE(8,102)T,(U(I),I=1,NDIM) WRITE(8,102)(PAR(I),I=1,NPAR) C 101 FORMAT(9I5) 102 FORMAT(4X,1P7E18.10) C RETURN END C C------------------------------------------------------------------- C------------------------------------------------------------------- C Mesh and Weight Generation C------------------------------------------------------------------- C------------------------------------------------------------------- C C ---------- --- SUBROUTINE MSH(TM) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates a uniform mesh on [0,1]. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION TM(NTSTP1) C TM(1)=ZERO DT=ONE/NTST DO 1 J=1,NTST TM(J+1)=J*DT 1 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE GENWTS(NCOL) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the weights of the collocation method. The user selected C number of collocation points (ncol) must be one of { 2,...,7 }. C C The following weights are generated : C C W : for the function value, C WP : for the first derivative, C WH : for the highest (=NCOL) derivative, C WI : for the local integration formula. C COMMON /BLWTS/ W(8,7),WP(8,7),WH(8),WI(8) COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE DIMENSION ZM(7),XM(8) C C Generate the collocation points : C CALL CPNTS(NCOL,ZM) C C Generate weights : C NCP1=NCOL+1 D=ONE/NCOL DO 1 I=1,NCP1 XM(I)=(I-1)*D 1 CONTINUE C DO 7 IB=1,NCP1 C DENOM=ONE DO 2 K=1,NCP1 IF(K.EQ.IB)GOTO 2 DENOM=DENOM*( XM(IB)-XM(K) ) 2 CONTINUE C DO 6 IC=1,NCOL C C ( 1 ) Weights for the function values : C P=ONE DO 3 K=1,NCP1 IF(K.EQ.IB)GOTO 3 P=P*( ZM(IC)-XM(K) ) 3 CONTINUE W(IB,IC)=P/DENOM C C ( 2 ) Weights for derivatives : C SUM=ZERO DO 5 L=1,NCP1 IF(L.EQ.IB)GOTO 5 P=ONE DO 4 K=1,NCP1 IF(K.EQ.IB.OR.K.EQ.L)GOTO 4 P=P*( ZM(IC)-XM(K) ) 4 CONTINUE SUM=SUM+P 5 CONTINUE WP(IB,IC)=SUM/DENOM 6 CONTINUE C 7 CONTINUE C C ( 3 ) Weights for the highest derivative : C CALL CNTDIF(NCOL,WH) C C ( 4 ) Weights for the integration formulae : C CALL WINT(NCP1,WI) C RETURN END C C ---------- ----- SUBROUTINE CPNTS(NCOL,ZM) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the collocation points with respect to [0,1]. C COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE DIMENSION ZM(7) C GOTO (2,3,4,5,6,7)NCOL-1 C 2 CONTINUE C=HALF/DSQRT(3.0D 00) CSGLE C=HALF/ SQRT(3.0E 00) ZM(1)=HALF-C ZM(2)=HALF+C RETURN C 3 CONTINUE C=HALF*DSQRT(0.6D 00) CSGLE C=HALF* SQRT(0.6E 00) ZM(1)=HALF-C ZM(2)=HALF ZM(3)=HALF+C RETURN C 4 CONTINUE R=6.0D 00/7.0D 00 CSGLE R=6.0E 00/7.0E 00 C=HALF*DSQRT(R**2-12.0D 00/35.0D 00) CSGLE C=HALF* SQRT(R**2-12.0E 00/35.0E 00) C1=HALF*DSQRT(3.0D 00/7.0D 00+C) CSGLE C1=HALF* SQRT(3.0E 00/7.0E 00+C) C2=HALF*DSQRT(3.0D 00/7.0D 00-C) CSGLE C2=HALF* SQRT(3.0E 00/7.0E 00-C) ZM(1)=HALF-C1 ZM(2)=HALF-C2 ZM(3)=HALF+C2 ZM(4)=HALF+C1 RETURN C 5 CONTINUE C1=HALF*0.90617984593866399280D 00 C2=HALF*0.53846931010568309104D 00 ZM(1)=HALF-C1 ZM(2)=HALF-C2 ZM(3)=HALF ZM(4)=HALF+C2 ZM(5)=HALF+C1 RETURN C 6 CONTINUE C1=HALF*0.93246951420315202781D 00 C2=HALF*0.66120938646626451366D 00 C3=HALF*0.23861918608319690863D 00 ZM(1)=HALF-C1 ZM(2)=HALF-C2 ZM(3)=HALF-C3 ZM(4)=HALF+C3 ZM(5)=HALF+C2 ZM(6)=HALF+C1 RETURN C 7 CONTINUE C1=HALF*0.949107991234275852452D 00 C2=HALF*0.74153118559939443986D 00 C3=HALF*0.40584515137739716690D 00 ZM(1)=HALF-C1 ZM(2)=HALF-C2 ZM(3)=HALF-C3 ZM(4)=HALF ZM(5)=HALF+C3 ZM(6)=HALF+C2 ZM(7)=HALF+C1 RETURN END C C ---------- ------ SUBROUTINE CNTDIF(N,D) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the coefficients of the central difference formula for C Nth derivative at uniformly spaced points C 0 = x < x < ... < x = 1. C 0 1 N C COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE DIMENSION D(8) C D(1)=ONE IF(N.EQ.0)RETURN C DO 2 I=1,N D(I+1)=ZERO DO 1 K=1,I K1=I+2-K D(K1)=D(K1-1)-D(K1) 1 CONTINUE 2 D(1)=-D(1) C C Scale to [0,1] : C SC=N**N NP1=N+1 DO 3 I=1,NP1 D(I)=SC*D(I) 3 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE WINT(N,WI) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates the weights for the integration formula based on polynomial C interpolation at N equally spaced points in [0,1]. C COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE DIMENSION WI(8) C GOTO (3,4,5,6,7,8)N-2 C 3 CONTINUE C=ONE/6.0D 00 CSGLE C=ONE/6.0E 00 WI(1)=C WI(2)=4.0D 00*C CSGLE WI(2)=4.0E 00*C WI(3)=C RETURN C 4 CONTINUE C=ONE/8.0D 00 CSGLE C=ONE/8.0E 00 WI(1)=C WI(2)=3.0D 00*C CSGLE WI(2)=3.0E 00*C WI(3)=WI(2) WI(4)=C RETURN C 5 CONTINUE C=ONE/90.0D 00 CSGLE C=ONE/90.0E 00 WI(1)=7.0D 00*C CSGLE WI(1)=7.0E 00*C WI(2)=32.0D 00*C CSGLE WI(2)=32.0E 00*C WI(3)=12.0D 00*C CSGLE WI(3)=12.0E 00*C WI(4)=WI(2) WI(5)=WI(1) RETURN C 6 CONTINUE WI(1)=19.0D 00/288.0D 00 WI(2)=25.0D 00/96.0D 00 WI(3)=25.0D 00/144.0D 00 WI(4)=WI(3) WI(5)=WI(2) WI(6)=WI(1) RETURN C 7 CONTINUE WI(1)=41.0D 00/840.0D 00 WI(2)=9.0D 00/35.0D 00 WI(3)=9.0D 00/280.0D 00 WI(4)=34.0D 00/105.0D 00 WI(5)=WI(3) WI(6)=WI(2) WI(7)=WI(1) RETURN C 8 CONTINUE WI(1)=751.0D 00/17280.0D 00 WI(2)=3577.0D 00/17280.0D 00 WI(3)=49.0D 00/640.0D 00 WI(4)=2989.0D 00/17280.0D 00 WI(5)=WI(4) WI(6)=WI(3) WI(7)=WI(2) WI(8)=WI(1) C RETURN END C C------------------------------------------------------------------- C------------------------------------------------------------------- C Stepsize and Mesh Adaption C------------------------------------------------------------------- C------------------------------------------------------------------- C C ---------- ------ SUBROUTINE ADPTDS(RDS,NIT) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C The stepsize along the branch of solutions is adapted depending on the C number of Newton iterations in the previous step (called if IADS > 0). C COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C IF(ITNW.LE.3) THEN ITNW=3 N1=2 ELSE N1=ITNW/2 ENDIF C IF(NIT.LE.1) THEN RDS= TWO*RDS ELSE IF(NIT.EQ.2) THEN RDS= 1.5*RDS ELSE IF(NIT.GT.2 .AND. NIT.LE.N1) THEN RDS= 1.1*RDS ELSE IF(NIT.GE.ITNW) THEN RDS=HALF*RDS ENDIF C ARDS= ABS(RDS) IF(ARDS.GT.DSMAX)RDS=RDS*DSMAX/ARDS C IF(IID.GE.1)WRITE(9,101)NIT,RDS 101 FORMAT(' NUMBER OF ITERATIONS = ',I2,' NEXT STEPSIZE = ', * E11.3) C RETURN END C C ---------- ----- SUBROUTINE ADAPT (NOLD,NCOLD,NNEW,NCNEW,TM,DTM,M1U,UPS,VPS, * TINT,UINT,EQF,UNEQ,WRKSP,TM2,ITM,IAL) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Adapts the distribution of the mesh points so that the increase of the C monotone function EQDF becomes approximately equidistributed over the C intervals. The functions UPS and VPS are interpolated on new mesh. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION UPS(M1U,NROW),VPS(M1U,NROW),TM(NTSTP1) DIMENSION DTM(NTSTP1),EQF(NTSTP1),UNEQ(NTSTP1),TINT(NTSTP1) DIMENSION UINT(M1U,NROW),WRKSP(M1U,NROW),TM2(NTSTP1) DIMENSION ITM(NTSTP1),IAL(NTSTP1) C NOLDP1=NOLD+1 NNEWP1=NNEW+1 NRWNEW=NDIM*NCNEW C C For periodic boundary conditions extrapolate by periodicity. C IF( (IPS.EQ.2.OR.IPS.EQ.3.OR.IPS.EQ.12.OR.IPS.EQ.13) * .AND. IABS(ISW).NE.2) THEN IPER=1 ELSE IPER=0 ENDIF C C Generate the new mesh : C CALL NEWMSH(M1U,UPS,NOLD,NCOLD,TM,DTM,NNEW,TINT,EQF,UNEQ, * WRKSP,IAL,IPER) C C Replace UPS by its interpolant on the new mesh : C CALL INTERP(NDIM,NOLDP1,NCOLD,TM,M1U,UPS,NNEWP1,NCNEW,TINT,UINT, * TM2,ITM) DO 2 J=1,NNEWP1 DO 1 I=1,NRWNEW UPS(J,I)=UINT(J,I) 1 CONTINUE 2 CONTINUE C C Replace VPS by its interpolant on the new mesh : C CALL INTERP(NDIM,NOLDP1,NCOLD,TM,M1U,VPS,NNEWP1,NCNEW,TINT,UINT, * TM2,ITM) DO 5 J=1,NNEWP1 DO 4 I=1,NRWNEW VPS(J,I)=UINT(J,I) 4 CONTINUE 5 CONTINUE C C Replace old mesh : C TM(1)=ZERO DO 6 J=1,NNEW DTM(J)=TINT(J+1)-TINT(J) TM(J+1)=TINT(J+1) 6 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE INTERP(NDIM,N,NC,TM,M1U,UPS,N1,NC1,TM1,UPS1,TM2,ITM1) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 C C Finds interpolant (TM(.) , UPS(.) ) on new mesh TM1. C DIMENSION TM(NTSTP1),TM1(NTSTP1),TM2(NTSTP1),ITM1(NTSTP1) DIMENSION UPS(M1U,NROW),UPS1(M1U,NROW) DIMENSION X(8),W(8) C NCP1=NC+1 N1M1=N1-1 C DO 6 I=1,NC1 RI=I-1 D=RI/NC1 DO 1 J1=1,N1M1 TM2(J1)=TM1(J1)+D*( TM1(J1+1)-TM1(J1) ) 1 CONTINUE CALL ORDR(N,TM,N1M1,TM2,ITM1) DO 5 J1=1,N1M1 J=ITM1(J1) Z=TM2(J1) D=( TM(J+1)-TM(J) )/NC DO 2 L=1,NCP1 X(L)=TM(J)+(L-1)*D 2 CONTINUE CALL INTWTS(NCP1,Z,X,W) DO 4 K=1,NDIM K1=(I-1)*NDIM+K UPS1(J1,K1)=W(NCP1)*UPS(J+1,K) DO 3 L=1,NC L1=K+(L-1)*NDIM UPS1(J1,K1)=UPS1(J1,K1)+W(L)*UPS(J,L1) 3 CONTINUE 4 CONTINUE 5 CONTINUE 6 CONTINUE C DO 7 I=1,NDIM UPS1(N1,I)=UPS(N,I) 7 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE NEWMSH(M1U,UPS,NOLD,NCOLD,TMOLD,DTMOLD, * NNEW,TMNEW,EQF,UNEQ,WRKSP,IAL,IPER) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Redistributes the mesh according to the function EQDF. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION TMOLD(NTSTP1),DTMOLD(NTSTP1),TMNEW(NTSTP1) DIMENSION UPS(M1U,NROW),EQF(NTSTP1),UNEQ(NTSTP1),IAL(NTSTP1) DIMENSION WRKSP(M1U,NROW) C C Put the values of the monotonely increasing function EQDF in EQF. C CALL EQDF(NOLD,NDIM,NCOLD,DTMOLD,M1U,UPS,EQF,WRKSP,IPER) C C Uniformly divide the range of EQDF : C NOLDP1=NOLD+1 NNEWP1=NNEW+1 DAL=EQF(NOLDP1)/NNEW DO 1 J=1,NNEWP1 UNEQ(J)=(J-1)*DAL 1 CONTINUE C CALL ORDR(NOLDP1,EQF,NNEWP1,UNEQ,IAL) C C Generate the new mesh in TMNEW : C DO 2 J1=1,NNEWP1 J=IAL(J1) X=(UNEQ(J1)-EQF(J))/(EQF(J+1)-EQF(J)) TMNEW(J1)=(ONE-X)*TMOLD(J)+X*TMOLD(J+1) 2 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE ORDR(N,TM,N1,TM1,ITM1) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C TM and TM1 are two ascending arrays with values in [0,1]. On exit the C value of ITM1( i ) specifies the index of the TM-interval in which C TM1(i) lies. C DIMENSION TM(N),TM1(N1),ITM1(N1) C K0=2 DO 3 J1=1,N1 DO 1 J=K0,N K1=J IF(TM1(J1).LT.TM(J))GOTO 2 1 CONTINUE 2 ITM1(J1)=K1-1 K0=K1 3 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE INTWTS(N,Z,X,WTS) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates weights for Lagrange interpolation. C COMMON /BLWTS/ W(8,7),WP(8,7),WH(8),WI(8) COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE DIMENSION X(N),WTS(N) C DO 2 IB=1,N P=ONE DENOM=ONE DO 1 K=1,N IF(K.EQ.IB)GOTO 1 P=P*( Z-X(K) ) DENOM=DENOM*( X(IB)-X(K) ) 1 CONTINUE WTS(IB)=P/DENOM 2 CONTINUE C RETURN END C C ---------- ---- SUBROUTINE EQDF(NTST,NDIM,NCOL,DTM,M1U,UPS,EQF,WRKSP,IPER) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLWTS/ W(8,7),WP(8,7),WH(8),WI(8) C DIMENSION UPS(M1U,NROW),EQF(NTSTP1),DTM(NTSTP1),WRKSP(M1U,NROW) LOGICAL SMALL C C Compute approximation to NCOL-th derivative : C SMALL=.TRUE. DO 3 J=1,NTST JP1=J+1 SC=ONE/DTM(J)**NCOL DO 2 I=1,NDIM WRKSP(J,I)=WH(NCOL+1)*UPS(JP1,I) DO 1 K=1,NCOL K1=I+(K-1)*NDIM WRKSP(J,I)=WRKSP(J,I)+WH(K)*UPS(J,K1) 1 CONTINUE WRKSP(J,I)=SC*WRKSP(J,I) IF(DABS(WRKSP(J,I)).GT.HMACH)SMALL=.FALSE. CSGLE IF( ABS(WRKSP(J,I)).GT.HMACH)SMALL=.FALSE. 2 CONTINUE 3 CONTINUE C C Take care of "small derivative" case. C IF(SMALL)THEN DO 12 I=1,NTST+1 EQF(I)=I-1 12 CONTINUE RETURN ENDIF C IF(IPER.NE.1)GOTO 5 C C Extend by periodicity : C DO 4 I=1,NDIM WRKSP(NTST+1,I)=WRKSP(1,I) 4 CONTINUE DTM(NTST+1)=DTM(1) GOTO 7 C C Extend by extrapolation : C 5 DO 6 I=1,NDIM WRKSP(NTST+1,I)=2*WRKSP(NTST,I)-WRKSP(NTST-1,I) 6 CONTINUE DTM(NTST+1)=DTM(NTST) C C Compute approximation to (NCOL+1)-st derivative : C 7 DO 9 J=1,NTST JP1=J+1 DTAV=HALF*(DTM(J)+DTM(J+1)) SC=ONE/DTAV DO 8 I=1,NDIM WRKSP(J,I)=SC*( WRKSP(JP1,I)-WRKSP(J,I) ) 8 CONTINUE 9 CONTINUE C C Define the equidistribution function : C PWR=ONE/(NCOL+ONE) EQF(1)=ZERO DO 11 J=1,NTST E=ZERO DO 10 I=1,NDIM E=E+DABS( WRKSP(J,I) )**PWR CSGLE E=E+ ABS( WRKSP(J,I) )**PWR 10 CONTINUE EQF(J+1)=EQF(J)+DTM(J)*E 11 CONTINUE C C RETURN END C C------------------------------------------------------------------- C------------------------------------------------------------------- C General Support Routines C------------------------------------------------------------------- C------------------------------------------------------------------- C C ---------- --- SUBROUTINE EIG(NDIM,M1A,A,EV,WKEV,IER) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C This subroutine uses the IMSL subroutine EIGRF to compute the C eigenvalues of the general real matrix A. C NDIM is the dimension of A. C M1A is the first dimension of A as in the DIMENSION statement. C The eigenvalues are to be returned in the complex vector EV. C DIMENSION A(M1A,1),WKEV(NDIM) C COMPLEX*16 EV(NDIM) CSGLE COMPLEX*8 EV(NDIM) C IER=0 C CALL EIGRF( A,NDIM,M1A,0,EV,Z,1,WKEV,IER) C IER1=129 IER2=128+NDIM IF(IER.GE.IER1.AND.IER.LE.IER2)IER=1 IF(IER.EQ.1)WRITE(9,101) 101 FORMAT(' *** ERROR RETURN FROM IMSL ROUTINE -EIGRF-') C RETURN END C C ---------- ---- SUBROUTINE NLVC(N,M,K,A,U,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Finds a null-vector of a singular matrix A. C The null space of A is assumed to be K-dimensional. C C Parameters : C C N : number of equations, C M : first dimension of A from DIMENSION statement, C K : dimension of nullspace, C A : N * N matrix of coefficients, C U : on exit U contains the null vector, C IR,IC : integer arrays of dimension at least N. C COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION A(M,M),U(M) DIMENSION IR(N),IC(N) C DO 1 I=1,N IC(I)=I IR(I)=I 1 CONTINUE C C Elimination. C NMK=N-K C DO 6 JJ=1,NMK IPIV=JJ JPIV=JJ PIV=ZERO DO 3 I=JJ,N DO 2 J=JJ,N P=DABS(A(IR(I),IC(J))) CSGLE P= ABS(A(IR(I),IC(J))) IF(P.LE.PIV)GOTO 2 PIV=P IPIV=I JPIV=J 2 CONTINUE 3 CONTINUE IF(PIV.LT.RSMALL)WRITE(9,101)JJ,RSMALL C KK=IR(JJ) IR(JJ)=IR(IPIV) IR(IPIV)=KK C KK=IC(JJ) IC(JJ)=IC(JPIV) IC(JPIV)=KK C JJP1=JJ+1 DO 5 L=JJP1,N RM=A(IR(L),IC(JJ))/A(IR(JJ),IC(JJ)) DO 4 I=JJP1,N A(IR(L),IC(I))=A(IR(L),IC(I))-RM*A(IR(JJ),IC(I)) 4 CONTINUE 5 CONTINUE 6 CONTINUE C C Backsubstitution : C DO 7 I=1,K U(IC(N+1-I))=ONE 7 CONTINUE C DO 9 I1=1,NMK I=NMK+1-I1 SM=ZERO IP1=I+1 DO 8 J=IP1,N SM=SM+A(IR(I),IC(J))*U(IC(J)) 8 CONTINUE U(IC(I))=-SM/A(IR(I),IC(I)) 9 CONTINUE C 101 FORMAT(' *** PIVOT #',I3,' LESS THAN ',E10.3,' IN NLVC', * /,' A NULLSPACE MAY BE MULTI-DIMENSIONAL') C RETURN END C C ---------- ----- SUBROUTINE NRMLZ(NDIM,V) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION V(NDIM) C C Scale the vector V so that its discrete L2-norm becomes 1. C SS=ZERO DO 1 I=1,NDIM SS=SS+V(I)*V(I) 1 CONTINUE C=ONE/DSQRT(SS) CSGLE C=ONE/ SQRT(SS) DO 2 I=1,NDIM V(I)=V(I)*C 2 CONTINUE RETURN END C DOUBLE PRECISION CSGLE REAL *FUNCTION PI(R) C -------- -- C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C PI=R*4.0D 00*DATAN(ONE) CSGLE PI=R*4.0E 00* ATAN(ONE) RETURN END C C ---------- -- SUBROUTINE GE(N,M1A,A,NRHS,M1U,U,M1F,F,IR,IC) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Solves the linear system A U = F by Gauss elimination C with complete pivoting. C C Parameters : C C N : number of equations, C M1A : first dimension of A from DIMENSION statement, C A : N * N matrix of coefficients, C NRHS: 0 if no right hand sides (determinant only), C >0 if there are NRHS right hand sides, C M1U : first dimension of U from DIMENSION statement, C U : on exit U contains the solution vector(s), C M1F : first dimension of F from DIMENSION statement, C F : right hand side vector(s), C IR,IC: integer vectors of dimension at least N. C C The input matrix A is overwritten. C DIMENSION A(M1A,M1A),U(M1U,1),F(M1F,1) DIMENSION IR(N),IC(N) C COMMON /BLDET/ DETGE,NINS COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DO 1 I=1,N IC(I)=I IR(I)=I 1 CONTINUE C C Elimination. C DETGE=ONE NM1=N-1 C DO 7 JJ=1,NM1 IPIV=JJ PIV=ZERO DO 3 I=JJ,N DO 2 J=JJ,N P=DABS(A(IR(I),IC(J))) CSGLE P= ABS(A(IR(I),IC(J))) IF(P.LE.PIV)GOTO 2 PIV=P IPIV=I JPIV=J 2 CONTINUE 3 CONTINUE C DETGE=DETGE*A(IR(IPIV),IC(JPIV)) IF(IPIV.NE.JJ)DETGE=-DETGE IF(JPIV.NE.JJ)DETGE=-DETGE C IF(PIV.LT.RSMALL)WRITE(9,101)JJ,RSMALL C K=IR(JJ) IR(JJ)=IR(IPIV) IR(IPIV)=K C K=IC(JJ) IC(JJ)=IC(JPIV) IC(JPIV)=K C JJP1=JJ+1 DO 6 L=JJP1,N RM=A(IR(L),IC(JJ))/A(IR(JJ),IC(JJ)) DO 4 I=JJP1,N A(IR(L),IC(I))=A(IR(L),IC(I))-RM*A(IR(JJ),IC(I)) 4 CONTINUE IF(NRHS.EQ.0)GOTO 6 DO 5 IRH=1,NRHS F(IR(L),IRH)=F(IR(L),IRH)-RM*F(IR(JJ),IRH) 5 CONTINUE 6 CONTINUE 7 CONTINUE DETGE=DETGE*A(IR(N),IC(N)) C IF(NRHS.EQ.0)RETURN C C Backsubstitution : C DO 10 IRH=1,NRHS U(IC(N),IRH)=F(IR(N),IRH)/A(IR(N),IC(N)) DO 9 I1=1,NM1 I=N-I1 SM=ZERO IP1=I+1 DO 8 J=IP1,N SM=SM+A(IR(I),IC(J))*U(IC(J),IRH) 8 CONTINUE U(IC(I),IRH)=(F(IR(I),IRH)-SM)/A(IR(I),IC(I)) 9 CONTINUE 10 CONTINUE C 101 FORMAT(' *** PIVOT #',I3,' LESS THAN ',E10.3,' IN GE') C RETURN END C C ---------- ------ SUBROUTINE NEWLAB(ISW,IBR,LAB) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Determine a suitable label when restarting. C COMMON /BLITP/ ITPST,ITPSP,IBRSP COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) LOGICAL EOF3 C REWIND 3 MBR=0 MLAB=0 C 1 READ(3,*,END=2)IBR1,NTOT1,ITP1,LAB1,NFPAR1,ISW1,NTPL1,NAR1,NSKIP IF(IBR1.GT.MBR)MBR=IBR1 IF(LAB1.GT.MLAB)MLAB=LAB1 CALL SKIP3(NSKIP,EOF3) IF(.NOT. EOF3)GOTO 1 C 2 CONTINUE C LAB=MLAB IF(ISW.LT.0)THEN IBR=MBR+1 ELSEIF( (IABS(ITPSP).LT.10.AND.IABS(ISW).EQ.2) * .OR. ((IPS.EQ.2.OR.IPS.EQ.12).AND.ITPSP.EQ.3) * .OR. ((IPS.EQ.3.OR.IPS.EQ.13).AND.IABS(ITPSP).LT.10) * .OR. (IPS.EQ.4.AND.ISW.EQ.2.AND.IABS(ITPSP).LT.10) * .OR. (IPS.EQ.6.AND.ISW.EQ.2.AND.IABS(ITPSP).LT.10) * .OR. (IPS.EQ.5.AND.MOD(ITPSP,10).EQ.2) )THEN IBR=IRS ELSE IBR=IBRSP ENDIF C RETURN END C C ---------- ------ SUBROUTINE FINDL3(IRS,ITP,NFPAR,FOUND) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLITP/ ITPST,ITPSP,IBRSP C LOGICAL FOUND,EOF3 C C Locates restart point with label IRS and determines type. C If the label can not be located on unit 3 then FOUND will be .FALSE. C FOUND=.FALSE. REWIND 3 C 1 CONTINUE READ(3,*,END=2)IBR1,NTOT1,ITP,LAB,NFPAR,ISW1,NTPL1,NAR1,NSKIP IF(LAB.EQ.IRS)THEN FOUND=.TRUE. ITPSP=ITP IBRSP=IBR1 IF(IABS(ISW).EQ.2)THEN IF(IABS(ITP).LT.10)THEN ITPST=IABS(ITP) ELSE ITPST=IABS(ITP/10) ENDIF ELSE ITPST=0 ENDIF BACKSPACE 3 RETURN ELSE CALL SKIP3(NSKIP,EOF3) IF(EOF3)GOTO 2 ENDIF GOTO 1 C 2 RETURN END C C ---------- ----- SUBROUTINE READL3(IPS,IBR,U,PAR) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT C DIMENSION U(1),PAR(1) C C Reads the restart data for algebraic problems. C READ(3,*)IBR1,NTOT1,ITP1,LAB,NFPAR1,ISW1,NTPL1,NAR NDIM=NAR-1 READ(3,101)T,(U(I),I=1,NDIM) READ(3,101)(PAR(I),I=1,NPAR) 101 FORMAT(4X,1P7E18.10) C RETURN END C C ---------- ----- SUBROUTINE SKIP3(NSKIP,EOF3) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Skips the specified number of lines on unit 3. C LOGICAL EOF3 C EOF3=.FALSE. C DO 1 I=1,NSKIP READ(3,101,END=2) 1 CONTINUE RETURN C 101 FORMAT(1X) C 2 CONTINUE EOF3=.TRUE. RETURN END C DOUBLE PRECISION CSGLE REAL *FUNCTION RINPR(NDIM1,M1U,UPS,VPS,DTM) C -------- ----- C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Computes the L2 inner product of UPS and VPS. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLWTS/ W(8,7),WP(8,7),WH(8),WI(8) COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION UPS(M1U,NROW),VPS(M1U,NROW),DTM(NTSTP1) C S=ZERO C DO 3 J=1,NTST JP1=J+1 SJ=ZERO DO 2 I=1,NDIM1 DO 1 K=1,NCOL K1=(K-1)*NDIM+I SJ=SJ+WI(K)*UPS(J,K1)*VPS(J,K1) 1 CONTINUE SJ=SJ+WI(NCOL+1)*UPS(JP1,I)*VPS(JP1,I) 2 CONTINUE S=S+DTM(J)*SJ 3 CONTINUE C RINPR=S C RETURN END C DOUBLE PRECISION CSGLE REAL *FUNCTION RNRMSQ(NDIM1,M1U,UPS,DTM) C -------- ------ C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Finds the norm of UPS (first NDIM1 components are included only). C DIMENSION UPS(M1U,1),DTM(1) RNRMSQ=RINPR(NDIM1,M1U,UPS,UPS,DTM) RETURN END C DOUBLE PRECISION CSGLE REAL *FUNCTION RINTG(M1U,IC,UPS,DTM) C -------- ----- C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Computes the integral of the IC'th component of UPS. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLWTS/ W(8,7),WP(8,7),WH(8),WI(8) COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION UPS(M1U,NROW),DTM(NTSTP1) C S=ZERO C DO 3 J=1,NTST JP1=J+1 SJ=ZERO DO 1 K=1,NCOL K1=(K-1)*NDIM+IC SJ=SJ+WI(K)*UPS(J,K1) 1 CONTINUE SJ=SJ+WI(NCOL+1)*UPS(JP1,IC) S=S+DTM(J)*SJ 3 CONTINUE C RINTG=S C RETURN END C DOUBLE PRECISION CSGLE REAL *FUNCTION RNRM2(M1U,IC,UPS,DTM) C -------- ----- C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Computes the L2-norm of the IC'th component of UPS. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLWTS/ W(8,7),WP(8,7),WH(8),WI(8) COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION UPS(M1U,NROW),DTM(NTSTP1) C S=ZERO C DO 3 J=1,NTST JP1=J+1 SJ=ZERO DO 1 K=1,NCOL K1=(K-1)*NDIM+IC SJ=SJ+WI(K)*UPS(J,K1)**2 1 CONTINUE SJ=SJ+WI(NCOL+1)*UPS(JP1,IC)**2 S=S+DTM(J)*SJ 3 CONTINUE C RNRM2=DSQRT(S) CSGLE RNRM2= SQRT(S) C RETURN END C DOUBLE PRECISION CSGLE REAL *FUNCTION RMXUPS(M1U,I,UPS) C -------- ------ C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Computes the maximum of the I'th component of UPS. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT DIMENSION UPS(M1U,NROW) C RMXUPS=UPS(1,I) C DO 2 J=1,NTST DO 1 K=1,NCOL K1=(K-1)*NDIM+I IF(UPS(J,K1).GT.RMXUPS)RMXUPS=UPS(J,K1) 1 CONTINUE 2 CONTINUE IF(UPS(NTST+1,I).GT.RMXUPS)RMXUPS=UPS(NTST+1,I) C RETURN END C DOUBLE PRECISION CSGLE REAL *FUNCTION RMNUPS(M1U,I,UPS) C -------- ------ C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Computes the minimum of the I'th component of UPS. C COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT DIMENSION UPS(M1U,NROW) C RMNUPS=UPS(1,I) C DO 2 J=1,NTST DO 1 K=1,NCOL K1=(K-1)*NDIM+I IF(UPS(J,K1).LT.RMNUPS)RMNUPS=UPS(J,K1) 1 CONTINUE 2 CONTINUE IF(UPS(NTST+1,I).LT.RMNUPS)RMNUPS=UPS(NTST+1,I) C RETURN END C C ---------- ------ SUBROUTINE SCALEB(M1U,DVPS,RLD,DTM) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Scales the vector (DVPS,RLD) so its norm becomes 1. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLTHT/ THETAL(20),THETAU COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION DVPS(M1U,NROW),DTM(NTSTP1),RLD(NFPAR) C SS=THETAU**2*RNRMSQ(NDIM,M1U,DVPS,DTM) C DO 1 I=1,NFPAR SS=SS+THETAL(I)**2*RLD(I)**2 1 CONTINUE C SC=ONE/DSQRT(SS) CSGLE SC=ONE/ SQRT(SS) C DO 3 J=1,NTST DO 2 I=1,NROW DVPS(J,I)=DVPS(J,I)*SC 2 CONTINUE 3 CONTINUE C DO 4 I=1,NDIM DVPS(NTST+1,I)=DVPS(NTST+1,I)*SC 4 CONTINUE C DO 5 I=1,NFPAR RLD(I)=SC*RLD(I) 5 CONTINUE C RETURN END C C------------------------------------------------------------------- C------------------------------------------------------------------- C General Boundary Value Problems C------------------------------------------------------------------- C------------------------------------------------------------------- C C ---------- ------ SUBROUTINE CNRLBV(FUNI,BCNI,ICNI,STPNT,FNBPBV,IBR,M1AA,M2AA,AA, * M1BB,M2BB,BB,M1CC,CC,M1DD,DD,WBRBD,M1U,UPS,UOLDPS,UPOLDP,UDOTPS, * RHSA,RHSD,TINT,UINT,DUPS,EQF,UNEQ,TM,DTM,TM2,U,F,M1DF,DFDU,DFDP, * ITM,IAL,UBC0,UBC1,M1BC,DBC,UICD,FICD,M1IC,DICD,IR,IC,IWBRBD, * P0,P1,POIN,EV,WKEV,NDIM2,SMAT,RNLLV) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Controls the computation of solution branches. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLITP/ ITPST,ITPSP,IBRSP COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLDET/ DETGE,NINS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLUSZ/ IUZR C EXTERNAL FUNI,BCNI,ICNI,STPNT,FNLPBV,FNBPBV,FNUZBV C LOGICAL LIMPNT C COMPLEX*16 EV(NDIM) CSGLE COMPLEX*8 EV(NDIM) C DIMENSION AA(M1AA,M2AA,1),BB(M1BB,M2BB,1),CC(M1CC,1),DD(M1DD,1) DIMENSION WBRBD(1),UPS(M1U,1),UOLDPS(M1U,1),UPOLDP(M1U,1) DIMENSION UDOTPS(M1U,1),RHSA(M1U,1),RHSD(1),TINT(1),UINT(M1U,1) DIMENSION DUPS(M1U,1),EQF(1),UNEQ(1),TM(1),DTM(1),TM2(1),ITM(1) DIMENSION IAL(1),U(1),F(1),DFDU(M1DF,1),DFDP(M1DF,1) DIMENSION UBC0(1),UBC1(1),DBC(M1BC,1),UICD(1),FICD(1),DICD(M1IC,1) DIMENSION P0(NDIM,1),P1(NDIM,1),POIN(NDIM,1),WKEV(NDIM),IWBRBD(1) DIMENSION SMAT(NDIM2,NDIM2),RNLLV(NDIM2),IR(NDIM2),IC(NDIM2) DIMENSION UZR(20) C C INITIALIZE COMPUTATION OF BRANCH C RDS=DS RDSOLD=RDS IF(ISP.LT.0)ISP=-ISP SP1=ZERO RLP=ZERO IF(NUZR.GT.0)THEN DO 15 I=1,NUZR UZR(I)=ZERO 15 CONTINUE ENDIF NITPS=0 NTOT=0 ISTOP=0 LIMPNT=.FALSE. C CALL RSPTBV(FUNI,STPNT,RDS,ISTOP,NTOT,LAB,IBR,M1U,UPS,UOLDPS, * UDOTPS,UPOLDP,TINT,UINT,EQF,UNEQ,DUPS,TM,DTM,TM2,ITM,IAL,U, * F,M1DF,DFDU,DFDP,EV,NDIM2,SMAT,RNLLV,IR,IC,NODIR) C IF(NODIR.EQ.1 .AND. ISW.GT.0)THEN CALL STDRBV(FUNI,BCNI,ICNI,RDS,M1AA,M2AA,AA,M1BB,M2BB,BB,M1CC, * CC,M1DD,DD,WBRBD,M1U,UPS,UOLDPS,UDOTPS,UPOLDP,RHSA,RHSD,DUPS, * DTM,U,F,M1DF,DFDU,DFDP,UBC0,UBC1,M1BC,DBC,UICD,FICD,M1IC,DICD, * IR,IC,IWBRBD,0) ELSEIF(IRS.NE.0 .AND. ISW.LT.0)THEN CALL STDRBV(FUNI,BCNI,ICNI,RDS,M1AA,M2AA,AA,M1BB,M2BB,BB,M1CC, * CC,M1DD,DD,WBRBD,M1U,UPS,UOLDPS,UDOTPS,UPOLDP,RHSA,RHSD,DUPS, * DTM,U,F,M1DF,DFDU,DFDP,UBC0,UBC1,M1BC,DBC,UICD,FICD,M1IC,DICD, * IR,IC,IWBRBD,1) ENDIF C C Store plotting data for restart point : C CALL STHD IF(IRS.EQ.0) THEN ITP=9+10*ITPST ELSE ITP=0 ENDIF ISTOP=0 CALL STPLBV(ISTOP,ITP,0,NTOT,LAB,IBR,M1U,UPS,UDOTPS,TM,DTM,M1DF) IF(ISTOP.EQ.1)GOTO 7 C CALL EXTRBV(FUNI,RDS,M1U,UPS,UOLDPS,UDOTPS,UPOLDP,U,F,M1DF,DFDU, * DFDP,DTM) C ITP=0 GOTO 4 C 1 ITP=0 C C Adapt the mesh to the solution. C IF(IAD.EQ.0)GOTO 2 IF(MOD(NTOT,IAD).EQ.0) * CALL ADAPT(NTST,NCOL,NTST,NCOL,TM,DTM,M1U,UPS,UOLDPS, * TINT,UINT,EQF,UNEQ,DUPS,TM2,ITM,IAL) 2 CONTINUE C C Adapt the stepsize along the branch. C IF(IADS.EQ.0)GOTO 3 IF(MOD(NTOT,IADS).EQ.0)CALL ADPTDS(RDS,NITPS) C C Provide initial approximation and determine next point. C 3 CALL CONTBV(FUNI,RDS,M1U,UPS,UOLDPS,UDOTPS,UPOLDP,U,F,M1DF,DFDU, * DFDP,DTM) 4 CALL SOLVBV(FUNI,BCNI,ICNI,ISTOP,RDS,NITPS,IBR,NTOT,M1AA,M2AA,AA, * M1BB,M2BB,BB,M1CC,CC,M1DD,DD,WBRBD,M1U,UPS,UOLDPS,UDOTPS,UPOLDP, * RHSA,RHSD,DUPS,TM,DTM,U,F,M1DF,DFDU,DFDP,UBC0,UBC1,M1BC,DBC,UICD, * FICD,M1IC,DICD,IR,IC,IWBRBD) IF(ISTOP.EQ.1)GOTO 6 C C Check for limit point (fold). C IF(ILP.EQ.0)GOTO 5 CALL LCSPBV(FNLPBV,FUNI,BCNI,ICNI,ISTOP,ITP,RLP,NITPS,IBR,NTOT, * M1AA,M2AA,AA,M1BB,M2BB,BB,M1CC,CC,M1DD,DD,WBRBD,M1U,UPS,UOLDPS, * UDOTPS,UPOLDP,RHSA,RHSD,DUPS,TM,DTM,U,F,M1DF,DFDU,DFDP,UBC0,UBC1, * M1BC,DBC,UICD,FICD,M1IC,DICD,IR,IC,IWBRBD,P0,P1,POIN,EV,WKEV) IF(ISTOP.EQ.1)GOTO 6 C IF(ITP.EQ.-1)THEN ITP=5+10*ITPST RLP=ZERO SP1=ZERO LIMPNT=.TRUE. ELSE LIMPNT=.FALSE. ENDIF C C Check for bifurcation. C 5 IF(ISP.EQ.0 .OR. (ISP.EQ.1.AND.IPS.EQ.4)) GOTO 55 C CALL LCSPBV(FNBPBV,FUNI,BCNI,ICNI,ISTOP,ITP,SP1,NITPS,IBR,NTOT, * M1AA,M2AA,AA,M1BB,M2BB,BB,M1CC,CC,M1DD,DD,WBRBD,M1U,UPS,UOLDPS, * UDOTPS,UPOLDP,RHSA,RHSD,DUPS,TM,DTM,U,F,M1DF,DFDU,DFDP,UBC0,UBC1, * M1BC,DBC,UICD,FICD,M1IC,DICD,IR,IC,IWBRBD,P0,P1,POIN,EV,WKEV) IF(ISTOP.EQ.1)GOTO 6 C IF(LIMPNT)THEN IF(IPS.EQ.2.OR.IPS.EQ.3)SP1=0 LIMPNT=.FALSE. ENDIF C IF(ITP.EQ.-1)THEN IF(IPS.NE.2.AND.IPS.NE.3.AND.IPS.NE.12.AND.IPS.NE.13 * .AND.IPS.NE.6)THEN C **BIFURCATION POINT ITP=6+10*ITPST ELSE C **SECONDARY PERIODIC BIFURCATION : DETERMINE TYPE CALL TPSPBV(EV,ITP) ENDIF RLP=ZERO SP1=ZERO ENDIF C C Check for zero(es) of user supplied function(s) USZR. C 55 IF(NUZR.LE.0) GOTO 6 C DO 57 I=1,NUZR IUZR=I CALL LCSPBV(FNUZBV,FUNI,BCNI,ICNI,ISTOP,ITP,UZR(I),NITPS,IBR, * NTOT,M1AA,M2AA,AA,M1BB,M2BB,BB,M1CC,CC,M1DD,DD,WBRBD,M1U,UPS, * UOLDPS,UDOTPS,UPOLDP,RHSA,RHSD,DUPS,TM,DTM,U,F,M1DF,DFDU,DFDP, * UBC0,UBC1,M1BC,DBC,UICD,FICD,M1IC,DICD,IR,IC,IWBRBD,P0,P1,POIN, * EV,WKEV) IF(ISTOP.EQ.1)GOTO 6 C IF(ITP.EQ.-1)THEN ITP=-4-10*ITPST DO 56 K=1,NUZR UZR(K)=ZERO 56 CONTINUE GOTO 6 ENDIF 57 CONTINUE C C Store plotting data. C 6 CALL STPLBV(ISTOP,ITP,NITPS,NTOT,LAB,IBR,M1U,UPS,UDOTPS,TM,DTM, * M1DF) IF(ISTOP.EQ.1)GOTO 7 C C COMPUTE THE NEXT POINT ON THE BRANCH C IF(ISTOP.EQ.0)GOTO 1 C 7 RETURN END C C ---------- ------ SUBROUTINE CONTBV(FUNI,RDS,M1U,UPS,UOLDPS,UDOTPS,UPOLDP,U, * F,M1DF,DFDU,DFDP,DTM) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Determines an initial approximation to the next solution point, C by extrapolating from the two preceding points. C The stepsize used in the preceding step has been stored in RDSOLD. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C EXTERNAL FUNI C DIMENSION UPS(M1U,NROW),UDOTPS(M1U,NROW),UPOLDP(M1U,NROW) DIMENSION UOLDPS(M1U,NROW),U(NDIM),F(NDIM) DIMENSION DFDU(M1DF,NDIM),DFDP(M1DF,NPAR),DTM(NTSTP1) C C Compute rate of change (along branch) of PAR(ICP(1)) and U : C DDS=ONE/RDSOLD DO 2 J=1,NTST+1 DO 1 I=1,NROW UDOTPS(J,I)=(UPS(J,I)-UOLDPS(J,I))*DDS 1 CONTINUE 2 CONTINUE DO 3 I=1,NFPAR RLDOT(I)=(RL(I)-RLOLD(I))*DDS 3 CONTINUE C Rescale, to set the norm of (UDOTPS,RLDOT) equal to 1. CALL SCALEB(M1U,UDOTPS,RLDOT,DTM) C C Extrapolate to get initial approximation to next solution point. C CALL EXTRBV(FUNI,RDS,M1U,UPS,UOLDPS,UDOTPS,UPOLDP,U, * F,M1DF,DFDU,DFDP,DTM) C C Store time-derivative. C CALL STUPBV(FUNI,M1U,UPS,UOLDPS,UPOLDP,U,F,M1DF,DFDU,DFDP) C RETURN END C C ---------- ------ SUBROUTINE EXTRBV(FUNI,RDS,M1U,UPS,UOLDPS,UDOTPS,UPOLDP,U, * F,M1DF,DFDU,DFDP,DTM) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Determines an initial approximation to the next solution by C extrapolating from the two preceding points. C The stepsize used in the preceding step has been stored in RDSOLD. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC C EXTERNAL FUNI C DIMENSION UPS(M1U,NROW),UDOTPS(M1U,NROW),UPOLDP(M1U,NROW) DIMENSION UOLDPS(M1U,NROW),U(NDIM),F(NDIM) DIMENSION DFDU(M1DF,NDIM),DFDP(M1DF,NPAR),DTM(NTSTP1) C DO 1 I=1,NFPAR RLOLD(I)=RL(I) RL(I)=RL(I)+RDS*RLDOT(I) 1 CONTINUE DO 3 J=1,NTST+1 DO 2 I=1,NROW UOLDPS(J,I)=UPS(J,I) UPS(J,I)=UPS(J,I)+RDS*UDOTPS(J,I) 2 CONTINUE 3 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE STUPBV(FUNI,M1U,UPS,UOLDPS,UPOLDP,U,F,M1DF,DFDU,DFDP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Stores U-prime (derivative with respect to T) in UPOLDP. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC C C----------------------------------------------------------------------- C The COMMON blocks BLWIF and BLDIF are used for Interface Workspace. C Array dimensions in BLWIF and BLDIF are: C C BLWIF: C U0XX(3n+2),U1XX(3n+2),U2XX(3n+2),F1XX(3n+2),F2XX(3n+2), C DFUXX(n,2n+20),DFPXX(n,20),DDUXX(n),DDPXX(20) C BLDIF: C U1ZZ(n),U2ZZ(n),F1ZZ(n),F2ZZ(n) C C where n is the largest value of NDIM or NINT or NBC. C COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) COMMON /BLDIF/ U1ZZ(50),U2ZZ(50),F1ZZ(50),F2ZZ(50) C----------------------------------------------------------------------- C DIMENSION UPS(M1U,NROW),UOLDPS(M1U,NROW),UPOLDP(M1U,NROW),U(NDIM) DIMENSION F(NDIM),DFDU(M1DF,NDIM),DFDP(M1DF,NPAR) C DO 1 I=1,NFPAR PAR(ICP(I))=RLOLD(I) 1 CONTINUE C DO 4 J=1,NTST+1 DO 2 I=1,NDIM U(I)=UOLDPS(J,I) IF(IPS.EQ.14)THEN U0XX(I)=2*UOLDPS(J,I)-UPS(J,I) ENDIF 2 CONTINUE CALL FUNI(NDIM,U,U0XX,ICP,PAR,0,F,DFDU,DFDP) DO 3 I=1,NDIM UPOLDP(J,I)=F(I) 3 CONTINUE 4 CONTINUE C NC1=NCOL-1 DO 8 K=1,NC1 N1=K*NDIM DO 7 J=1,NTST DO 5 I=1,NDIM U(I)=UOLDPS(J,N1+I) IF(IPS.EQ.14)THEN U0XX(I)=2*UOLDPS(J,N1+I)-UPS(J,N1+I) ENDIF 5 CONTINUE CALL FUNI(NDIM,U,U0XX,ICP,PAR,0,F,DFDU,DFDP) DO 6 I=1,NDIM UPOLDP(J,N1+I)=F(I) 6 CONTINUE 7 CONTINUE 8 CONTINUE C DO 9 I=1,NFPAR PAR(ICP(I))=RL(I) 9 CONTINUE C RETURN END C C ---------- ------ SUBROUTINE SOLVBV(FUNI,BCNI,ICNI,ISTOP,RDS,NITPS,IBR,NTOT,M1AA, * M2AA,AA,M1BB,M2BB,BB,M1CC,CC,M1DD,DD,WBRBD,M1U,UPS,UOLDPS,UDOTPS, * UPOLDP,RHSA,RHSD,DUPS,TM,DTM,U,F,M1DF,DFDU,DFDP,UBC0,UBC1,M1BC, * DBC,UICD,FICD,M1IC,DICD,IR,IC,IWBRBD) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Controls the solution of the nonlinear equations (by Newton's method) C for the next solution (PAR(ICP(*)) , U) on a branch of solutions. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLEPS/ EPSL(20),EPSU,EPSS COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLREF/ DELREF C EXTERNAL FUNI,BCNI,ICNI C DIMENSION WBRBD(1),F(NDIM),DFDU(M1DF,NDIM),DFDP(M1DF,NPAR) DIMENSION AA(M1AA,M2AA,NCLM),BB(M1BB,M2BB,NFPAR) DIMENSION CC(M1CC,NDCC),DD(M1DD,NFPAR),UPS(M1U,NROW) DIMENSION UOLDPS(M1U,NROW),UDOTPS(M1U,NROW),UPOLDP(M1U,NROW) DIMENSION RHSA(M1U,NROW),RHSD(NDRHS),DUPS(M1U,NROW),TM(NTSTP1) DIMENSION DTM(NTSTP1),U(NDIM),UBC0(NDIM),UBC1(NDIM) DIMENSION DBC(M1BC,NDBC),UICD(NUICD),FICD(M1IC),DICD(M1IC,NDICD) DIMENSION IR(NDIRC),IC(NDIRC),IWBRBD(1) LOGICAL DONE C 1 RDSOLD=RDS NITPS=0 C C Write additional output on unit 9 if requested. C CALL WRTBV9(NITPS,IBR,NTOT,M1U,UPS,TM,DTM) C C Generate the Jacobian matrix and the right hand side. C DO 7 NIT1=1,ITNW C NITPS=NIT1 IFST=0 IF(NITPS.LE.NWTN)IFST=1 C IF(IFST.EQ.1)THEN CALL SETUBV(FUNI,BCNI,ICNI,RDS,M1AA,M2AA,AA,M1BB, * M2BB,BB,M1CC, * CC,M1DD,DD,M1U,UPS,UOLDPS,UDOTPS,UPOLDP,RHSA,RHSD,DUPS,DTM,U, * F,M1DF,DFDU,DFDP,UBC0,UBC1,M1BC,DBC,UICD,FICD,M1IC,DICD) C C Generate the right hand side only. C ELSE C CALL SETRBV(FUNI,BCNI,ICNI,RDS,M1U,UPS,UOLDPS,UDOTPS, * UPOLDP,RHSA,RHSD,DUPS,DTM,U,F,M1DF,DFDU,DFDP,UBC0,UBC1,M1BC, * DBC,UICD,FICD,M1IC,DICD) ENDIF C C Solve the linearized system. C IF(IID.LT.4)THEN IIBR=0 ELSE IF(IID.EQ.4)THEN IIBR=1 ELSE IIBR=2 ENDIF CALL BRBD(NTST,NROW,NCLM,M1AA,M2AA,AA,NFPAR,M1BB,M2BB,BB,NRC, * M1CC,CC,M1DD,DD,M1U,RHSA,RHSD,WBRBD,IIBR,IFST,IR,IC,IWBRBD,0) C C Add Newton increments. C DO 2 I=1,NDIM UPS(NTST+1,I)=UPS(NTST+1,I)+RHSD(I) 2 CONTINUE DO 3 I=1,NFPAR RL(I)=RL(I)+RHSD(NDIM+I) PAR(ICP(I))=RL(I) 3 CONTINUE C DUMX=ZERO UMX=ZERO DO 5 J=1,NTST DO 4 I=1,NROW ADU=DABS(RHSA(J,I)) CSGLE ADU= ABS(RHSA(J,I)) IF(ADU.GT.DUMX)DUMX=ADU AU=DABS(UPS(J,I)) CSGLE AU= ABS(UPS(J,I)) IF(AU.GT.UMX)UMX=AU UPS(J,I)=UPS(J,I)+RHSA(J,I) 4 CONTINUE 5 CONTINUE C CALL WRTBV9(NITPS,IBR,NTOT,M1U,UPS,TM,DTM) C C Check whether user-supplied error tolerances have been met : C DONE=.TRUE. RDRL=ZERO DO 6 I=1,NFPAR ADRL=DABS(RHSD(NDIM+I))/(ONE+DABS(RL(I))) CSGLE ADRL= ABS(RHSD(NDIM+I))/(ONE+ ABS(RL(I))) IF(ADRL.GT.EPSL(I))DONE=.FALSE. IF(ADRL.GT.RDRL)RDRL=ADRL 6 CONTINUE RDUMX=DUMX/(ONE+UMX) IF(DONE.AND.RDUMX.LT.EPSU)RETURN C IF(NITPS.EQ.1)THEN DELREF=20*DMAX1(RDRL,RDUMX) CSGLE DELREF=20*AMAX1(RDRL,RDUMX) ELSE DELMAX=DMAX1(RDRL,RDUMX) CSGLE DELMAX=AMAX1(RDRL,RDUMX) IF(DELMAX.GT.DELREF)GOTO 8 ENDIF C 7 CONTINUE C C Maximum number of iterations reached. C 8 CONTINUE C IF(IADS.EQ.0)WRITE(9,101) IF(IADS.EQ.0)GOTO 13 C C Reduce stepsize and try again. C MXT=ITNW CALL ADPTDS(RDS,MXT) IF(DABS(RDS).LT.DSMIN)GOTO 12 CSGLE IF( ABS(RDS).LT.DSMIN)GOTO 12 DO 9 I=1,NFPAR RL(I)=RLOLD(I)+RDS*RLDOT(I) 9 CONTINUE DO 11 J=1,NTST+1 DO 10 I=1,NROW UPS(J,I)=UOLDPS(J,I)+RDS*UDOTPS(J,I) 10 CONTINUE 11 CONTINUE IF(IID.GE.2)WRITE(9,102) GOTO 1 C C Minimum stepsize reached. C 12 WRITE(9,103) 13 DO 14 I=1,NFPAR RL(I)=RLOLD(I) PAR(ICP(I))=RL(I) 14 CONTINUE DO 16 J=1,NTST+1 DO 15 I=1,NROW UPS(J,I)=UOLDPS(J,I) 15 CONTINUE 16 CONTINUE ISTOP=1 C 101 FORMAT(' *** NO CONVERGENCE USING FIXED STEPSIZE') 102 FORMAT(' STEP FAILED : TRY AGAIN WITH HALF THE STEPSIZE') 103 FORMAT(' *** NO CONVERGENCE USING MINIMUM STEPSIZE') C RETURN END C C ---------- ------ SUBROUTINE SETUBV(FUNI,BCNI,ICNI,RDS,M1AA,M2AA,AA,M1BB,M2BB,BB, * M1CC,CC,M1DD,DD,M1U,UPS,UOLDPS,UDOTPS,UPOLDP,RHSA,RHSD,DUPS,DTM, * U,F,M1DF,DFDU,DFDP,UBC0,UBC1,M1BC,DBC,UICD,FICD,M1IC,DICD) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C ! AA BB ! ! H1 ! C Generate the Jacobian matrix ! ! and the rhs ! ! . C ! CC DD ! ! H2 ! C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLTHT/ THETAL(20),THETAU COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLWTS/ W(8,7),WP(8,7),WH(8),WI(8) COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE COMMON /BLTIM/ TSETUB,TCONPA,TCONRH,TINFPA,TREDUC,TWR8 C DIMENSION WPLOC(8,7),F(NDIM),DFDU(M1DF,NDIM),DFDP(M1DF,NPAR) DIMENSION AA(M1AA,M2AA,NCLM),BB(M1BB,M2BB,NFPAR) DIMENSION CC(M1CC,NDCC),DD(M1DD,NFPAR),UPS(M1U,NROW) DIMENSION UOLDPS(M1U,NROW),UDOTPS(M1U,NROW),UPOLDP(M1U,NROW) DIMENSION RHSA(M1U,NROW),RHSD(NDRHS),DUPS(M1U,NROW) DIMENSION DTM(NTSTP1),U(NDIM),UBC0(NDIM),UBC1(NDIM) DIMENSION DBC(M1BC,NDBC),UICD(NUICD),FICD(M1IC),DICD(M1IC,NDICD) COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C C Set initial time (for timing of this subroutine). C CALL AUTIM0(TIME0) C C Initialize to zero. C DO 2 I=1,NRC RHSD(I)=ZERO DO 1 K=1,NFPAR DD(I,K)=ZERO 1 CONTINUE 2 CONTINUE C DO 5 J=1,NTST DO 4 I=1,NROW DO 3 K=1,NFPAR BB(J,I,K)=ZERO 3 CONTINUE 4 CONTINUE 5 CONTINUE C DO 7 I=1,NRC DO 6 J=1,NCC CC(J,I)=ZERO 6 CONTINUE 7 CONTINUE C DO 10 IC=1,NCLM DO 9 IR=1,NROW DO 8 J=1,NTST AA(J,IR,IC)=ZERO 8 CONTINUE 9 CONTINUE 10 CONTINUE C C Set constants. C NCP1=NCOL+1 C C Generate AA , BB and H1 : C DO 23 J=1,NTST JP1=J+1 DT=DTM(J) DDT=ONE/DT DO 12 IC=1,NCOL DO 11 IB=1,NCP1 WPLOC(IB,IC)=DDT*WP(IB,IC) 11 CONTINUE 12 CONTINUE DO 22 IC=1,NCOL DO 14 K=1,NDIM U(K)=W(NCP1,IC)*UPS(JP1,K) DO 13 L=1,NCOL L1=(L-1)*NDIM+K U(K)=U(K)+W(L,IC)*UPS(J,L1) 13 CONTINUE 14 CONTINUE IF(IPS.EQ.14)THEN C ** Time evolution computations (parabolic systems) DO 141 K=1,NDIM U0XX(K) =W(NCP1,IC)*UOLDPS(JP1,K) DO 131 L=1,NCOL L1=(L-1)*NDIM+K U0XX(K) =U0XX(K) +W(L,IC)*UOLDPS(J,L1) 131 CONTINUE 141 CONTINUE ENDIF DO 15 I=1,NFPAR PAR(ICP(I))=RL(I) 15 CONTINUE CALL FUNI(NDIM,U,U0XX,ICP,PAR,1,F,DFDU,DFDP) IC1=(IC-1)*NDIM DO 18 IB=1,NCP1 IB1=(IB-1)*NDIM DO 17 I=1,NDIM AA(J,IC1+I,IB1+I)=WPLOC(IB,IC) DO 16 K=1,NDIM AA(J,IC1+I,IB1+K)=AA(J,IC1+I,IB1+K) * -W(IB,IC)*DFDU(I,K) 16 CONTINUE 17 CONTINUE 18 CONTINUE DO 21 I=1,NDIM DO 19 K=1,NFPAR BB(J,IC1+I,K)=-DFDP(I,ICP(K)) 19 CONTINUE RHSA(J,IC1+I)=F(I)-WPLOC(NCP1,IC)*UPS(JP1,I) DO 20 K=1,NCOL K1=(K-1)*NDIM+I RHSA(J,IC1+I)=RHSA(J,IC1+I)-WPLOC(K,IC)*UPS(J,K1) 20 CONTINUE 21 CONTINUE 22 CONTINUE 23 CONTINUE C C Generate CC, DD and H2 : C C Boundary conditions. C IF(NBC.LE.0)GOTO 30 DO 24 I=1,NDIM UBC0(I)=UPS(1,I) UBC1(I)=UPS(NTST+1,I) 24 CONTINUE C CALL BCNI(NDIM,PAR,ICP,NBC,UBC0,UBC1,RHSD,1,DBC) C DO 27 I=1,NBC RHSD(I)=-RHSD(I) DO 25 K=1,NDIM CC(K,I)=DBC(I,K) CC(NCC-NDIM+K,I)=DBC(I,NDIM+K) 25 CONTINUE DO 26 K=1,NFPAR DD(I,K)=DBC(I,2*NDIM+ICP(K)) 26 CONTINUE 27 CONTINUE C C Save difference : C DO 29 J=1,NTST+1 DO 28 I=1,NROW DUPS(J,I)=UPS(J,I)-UOLDPS(J,I) 28 CONTINUE 29 CONTINUE C C Integral constraints : C 30 CONTINUE IF(NINT.LE.0) GOTO 37 C DO 36 J=1,NTST JP1=J+1 DO 35 K=1,NCP1 DO 31 I=1,NDIM I1=(K-1)*NDIM+I J1=J IF(K.EQ.NCP1)I1=I IF(K.EQ.NCP1)J1=JP1 UICD(I)=UPS(J1,I1) UICD(NDIM+I)=UOLDPS(J1,I1) UICD(2*NDIM+I)=UDOTPS(J1,I1) UICD(3*NDIM+I)=UPOLDP(J1,I1) 31 CONTINUE CALL ICNI(NDIM,PAR,ICP,NINT,UICD(1),UICD(NDIM+1), * UICD(2*NDIM+1),UICD(3*NDIM+1),FICD,1,DICD) DO 34 M=1,NINT DO 32 I=1,NDIM K1=(K-1)*NDIM+I L1=(J-1)*NROW+K1 CC(L1,NBC+M)=CC(L1,NBC+M) + DTM(J)*WI(K)*DICD(M,I) 32 CONTINUE DO 33 I=1,NFPAR DD(NBC+M,I)=DD(NBC+M,I)+DTM(J)*WI(K)*DICD(M,NDIM+ICP(I)) 33 CONTINUE RHSD(NBC+M)=RHSD(NBC+M)-DTM(J)*WI(K)*FICD(M) 34 CONTINUE 35 CONTINUE 36 CONTINUE C 37 CONTINUE C C Pseudo-arclength equation : C DO 40 J=1,NTST JP1=J+1 SC=DTM(J)*THETAU**2 DO 39 I=1,NDIM DO 38 K=1,NCOL K1=(K-1)*NDIM+I L1=(J-1)*NROW+K1 CC(L1,NRC)=CC(L1,NRC)+SC*WI(K)*UDOTPS(J,K1) 38 CONTINUE CC(J*NROW+I,NRC)=CC(J*NROW+I,NRC)+SC*WI(NCP1) * *UDOTPS(JP1,I) 39 CONTINUE 40 CONTINUE C RLSUM=ZERO DO 41 I=1,NFPAR DD(NRC,I)=THETAL(I)**2*RLDOT(I) RLSUM=RLSUM+THETAL(I)**2*(RL(I)-RLOLD(I))*RLDOT(I) 41 CONTINUE C RHSD(NRC)=RDS-THETAU**2*RINPR(NDIM,M1U,UDOTPS,DUPS,DTM)-RLSUM C C Determine the time spent in this subroutine. C CALL AUTIM1(TIME1) TSETUB=TSETUB + TIME1-TIME0 C RETURN END C C ---------- ------ SUBROUTINE SETRBV(FUNI,BCNI,ICNI,RDS,M1U,UPS,UOLDPS,UDOTPS,UPOLDP, * RHSA,RHSD,DUPS,DTM,U,F,M1DF,DFDU,DFDP,UBC0,UBC1,M1BC,DBC,UICD, * FICD,M1IC,DICD) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generate the right hand side only of the Newton equations. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLTHT/ THETAL(20),THETAU COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLWTS/ W(8,7),WP(8,7),WH(8),WI(8) COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION UPS(M1U,NROW),UOLDPS(M1U,NROW),UDOTPS(M1U,NROW) DIMENSION UPOLDP(M1U,NROW),WPLOC(8,7) DIMENSION F(NDIM),DFDU(M1DF,NDIM),DFDP(M1DF,NPAR) DIMENSION RHSA(M1U,NROW),RHSD(NDRHS),DUPS(M1U,NROW) DIMENSION DTM(NTSTP1),U(NDIM),UBC0(NDIM),UBC1(NDIM) DIMENSION DBC(M1BC,NDBC),UICD(NUICD),FICD(M1IC),DICD(M1IC,NDICD) COMMON /BLWIF/ U0XX(152),U1XX(152),U2XX(152),F1XX(152),F2XX(152), * DFUXX(50,120),DFPXX(50,20),DDUXX(50),DDPXX(20) C DO 1 I=1,NRC RHSD(I)=ZERO 1 CONTINUE C C SET CONSTANTS C NCP1=NCOL+1 C DO 10 J=1,NTST JP1=J+1 DT=DTM(J) DDT=ONE/DT DO 3 IC=1,NCOL DO 2 IB=1,NCP1 WPLOC(IB,IC)=DDT*WP(IB,IC) 2 CONTINUE 3 CONTINUE DO 9 IC=1,NCOL DO 5 K=1,NDIM U(K)=W(NCP1,IC)*UPS(JP1,K) DO 4 L=1,NCOL L1=(L-1)*NDIM+K U(K)=U(K)+W(L,IC)*UPS(J,L1) 4 CONTINUE 5 CONTINUE IF(IPS.EQ.14)THEN C ** TIME EVOLUTION COMPUTATIONS (PARABOLIC SYSTEMS) DO 51 K=1,NDIM U0XX(K) =W(NCP1,IC)*UOLDPS(JP1,K) DO 41 L=1,NCOL L1=(L-1)*NDIM+K U0XX(K) =U0XX(K) +W(L,IC)*UOLDPS(J,L1) 41 CONTINUE 51 CONTINUE ENDIF DO 6 I=1,NFPAR PAR(ICP(I))=RL(I) 6 CONTINUE CALL FUNI(NDIM,U,U0XX,ICP,PAR,0,F,DFDU,DFDP) IC1=(IC-1)*NDIM DO 8 I=1,NDIM RHSA(J,IC1+I)=F(I)-WPLOC(NCP1,IC)*UPS(JP1,I) DO 7 K=1,NCOL K1=(K-1)*NDIM+I RHSA(J,IC1+I)=RHSA(J,IC1+I)-WPLOC(K,IC)*UPS(J,K1) 7 CONTINUE 8 CONTINUE 9 CONTINUE 10 CONTINUE C C Boundary conditions. C IF(NBC.EQ.0)GOTO 15 DO 11 I=1,NDIM UBC0(I)=UPS(1,I) UBC1(I)=UPS(NTST+1,I) 11 CONTINUE C CALL BCNI(NDIM,PAR,ICP,NBC,UBC0,UBC1,RHSD,0,DBC) C DO 12 I=1,NBC RHSD(I)=-RHSD(I) 12 CONTINUE C C Save difference : C DO 14 J=1,NTST+1 DO 13 I=1,NROW DUPS(J,I)=UPS(J,I)-UOLDPS(J,I) 13 CONTINUE 14 CONTINUE C C Integral constraints : C 15 CONTINUE IF(NINT.LE.0) GOTO 20 C DO 19 J=1,NTST JP1=J+1 DO 18 K=1,NCP1 DO 16 I=1,NDIM I1=(K-1)*NDIM+I J1=J IF(K.EQ.NCP1)I1=I IF(K.EQ.NCP1)J1=JP1 UICD(I)=UPS(J1,I1) UICD(NDIM+I)=UOLDPS(J1,I1) UICD(2*NDIM+I)=UDOTPS(J1,I1) UICD(3*NDIM+I)=UPOLDP(J1,I1) 16 CONTINUE CALL ICNI(NDIM,PAR,ICP,NINT,UICD(1),UICD(NDIM+1), * UICD(2*NDIM+1),UICD(3*NDIM+1),FICD,0,DICD) DO 17 M=1,NINT RHSD(NBC+M)=RHSD(NBC+M)-DTM(J)*WI(K)*FICD(M) 17 CONTINUE 18 CONTINUE 19 CONTINUE C C Pseudo-arclength equation : C 20 CONTINUE RLSUM=ZERO DO 21 I=1,NFPAR RLSUM=RLSUM+THETAL(I)**2*(RL(I)-RLOLD(I))*RLDOT(I) 21 CONTINUE C RHSD(NRC)=RDS-THETAU**2*RINPR(NDIM,M1U,UDOTPS,DUPS,DTM)-RLSUM C RETURN END C C------------------------------------------------------------------- C------------------------------------------------------------------- C Restart of Solution Branches ( Differential Equations ) C------------------------------------------------------------------- C------------------------------------------------------------------- C C ---------- ------ SUBROUTINE RSPTBV(FUNI,STPNT,RDS,ISTOP,NTOT,LAB,IBR,M1U,UPS, * UOLDPS,UDOTPS,UPOLDP,TINT,UINT,EQF,UNEQ,DUPS,TM,DTM,TM2,ITM,IAL, * U,F,M1DF,DFDU,DFDP,EV,NDIM2,SMAT,RNLLV,IR,IC,NODIR) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Restarts computation of a branch of solutions at point labelled IRS. C The output written on unit 8 by a previous run is now expected as C input on unit 3. The label IRS, where computation is to resume, must C be specified in the user-supplied subroutine INIT. C If IRS=0 then the starting point must be provided analytically in the C user-supplied subroutine STPNT. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC C EXTERNAL FUNI,STPNT C COMPLEX*16 EV(NDIM) CSGLE COMPLEX*8 EV(NDIM) C DIMENSION UPS(M1U,NROW),UOLDPS(M1U,NROW),UDOTPS(M1U,NROW) DIMENSION UPOLDP(M1U,NROW),TINT(NTSTP1),UINT(M1U,NROW) DIMENSION EQF(NTSTP1),UNEQ(NTSTP1),DUPS(M1U,NROW) DIMENSION TM(NTSTP1),DTM(NTSTP1),TM2(NTSTP1),ITM(NTSTP1) DIMENSION IAL(NTSTP1),U(NDIM),F(NDIM) DIMENSION DFDU(M1DF,NDIM),DFDP(M1DF,NPAR) DIMENSION SMAT(NDIM2,NDIM2),RNLLV(NDIM2),IR(NDIM2),IC(NDIM2) C C Get restart data : C CALL STPNT(NTSTRS,NCOLRS,LAB,IBR,M1U,U,UPS,UDOTPS,UPOLDP, * TM,DTM,NDIM2,SMAT,RNLLV,IR,IC,F,DFDU,DFDP,NODIR) C C Determine a suitable starting label and branch number. C IF(IRS.GT.0)CALL NEWLAB(ISW,IBR,LAB) C DO 1 J=1,NTSTRS DTM(J)=TM(J+1)-TM(J) 1 CONTINUE C C Adapt mesh if necessary : C IF( NTST.NE.NTSTRS .OR. NCOL.NE.NCOLRS) * CALL ADAPT(NTSTRS,NCOLRS,NTST,NCOL,TM,DTM,M1U,UPS,UDOTPS, * TINT,UINT,EQF,UNEQ,DUPS,TM2,ITM,IAL) C C Set UOLDPS, RLOLD. C DO 2 I=1,NFPAR RL(I)=PAR(ICP(I)) RLOLD(I)=RL(I) 2 CONTINUE C DO 4 I=1,NROW DO 3 J=1,NTST+1 UOLDPS(J,I)=UPS(J,I) 3 CONTINUE 4 CONTINUE C C Store U-prime (derivative with respect to time or space variable). C IF(NODIR.EQ.-1)THEN C ** Restart from a Hopf bifurcation. NODIR=0 ISW=1 ELSE C ** Restart from orbit. CALL STUPBV(FUNI,M1U,UPS,UOLDPS,UPOLDP,U,F,M1DF,DFDU,DFDP) ENDIF C RETURN END C C ---------- ------ SUBROUTINE STPNBV(NTSTRS,NCOLRS,LAB,IBR,M1U,U,UPS,UDOTPS,UPOLDP, * TM,DTM,NDIM2,SMAT,RNLLV,IR,IC,F,DFDU,DFDP,NODIR) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C This subroutine locates and retrieves the information required to C restart computation at the point with label IRS. C This information is expected on unit 3. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION UPS(M1U,1),UDOTPS(M1U,1),UPOLDP(M1U,1),TM(1),DTM(1) DIMENSION IR(NDIM2),IC(NDIM2),SMAT(NDIM2,NDIM2),RNLLV(NDIM2) DIMENSION U(NDIM),F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,NPAR) DIMENSION TEMP(7),ICPRS(20) C LOGICAL FOUND,EOF3 C CALL FINDL3(IRS,ITP1,NFPAR1,FOUND) READ(3,*)IBR,NTOT1,ITP1,LAB,NFPAR1,ISW1,NTPL1,NAR1,NSKIP1, * NTSTRS,NCOLRS,(ICPRS(I),I=1,NFPAR1) NRSP1=NTSTRS+1 C NUM1=1+NDIM/7 NUM2=1+NAR1/8 NSKIPR=NUM2-NUM1 C DO 2 J=1,NTSTRS DO 1 I=1,NCOLRS K1=(I-1)*NDIM+1 K2=I*NDIM READ(3,101)TEMP(I),(UPS(J,K),K=K1,K2) IF(NSKIPR.GT.0)CALL SKIP3(NSKIPR,EOF3) 1 CONTINUE TM(J)=TEMP(1) 2 CONTINUE READ(3,101)TM(NRSP1),(UPS(NRSP1,K),K=1,NDIM) IF(NSKIPR.GT.0)CALL SKIP3(NSKIPR,EOF3) C READ(3,101)(RLDOT(I),I=1,NFPAR1) C C Read U-dot (deriv. with respect to arclength along solution branch). C NUM1=1+NDIM/8 NUM2=1+NAR1/9 NSKIPR=NUM2-NUM1 C DO 4 J=1,NTSTRS DO 3 I=1,NCOLRS K1=(I-1)*NDIM+1 K2=I*NDIM READ(3,101)(UDOTPS(J,K),K=K1,K2) IF(NSKIPR.GT.0)CALL SKIP3(NSKIPR,EOF3) 3 CONTINUE 4 CONTINUE READ(3,101)(UDOTPS(NRSP1,K),K=1,NDIM) IF(NSKIPR.GT.0)CALL SKIP3(NSKIPR,EOF3) C C Read the parameter values. C READ(3,101)(PAR(I),I=1,NPAR) DO 5 I=1,NFPAR RL(I)=PAR(ICP(I)) 5 CONTINUE C C Special case : Preprocess restart data in case of branch switching C at a period doubling bifurcation. C IF((IPS.EQ.2.OR.IPS.EQ.3.OR.IPS.EQ.6. * .OR.IPS.EQ.12.OR.IPS.EQ.13) * .AND.ISW.EQ.-1.AND.ITP1.EQ.7) THEN CALL PDBLE(NDIM,NTSTRS,NCOLRS,M1U,UPS,UDOTPS,TM,PAR(11)) RETURN ENDIF C C Take care of the case where the free parameters have been changed at C the restart point. C IF(NFPAR1.NE.NFPAR)THEN NODIR=1 RETURN ENDIF DO 6 I=1,NFPAR IF(ICPRS(I).NE.ICP(I)) THEN NODIR=1 RETURN ENDIF 6 CONTINUE C 101 FORMAT(4X,1P7E18.10) C RETURN END C C ---------- ------ SUBROUTINE STPNUB(NTSTRS,NCOLRS,LAB,IBR,M1U,U,UPS,UDOTPS,UPOLDP, * TM,DTM,NDIM2,SMAT,RNLLV,IR,IC,F,DFDU,DFDP,NODIR) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates a starting point for the continuation of a branch of C of solutions to general boundary value problems by calling the user C supplied subroutine STPNT where an analytical solution is given. C COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C DIMENSION UPS(M1U,NROW),UDOTPS(M1U,1),UPOLDP(M1U,1) DIMENSION TM(M1U),DTM(1) DIMENSION IR(NDIM2),IC(NDIM2),SMAT(NDIM2,NDIM2),RNLLV(NDIM2) DIMENSION U(NDIM),F(NDIM),DFDU(NDIM,NDIM),DFDP(NDIM,NPAR) C C Generate the (initially uniform) mesh. C CALL MSH(TM) DT=ONE/(NTST*NCOL) C DO 3 J=1,NTST+1 IF(J.EQ.(NTST+1)) THEN NCOL1=1 ELSE NCOL1=NCOL ENDIF DO 2 I=1,NCOL1 T=TM(J)+(I-1)*DT K1=(I-1)*NDIM+1 K2=I*NDIM CALL STPNT(NDIM,U,PAR,T) DO 1 K=K1,K2 UPS(J,K)=U(K-K1+1) 1 CONTINUE 2 CONTINUE 3 CONTINUE C NTSTRS=NTST NCOLRS=NCOL IBR=1 LAB=0 C DO 4 I=1,NFPAR RL(I)=PAR(ICP(I)) 4 CONTINUE C NODIR=1 C RETURN END C C ---------- ------ SUBROUTINE STDRBV(FUNI,BCNI,ICNI,RDS,M1AA,M2AA,AA,M1BB, * M2BB,BB,M1CC,CC,M1DD,DD,WBRBD,M1U,UPS,UOLDPS,UDOTPS,UPOLDP, * RHSA,RHSD,DUPS,DTM,U,F,M1DF,DFDU,DFDP,UBC0,UBC1,M1BC,DBC, * UICD,FICD,M1IC,DICD,IR,IC,IWBRBD,IPERP) C IMPLICIT DOUBLE PRECISION (A-H,O-Z) CSGLE IMPLICIT REAL (A-H,O-Z) C C Generates a direction vector (UDOTPS,RLDOT) that is needed to start C the computation of a branch when no direction vector is given. C COMMON /BLDIM/ NDIMP1,NDIRC,NTSTP1,NDCC,NDRHS,NDBC,NUICD,NDICD * ,NWBR,NIWBR COMMON /BLBCN/ NDIM,IPS,IRS,ILP,ICP(20),PAR(20) COMMON /BLCRL/ RDSOLD,A,RL(20),RLOLD(20),RLDOT(20) COMMON /BLCDE/ NTST,NCOL,IAD,ISP,ISW,IPLT,NBC,NINT COMMON /BLICN/ NDM,NDMP1,NROW,NCLM,NRC,NCC,NPAR,NFPAR,NBC0,NINT0 COMMON /BLEPS/ EPSL(20),EPSU,EPSS COMMON /BLLIM/ NMX,NUZR,RL0,RL1,A0,A1 COMMON /BLDLS/ DS,DSMIN,DSMAX,IADS COMMON /BLMAX/ NPR,MXBF,IID,ITMX,ITNW,NWTN,JAC COMMON /BLRCN/ HALF,ZERO,ONE,TWO,HMACH,RSMALL,RLARGE C EXTERNAL FUNI,BCNI,ICNI C DIMENSION WBRBD(1),F(NDIM),DFDU(M1DF,NROW),DFDP(M1DF,NPAR) DIMENSION AA(M1AA,M2AA,NTST),BB(M1BB,M2BB,NTST),CC(M1CC,NDCC) DIMENSION DD(M1DD,NFPAR),UPS(M1U,NROW),UOLDPS(M1U,NROW) DIMENSION UDOTPS(M1U,NROW),UPOLDP(M1U,NROW) DIMENSION RHSA(M1U,NROW),RHSD(NDRHS),DUPS(M1U,NROW) DIMENSION DTM(NTSTP1),U(NDIM),UBC0(NDIM),UBC1(NDIM) DIMENSION DBC(M1BC,NDBC),UICD(NUICD),FICD(M1IC),DICD(M1IC,NDICD) DIMENSION IR(NDIRC),IC(NDIRC),IWBRBD(1) C C Generate the Jacobian matrix with zero direction vector. C (Then the last row of the Jacobian will be zero) C in case the starting direction is to be determined. C IF(IPERP.EQ.0)THEN DO 2 J=1,NTST+1 DO 1 I=1,NROW UDOTPS(J,I)=ZERO 1 CONTINUE 2 CONTINUE DO 3 I=1,NFPAR RLDOT(I)=ZERO 3 CONTINUE ENDIF C RDSW=ZERO CALL SETUBV(FUNI,BCNI,ICNI,RDSW,M1AA,M2AA,AA,M1BB,M2BB,BB,M1CC, * CC,M1DD,DD,M1U,UPS,UOLDPS,UDOTPS,UPOLDP,RHSA,RHSD,DUPS,DTM,U, * F,M1DF,DFDU,DFDP,UBC0,UBC1,M1BC,DBC,UICD,FICD,M1IC,DICD) C C Find the null vector. C IFST=1 IF(IID.LT.4)THEN IIBR=0 ELSE IF(IID.EQ.4)THEN IIBR=1 ELSE IIBR=2 ENDIF CALL BRBD(NTST,NROW,NCLM,M1AA,M2AA,AA,NFPAR,M1BB,M2BB,BB,NRC, * M1CC,CC,M1DD,DD,M1U,RHSA,RHSD,WBRBD,IIBR,IFST,IR,IC,IWBRBD,1) C C Compute the starting direction. C DO 4 I=1,NDIM UDOTPS(NTST+1,I)=RHSD(I) 4 CONTINUE DO 5 I=1,NFPAR RLDOT(I)=RHSD(NDIM+I) PAR(ICP(I))=RL(I) 5 CONTINUE C DO 7 J=1,NTST DO 6 I=1,NROW UDOTPS(J,I)=RHSA(J,I) 6 CONTINUE 7 CONTINUE C C Scale the starting direction. C CALL SCALEB(M1U,UDOTPS,RLDOT,DTM) C C Make sure that RLDOT(1) is positive (unless zero). C IF(RLDOT(1).LT.ZERO)THEN DO 8 I=1,NFPAR RLDOT(I)=-RLDOT(I) 8 CONTINUE DO 10 J=1,NTST DO 9 I=1,NROW UDOTPS(J,I)=-UDOTPS(J,I) 9 CONTINUE 10 CONTINUE ENDIF C IF(IID.GE.2)WRITE(9,101)(RLDOT(I),I=1,NFPAR) 101 FORMAT(' STARTING DIRECTION OF THE FREE PARAMETER(S) : ', * /,10E11.3,/,10E11.3) C RETURN END C --=====================_2515359==_ Content-Type: application/octet-stream; name="Autprpd.f" Content-Transfer-Encoding: base64 Content-Disposition: attachment; filename="Autprpd.f" QyAKICAgICAgICAgICAgUFJPR1JBTSBBVVRQUlAKQwpDIFRoaXMgaXMgdGhlIHByZXByb2Nlc3Nv ciBvZiBBVVRPIHRoYXQgZ2VuZXJhdGVzIHRoZSBtYWluIHByb2dyYW0uCkMgKFRoZSBtYWluIHBy b2dyYW0gc2V0cyB1cCByZXF1aXJlZCBjYWxscyBhbmQgbmVjZXNzYXJ5IHdvcmtzcGFjZSkuCkMg VGhlIHByZXByb2Nlc3NvciByZXF1aXJlcyB0aGUgdXNlci1zdXBwbGllZCBzdWJyb3V0aW5lcy4K QwogICAgICBJTVBMSUNJVCBET1VCTEUgUFJFQ0lTSU9OIChBLUgsTy1aKQpDU0dMRSBJTVBMSUNJ VCBSRUFMICAgICAgICAgICAgIChBLUgsTy1aKQpDCiAgICAgIExPR0lDQUwgRk9VTkQKICAgICAg Q0hBUkFDVEVSKjYgVFlQRQpDCiAgICAgIENPTU1PTiAvQkxCQ04vIE5ESU0sSVBTLElSUyxJTFAs SUNQKDIwKSxQQVIoMjApCiAgICAgIENPTU1PTiAvQkxMSU0vIE5NWCxOTlUsUkwwLFJMMSxBMCxB MQogICAgICBDT01NT04gL0JMQ0RFLyBOVFNULE5DT0wsSUFELElTUCxJU1csSVBMVCxOQkMsTklO VAogICAgICBDT01NT04gL0JMSUNOLyBORE0sTkRNUDEsTlJPVyxOQ0xNLE5SQyxOQ0MsTlBBUixO RlBBUixOQkMwLE5JTlQwCiAgICAgIENPTU1PTiAvQkxNQVgvIE5QUixNWEJGLElJRCxJVE1YLElU TlcsTldUTixKQUMKQwpDIEluaXRpYWxpemF0aW9uIDoKQwogICAgICAgTFc9MQogICAgICAgTElX PTEKICAgICAgIEZPVU5EPS5GQUxTRS4KICAgICAgIElUUD0wCiAgICAgICBORlBBUj0xCiAgICAg ICBDQUxMIENOU1ROVAogICAgICAgQ0FMTCBERklOSVQKICAgICAgIENBTEwgSU5JVApDCkMgRmlu ZCByZXN0YXJ0IGxhYmVsIG9uIHVuaXQgMyBhbmQgZGV0ZXJtaW5lIHR5cGUgb2YgcmVzdGFydCBw b2ludC4KQwogICAgICAgSUYoSVJTLkdULjApIFRIRU4KICAgICAgICAgQ0FMTCBGSU5ETDMoSVJT LElUUCxORlBBUixGT1VORCkKICAgICAgICAgSUYoLk5PVC5GT1VORCkgVEhFTgogICAgICAgICAg IFdSSVRFKDYsNDAwKUlSUwogICAgICAgICAgIFNUT1AKICAgICAgICAgRU5ESUYKICAgICAgIEVO RElGCkMKQyBXcml0ZSB0aGUgbWFpbiBwcm9ncmFtIG9uIHVuaXQgMS4KQwogICAgICBXUklURSgx LDEpCiAgICAgIFRZUEU9J1JFQUwqOCcKQ1NHTEUgVFlQRT0nUkVBTCAgJwogICAgICBXUklURSgx LDIpVFlQRQogMSAgICBGT1JNQVQoNlgsJ1BST0dSQU0gQVVUTycpCiAyICAgIEZPUk1BVCg2WCwn SU1QTElDSVQgJyxBNiwnKEEtSCxPLVopJywvLAogICAgICogNlgsJ0NPTU1PTiAvQkxUSU0vIFRT RVRVQixUQ09OUEEsVENPTlJILFRJTkZQQSxUUkVEVUMsVFdSOCcsLywKICAgICAqIDZYLCdDT01N T04gL0JMQ05ULyBOREVDT00sTkJDS1NCJykKQwpDLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0KQy0tLS0tLS0tLS0t LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t LS0tCkMgIE9uZS1wYXJhbWV0ZXIgY29udGludWF0aW9ucwpDLS0tLS0tLS0tLS0tLS0tLS0tLS0t LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0KQy0tLS0t LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t LS0tLS0tLS0tCiAgICAgICBJRigoSVBTLkVRLjAuT1IuSVBTLkVRLjEpIC5BTkQuIElBQlMoSVNX KS5ORS4yICkgVEhFTgpDICAgICAgICAqKiBBbGdlYnJhaWMgc3lzdGVtcy4KICAgICAgICAgQ0FM TCBXQUUoSVRQLExXLExJVykKICAgICAgICAgSUYoSVJTLkVRLjApIFRIRU4KICAgICAgICAgICBX UklURSgxLDEwMCkKICAgICAgICAgICBXUklURSgxLDUpTFcsTElXLElUUCxORlBBUgogICAgICAg ICAgIFdSSVRFKDEsMjAwKQogICAgICAgICAgIEdPVE8gNAogICAgICAgICBFTFNFCiAgICAgICAg ICAgV1JJVEUoMSwxMDUpCiAgICAgICAgICAgV1JJVEUoMSw1KUxXLExJVyxJVFAsTkZQQVIKICAg ICAgICAgICBXUklURSgxLDIwNSkKICAgICAgICAgICBHT1RPIDQKICAgICAgICAgRU5ESUYKQwog ICAgICAgRUxTRSBJRihJUFMuRVEuMTEgLkFORC4gSUFCUyhJU1cpLk5FLjIgKSBUSEVOCkMgICAg ICAgICoqIFdhdmVzIDogU3BhdGlhbGx5IGhvbW9nZW5lb3VzIHNvbHV0aW9ucywKICAgICAgICAg Q0FMTCBXQUUoSVRQLExXLExJVykKICAgICAgICAgSUYoSVJTLkVRLjApIFRIRU4KICAgICAgICAg ICBXUklURSgxLDEwMikKICAgICAgICAgICBXUklURSgxLDUpTFcsTElXLElUUCxORlBBUgogICAg ICAgICAgIFdSSVRFKDEsMjAyKQogICAgICAgICAgIEdPVE8gNAogICAgICAgICBFTFNFCiAgICAg ICAgICAgV1JJVEUoMSwxMDcpCiAgICAgICAgICAgV1JJVEUoMSw1KUxXLExJVyxJVFAsTkZQQVIK ICAgICAgICAgICBXUklURSgxLDIwNykKICAgICAgICAgICBHT1RPIDQKICAgICAgICAgRU5ESUYK QwogICAgICAgRUxTRSBJRigoSVBTLkVRLi0xKSAuQU5ELiBJQUJTKElTVykuTkUuMiApIFRIRU4K QyAgICAgICAgKiogRGlzY3JldGUgZHluYW1pY2FsIHN5c3RlbXMgOiBmaXhlZCBwb2ludHMuCiAg ICAgICAgIENBTEwgV0FFKElUUCxMVyxMSVcpCiAgICAgICAgIElGKElSUy5FUS4wKSBUSEVOCiAg ICAgICAgICAgV1JJVEUoMSwxMDEpCiAgICAgICAgICAgV1JJVEUoMSw1KUxXLExJVyxJVFAsTkZQ QVIKICAgICAgICAgICBXUklURSgxLDIwMSkKICAgICAgICAgICBHT1RPIDQKICAgICAgICAgRUxT RQogICAgICAgICAgIFdSSVRFKDEsMTA2KQogICAgICAgICAgIFdSSVRFKDEsNSlMVyxMSVcsSVRQ LE5GUEFSCiAgICAgICAgICAgV1JJVEUoMSwyMDYpCiAgICAgICAgICAgR09UTyA0CiAgICAgICAg IEVORElGCkMKICAgICAgIEVMU0UgSUYoSVBTLkVRLjIgLkFORC4gSUFCUyhJU1cpLk5FLjIgKSBU SEVOCkMgICAgICAgICoqIFBlcmlvZGljIHNvbHV0aW9ucy4KICAgICAgICAgQ0FMTCBXQlYoSVRQ LExXLExJVykKICAgICAgICAgSUYoSVRQLk5FLjMgLkFORC4gKElUUC8xMCkuTkUuMykgVEhFTgog ICAgICAgICAgIElGKElSUy5HVC4wKVRIRU4KICAgICAgICAgICAgIFdSSVRFKDEsMTEwKQogICAg ICAgICAgICAgV1JJVEUoMSw1KUxXLExJVyxJVFAsTkZQQVIKICAgICAgICAgICAgIFdSSVRFKDEs MjEwKQogICAgICAgICAgICAgR09UTyA0CiAgICAgICAgICAgRUxTRQogICAgICAgICAgICAgV1JJ VEUoMSwxMTEpCiAgICAgICAgICAgICBXUklURSgxLDUpTFcsTElXLElUUCxORlBBUgogICAgICAg ICAgICAgV1JJVEUoMSwyMTEpCiAgICAgICAgICAgICBHT1RPIDQKICAgICAgICAgICBFTkRJRgog ICAgICAgICBFTFNFCiAgICAgICAgICAgV1JJVEUoMSwxMTUpCiAgICAgICAgICAgV1JJVEUoMSw1 KUxXLExJVyxJVFAsTkZQQVIKICAgICAgICAgICBXUklURSgxLDIxNSkKICAgICAgICAgICBHT1RP IDQKICAgICAgICAgRU5ESUYKQwogICAgICAgRUxTRSBJRihJUFMuRVEuMTIgLkFORC4gSUFCUyhJ U1cpLk5FLjIgKSBUSEVOCkMgICAgICAgICoqIFdhdmUgdHJhaW4gc29sdXRpb25zIHRvIHBhcmFi b2xpYyBzeXN0ZW1zLgogICAgICAgICBDQUxMIFdCVihJVFAsTFcsTElXKQogICAgICAgICBJRihJ VFAuTkUuMykgVEhFTgogICAgICAgICAgIElGKElSUy5HVC4wKVRIRU4KICAgICAgICAgICAgIFdS SVRFKDEsMTEyKQogICAgICAgICAgICAgV1JJVEUoMSw1KUxXLExJVyxJVFAsTkZQQVIKICAgICAg ICAgICAgIFdSSVRFKDEsMjEyKQogICAgICAgICAgICAgR09UTyA0CiAgICAgICAgICAgRUxTRQog ICAgICAgICAgICAgV1JJVEUoMSwxMTMpCiAgICAgICAgICAgICBXUklURSgxLDUpTFcsTElXLElU UCxORlBBUgogICAgICAgICAgICAgV1JJVEUoMSwyMTMpCiAgICAgICAgICAgICBHT1RPIDQKICAg ICAgICAgICBFTkRJRgogICAgICAgICBFTFNFCiAgICAgICAgICAgV1JJVEUoMSwxMTYpCiAgICAg ICAgICAgV1JJVEUoMSw1KUxXLExJVyxJVFAsTkZQQVIKICAgICAgICAgICBXUklURSgxLDIxNikK ICAgICAgICAgICBHT1RPIDQKICAgICAgICAgRU5ESUYKQwogICAgICAgRUxTRSBJRihJUFMuRVEu NiAuQU5ELiBJQUJTKElTVykuTkUuMikgVEhFTgpDICAgICAgICAqKiBCb3VuZGFyeSB2YWx1ZSBw cm9ibGVtcy4gKFdpdGggRmxvcXVldCBtdWx0aXBsaWVycykKICAgICAgICAgQ0FMTCBXQlYoSVRQ LExXLExJVykKICAgICAgICAgSUYoSVJTLkdULjApIFRIRU4KICAgICAgICAgICBXUklURSgxLDEx OCkKICAgICAgICAgICBXUklURSgxLDUpTFcsTElXLElUUCxORlBBUgogICAgICAgICAgIFdSSVRF KDEsMjE4KQogICAgICAgICAgIEdPVE8gNAogICAgICAgICBFTFNFCiAgICAgICAgICAgV1JJVEUo MSwxMTkpCiAgICAgICAgICAgV1JJVEUoMSw1KUxXLExJVyxJVFAsTkZQQVIKICAgICAgICAgICBX UklURSgxLDIxOSkKICAgICAgICAgICBHT1RPIDQKICAgICAgICAgRU5ESUYKQwogICAgICAgRUxT RSBJRihJUFMuRVEuNCAuQU5ELiBJQUJTKElTVykuTkUuMikgVEhFTgpDICAgICAgICAqKiBCb3Vu ZGFyeSB2YWx1ZSBwcm9ibGVtcy4KICAgICAgICAgQ0FMTCBXQlYoSVRQLExXLExJVykKICAgICAg ICAgSUYoSVJTLkdULjApIFRIRU4KICAgICAgICAgICBXUklURSgxLDEyMCkKICAgICAgICAgICBX UklURSgxLDUpTFcsTElXLElUUCxORlBBUgogICAgICAgICAgIFdSSVRFKDEsMjIwKQogICAgICAg ICAgIEdPVE8gNAogICAgICAgICBFTFNFCiAgICAgICAgICAgV1JJVEUoMSwxMjEpCiAgICAgICAg ICAgV1JJVEUoMSw1KUxXLExJVyxJVFAsTkZQQVIKICAgICAgICAgICBXUklURSgxLDIyMSkKICAg ICAgICAgICBHT1RPIDQKICAgICAgICAgRU5ESUYKQwogICAgICAgRUxTRSBJRihJUFMuRVEuMTQp IFRIRU4KQyAgICAgICAgKiogRXZvbHV0aW9uIGNhbGN1bGF0aW9ucyBmb3IgcGFyYWJvbGljIHN5 c3RlbXMuCiAgICAgICAgIENBTEwgV0JWKElUUCxMVyxMSVcpCiAgICAgICAgIElGKElSUy5HVC4w KSBUSEVOCiAgICAgICAgICAgV1JJVEUoMSwxMjIpCiAgICAgICAgICAgV1JJVEUoMSw1KUxXLExJ VyxJVFAsTkZQQVIKICAgICAgICAgICBXUklURSgxLDIyMikKICAgICAgICAgICBHT1RPIDQKICAg ICAgICAgRUxTRQogICAgICAgICAgIFdSSVRFKDEsMTIzKQogICAgICAgICAgIFdSSVRFKDEsNSlM VyxMSVcsSVRQLE5GUEFSCiAgICAgICAgICAgV1JJVEUoMSwyMjMpCiAgICAgICAgICAgR09UTyA0 CiAgICAgICAgIEVORElGCkMKICAgICAgIEVMU0UgSUYoSVBTLkVRLjUpIFRIRU4KQyAgICAgICAg KiogQ29udHJvbCBwcm9ibGVtcy4KICAgICAgICAgSUYoTU9EKElUUCwxMCkuRVEuMi5PUi5JUlMu RVEuMClORlBBUj1ORlBBUisxCiAgICAgICAgIENBTEwgV0FFKElUUCxMVyxMSVcpCiAgICAgICAg IElGKE5GUEFSLkVRLjIpIFRIRU4KICAgICAgICAgICBJRihJUlMuR1QuMCkgVEhFTgogICAgICAg ICAgICAgV1JJVEUoMSwxMjQpCiAgICAgICAgICAgICBXUklURSgxLDUpTFcsTElXLElUUCxORlBB UgogICAgICAgICAgICAgV1JJVEUoMSwyMjQpCiAgICAgICAgICAgICBHT1RPIDQKICAgICAgICAg ICBFTFNFCiAgICAgICAgICAgICBXUklURSgxLDEyNSkKICAgICAgICAgICAgIFdSSVRFKDEsNSlM VyxMSVcsSVRQLE5GUEFSCiAgICAgICAgICAgICBXUklURSgxLDIyNSkKICAgICAgICAgICAgIEdP VE8gNAogICAgICAgICAgIEVORElGCiAgICAgICAgIEVMU0UKICAgICAgICAgICBJRihNT0QoSVRQ LDEwKS5ORS4yKSBUSEVOCiAgICAgICAgICAgICBXUklURSgxLDEyOSkKICAgICAgICAgICAgIFdS SVRFKDEsNSlMVyxMSVcsSVRQLE5GUEFSCiAgICAgICAgICAgICBXUklURSgxLDIyOSkKICAgICAg ICAgICAgIEdPVE8gNAogICAgICAgICAgIEVMU0UKICAgICAgICAgICAgIFdSSVRFKDEsMTMwKQog ICAgICAgICAgICAgV1JJVEUoMSw1KUxXLExJVyxJVFAsTkZQQVIKICAgICAgICAgICAgIFdSSVRF KDEsMjMwKQogICAgICAgICAgICAgR09UTyA0CiAgICAgICAgICAgRU5ESUYKICAgICAgICAgRU5E SUYKQwogICAgICAgRU5ESUYKQwpDLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0KQy0tLS0tLS0tLS0tLS0tLS0tLS0t LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tCkMgIFR3 by1QYXJhbWV0ZXIgQ29udGludWF0aW9ucy4KQy0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tCkMtLS0tLS0tLS0tLS0t LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t LQpDCiAgICAgICBJRihJUFMuTEUuMSAuQU5ELiBJQUJTKElTVykuRVEuMiAuQU5ELiBJVFAuRVEu MiApIFRIRU4KQyAgICAgICAgKiogTGltaXQgcG9pbnRzIGNvbnRpbnVhdGlvbiAoYWxnZWJyYWlj IHByb2JsZW1zKS4KICAgICAgICAgQ0FMTCBXQUUoSVRQLExXLExJVykKICAgICAgICAgV1JJVEUo MSwxMzUpCiAgICAgICAgIFdSSVRFKDEsNSlMVyxMSVcsSVRQLE5GUEFSCiAgICAgICAgIFdSSVRF KDEsMjM1KQpDCiAgICAgICBFTFNFIElGKElQUy5MRS4xIC5BTkQuIElBQlMoSVNXKS5FUS4yIC5B TkQuIChJQUJTKElUUCkvMTApLkVRLjIpCiAgICAgKiBUSEVOCkMgICAgICAgICoqIExpbWl0IHBv aW50IGNvbnRpbnVhdGlvbiAoYWxnZWJyYWljIHByb2JsZW1zLCByZXN0YXJ0KS4KICAgICAgICAg Q0FMTCBXQUUoSVRQLExXLExJVykKICAgICAgICAgV1JJVEUoMSwxMzYpCiAgICAgICAgIFdSSVRF KDEsNSlMVyxMSVcsSVRQLE5GUEFSCiAgICAgICAgIFdSSVRFKDEsMjM2KQpDCiAgICAgICBFTFNF IElGKChJUFMuRVEuMC5PUi5JUFMuRVEuMSkuQU5ELklBQlMoSVNXKS5FUS4yLkFORC5JVFAuRVEu MyApCiAgICAgKiBUSEVOCkMgICAgICAgICoqIEhvcGYgYmlmdXJjYXRpb24gY29udGludWF0aW9u IChPREUpLgogICAgICAgICBDQUxMIFdBRShJVFAsTFcsTElXKQogICAgICAgICBXUklURSgxLDE0 MCkKICAgICAgICAgV1JJVEUoMSw1KUxXLExJVyxJVFAsTkZQQVIKICAgICAgICAgV1JJVEUoMSwy NDApCkMKICAgICAgIEVMU0UgSUYoKElQUy5FUS4wLk9SLklQUy5FUS4xKS5BTkQuSUFCUyhJU1cp LkVRLjIuQU5ELgogICAgICogKElBQlMoSVRQKS8xMCkuRVEuMyApIFRIRU4KQyAgICAgICAgKiog SG9wZiBiaWZ1cmNhdGlvbiBjb250aW51YXRpb24gKE9ERSwgcmVzdGFydCkuCiAgICAgICAgIENB TEwgV0FFKElUUCxMVyxMSVcpCiAgICAgICAgIFdSSVRFKDEsMTQxKQogICAgICAgICBXUklURSgx LDUpTFcsTElXLElUUCxORlBBUgogICAgICAgICBXUklURSgxLDI0MSkKQwogICAgICAgRUxTRSBJ RihJUFMuRVEuMTEuQU5ELklBQlMoSVNXKS5FUS4yLkFORC5JVFAuRVEuMyApCiAgICAgKiBUSEVO CkMgICAgICAgICoqIEhvcGYgYmlmdXJjYXRpb24gY29udGludWF0aW9uIChXYXZlcykuCiAgICAg ICAgIENBTEwgV0FFKElUUCxMVyxMSVcpCiAgICAgICAgIFdSSVRFKDEsMTQ0KQogICAgICAgICBX UklURSgxLDUpTFcsTElXLElUUCxORlBBUgogICAgICAgICBXUklURSgxLDI0NCkKQwogICAgICAg RUxTRSBJRihJUFMuRVEuMTEuQU5ELklBQlMoSVNXKS5FUS4yLkFORC4KICAgICAqIChJQUJTKElU UCkvMTApLkVRLjMgKSBUSEVOCkMgICAgICAgICoqIEhvcGYgYmlmdXJjYXRpb24gY29udGludWF0 aW9uIChXYXZlcywgcmVzdGFydCkuCiAgICAgICAgIENBTEwgV0FFKElUUCxMVyxMSVcpCiAgICAg ICAgIFdSSVRFKDEsMTQ1KQogICAgICAgICBXUklURSgxLDUpTFcsTElXLElUUCxORlBBUgogICAg ICAgICBXUklURSgxLDI0NSkKQwogICAgICAgRUxTRSBJRihJUFMuRVEuLTEgLkFORC4gSUFCUyhJ U1cpLkVRLjIgLkFORC4gSVRQLkVRLjMgKSBUSEVOCkMgICAgICAgICoqIEhvcGYgYmlmdXJjYXRp b24gY29udGludWF0aW9uIChNYXBzKS4KICAgICAgICAgQ0FMTCBXQUUoSVRQLExXLExJVykKICAg ICAgICAgV1JJVEUoMSwxNDIpCiAgICAgICAgIFdSSVRFKDEsNSlMVyxMSVcsSVRQLE5GUEFSCiAg ICAgICAgIFdSSVRFKDEsMjQyKQpDCiAgICAgICBFTFNFIElGKElQUy5FUS4tMSAuQU5ELiBJQUJT KElTVykuRVEuMiAuQU5ELihJQUJTKElUUCkvMTApLkVRLjMpCiAgICAgKiBUSEVOCkMgICAgICAg ICoqIEhvcGYgYmlmdXJjYXRpb24gY29udGludWF0aW9uIChNYXBzKS4KICAgICAgICAgQ0FMTCBX QUUoSVRQLExXLExJVykKICAgICAgICAgV1JJVEUoMSwxNDMpCiAgICAgICAgIFdSSVRFKDEsNSlM VyxMSVcsSVRQLE5GUEFSCiAgICAgICAgIFdSSVRFKDEsMjQzKQpDCiAgICAgICBFTFNFIElGKElQ Uy5FUS4yIC5BTkQuIElBQlMoSVNXKS5FUS4yIC5BTkQuIElUUC5FUS41ICkgVEhFTgpDICAgICAg ICAqKiBMaW1pdCBwb2ludCBjb250aW51YXRpb24gKFBlcmlvZGljIHNvbHV0aW9ucywgc3RhcnQp LgogICAgICAgICBDQUxMIFdCVihJVFAsTFcsTElXKQogICAgICAgICBXUklURSgxLDE0NikKICAg ICAgICAgV1JJVEUoMSw1KUxXLExJVyxJVFAsTkZQQVIKICAgICAgICAgV1JJVEUoMSwyNDYpCkMK ICAgICAgIEVMU0UgSUYoSVBTLkVRLjIgLkFORC4gSUFCUyhJU1cpLkVRLjIgLkFORC4gKElBQlMo SVRQKS8xMCkuRVEuNSkKICAgICAqIFRIRU4KQyAgICAgICAgKiogTGltaXQgcG9pbnQgY29udGlu dWF0aW9uIChQZXJpb2RpYyBzb2x1dGlvbnMsIHJlc3RhcnQpLgogICAgICAgICBDQUxMIFdCVihJ VFAsTFcsTElXKQogICAgICAgICBXUklURSgxLDE1MCkKICAgICAgICAgV1JJVEUoMSw1KUxXLExJ VyxJVFAsTkZQQVIKICAgICAgICAgV1JJVEUoMSwyNTApCkMKICAgICAgIEVMU0UgSUYoSVBTLkVR LjIgLkFORC4gSUFCUyhJU1cpLkVRLjIgLkFORC4gSVRQLkVRLjcgKSBUSEVOCkMgICAgICAgICoq IENvbnRpbnVhdGlvbiBvZiBwZXJpb2QgZG91YmxpbmcgYmlmdXJjYXRpb25zIChzdGFydCkuCiAg ICAgICAgIENBTEwgV0JWKElUUCxMVyxMSVcpCiAgICAgICAgIFdSSVRFKDEsMTU1KQogICAgICAg ICBXUklURSgxLDUpTFcsTElXLElUUCxORlBBUgogICAgICAgICBXUklURSgxLDI1NSkKQwogICAg ICAgRUxTRSBJRihJUFMuRVEuMiAuQU5ELiBJQUJTKElTVykuRVEuMiAuQU5ELiAoSUFCUyhJVFAp LzEwKS5FUS43KQogICAgICogVEhFTgpDICAgICAgICAqKiBDb250aW51YXRpb24gb2YgcGVyaW9k IGRvdWJsaW5nIGJpZnVyY2F0aW9ucyAocmVzdGFydCkuCiAgICAgICAgIENBTEwgV0JWKElUUCxM VyxMSVcpCiAgICAgICAgIFdSSVRFKDEsMTU2KQogICAgICAgICBXUklURSgxLDUpTFcsTElXLElU UCxORlBBUgogICAgICAgICBXUklURSgxLDI1NikKQwogICAgICAgRUxTRSBJRihJUFMuRVEuMiAu QU5ELiBJQUJTKElTVykuRVEuMiAuQU5ELiBJVFAuRVEuOCApIFRIRU4KQyAgICAgICAgKiogQ29u dGludWF0aW9uIG9mIGJpZnVyY2F0aW9ucyB0byB0b3JpIChzdGFydCkuCiAgICAgICAgIENBTEwg V0JWKElUUCxMVyxMSVcpCiAgICAgICAgIFdSSVRFKDEsMTYwKQogICAgICAgICBXUklURSgxLDUp TFcsTElXLElUUCxORlBBUgogICAgICAgICBXUklURSgxLDI2MCkKQwogICAgICAgRUxTRSBJRihJ UFMuRVEuMiAuQU5ELiBJQUJTKElTVykuRVEuMiAuQU5ELiAoSUFCUyhJVFApLzEwKS5FUS44KQog ICAgICogVEhFTgpDICAgICAgICAqKiBDb250aW51YXRpb24gb2YgYmlmdXJjYXRpb25zIHRvIHRv cmkgKHJlc3RhcnQpLgogICAgICAgICBDQUxMIFdCVihJVFAsTFcsTElXKQogICAgICAgICBXUklU RSgxLDE2MSkKICAgICAgICAgV1JJVEUoMSw1KUxXLExJVyxJVFAsTkZQQVIKICAgICAgICAgV1JJ VEUoMSwyNjEpCkMKICAgICAgIEVMU0UgSUYoSVBTLkVRLjMpIFRIRU4KQyAgICAgICAgKiogQ29u dGludWF0aW9uIG9mIG9yYml0cyBvZiBmaXhlZCBwZXJpb2QuCiAgICAgICAgIENBTEwgV0JWKElU UCxMVyxMSVcpCiAgICAgICAgIElGKElSUy5HVC4wKVRIRU4KICAgICAgICAgICBXUklURSgxLDE2 NSkKICAgICAgICAgICBXUklURSgxLDUpTFcsTElXLElUUCxORlBBUgogICAgICAgICAgIFdSSVRF KDEsMjY1KQogICAgICAgICBFTFNFCiAgICAgICAgICAgV1JJVEUoMSwxNjYpCiAgICAgICAgICAg V1JJVEUoMSw1KUxXLExJVyxJVFAsTkZQQVIKICAgICAgICAgICBXUklURSgxLDI2NikKICAgICAg ICAgRU5ESUYKQwogICAgICAgRUxTRSBJRihJUFMuRVEuMTMpIFRIRU4KQyAgICAgICAgKiogQ29u dGludWF0aW9uIG9mIHdhdmV0cmFpbnMgb2YgZml4ZWQgcGVyaW9kLgogICAgICAgICBDQUxMIFdC VihJVFAsTFcsTElXKQogICAgICAgICBJRihJUlMuR1QuMClUSEVOCiAgICAgICAgICAgV1JJVEUo MSwxNjcpCiAgICAgICAgICAgV1JJVEUoMSw1KUxXLExJVyxJVFAsTkZQQVIKICAgICAgICAgICBX UklURSgxLDI2NykKICAgICAgICAgRUxTRQogICAgICAgICAgIFdSSVRFKDEsMTY4KQogICAgICAg ICAgIFdSSVRFKDEsNSlMVyxMSVcsSVRQLE5GUEFSCiAgICAgICAgICAgV1JJVEUoMSwyNjgpCiAg ICAgICAgIEVORElGCkMKICAgICAgIEVMU0UgSUYoIChJUFMuRVEuNC5PUi5JUFMuRVEuNikKICAg ICAqICAgICAgICAuQU5ELiBJQUJTKElTVykuRVEuMiAuQU5ELiBJVFAuRVEuNSApIFRIRU4KQyAg ICAgICAgKiogQ29udGludWF0aW9uIG9mIGxpbWl0IHBvaW50cyAoQlZQLCBzdGFydCkuCiAgICAg ICAgIENBTEwgV0JWKElUUCxMVyxMSVcpCiAgICAgICAgIFdSSVRFKDEsMTc1KQogICAgICAgICBX UklURSgxLDUpTFcsTElXLElUUCxORlBBUgogICAgICAgICBXUklURSgxLDI3NSkKQwogICAgICAg RUxTRSBJRiggKElQUy5FUS40Lk9SLklQUy5FUS42KQogICAgICogICAgICAgLkFORC4gSUFCUyhJ U1cpLkVRLjIgLkFORC4gKElBQlMoSVRQKS8xMCkuRVEuNSkKICAgICAqIFRIRU4KQyAgICAgICAg KiogQ29udGludWF0aW9uIG9mIGxpbWl0IHBvaW50cyAoQlZQLCByZXN0YXJ0KS4KICAgICAgICAg Q0FMTCBXQlYoSVRQLExXLExJVykKICAgICAgICAgV1JJVEUoMSwxNzApCiAgICAgICAgIFdSSVRF KDEsNSlMVyxMSVcsSVRQLE5GUEFSCiAgICAgICAgIFdSSVRFKDEsMjcwKQpDCiAgICAgICBFTFNF CkMgICAgICAgICoqIEVycm9yIGluIElOSVQuCiAgICAgICAgIFdSSVRFKDYsNTAwKQogICAgICAg ICBTVE9QCiAgICAgICBFTkRJRgpDLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0KQwogNCAgICAgV1JJVEUoMSwzMDEp CkMKICAgNSAgICAgRk9STUFUKAogICAgICogIDZYLCdESU1FTlNJT04gVygnLEkxMCwnKSxJVygn LEk3LCcpJywvLAogICAgICogIDZYLCdDQUxMIEFVVElNMChUSU1FMCknLC8sCiAgICAgKiAgNlgs J0NBTEwgQ05TVE5UJywvLAogICAgICogIDZYLCdDQUxMIERGSU5JVCcsLywKICAgICAqICA2WCwn Q0FMTCBJTklUJywvLAogICAgICogIDZYLCdJVFA9JyxJMywvLDZYLCdORlBBUj0nLEkzKQogMTAw ICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZVTkksU1RQTlVTJykKIDEwMSAgICAgRk9STUFUKDZY LCdFWFRFUk5BTCBGTkRTLFNUUE5VUycpCiAxMDIgICAgIEZPUk1BVCg2WCwnRVhURVJOQUwgRk5X UyxTVFBOVVMnKQogMTA1ICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZVTkksU1RQTkFFJykKIDEw NiAgICAgRk9STUFUKDZYLCdFWFRFUk5BTCBGTkRTLFNUUE5BRScpCiAxMDcgICAgIEZPUk1BVCg2 WCwnRVhURVJOQUwgRk5XUyxTVFBOQUUnKQogMTEwICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZO UFMsQkNQUyxJQ1BTLFNUUE5CVixGTlNQQlYnKQogMTExICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFM IEZOUFMsQkNQUyxJQ1BTLFNUUE5VQixGTlNQQlYnKQogMTEyICAgICBGT1JNQVQoNlgsJ0VYVEVS TkFMIEZOV1AsQkNQUyxJQ1BTLFNUUE5CVixGTlNQQlYnKQogMTEzICAgICBGT1JNQVQoNlgsJ0VY VEVSTkFMIEZOV1AsQkNQUyxJQ1BTLFNUUE5VQixGTlNQQlYnKQogMTE1ICAgICBGT1JNQVQoNlgs J0VYVEVSTkFMIEZOUFMsQkNQUyxJQ1BTLFNUUE5QUyxGTlNQQlYnKQogMTE2ICAgICBGT1JNQVQo NlgsJ0VYVEVSTkFMIEZOV1AsQkNQUyxJQ1BTLFNUUE5XUCxGTlNQQlYnKQogMTE4ICAgICBGT1JN QVQoNlgsJ0VYVEVSTkFMIEZVTkksQkNOSSxJQ05JLFNUUE5CVixGTlNQQlYnKQogMTE5ICAgICBG T1JNQVQoNlgsJ0VYVEVSTkFMIEZVTkksQkNOSSxJQ05JLFNUUE5VQixGTlNQQlYnKQogMTIwICAg ICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZVTkksQkNOSSxJQ05JLFNUUE5CVixGTkJQQlYnKQogMTIx ICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZVTkksQkNOSSxJQ05JLFNUUE5VQixGTkJQQlYnKQog MTIyICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZOUEUsQkNQUyxJQ1BFLFNUUE5CVixGTkJQQlYn KQogMTIzICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZOUEUsQkNQUyxJQ1BFLFNUUE5VQixGTkJQ QlYnKQogMTI0ICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZOQzEsU1RQTkFFJykKIDEyNSAgICAg Rk9STUFUKDZYLCdFWFRFUk5BTCBGTkMxLFNUUE5DMScpCiAxMjkgICAgIEZPUk1BVCg2WCwnRVhU RVJOQUwgRk5DMixTVFBOQUUnKQogMTMwICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZOQzIsU1RQ TkMyJykKIDEzNSAgICAgRk9STUFUKDZYLCdFWFRFUk5BTCBGTkxQLFNUUE5MUCcpCiAxMzYgICAg IEZPUk1BVCg2WCwnRVhURVJOQUwgRk5MUCxTVFBOQUUnKQogMTQwICAgICBGT1JNQVQoNlgsJ0VY VEVSTkFMIEZOSEIsU1RQTkhCJykKIDE0MSAgICAgRk9STUFUKDZYLCdFWFRFUk5BTCBGTkhCLFNU UE5BRScpCiAxNDIgICAgIEZPUk1BVCg2WCwnRVhURVJOQUwgRk5IRCxTVFBOSEQnKQogMTQzICAg ICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZOSEQsU1RQTkFFJykKIDE0NCAgICAgRk9STUFUKDZYLCdF WFRFUk5BTCBGTkhXLFNUUE5IVycpCiAxNDUgICAgIEZPUk1BVCg2WCwnRVhURVJOQUwgRk5IVyxT VFBOQUUnKQogMTQ2ICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZOUEwsQkNQTCxJQ1BMLFNUUE5Q TCxGTkJQQlYnKQogMTUwICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZOUEwsQkNQTCxJQ1BMLFNU UE5CVixGTkJQQlYnKQogMTU1ICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZOUEwsQkNQRCxJQ1BM LFNUUE5QTCxGTkJQQlYnKQogMTU2ICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZOUEwsQkNQRCxJ Q1BMLFNUUE5CVixGTkJQQlYnKQogMTYwICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZOVFIsQkNU UixJQ1RSLFNUUE5UUixGTkJQQlYnKQogMTYxICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZOVFIs QkNUUixJQ1RSLFNUUE5CVixGTkJQQlYnKQogMTY1ICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFMIEZO RlAsQkNQUyxJQ1BTLFNUUE5CVixGTlNQQlYnKQogMTY2ICAgICBGT1JNQVQoNlgsJ0VYVEVSTkFM IEZORlAsQkNQUyxJQ1BTLFNUUE5VQixGTlNQQlYnKQogMTY3ICAgICBGT1JNQVQoNlgsJ0VYVEVS TkFMIEZOV0YsQkNQUyxJQ1BTLFNUUE5CVixGTlNQQlYnKQogMTY4ICAgICBGT1JNQVQoNlgsJ0VY VEVSTkFMIEZOV0YsQkNQUyxJQ1BTLFNUUE5VQixGTlNQQlYnKQogMTcwICAgICBGT1JNQVQoNlgs J0VYVEVSTkFMIEZOQkwsQkNCTCxJQ0JMLFNUUE5CVixGTkJQQlYnKQogMTc1ICAgICBGT1JNQVQo NlgsJ0VYVEVSTkFMIEZOQkwsQkNCTCxJQ0JMLFNUUE5CTCxGTkJQQlYnKQpDCiAyMDAgICAgIEZP Uk1BVCg2WCwnQ0FMTCBBVVRPQUUoVyxJVyxJVFAsTkZQQVIsRlVOSSxTVFBOVVMpJykKIDIwMSAg ICAgRk9STUFUKDZYLCdDQUxMIEFVVE9BRShXLElXLElUUCxORlBBUixGTkRTLFNUUE5VUyknKQog MjAyICAgICBGT1JNQVQoNlgsJ0NBTEwgQVVUT0FFKFcsSVcsSVRQLE5GUEFSLEZOV1MsU1RQTlVT KScpCiAyMDUgICAgIEZPUk1BVCg2WCwnQ0FMTCBBVVRPQUUoVyxJVyxJVFAsTkZQQVIsRlVOSSxT VFBOQUUpJykKIDIwNiAgICAgRk9STUFUKDZYLCdDQUxMIEFVVE9BRShXLElXLElUUCxORlBBUixG TkRTLFNUUE5BRSknKQogMjA3ICAgICBGT1JNQVQoNlgsJ0NBTEwgQVVUT0FFKFcsSVcsSVRQLE5G UEFSLEZOV1MsU1RQTkFFKScpCiAyMTAgICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFVVE9C VihXLElXLElUUCxORlBBUixGTlBTLEJDUFMsSUNQUyxTVFBOQlYsRk5TUEJWKScpCiAyMTEgICAg IEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFVVE9CVihXLElXLElUUCxORlBBUixGTlBTLEJDUFMs SUNQUyxTVFBOVUIsRk5TUEJWKScpCiAyMTIgICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFV VE9CVihXLElXLElUUCxORlBBUixGTldQLEJDUFMsSUNQUyxTVFBOQlYsRk5TUEJWKScpCiAyMTMg ICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFVVE9CVihXLElXLElUUCxORlBBUixGTldQLEJD UFMsSUNQUyxTVFBOVUIsRk5TUEJWKScpCiAyMTUgICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxM IEFVVE9CVihXLElXLElUUCxORlBBUixGTlBTLEJDUFMsSUNQUyxTVFBOUFMsRk5TUEJWKScpCiAy MTYgICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFVVE9CVihXLElXLElUUCxORlBBUixGTldQ LEJDUFMsSUNQUyxTVFBOV1AsRk5TUEJWKScpCiAyMTggICAgIEZPUk1BVCg2WCwKICAgICAqICdD QUxMIEFVVE9CVihXLElXLElUUCxORlBBUixGVU5JLEJDTkksSUNOSSxTVFBOQlYsRk5TUEJWKScp CiAyMTkgICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFVVE9CVihXLElXLElUUCxORlBBUixG VU5JLEJDTkksSUNOSSxTVFBOVUIsRk5TUEJWKScpCiAyMjAgICAgIEZPUk1BVCg2WCwKICAgICAq ICdDQUxMIEFVVE9CVihXLElXLElUUCxORlBBUixGVU5JLEJDTkksSUNOSSxTVFBOQlYsRk5CUEJW KScpCiAyMjEgICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFVVE9CVihXLElXLElUUCxORlBB UixGVU5JLEJDTkksSUNOSSxTVFBOVUIsRk5CUEJWKScpCiAyMjIgICAgIEZPUk1BVCg2WCwKICAg ICAqICdDQUxMIEFVVE9CVihXLElXLElUUCxORlBBUixGTlBFLEJDUFMsSUNQRSxTVFBOQlYsRk5C UEJWKScpCiAyMjMgICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFVVE9CVihXLElXLElUUCxO RlBBUixGTlBFLEJDUFMsSUNQRSxTVFBOVUIsRk5CUEJWKScpCiAyMjQgICAgIEZPUk1BVCg2WCwn Q0FMTCBBVVRPQUUoVyxJVyxJVFAsTkZQQVIsRk5DMSxTVFBOQUUpJykKIDIyNSAgICAgRk9STUFU KDZYLCdDQUxMIEFVVE9BRShXLElXLElUUCxORlBBUixGTkMxLFNUUE5DMSknKQogMjI5ICAgICBG T1JNQVQoNlgsJ0NBTEwgQVVUT0FFKFcsSVcsSVRQLE5GUEFSLEZOQzIsU1RQTkFFKScpCiAyMzAg ICAgIEZPUk1BVCg2WCwnQ0FMTCBBVVRPQUUoVyxJVyxJVFAsTkZQQVIsRk5DMixTVFBOQzIpJykK IDIzNSAgICAgRk9STUFUKDZYLCdDQUxMIEFVVE9BRShXLElXLElUUCxORlBBUixGTkxQLFNUUE5M UCknKQogMjM2ICAgICBGT1JNQVQoNlgsJ0NBTEwgQVVUT0FFKFcsSVcsSVRQLE5GUEFSLEZOTFAs U1RQTkFFKScpCiAyNDAgICAgIEZPUk1BVCg2WCwnQ0FMTCBBVVRPQUUoVyxJVyxJVFAsTkZQQVIs Rk5IQixTVFBOSEIpJykKIDI0MSAgICAgRk9STUFUKDZYLCdDQUxMIEFVVE9BRShXLElXLElUUCxO RlBBUixGTkhCLFNUUE5BRSknKQogMjQyICAgICBGT1JNQVQoNlgsJ0NBTEwgQVVUT0FFKFcsSVcs SVRQLE5GUEFSLEZOSEQsU1RQTkhEKScpCiAyNDMgICAgIEZPUk1BVCg2WCwnQ0FMTCBBVVRPQUUo VyxJVyxJVFAsTkZQQVIsRk5IRCxTVFBOQUUpJykKIDI0NCAgICAgRk9STUFUKDZYLCdDQUxMIEFV VE9BRShXLElXLElUUCxORlBBUixGTkhXLFNUUE5IVyknKQogMjQ1ICAgICBGT1JNQVQoNlgsJ0NB TEwgQVVUT0FFKFcsSVcsSVRQLE5GUEFSLEZOSFcsU1RQTkFFKScpCiAyNDYgICAgIEZPUk1BVCg2 WCwKICAgICAqICdDQUxMIEFVVE9CVihXLElXLElUUCxORlBBUixGTlBMLEJDUEwsSUNQTCxTVFBO UEwsRk5CUEJWKScpCiAyNTAgICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFVVE9CVihXLElX LElUUCxORlBBUixGTlBMLEJDUEwsSUNQTCxTVFBOQlYsRk5CUEJWKScpCiAyNTUgICAgIEZPUk1B VCg2WCwKICAgICAqICdDQUxMIEFVVE9CVihXLElXLElUUCxORlBBUixGTlBMLEJDUEQsSUNQTCxT VFBOUEwsRk5CUEJWKScpCiAyNTYgICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFVVE9CVihX LElXLElUUCxORlBBUixGTlBMLEJDUEQsSUNQTCxTVFBOQlYsRk5CUEJWKScpCiAyNjAgICAgIEZP Uk1BVCg2WCwKICAgICAqICdDQUxMIEFVVE9CVihXLElXLElUUCxORlBBUixGTlRSLEJDVFIsSUNU UixTVFBOVFIsRk5CUEJWKScpCiAyNjEgICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFVVE9C VihXLElXLElUUCxORlBBUixGTlRSLEJDVFIsSUNUUixTVFBOQlYsRk5CUEJWKScpCiAyNjUgICAg IEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFVVE9CVihXLElXLElUUCxORlBBUixGTkZQLEJDUFMs SUNQUyxTVFBOQlYsRk5TUEJWKScpCiAyNjYgICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFV VE9CVihXLElXLElUUCxORlBBUixGTkZQLEJDUFMsSUNQUyxTVFBOVUIsRk5TUEJWKScpCiAyNjcg ICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFVVE9CVihXLElXLElUUCxORlBBUixGTldGLEJD UFMsSUNQUyxTVFBOQlYsRk5TUEJWKScpCiAyNjggICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxM IEFVVE9CVihXLElXLElUUCxORlBBUixGTldGLEJDUFMsSUNQUyxTVFBOVUIsRk5TUEJWKScpCiAy NzAgICAgIEZPUk1BVCg2WCwKICAgICAqICdDQUxMIEFVVE9CVihXLElXLElUUCxORlBBUixGTkJM LEJDQkwsSUNCTCxTVFBOQlYsRk5CUEJWKScpCiAyNzUgICAgIEZPUk1BVCg2WCwKICAgICAqICdD QUxMIEFVVE9CVihXLElXLElUUCxORlBBUixGTkJMLEJDQkwsSUNCTCxTVFBOQkwsRk5CUEJWKScp CkMKIDMwMSAgICBGT1JNQVQoCiAgICAgKiA2WCwnQ0FMTCBBVVRJTTEoVElNRTEpJywvLAogICAg ICogNlgsJ1RPVFRJTT1USU1FMS1USU1FMCcsLywKICAgICAqIDZYLCdXUklURSg5LDEwMSlUT1RU SU0sVFNFVFVCLFRDT05QQSxUQ09OUkgsVElORlBBLFRSRURVQyxUV1I4JwogICAgICogLC8sJyAx MDEgIEZPUk1BVCgvLCcnIFRPVEFMIFRJTUUgJycsRTEyLjMsLywnLC8sCiAgICAgKiAgICAgICAg ICAgNVgsJyogICAgICAgJycgU0VUVUJWICAgICAnJyxFMTIuMywvLCcsLywKICAgICAqICAgICAg ICAgICA1WCwnKiAgICAgICAnJyBDT05QQVIgICAgICcnLEUxMi4zLC8sJywvLAogICAgICogICAg ICAgICAgIDVYLCcqICAgICAgICcnIENPTlJIUyAgICAgJycsRTEyLjMsLywnLC8sCiAgICAgKiAg ICAgICAgICAgNVgsJyogICAgICAgJycgSU5GUEFSICAgICAnJyxFMTIuMywvLCcsLywKICAgICAq ICAgICAgICAgICA1WCwnKiAgICAgICAnJyBSRURVQ0UgICAgICcnLEUxMi4zLC8sJywvLAogICAg ICogICAgICAgICAgIDVYLCcqICAgICAgICcnIFdSSVRFOCAgICAgJycsRTEyLjMpJywvLAogICAg ICogNlgsJ1dSSVRFKDksMTAyKU5ERUNPTSxOQkNLU0InLC8sCiAgICAgKiAnIDEwMiAgRk9STUFU KC8sJycgREVDT01QLiA6ICcnLEk1LCcnIEJBQ0tTLiA6ICcnLEk1KScsLwogICAgICogNlgsJ1NU T1AnLC8sCiAgICAgKiA2WCwnRU5EJykKQwpDIEVycm9yIE1lc3NhZ2VzLgpDCiA0MDAgICAgIEZP Uk1BVCgnIFBSRVBST0NFU1NPUiA6IFJFU1RBUlQgTEFCRUwgJyxJNCwKICAgICAqICAgICAgICAg ICcgTk9UIEZPVU5EIE9OIFVOSVQgMycpCiA1MDAgICAgIEZPUk1BVCgnIFBSRVBST0NFU1NPUiA6 IEFOIElOSVRJQUxJWkFUSU9OIEVSUk9SJywKICAgICAqICAgICAgICAgIC8sJyBIQVMgQkVFTiBN QURFIElOIFRIRSBVU0VSIFNVQlJPVVRJTkUgLUlOSVQtJykKQwogICAgICBTVE9QCiAgICAgIEVO RApDCkMgICAgIC0tLS0tLS0tLS0gLS0tCiAgICAgIFNVQlJPVVRJTkUgV0FFKElUUCxMVyxMSVcp CkMKICAgICAgSU1QTElDSVQgRE9VQkxFIFBSRUNJU0lPTiAoQS1ILE8tWikKQ1NHTEUgSU1QTElD SVQgUkVBTCAgICAgICAgICAgICAoQS1ILE8tWikKQwpDIENvbXB1dGVzIHdvcmtzcGFjZSBuZWVk ZWQgZm9yIGFsZ2VicmFpYyBwcm9ibGVtcy4KQwogICAgICBDT01NT04gL0JMQkNOLyBORElNLElQ UyxJUlMsSUxQLElDUCgyMCksUEFSKDIwKQogICAgICBDT01NT04gL0JMTElNLyBOTVgsTk5VLFJM MCxSTDEsQTAsQTEKICAgICAgQ09NTU9OIC9CTENERS8gTlRTVCxOQ09MLElBRCxJU1AsSVNXLElQ TFQsTkJDLE5JTlQKICAgICAgQ09NTU9OIC9CTElDTi8gTkRNLE5ETVAxLE5ST1csTkNMTSxOUkMs TkNDLE5QQVIsTkZQQVIsTkJDMCxOSU5UMApDCiAgICAgIENBTEwgV1NBRShJVFAsTkZQQVIsCiAg ICAgKiBMRixMREZEVSxMREZEUCxMQUEsTFNUVUQsTFNUVSxMU1RSTCxMU1RSTEQsTFJIUyxMRFUs TFVET1QsTFUsCiAgICAgKiBMVU9MRCxMU01BVCxMUk5MTFYsTFUxLExFVixMV0tFVixMVywKICAg ICAqIExJUixMSUMsTElXLE0xQUEsTTFTVEJGLE5ESU0yKQpDCiAgICAgIFJFVFVSTgogICAgICBF TkQKQwpDICAgICAtLS0tLS0tLS0tIC0tLQogICAgICBTVUJST1VUSU5FIFdCVihJVFAsTFcsTElX KQpDCiAgICAgIElNUExJQ0lUIERPVUJMRSBQUkVDSVNJT04gKEEtSCxPLVopCkNTR0xFIElNUExJ Q0lUIFJFQUwgICAgICAgICAgICAgKEEtSCxPLVopCkMKQyBDb21wdXRlcyB3b3Jrc3BhY2UgbmVl ZGVkIGZvciBnZW5lcmFsIGJvdW5kYXJ5IHZhbHVlIHByb2JsZW1zLgpDCiAgICAgIENPTU1PTiAv QkxCQ04vIE5ESU0sSVBTLElSUyxJTFAsSUNQKDIwKSxQQVIoMjApCiAgICAgIENPTU1PTiAvQkxM SU0vIE5NWCxOTlUsUkwwLFJMMSxBMCxBMQogICAgICBDT01NT04gL0JMQ0RFLyBOVFNULE5DT0ws SUFELElTUCxJU1csSVBMVCxOQkMsTklOVAogICAgICBDT01NT04gL0JMSUNOLyBORE0sTkRNUDEs TlJPVyxOQ0xNLE5SQyxOQ0MsTlBBUixORlBBUixOQkMwLE5JTlQwCiAgICAgIENPTU1PTiAvQkxN QVgvIE5QUixNWEJGLElJRCxJVE1YLElUTlcsTldUTixKQUMKQwogICAgICBDQUxMIFdTQlYoSVRQ LE5GUEFSLExGLExERkRVLExERkRQLExBQSxMQkIsTENDLAogICAgICogTERELExVUFMsTFVMRFBT LExVUExEUCxMVURUUFMsTFdCUkJELExSSFNBLExSSFNELExUSU5ULExVSU5ULAogICAgICogTERV UFMsTEVRRixMVU5FUSxMVE0sTERUTSxMVE0yLExVLExVQkMwLExVQkMxLExEQkMsTFVJQ0QsTEZJ Q0QsCiAgICAgKiBMRElDRCxMVyxMSVRNLExJQUwsTElSLExJQyxMSVdCUixMSVcsTTFBQSxNMkFB LE0xQkIsTTJCQixNMUNDLAogICAgICogTTFERCxNMVUsTTFCQyxNMUlDLExQMCxMUDEsTFBPSU4s TEVWLExXS0VWLExTTUFULExSTkxMVikKQwogICAgICBSRVRVUk4KICAgICAgRU5ECkMKQy0tLS0t LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t LS0tLS0tLS0KQy0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0KQyAgVGhlIGZvbGxvd2luZyBzdWJyb3V0aW5lcyBhbHNv IGFwcGVhciBpbiB0aGUgbGlicmFyeSBmaWxlIEFVVExJQi4KQyAge09uZSBjYWxsIGhhcyBiZWVu IGRlbGV0ZWQgOiBzZWUgY29tbWVudCBsaW5lIHN0YXJ0aW5nIHdpdGggIkNYWCJ9LgpDLS0tLS0t LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t LS0tLS0tLQpDLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t LS0tLS0tLS0tLS0tLS0tLS0tLS0tLQpDICAgICAtLS0tLS0tLS0tIC0tLS0tLQogICAgICBTVUJS T1VUSU5FIERGSU5JVApDCiAgICAgIElNUExJQ0lUIERPVUJMRSBQUkVDSVNJT04gKEEtSCxPLVop CkNTR0xFIElNUExJQ0lUIFJFQUwgICAgICAgICAgICAgKEEtSCxPLVopCkMKQyBEZWZhdWx0IHZh bHVlcyBhc3NpZ25lZCB0byBwcm9ncmFtIGNvbnN0YW50cyBhcmUgbGlzdGVkIGJlbG93LgpDIFRo ZXNlIHZhbHVlcyBtYXkgYmUgY2hhbmdlZCBpbiB0aGUgdXNlci1zdXBwbGllZCBzdWJyb3V0aW5l IElOSVQsCkMgcHJvdmlkZWQgdGhhdCB0aGUgY29tbW9uIGJsb2NrcyAobGlzdGVkIGJlbG93KSBh bHNvIGFwcGVhci4KQwogICAgICBDT01NT04gL0JMQkNOLyBORElNLElQUyxJUlMsSUxQLElDUCgy MCksUEFSKDIwKQogICAgICBDT01NT04gL0JMQ0RFLyBOVFNULE5DT0wsSUFELElTUCxJU1csSVBM VCxOQkMsTklOVAogICAgICBDT01NT04gL0JMVEhULyBUSEVUQUwoMjApLFRIRVRBVQogICAgICBD T01NT04gL0JMRExTLyBEUyxEU01JTixEU01BWCxJQURTCiAgICAgIENPTU1PTiAvQkxFUFMvIEVQ U0woMjApLEVQU1UsRVBTUwogICAgICBDT01NT04gL0JMTElNLyBOTVgsTlVaUixSTDAsUkwxLEEw LEExCiAgICAgIENPTU1PTiAvQkxNQVgvIE5QUixNWEJGLElJRCxJVE1YLElUTlcsTldUTixKQUMK QwpDIFNldCB0aGUgZGVmYXVsdCB2YWx1ZXMgb2YgdGhlIGNvbnN0YW50cwpDIC0tLSAtLS0gLS0t LS0tLSAtLS0tLS0gLS0gLS0tIC0tLS0tLS0tLQpDCiAgICAgIENPTU1PTiAvQkxSQ04vIEhBTEYs WkVSTyxPTkUsVFdPLEhNQUNILFJTTUFMTCxSTEFSR0UKQwogICAgICAgQ0FMTCBDTlNUTlQKQwog ICAgICAgTkRJTT0yCiAgICAgICBJUFM9MQogICAgICAgSVJTPTAKICAgICAgIElMUD0wCkMKICAg ICAgIERPIDEgST0xLDIwCiAgICAgICAgIElDUChJKT1JCiAgICAgICAgIFBBUihJKT1aRVJPCiAx ICAgICBDT05USU5VRQpDCiAgICAgICBOVFNUPTEwCiAgICAgICBOQ09MPTQKICAgICAgIElBRD0z CiAgICAgICBJU1A9MQogICAgICAgSVNXPTEKICAgICAgIElQTFQ9MAogICAgICAgTkJDPU5ESU0K ICAgICAgIE5JTlQ9MApDCiAgICAgICBUSEVUQUwoMSk9T05FCiAgICAgICBETyAyIEk9MiwyMAog ICAgICAgICBUSEVUQUwoSSk9WkVSTwogMiAgICAgQ09OVElOVUUKICAgICAgIFRIRVRBVT1PTkUK QwogICAgICAgRFM9MC4wMUQgMDAKQ1NHTEUgIERTPTAuMDFFIDAwCiAgICAgICBEU01JTj0wLjAw MUQgMDAKQ1NHTEUgIERTTUlOPTAuMDAxRSAwMAogICAgICAgRFNNQVg9T05FCiAgICAgICBJQURT PTEKQwogICAgICAgRE8gMyBJPTEsMjAKICAgICAgICAgRVBTTChJKT0xLjBELTQKQ1NHTEUgICAg RVBTTChJKT0xLjBFLTQKIDMgICAgIENPTlRJTlVFCiAgICAgICBFUFNVPTEuMEQtNApDU0dMRSAg RVBTVT0xLjBFLTQKICAgICAgIEVQU1M9MS4wRC00CkNTR0xFICBFUFNTPTEuMEUtNApDCiAgICAg ICBOTVg9MTAwCiAgICAgICBOVVpSPTAKICAgICAgIFJMMD0tMS4wRSs2CiAgICAgICBSTDE9IDEu MEUrNgogICAgICAgQTA9IC0xLjBFKzYKICAgICAgIEExPSAgMS4wRSs2CkMKICAgICAgIE5QUj0y MAogICAgICAgTVhCRj01CiAgICAgICBJSUQ9MgogICAgICAgSVRNWD04CiAgICAgICBJVE5XPTUK Q1NHTEUgIElUTlc9NQogICAgICAgTldUTj0zCiAgICAgICBKQUM9MQpDCiAgICAgIFJFVFVSTgog ICAgICBFTkQKQwpDICAgICAtLS0tLS0tLS0tIC0tLS0KICAgICAgU1VCUk9VVElORSBXU0FFKElU UCxOQ1BQLExGLExERkRVLExERkRQLExBQSxMU1RVRCxMU1RVLExTVFJMLAogICAgICogTFNUUkxE LExSSFMsTERVLExVRE9ULExVLExVT0xELExTTUFULExSTkxMVixMVTEsTEVWLExXS0VWLExXLAog ICAgICogTElSLExJQyxMSVcsTTFBQSxNMVNUQkYsTkRJTTIpCkMKQyBBc3NpZ25zIHdvcmtzcGFj ZSBmb3IgYWxnZWJyYWljIGNvbnRpbnVhdGlvbiBwcm9ibGVtcy4KQwogICAgICBJTVBMSUNJVCBE T1VCTEUgUFJFQ0lTSU9OIChBLUgsTy1aKQpDU0dMRSBJTVBMSUNJVCBSRUFMICAgICAgICAgICAg IChBLUgsTy1aKQpDCiAgICAgIENPTU1PTiAvQkxESU0vIE5ESU1QMSxORElSQyxOVFNUUDEsTkRD QyxORFJIUyxOREJDLE5VSUNELE5ESUNECiAgICAgKiAgICAgICAgICAgICAgICxOV0JSLE5JV0JS CiAgICAgIENPTU1PTiAvQkxJQ04vIE5ETSxORE1QMSxOUk9XLE5DTE0sTlJDLE5DQyxOUEFSLE5G UEFSLE5CQzAsTklOVDAKICAgICAgQ09NTU9OIC9CTEJDTi8gTkRJTSxJUFMsSVJTLElMUCxJQ1Ao MjApLFBBUigyMCkKQwogICAgICAgTkZQQVI9TkNQUAogICAgICAgQ0FMTCBJTklUMShJVFApCkMK QyBBc3NpZ24gYXJyYXkgc3BhY2UuCkMKICAgICAgIExGPTEKICAgICAgIExERkRVPUxGK05ESU0K ICAgICAgIExERkRQPUxERkRVK05ESU0qKjIKQwogICAgICAgTEFBPUxERkRQK05ESU0qTlBBUgog ICAgICAgTFNUVUQ9TEFBKyhORElNKzEpKioyCiAgICAgICBMU1RVPUxTVFVEK05ESU0qMjAKICAg ICAgIExTVFJMPUxTVFUrTkRJTSoyMAogICAgICAgTFNUUkxEPUxTVFJMKzIwCiAgICAgICBMUkhT PUxTVFJMRCsyMAogICAgICAgTERVPUxSSFMrTkRJTSsxCiAgICAgICBMVURPVD1MRFUrTkRJTSsx CiAgICAgICBMVT1MVURPVCtORElNCiAgICAgICBMVU9MRD1MVStORElNCiAgICAgICBMU01BVD1M VU9MRCtORElNCiAgICAgICBMUk5MTFY9TFNNQVQrNCpORElNKioyCiAgICAgICBMVTE9TFJOTExW KzIqTkRJTQogICAgICAgTEVWPUxVMStORElNCiAgICAgICBMV0tFVj1MRVYrMipORElNCiAgICAg ICBMTkVYVD1MV0tFVisyKk5ESU0KICAgICAgIExXPUxORVhUCkMKICAgICAgIExJUj0xCiAgICAg ICBMSUM9TElSKzIqTkRJTSsyCiAgICAgICBMTkVYVD1MSUMrMipORElNKzIKICAgICAgIExJVz1M TkVYVApDCiAgICAgICBNMUFBPU5ESU0rMQogICAgICAgTkRJTVAxPU0xQUEKICAgICAgIE0xU1RC Rj0yMAogICAgICAgTkRJTTI9MipORElNCiAgICAgICBORElSQz1ORElNMisyCkMKICAgICAgUkVU VVJOCiAgICAgIEVORApDCiAgICAgIFNVQlJPVVRJTkUgQ05TVE5UCkMgICAgIC0tLS0tLS0tLS0g LS0tLS0tCkMKICAgICAgSU1QTElDSVQgRE9VQkxFIFBSRUNJU0lPTiAoQS1ILE8tWikKQ1NHTEUg SU1QTElDSVQgUkVBTCAgICAgICAgICAgICAoQS1ILE8tWikKQwpDIFNldHMgcHJvYmxlbSBpbmRl cGVuZGVudCBjb25zdGFudHMuIFRoZXNlIHNob3VsZCBub3Qgbm9ybWFsbHkgYmUKQyBjaGFuZ2Vk LgpDCiAgICAgIENPTU1PTiAvQkxSQ04vIEhBTEYsWkVSTyxPTkUsVFdPLEhNQUNILFJTTUFMTCxS TEFSR0UKQwogICAgICAgSEFMRj0wLjVEIDAwCkNTR0xFICBIQUxGPTAuNUUgMDAKICAgICAgIFpF Uk89MC4wRCAwMApDU0dMRSAgWkVSTz0wLjBFIDAwCiAgICAgICBPTkU9MS4wRCAwMApDU0dMRSAg T05FPTEuMEUgMDAKICAgICAgIFRXTz0yLjBEIDAwCkNTR0xFICBUV089Mi4wRSAwMApDCkMgU2V0 IGFwcHJveGltYXRlICJoYWxmIGV4cG9uZW50IG1hY2hpbmUgYWNjdXJhY3kiLgpDCiAgICAgIEhN QUNIPTEuMEQtNwpDU0dMRSBITUFDSD0xLjBFLTQKQwpDIFNldCBhcHByb3hpbWF0ZSAibGFyZ2Vz dCBhY2NlcHRhYmxlIHJlYWwgbnVtYmVyIi4KQwogICAgICBSTEFSR0U9MS4wRCAzMApDU0dMRSBS TEFSR0U9MS4wRSAzMApDCkMgU2V0IGFwcHJveGltYXRlICJzbWFsbGVzdCBhY2NlcHRhYmxlIiBy ZWFsIG51bWJlci4KQwogICAgICBSU01BTEw9MS4wRC0zMApDU0dMRSBSU01BTEw9MS4wRS0zMApD CiAgICAgIFJFVFVSTgogICAgICBFTkQKQwpDICAgICAtLS0tLS0tLS0tIC0tLS0tCiAgICAgIFNV QlJPVVRJTkUgSU5JVDEoSVRQKQpDCiAgICAgIElNUExJQ0lUIERPVUJMRSBQUkVDSVNJT04gKEEt SCxPLVopCkNTR0xFIElNUExJQ0lUIFJFQUwgICAgICAgICAgICAgKEEtSCxPLVopCkMKQyBHZW5l cmFsIGluaXRpYWxpemF0aW9uLiBSZWRlZmluaXRpb24gb2YgY29uc3RhbnRzLgpDCiAgICAgIENP TU1PTiAvQkxCQ04vIE5ESU0sSVBTLElSUyxJTFAsSUNQKDIwKSxQQVIoMjApCiAgICAgIENPTU1P TiAvQkxDUkwvIFJEU09MRCxBLFJMKDIwKSxSTE9MRCgyMCksUkxET1QoMjApCiAgICAgIENPTU1P TiAvQkxDREUvIE5UU1QsTkNPTCxJQUQsSVNQLElTVyxJUExULE5CQyxOSU5UCiAgICAgIENPTU1P TiAvQkxJQ04vIE5ETSxORE1QMSxOUk9XLE5DTE0sTlJDLE5DQyxOUEFSLE5GUEFSLE5CQzAsTklO VDAKICAgICAgQ09NTU9OIC9CTElUUC8gSVRQU1QsSVRQU1AsSUJSU1AKICAgICAgQ09NTU9OIC9C TFJDTi8gSEFMRixaRVJPLE9ORSxUV08sSE1BQ0gsUlNNQUxMLFJMQVJHRQogICAgICBDT01NT04g L0JMVEhULyBUSEVUQUwoMjApLFRIRVRBVQogICAgICBDT01NT04gL0JMRExTLyBEUyxEU01JTixE U01BWCxJQURTCiAgICAgIENPTU1PTiAvQkxMSU0vIE5NWCxOVVpSLFJMMCxSTDEsQTAsQTEKICAg ICAgQ09NTU9OIC9CTERFVC8gREVUR0UsTklOUwogICAgICBDT01NT04gL0JMTUFYLyBOUFIsTVhC RixJSUQsSVRNWCxJVE5XLE5XVE4sSkFDCiAgICAgIENPTU1PTiAvQkxUSU0vIFRTRVRVQixUQ09O UEEsVENPTlJILFRJTkZQQSxUUkVEVUMsVFdSOAogICAgICBDT01NT04gL0JMQ05ULyBOREVDT00s TkJDS1NCCkMKICAgICAgIE5QQVI9MjAKICAgICAgIE5ETT1ORElNCiAgICAgICBORE1QMT1ORE0r MQogICAgICAgTklOUz0xCiAgICAgICBJVFBTVD0wCiAgICAgICBJQlJTUD0xCkMKICAgICAgIElG KElTVy5FUS4wKUlTVz0xCkMKICAgICAgIElGKE5CQy5ORS4wKSBUSEVOCiAgICAgICAgIE5CQzA9 TkJDCiAgICAgICBFTFNFCiAgICAgICAgIE5CQzA9MQogICAgICAgRU5ESUYKQwogICAgICAgSUYo TklOVC5ORS4wKVRIRU4KICAgICAgICAgTklOVDA9TklOVAogICAgICAgRUxTRQogICAgICAgICBO SU5UMD0xCiAgICAgICBFTkRJRgpDCkMgQ2hlY2sgYW5kIHBlcnR1cmIgcHNldWRvIGFyY2xlbmd0 aCBzdGVwc2l6ZSBhbmQgc3RlcGxpbWl0cy4KQyAoUGVydHVyYmVkIHRvIGF2b2lkIGV4YWN0IGNv bXB1dGF0aW9uIG9mIGNlcnRhaW4gYmlmdXJjYXRpb24gcG9pbnRzKS4KQwogICAgICAgSUYoRFMu RVEuWkVSTylEUz0wLjEKICAgICAgIElGKERTTUlOLkVRLlpFUk8pRFNNSU49MS4wRC00KkRBQlMo RFMpCkNTR0xFICBJRihEU01JTi5FUS5aRVJPKURTTUlOPTEuMEUtNCogQUJTKERTKQogICAgICAg RkM9T05FK0hNQUNICiAgICAgICBEUz1GQypEUwogICAgICAgRFNNSU49RFNNSU4vRkMKICAgICAg IERTTUFYPUZDKkRTTUFYCkMKQyBJbml0aWFsaXplIHRpbWluZyBjb25zdGFudHMgYW5kIGRlY29t cG9zaXRpb24gYW5kIGJhY2tzdWJzdGl0dXRpb24KQyBjb3VudGVycyAoRm9yIGRpZmZlcmVudGlh bCBlcXVhdGlvbnMpLgogICAgICAgVFNFVFVCPTAKICAgICAgIFRDT05QQT0wCiAgICAgICBUQ09O Ukg9MAogICAgICAgVElORlBBPTAKICAgICAgIFRSRURVQz0wCiAgICAgICBUV1I4PTAKICAgICAg IE5ERUNPTT0wCiAgICAgICBOQkNLU0I9MApDCkMgUmVkZWZpbml0aW9uLgpDCiAgICAgICBJRihJ UFMuRVEuMTEuT1IuSVBTLkVRLjEyLk9SLklQUy5FUS4xMylUSEVOCkMgICAgICAgICoqV2F2ZSBQ cm9ibGVtcwogICAgICAgICBORElNPTIqTkRJTQogICAgICAgICBORE09TkRJTQogICAgICAgICBO RE1QMT1ORE0rMQogICAgICAgRU5ESUYKQwogICAgICAgSUYoKElQUy5FUS4wLk9SLklQUy5FUS4x Lk9SLklQUy5FUS4tMS5PUi5JUFMuRVEuMTEpCiAgICAgKiAgICAgICAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAgICAuQU5ELiBJU1cuRVEuMSApVEhFTgpDICAgICAgICAqKiBBbGdlYnJh aWMgU3lzdGVtcwogICAgICAgICBORlBBUj0xCkMKICAgICAgIEVMU0UgSUYoKElQUy5FUS4yLk9S LklQUy5FUS4xMikKICAgICAqICAgICAgICAgICAgICAgICAgICAgICAgICAgICAuQU5ELiAoSVNX LkVRLjEuT1IuSVNXLkVRLi0xKSApVEhFTgpDICAgICAgICAqKiBQZXJpb2RpYyBTb2x1dGlvbnMK ICAgICAgICAgTkJDPU5ESU0KICAgICAgICAgTklOVD0xCiAgICAgICAgIE5GUEFSPU5CQytOSU5U LU5ESU0rMQpDICAgICAgICBTRVQgUEFSQU1FVEVSIFRPIENPTlRBSU4gVEhFIFBFUklPRAogICAg ICAgICBJQ1AoMik9MTEKQwogICAgICAgRUxTRSBJRihJUFMuRVEuMy5PUi5JUFMuRVEuMTMpVEhF TgpDICAgICAgICAqKiBDb250aW51YXRpb24gb2Ygb3JiaXRzIG9mIGZpeGVkIHBlcmlvZAogICAg ICAgICBOQkM9TkRJTQogICAgICAgICBOSU5UPTEKICAgICAgICAgSUNQKDMpPTExCiAgICAgICAg IE5GUEFSPU5CQytOSU5ULU5ESU0rMQpDCiAgICAgICBFTFNFIElGKCAoSVBTLkVRLjQgLk9SLiBJ UFMuRVEuNikKICAgICAqICAgICAgICAgICAgICAuQU5ELiAoSVNXLkVRLjEuT1IuSVNXLkVRLi0x KSAgKSBUSEVOCkMgICAgICAgICoqIEJvdW5kYXJ5IFZhbHVlIFByb2JsZW1zCiAgICAgICAgIE5G UEFSPU5CQytOSU5ULU5ESU0rMQpDCiAgICAgICBFTFNFIElGKElQUy5FUS4xNClUSEVOCkMgICAg ICAgICoqRXZvbHV0aW9uIGNhbGN1bGF0aW9ucyBmb3IgUGFyYWJvbGljIFN5c3RlbXMKICAgICAg ICAgTkRJTT0yKk5ESU0KICAgICAgICAgTkJDPU5ESU0KICAgICAgICAgTklOVD0wCiAgICAgICAg IE5GUEFSPTEKICAgICAgICAgSUxQPTAKICAgICAgICAgSVNQPTAKICAgICAgICAgSUNQKDEpPTE0 CkMKICAgICAgIEVMU0UgSUYoSVBTLkVRLjUpVEhFTgpDICAgICAgICAqKiBDb250cm9sIFByb2Js ZW1zCiAgICAgICAgIElGKE5GUEFSLkVRLjIpVEhFTgogICAgICAgICAgIE5ESU09TkRJTSsxCiAg ICAgICAgICAgSUNQKDEpPTExCiAgICAgICAgIEVMU0UKICAgICAgICAgICBORElNPTIqTkRJTStO RlBBUgogICAgICAgICAgIElDUCgxKT0xMQogICAgICAgICBFTkRJRgpDCiAgICAgICBFTFNFIElG KElSUy5HVC4wIC5BTkQuIElBQlMoSVNXKS5FUS4yIClUSEVOCkMgICAgICAgICoqIFR3byBwYXJh bWV0ZXIgY29udGludWF0aW9uIG9mIHNpbmd1bGFyIHBvaW50cwpDCiAgICAgICAgIElGKChJVFAu RVEuMi5PUi4oSUFCUyhJVFApLzEwKS5FUS4yKSAuQU5ELiBJQUJTKElQUykuTEUuMSlUSEVOCkMg ICAgICAgICAgKiogTGltaXQgcG9pbnQgY29udGludWF0aW9uIChBbGdlYnJhaWMgUHJvYmxlbXMp CiAgICAgICAgICAgTkRJTT0yKk5ESU0rMQogICAgICAgICAgIE5GUEFSPTIKQwogICAgICAgICBF TFNFIElGKChJVFAuRVEuMy5PUi4oSUFCUyhJVFApLzEwKS5FUS4zKQogICAgICogICAgICAgICAg ICAgICAuQU5ELiAoSUFCUyhJUFMpLkxFLjEuT1IuSVBTLkVRLjExKSlUSEVOCkMgICAgICAgICAg KiogSG9wZiBiaWZ1cmNhdGlvbiBjb250aW51YXRpb24gKE1hcHMsIE9ERSwgV2F2ZXMpCiAgICAg ICAgICAgTkRJTT0zKk5ESU0rMgogICAgICAgICAgIE5GUEFSPTIKQwogICAgICAgICBFTFNFIElG KChJVFAuRVEuNS5PUi4oSUFCUyhJVFApLzEwKS5FUS41KSAuQU5ELiBJUFMuRVEuMilUSEVOCkMg ICAgICAgICAgKiogTGltaXQgcG9pbnQgY29udGludWF0aW9uIChQZXJpb2RpYyBzb2x1dGlvbnMp CiAgICAgICAgICAgTkRJTT0yKk5ESU0KICAgICAgICAgICBOQkM9TkRJTQogICAgICAgICAgIE5J TlQ9MwogICAgICAgICAgIE5GUEFSPU5CQytOSU5ULU5ESU0rMQogICAgICAgICAgIElDUCgzKT0x MQogICAgICAgICAgIElDUCg0KT0xMgpDCiAgICAgICAgIEVMU0UgSUYoKElUUC5FUS43Lk9SLihJ QUJTKElUUCkvMTApLkVRLjcpIC5BTkQuIElQUy5FUS4yKVRIRU4KQyAgICAgICAgICAqKiBDb250 aW51YXRpb24gb2YgcGVyaW9kIGRvdWJsaW5nIGJpZnVyY2F0aW9ucwogICAgICAgICAgIE5ESU09 MipORElNCiAgICAgICAgICAgTkJDPU5ESU0KICAgICAgICAgICBOSU5UPTMKICAgICAgICAgICBO RlBBUj1OQkMrTklOVC1ORElNKzEKICAgICAgICAgICBJQ1AoMyk9MTEKICAgICAgICAgICBJQ1Ao NCk9MTIKQwogICAgICAgICBFTFNFIElGKChJVFAuRVEuOC5PUi4oSUFCUyhJVFApLzEwKS5FUS44 KSAuQU5ELiBJUFMuRVEuMilUSEVOCkMgICAgICAgICAgKiogQ29udGludWF0aW9uIG9mIGJpZnVy Y2F0aW9ucyB0byBUb3JpCiAgICAgICAgICAgTkRJTT0zKk5ESU0KICAgICAgICAgICBOQkM9TkRJ TQogICAgICAgICAgIE5JTlQ9MwogICAgICAgICAgIE5GUEFSPU5CQytOSU5ULU5ESU0rMQogICAg ICAgICAgIElDUCgyKT0xMwogICAgICAgICAgIElDUCgzKT0xMQogICAgICAgICAgIElDUCg0KT0x MgpDCiAgICAgICAgIEVMU0UgSUYoIChJVFAuRVEuNS5PUi4oSUFCUyhJVFApLzEwKS5FUS41KQog ICAgICogICAgICAgIC5BTkQuIChJUFMuRVEuNC5PUi5JUFMuRVEuNikgKVRIRU4KQyAgICAgICAg ICAqKiBDb250aW51YXRpb24gb2YgbGltaXQgcG9pbnRzIChCb3VuZGFyeSBWYWx1ZSBQcm9ibGVt cykKICAgICAgICAgICBORElNPTIqTkRJTQogICAgICAgICAgIE5CQz0yKk5CQwogICAgICAgICAg IE5JTlQ9MipOSU5UKzEKICAgICAgICAgICBORlBBUj1OQkMrTklOVC1ORElNKzEKICAgICAgICAg ICBOWFA9TkZQQVIvMi0xCiAgICAgICAgICAgSUYoTlhQLkdULjApVEhFTgogICAgICAgICAgICAg RE8gMiBJPTEsTlhQCiAgICAgICAgICAgICAgIElDUChORlBBUi8yK0krMSk9MTErSQogMiAgICAg ICAgICAgQ09OVElOVUUKICAgICAgICAgICBFTkRJRgogICAgICAgICBFTkRJRgogICAgICAgRU5E SUYKQwpDIENvbnN0YW50cyBmb3IgdGhlIGRpc2NyZXRpemF0aW9uCkMKICAgICAgIElGKElQUy5F US4wKVRIRU4KICAgICAgICAgTlRTVD0wCiAgICAgICAgIE5ST1c9MQogICAgICAgRUxTRQogICAg ICAgICBOUk9XPU5ESU0qTkNPTAogICAgICAgICBOQ0xNPU5ST1crTkRJTQogICAgICAgICBOUkM9 TkJDK05JTlQrMQogICAgICAgICBOQ0M9TlRTVCpOUk9XK05ESU0KQ1hYICAgICAgQ0FMTCBHRU5X VFMoTkNPTCkKICAgICAgIEVORElGCkMKICAgICAgUkVUVVJOCiAgICAgIEVORApDCkMgICAgIC0t LS0tLS0tLS0gLS0tLQogICAgICBTVUJST1VUSU5FIFdTQlYoSVRQLE5DUFAsTEYsTERGRFUsTERG RFAsTEFBLAogICAgICogTEJCLExDQyxMREQsTFVQUyxMVUxEUFMsTFVQTERQLExVRFRQUyxMV0JS QkQsTFJIU0EsTFJIU0QsTFRJTlQsCiAgICAgKiBMVUlOVCxMRFVQUyxMRVFGLExVTkVRLExUTSxM RFRNLExUTTIsTFUsTFVCQzAsTFVCQzEsTERCQyxMVUlDRCwKICAgICAqIExGSUNELExESUNELExX LExJVE0sTElBTCxMSVIsTElDLExJV0JSLExJVyxNMUFBLE0yQUEsTTFCQixNMkJCLAogICAgICog TTFDQyxNMURELE0xVSxNMUJDLE0xSUMsTFAwLExQMSxMUE9JTixMRVYsTFdLRVYsTFNNQVQsTFJO TExWKQpDCkMgQXNzaWducyB3b3Jrc3BhY2UgZm9yIGJvdW5kYXJ5IHZhbHVlIHByb2JsZW1zCkMK ICAgICAgSU1QTElDSVQgRE9VQkxFIFBSRUNJU0lPTiAoQS1ILE8tWikKQ1NHTEUgSU1QTElDSVQg UkVBTCAgICAgICAgICAgICAoQS1ILE8tWikKQwogICAgICBDT01NT04gL0JMRElNLyBORElNUDEs TkRJUkMsTlRTVFAxLE5EQ0MsTkRSSFMsTkRCQyxOVUlDRCxORElDRAogICAgICogICAgICAgICAg ICAgICAsTldCUixOSVdCUgogICAgICBDT01NT04gL0JMSUNOLyBORE0sTkRNUDEsTlJPVyxOQ0xN LE5SQyxOQ0MsTlBBUixORlBBUixOQkMwLE5JTlQwCiAgICAgIENPTU1PTiAvQkxDREUvIE5UU1Qs TkNPTCxJQUQsSVNQLElTVyxJUExULE5CQyxOSU5UCiAgICAgIENPTU1PTiAvQkxCQ04vIE5ESU0s SVBTLElSUyxJTFAsSUNQKDIwKSxQQVIoMjApCkMKICAgICAgIE5GUEFSPU5DUFAKICAgICAgIENB TEwgSU5JVDEoSVRQKQpDCiAgICAgICBMRj0xCiAgICAgICBMREZEVT1MRitORElNCiAgICAgICBM REZEUD1MREZEVStORElNKioyCiAgICAgICBMQUE9TERGRFArTkRJTSpOUEFSCiAgICAgICBMQkI9 TEFBK05UU1QqTlJPVypOQ0xNCiAgICAgICBMQ0M9TEJCK05UU1QqTlJPVypORlBBUgogICAgICAg TEREPUxDQytOUkMqKCBOVFNUKk5ST1crTkRJTSApCiAgICAgICBMVVBTPUxERCtOUkMqTkZQQVIK ICAgICAgIExVTERQUz1MVVBTKyhOVFNUKzEpKk5ST1cKICAgICAgIExVUExEUD1MVUxEUFMrKE5U U1QrMSkqTlJPVwogICAgICAgTFVEVFBTPUxVUExEUCsoTlRTVCsxKSpOUk9XCiAgICAgICBMV0JS QkQ9TFVEVFBTKyhOVFNUKzEpKk5ST1cKICAgICAgIExSSFNBPUxXQlJCRCsoNypORElNKzIqTkZQ QVIrMSkqTkRJTSpOVFNUKygyKk5ESU0rTkZQQVIpKioyCiAgICAgKiArMiooMipORElNK05GUEFS KSsoTkZQQVIrTkRJTSsyKSpORElNCiAgICAgICBMUkhTRD1MUkhTQSsoTlRTVCsxKSpOUk9XCiAg ICAgICBMVElOVD1MUkhTRCtOQkMrTklOVCsxCiAgICAgICBMVUlOVD1MVElOVCtOVFNUKzEKICAg ICAgIExEVVBTPUxVSU5UKyhOVFNUKzEpKk5ST1cKICAgICAgIExFUUY9TERVUFMrKE5UU1QrMSkq TlJPVwogICAgICAgTFVORVE9TEVRRitOVFNUKzEKICAgICAgIExUTT1MVU5FUStOVFNUKzEKICAg ICAgIExEVE09TFRNK05UU1QrMQogICAgICAgTFRNMj1MRFRNK05UU1QrMQogICAgICAgTFU9TFRN MitOVFNUKzEKICAgICAgIExVQkMwPUxVK05ESU0KICAgICAgIExVQkMxPUxVQkMwK05ESU0KICAg ICAgIExEQkM9TFVCQzErTkRJTQogICAgICAgTFVJQ0Q9TERCQytOQkMqKDIqTkRJTStOUEFSKQog ICAgICAgTEZJQ0Q9TFVJQ0QrNCpORElNCiAgICAgICBMRElDRD1MRklDRCtOSU5UCiAgICAgICBM UE9JTj1MRElDRCtOSU5UKihORElNK05QQVIpCiAgICAgICBMRVY9TFBPSU4rTkRJTSoqMgogICAg ICAgTFdLRVY9TEVWKzIqTkRJTQogICAgICAgTFNNQVQ9TFdLRVYrMipORElNCiAgICAgICBMUk5M TFY9TFNNQVQrNCpORElNKioyCiAgICAgICBMTkVYVD1MUk5MTFYrMipORElNCiAgICAgICBMVz1M TkVYVApDCkMgQ29tcHV0ZSB0aGUgbG9jYXRpb24gb2YgdGhlIG1hdHJpY2VzIFAwIGFuZCBQMSwK QyB0aGF0IGltcGxpY2l0bHkgZGVmaW5lIHRoZSBsaW5lYXJpemVkIFBvaW5jYXJlIG1hcC4KQwog ICAgICAgTFAxPUxXQlJCRCsoMipOVFNULTEpKk5ESU0qKjIKICAgICAgIExQMD1MV0JSQkQrKDMq TlRTVC0xKSpORElNKioyK05ESU0qTkZQQVIqTlRTVAogICAgICogK05ESU0qTlJDKihOVFNUKzEp K05ESU0qKE5UU1QrMikKQwogICAgICAgTElUTT0xCiAgICAgICBMSUFMPUxJVE0rTlRTVCsxCiAg ICAgICBMSVI9TElBTCtOVFNUKzEKICAgICAgIExJQz1MSVIrTkRJTStOQkMrTklOVCsxCiAgICAg ICBMSVdCUj1MSUMrTkRJTStOQkMrTklOVCsxCiAgICAgICBMTkVYVD1MSVdCUiszKk5ESU0qKE5U U1QtMSkrTlRTVAogICAgICAgTElXPUxORVhUCkMKICAgICAgIE0xQUE9TlRTVAogICAgICAgTTJB QT1OUk9XCiAgICAgICBNMUJCPU5UU1QKICAgICAgIE0yQkI9TlJPVwogICAgICAgTTFDQz1OVFNU Kk5ST1crTkRJTQogICAgICAgTkRDQz1OQ0MKICAgICAgIE0xREQ9TlJDCiAgICAgICBNMVU9TlRT VCsxCiAgICAgICBNMUJDPU5CQwogICAgICAgTTFJQz1OSU5UCiAgICAgICBORElSQz1ORElNK05C QytOSU5UKzEKICAgICAgIE5UU1RQMT1OVFNUKzEKICAgICAgIE5EUkhTPU5CQytOSU5UKzEKICAg ICAgIE5EQkM9MipORElNKk5QQVIKICAgICAgIE5VSUNEPTQqTkRJTQogICAgICAgTkRJQ0Q9TkRJ TStOUEFSCiAgICAgICBOV0JSPSg3Kk5ESU0rMipORlBBUisxKSpORElNKk5UU1QrKDIqTkRJTStO RlBBUikqKjIKICAgICAqICsyKigyKk5ESU0rTkZQQVIpKyhORlBBUitORElNKzIpKk5ESU0KICAg ICAgIE5JV0JSPTMqTkRJTSooTlRTVC0xKStOVFNUCkMKICAgICAgIElGKE0xQkMuRVEuMClNMUJD PTEKICAgICAgIElGKE0xSUMuRVEuMClNMUlDPTEKQwogICAgICBSRVRVUk4KICAgICAgRU5ECkMK QyAgICAgLS0tLS0tLS0tLSAtLS0tLS0KICAgICAgU1VCUk9VVElORSBGSU5ETDMoSVJTLElUUCxO RlBBUixGT1VORCkKQwogICAgICBJTVBMSUNJVCBET1VCTEUgUFJFQ0lTSU9OIChBLUgsTy1aKQpD U0dMRSBJTVBMSUNJVCBSRUFMICAgICAgICAgICAgIChBLUgsTy1aKQpDCiAgICAgIENPTU1PTiAv QkxDREUvIE5UU1QsTkNPTCxJQUQsSVNQLElTVyxJUExULE5CQyxOSU5UCiAgICAgIENPTU1PTiAv QkxJVFAvIElUUFNULElUUFNQLElCUlNQCkMKICAgICAgTE9HSUNBTCBGT1VORCxFT0YzCkMKQyBM b2NhdGVzIHJlc3RhcnQgcG9pbnQgd2l0aCBsYWJlbCBJUlMgYW5kIGRldGVybWluZXMgdHlwZS4K QyBJZiB0aGUgbGFiZWwgY2FuIG5vdCBiZSBsb2NhdGVkIG9uIHVuaXQgMyB0aGVuIEZPVU5EIHdp bGwgYmUgLkZBTFNFLgpDCiAgICAgICBGT1VORD0uRkFMU0UuCiAgICAgICBSRVdJTkQgMwpDCiAx ICAgICBDT05USU5VRQogICAgICAgICBSRUFEKDMsKixFTkQ9MilJQlIxLE5UT1QxLElUUCxMQUIs TkZQQVIsSVNXMSxOVFBMMSxOQVIxLE5TS0lQCiAgICAgICAgIElGKExBQi5FUS5JUlMpVEhFTgog ICAgICAgICAgIEZPVU5EPS5UUlVFLgogICAgICAgICAgIElUUFNQPUlUUAogICAgICAgICAgIElC UlNQPUlCUjEKICAgICAgICAgICBJRihJQUJTKElTVykuRVEuMilUSEVOCiAgICAgICAgICAgICBJ RihJQUJTKElUUCkuTFQuMTApVEhFTgogICAgICAgICAgICAgICBJVFBTVD1JQUJTKElUUCkKICAg ICAgICAgICAgIEVMU0UKICAgICAgICAgICAgICAgSVRQU1Q9SUFCUyhJVFAvMTApCiAgICAgICAg ICAgICBFTkRJRgogICAgICAgICAgIEVMU0UKICAgICAgICAgICAgIElUUFNUPTAKICAgICAgICAg ICBFTkRJRgogICAgICAgICAgIEJBQ0tTUEFDRSAzCiAgICAgICAgICAgUkVUVVJOCiAgICAgICAg IEVMU0UKICAgICAgICAgICBDQUxMIFNLSVAzKE5TS0lQLEVPRjMpCiAgICAgICAgICAgSUYoRU9G MylHT1RPIDIKICAgICAgICAgRU5ESUYKICAgICAgIEdPVE8gMQpDCiAyICAgICBSRVRVUk4KICAg ICAgIEVORApDCkMgICAgIC0tLS0tLS0tLS0gLS0tLS0KICAgICAgU1VCUk9VVElORSBTS0lQMyhO U0tJUCxFT0YzKQpDCiAgICAgIElNUExJQ0lUIERPVUJMRSBQUkVDSVNJT04gKEEtSCxPLVopCkNT R0xFIElNUExJQ0lUIFJFQUwgICAgICAgICAgICAgKEEtSCxPLVopCkMKQyBTa2lwcyB0aGUgc3Bl Y2lmaWVkIG51bWJlciBvZiBsaW5lcyBvbiB1bml0IDMuCkMKICAgICAgTE9HSUNBTCBFT0YzCkMK ICAgICAgIEVPRjM9LkZBTFNFLgpDCiAgICAgICBETyAxIEk9MSxOU0tJUAogICAgICAgICBSRUFE KDMsMTAxLEVORD0yKQogMSAgICAgQ09OVElOVUUKICAgICAgIFJFVFVSTgpDCiAxMDEgICBGT1JN QVQoMVgpCkMKIDIgICAgIENPTlRJTlVFCiAgICAgICAgRU9GMz0uVFJVRS4KICAgICAgUkVUVVJO CiAgICAgIEVORAo= --=====================_2515359==_-- From gcc-help-return-4181-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 13:10:01 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 19360 invoked by alias); 30 Nov 2000 13:09:57 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 19308 invoked from network); 30 Nov 2000 13:09:47 -0000 Received: from fencepost.gnu.org (199.232.76.164) by sourceware.cygnus.com with SMTP; 30 Nov 2000 13:09:47 -0000 Received: from runyon.cygnus.com ([205.180.230.5] helo=cygnus.com) by fencepost.gnu.org with esmtp (Exim 3.16 #1 (Debian)) id 141TSw-0003yV-00 for ; Thu, 30 Nov 2000 08:09:34 -0500 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id FAA11097; Thu, 30 Nov 2000 05:09:03 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAUD8ja12811; Thu, 30 Nov 2000 11:08:45 -0200 To: Yung Kwong Wing Cc: help-gcc@gnu.org Subject: Re: installing gcc References: From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 30 Nov 2000 11:08:45 -0200 In-Reply-To: Yung Kwong Wing's message of "Wed, 29 Nov 2000 23:18:05 +0800 (HKT)" Message-ID: Lines: 11 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 29, 2000, Yung Kwong Wing wrote: > ./helpers/TestCompile: make: command not found Apparently, you don't have a `make' program. It's not part of GCC. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4182-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 13:11:24 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 19561 invoked by alias); 30 Nov 2000 13:11:20 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 19524 invoked from network); 30 Nov 2000 13:11:18 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 30 Nov 2000 13:11:18 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id FAA11164; Thu, 30 Nov 2000 05:10:52 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAUDAkk20099; Thu, 30 Nov 2000 11:10:46 -0200 To: Henry Kleynhans Cc: "'gcc-help@gcc.gnu.org'" Subject: Re: Compiling libstdc++ on Solaris 7. References: From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 30 Nov 2000 11:10:46 -0200 In-Reply-To: Henry Kleynhans's message of "Thu, 30 Nov 2000 12:11:06 +0200" Message-ID: Lines: 12 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 30, 2000, Henry Kleynhans wrote: > I've downloaded the gcc sources, but it seems that there is no > configure script in the libstdc++ directory. You want to build of GCC with this option, not just libstdc++. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4183-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 13:13:24 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 19772 invoked by alias); 30 Nov 2000 13:13:18 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 19736 invoked from network); 30 Nov 2000 13:13:17 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 30 Nov 2000 13:13:16 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id FAA11196; Thu, 30 Nov 2000 05:12:21 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAUDC7K20116; Thu, 30 Nov 2000 11:12:07 -0200 To: MiKiL Cc: gcc-help@gcc.gnu.org Subject: Re: upgrading from RH6.0 egcs to gcc References: From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 30 Nov 2000 11:12:07 -0200 In-Reply-To: MiKiL's message of "Thu, 30 Nov 2000 14:27:43 +0200 (EET)" Message-ID: Lines: 18 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 30, 2000, MiKiL wrote: > Is there any way keep old libstdc++ for older programs Well, just don't remove it. Older programs will keep finding it. > I tested compiling a program that links > libstdc++ but it linked both new and old libs for it.. :P Huh? Maybe you're linking with some other library that's already linked with the old version of libstdc++? In this case, you'll have to rebuild the library. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4184-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 13:38:31 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 26078 invoked by alias); 30 Nov 2000 13:38:30 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 26036 invoked from network); 30 Nov 2000 13:38:26 -0000 Received: from fencepost.gnu.org (199.232.76.164) by sourceware.cygnus.com with SMTP; 30 Nov 2000 13:38:26 -0000 Received: from [194.130.42.2] (helo=isgsrv3.hh.ffei.co.uk) by fencepost.gnu.org with smtp (Exim 3.16 #1 (Debian)) id 141Tuo-0004sU-00 for ; Thu, 30 Nov 2000 08:38:22 -0500 Received: from hhmail1.hh.ffei.co.uk (hhmail1.hh.ffei.co.uk [143.136.16.241]) by isgsrv3.hh.ffei.co.uk (8.9.1/8.9.1) with ESMTP id NAA04975 for ; Thu, 30 Nov 2000 13:37:51 GMT Received: by hhmail1.hh.ffei.co.uk with Internet Mail Service (5.5.2650.21) id ; Thu, 30 Nov 2000 13:37:50 -0000 Message-ID: <334D05460466D311A5E8009027AC7886016EA79E@hhmail1.hh.ffei.co.uk> From: Richard Clark To: help-gcc@gnu.org Subject: RE: I need some help with an stability analysis subroutine packag e (first part) Date: Thu, 30 Nov 2000 13:37:49 -0000 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2650.21) Content-Type: multipart/alternative; boundary="----_=_NextPart_001_01C05AD2.BB3CB9C8" This message is in MIME format. Since your mail reader does not understand this format, some or all of this message may not be legible. ------_=_NextPart_001_01C05AD2.BB3CB9C8 Content-Type: text/plain; charset="iso-8859-1" Sonia, This may not be much help, but a tool like Mathematica or MatLab, would probably make it much easier to do what you're trying to do. Richard -----Original Message----- From: Sonia Cortassa [mailto:intech@cpsarg.com] Sent: Thursday, November 30, 2000 12:59 PM To: help-gcc@gnu.org Subject: I need some help with an stability analysis subroutine package (first part) Hello! I am writing because I am currently using a software for continuation and bifurcation analysis in ordinary differential equations. Its name is AUTO and was created in 1986 by E. Doedle at Caltech. I must admit I am not a program developer, neither am I familiar with fortran 77 synthaxis. I am just able to run this software as a tool for my studies of models of biological systems. Some people have helped me to install this software in a GNU/Linux operating system that I am now using with g77. My specific question is the following: I need to use it to evaluate stability in a large model (11 variables) and the problem is that the output files only display the first six variables. I know it is computing all the eleven variables since in the unit where the eigen values are stored there are 11 of them but the units 6, 7, 8 and 9 where the actual value of the variables is printed does not display them all. My question is how can I modify the software, since I know it is able to deal with up to 25 variables, for it to display all the variables I need? Attached you'll find the source code of the preprocessor of the AUTO package called "AUTPRPD.F" and the subroutines library "AUTLIBD.F" (due to size reasons this file was divided in two files AUTLIBDa .F and AUTLIBDb.F this second file is attached to another message) Thank you very much in advance for your help Sonia Cortassa ############################################ Sonia Cortassa, PhD Instituto Tecnologico de Chascomus, Casilla Correo 164 7130 - Chascomus, Pvcia Buenos Aires Tel: 54 2241 424049 Fax: 54 2241 424048 E-mail: maaon@criba.edu.ar ############################################ ------_=_NextPart_001_01C05AD2.BB3CB9C8 Content-Type: text/html; charset="iso-8859-1"

Sonia,
This may not be much help, but a tool like Mathematica or MatLab, would probably make it much easier to do what you're trying to do.
 
Richard
-----Original Message-----
From: Sonia Cortassa [mailto:intech@cpsarg.com]
Sent: Thursday, November 30, 2000 12:59 PM
To: help-gcc@gnu.org
Subject: I need some help with an stability analysis subroutine package (first part)

Hello!
I am writing because I am currently using a software for continuation and bifurcation analysis in ordinary differential equations. Its name is AUTO and was created in 1986 by E. Doedle at Caltech. I must admit I am not a program developer, neither am I familiar with fortran 77 synthaxis. I am just able to run this software as a tool for my studies of models of biological systems. Some people have helped me to install this software in a GNU/Linux operating system that I am now using with g77.
My specific question is the following: I need to use it to evaluate stability in a large model (11 variables) and the problem is that the output files only display the first six variables. I know it is computing all the eleven variables since in the unit where the eigen values are stored there are 11 of them but the units 6, 7, 8 and 9 where the actual value of the variables is printed does not display them all. My question is how can I modify the software, since I know it is able to deal with up to 25 variables, for it to display all the variables I need?
Attached you'll find the source code of the preprocessor of the AUTO package called "AUTPRPD.F" and the subroutines library "AUTLIBD.F" (due to size reasons this file was divided in two files AUTLIBDa .F and AUTLIBDb.F this second file is attached to another message)
Thank you very much in advance for your help
Sonia Cortassa

############################################
Sonia Cortassa, PhD
Instituto Tecnologico de Chascomus,
Casilla Correo 164
7130 - Chascomus, Pvcia Buenos Aires

Tel: 54 2241 424049
Fax: 54 2241 424048

E-mail: maaon@criba.edu.ar
############################################

------_=_NextPart_001_01C05AD2.BB3CB9C8-- From gcc-help-return-4185-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 16:32:54 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 866 invoked by alias); 30 Nov 2000 16:32:53 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 763 invoked from network); 30 Nov 2000 16:32:47 -0000 Received: from pmesmtp02.wcom.com (199.249.20.2) by sourceware.cygnus.com with SMTP; 30 Nov 2000 16:32:47 -0000 Received: from CONVERSION-DAEMON by firewall.mcit.com (PMDF V5.2-32 #42257) id <0G4U00101J65BI@firewall.mcit.com>; Thu, 30 Nov 2000 16:30:06 +0000 (GMT) Received: from pmismtp04.wcomnet.com ([166.38.62.39]) by firewall.mcit.com (PMDF V5.2-32 #42257) with ESMTP id <0G4U00M7GJ656P@firewall.mcit.com>; Thu, 30 Nov 2000 16:30:05 +0000 (GMT) Received: from CONVERSION-DAEMON by pmismtp04.wcomnet.com (PMDF V5.2-33 #42258) id <0G4U00401IYKIH@pmismtp04.wcomnet.com>; Thu, 30 Nov 2000 16:25:38 +0000 (GMT) Received: from pmismtp04.wcomnet.com by pmismtp04.wcomnet.com (PMDF V5.2-33 #42258) with SMTP id <0G4U00401IYGI5@pmismtp04.wcomnet.com>; Thu, 30 Nov 2000 16:25:28 +0000 (GMT) Received: from wcom.com ([159.98.157.25]) by pmismtp04.wcomnet.com (PMDF V5.2-33 #42258) with ESMTP id <0G4U002ILIX29Z@pmismtp04.wcomnet.com>; Thu, 30 Nov 2000 16:24:44 +0000 (GMT) Date: Thu, 30 Nov 2000 10:31:42 -0600 From: Davy Durham Subject: Re: Why does this happen ?? Cc: "Koundinya.K" , gcc-help@gcc.gnu.org, gcc@gcc.gnu.org Message-id: <3A2680EE.D7EAC54B@wcom.com> Organization: WorldCom MIME-version: 1.0 X-Mailer: Mozilla 4.75 [en] (X11; U; Linux 2.2.17-21mdk i686) Content-type: text/plain; charset=us-ascii Content-transfer-encoding: 7bit X-Accept-Language: en References: <200011290950.PAA01391@madras.ddeorg.soft.net> Or better yet, for future coding: don't change the string literals if you don't have to.... There's surely an optimization that will eliminate duplicate string literals globally in the application.... so changing one string literal may change it for everything... It'd be better to change the line: char *s="Hello World"; to char s[]="Hello World"; this will make a stack array of 11+1 chars containing "Hello World" which you are free to modify and are ensured that no where else is that memory being used. Alexandre Oliva wrote: > On Nov 29, 2000, "Koundinya.K" wrote: > > > char *s="Hello World"; > > > When I compile this code with gcc, the resulting binary seg > > faults. > > GCC places string literals in read-only sections, unless you compile > with -fwritable-strings. If you had written `static char s[]="..."', > it wouldn't have crashed, because then s's storage would be the > string's storage, and it would be placed in read&write memory. > > -- > Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ > Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} > CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} > Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4186-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 17:15:57 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 17894 invoked by alias); 30 Nov 2000 17:15:57 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 17836 invoked from network); 30 Nov 2000 17:15:53 -0000 Received: from hamachi.synopsys.com (204.176.20.26) by sourceware.cygnus.com with SMTP; 30 Nov 2000 17:15:53 -0000 Received: from javelin.synopsys.com (javelin.synopsys.com [146.225.100.38]) by hamachi.synopsys.com (8.8.8/8.8.8) with ESMTP id JAA13434 for ; Thu, 30 Nov 2000 09:15:25 -0800 (PST) Received: from synopsys.com (cupertino [146.225.29.102]) by javelin.synopsys.com (8.8.8/8.8.8) with ESMTP id JAA14757 for ; Thu, 30 Nov 2000 09:15:24 -0800 (PST) Received: from forest.cupertino.synopsys.com (forest [146.225.20.149]) by synopsys.com (8.9.1b+Sun/8.9.1) with ESMTP id JAA01785 for ; Thu, 30 Nov 2000 09:15:24 -0800 (PST) Received: from forest by forest.cupertino.synopsys.com (8.8.8+Sun/SNPS-Sol2) id JAA02481; Thu, 30 Nov 2000 09:15:23 -0800 (PST) Message-Id: <200011301715.JAA02481@forest.cupertino.synopsys.com> Date: Thu, 30 Nov 2000 09:15:23 -0800 (PST) From: Venkata Ravella Reply-To: Venkata Ravella Subject: HP installation problem To: gcc-help@gcc.gnu.org MIME-Version: 1.0 Content-Type: TEXT/plain; charset=us-ascii Content-MD5: tdRW6RsCCUZjekCb+PqaKg== X-Mailer: dtmail 1.2.1 CDE Version 1.2.1 SunOS 5.6 sun4u sparc I am trying to compile gcc-2.95.2 on a HP-UX 10.20 machine. If I do not use --with gun-as option the compilation is fine. I am not able to compile with --with-gnu-as. The following are the errors I get: as: "/var/tmp/ccegFYua.s", line 33: error 1052: Directive name not recognized - STABS as: "/var/tmp/ccegFYua.s", line 34: error 1052: Directive name not recognized - STABS as: "/var/tmp/ccegFYua.s", line 35: error 1052: Directive name not recognized - STABS as: "/var/tmp/ccegFYua.s", line 36: error 1052: Directive name not recognized - STABS as: "/var/tmp/ccegFYua.s", line 38: error 1052: Directive name not recognized - NSUBSPA as: "/var/tmp/ccegFYua.s", line 39: error 1052: Directive name not recognized - STABS as: "/var/tmp/ccegFYua.s", line 41: error 1052: Directive name not recognized - STABN as: "/var/tmp/ccegFYua.s", line 49: error 1052: Directive name not recognized - STABN as: "/var/tmp/ccegFYua.s", line 50: error 1051: Illegal symbol in opcode position - : as: "/var/tmp/ccegFYua.s", line 58: error 1052: Directive name not recognized - STABS as: "/var/tmp/ccegFYua.s", line 60: error 1052: Directive name not recognized - NSUBSPA as: "/var/tmp/ccegFYua.s", line 61: error 1052: Directive name not recognized - STABS as: "/var/tmp/ccegFYua.s", line 62: error 1051: Illegal symbol in opcode position - : Please let me know what I can do. Thanks, Venkata Ravella. From gcc-help-return-4187-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 18:13:12 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 7655 invoked by alias); 30 Nov 2000 18:13:11 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 7586 invoked from network); 30 Nov 2000 18:13:10 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 30 Nov 2000 18:13:10 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id KAA05745; Thu, 30 Nov 2000 10:11:52 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAUIBb425438; Thu, 30 Nov 2000 16:11:37 -0200 To: Davy Durham Cc: "Koundinya.K" , gcc-help@gcc.gnu.org, gcc@gcc.gnu.org Subject: Re: Why does this happen ?? References: <200011290950.PAA01391@madras.ddeorg.soft.net> <3A2680EE.D7EAC54B@wcom.com> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 30 Nov 2000 16:11:37 -0200 In-Reply-To: Davy Durham's message of "Thu, 30 Nov 2000 10:31:42 -0600" Message-ID: Lines: 14 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 30, 2000, Davy Durham wrote: > char s[]="Hello World"; > this will make a stack array of 11+1 chars containing "Hello World" Initializing an automatic array isn't permitted in ISO C, unfortunately. GCC supports it as an extension. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4188-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 18:13:33 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 7896 invoked by alias); 30 Nov 2000 18:13:33 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 7858 invoked from network); 30 Nov 2000 18:13:33 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 30 Nov 2000 18:13:33 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id KAA05818; Thu, 30 Nov 2000 10:12:52 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAUICTk25462; Thu, 30 Nov 2000 16:12:29 -0200 To: Venkata Ravella Cc: gcc-help@gcc.gnu.org Subject: Re: HP installation problem References: <200011301715.JAA02481@forest.cupertino.synopsys.com> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 30 Nov 2000 16:12:29 -0200 In-Reply-To: Venkata Ravella's message of "Thu, 30 Nov 2000 09:15:23 -0800 (PST)" Message-ID: Lines: 13 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 30, 2000, Venkata Ravella wrote: > I am not able to compile with --with-gnu-as. You have to make sure GCC *is* using GNU as if you use this option. It clearly isn't. Check the FAQ for tips about how to make sure it finds the right assembler. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4189-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 18:50:46 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 22204 invoked by alias); 30 Nov 2000 18:50:45 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 22117 invoked from network); 30 Nov 2000 18:50:43 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 30 Nov 2000 18:50:43 -0000 Received: from cse.cygnus.com (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id KAA09632; Thu, 30 Nov 2000 10:47:21 -0800 (PST) From: Michael Meissner Received: (meissner@localhost) by cse.cygnus.com (8.8.8+Sun/8.6.4) id KAA11543; Thu, 30 Nov 2000 10:47:21 -0800 (PST) Message-ID: <20001130134720.43658@cse.cygnus.com> Date: Thu, 30 Nov 2000 13:47:20 -0500 To: Alexandre Oliva Cc: Davy Durham , "Koundinya.K" , gcc-help@gcc.gnu.org, gcc@gcc.gnu.org Subject: Re: Why does this happen ?? References: <200011290950.PAA01391@madras.ddeorg.soft.net> <3A2680EE.D7EAC54B@wcom.com> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Mailer: Mutt 0.84 In-Reply-To: ; from Alexandre Oliva on Thu, Nov 30, 2000 at 04:11:37PM -0200 On Thu, Nov 30, 2000 at 04:11:37PM -0200, Alexandre Oliva wrote: > On Nov 30, 2000, Davy Durham wrote: > > > char s[]="Hello World"; > > > this will make a stack array of 11+1 chars containing "Hello World" > > Initializing an automatic array isn't permitted in ISO C, > unfortunately. GCC supports it as an extension. You are thinking of pre-ISO compilers that only allow initialization of auto scalar members. ISC C89 (and presumably C99) does allow initialization of auto arrays and structures (though if you aren't going to modify it, you should declare it static to avoid having to do the copy at runtime). What is a GCC extension to C89 (I don't remember about C99) is an initialization to an array/struct that doesn't involve static members: int foo(int i){ auto struct bar { int a, int b; } s = { i, 0 }; } -- Michael Meissner, Red Hat, Inc. PMB 198, 174 Littleton Road #3, Westford, Massachusetts 01886, USA Work: meissner@redhat.com phone: +1 978-486-9304 Non-work: meissner@spectacle-pond.org fax: +1 978-692-4482 From gcc-help-return-4190-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 19:16:23 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 446 invoked by alias); 30 Nov 2000 19:16:23 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 364 invoked from network); 30 Nov 2000 19:16:22 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 30 Nov 2000 19:16:22 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id LAA12678; Thu, 30 Nov 2000 11:12:50 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAUJCPB30433; Thu, 30 Nov 2000 17:12:25 -0200 To: Michael Meissner Cc: Davy Durham , "Koundinya.K" , gcc-help@gcc.gnu.org, gcc@gcc.gnu.org Subject: Re: Why does this happen ?? References: <200011290950.PAA01391@madras.ddeorg.soft.net> <3A2680EE.D7EAC54B@wcom.com> <20001130134720.43658@cse.cygnus.com> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 30 Nov 2000 17:12:24 -0200 In-Reply-To: Michael Meissner's message of "Thu, 30 Nov 2000 13:47:20 -0500" Message-ID: Lines: 13 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 30, 2000, Michael Meissner wrote: > You are thinking of pre-ISO compilers that only allow initialization > of auto scalar members. Actually, I was thinking of variable-size arrays. Thanks for pointing out my mistake :-) -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me From gcc-help-return-4191-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 19:28:57 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 6215 invoked by alias); 30 Nov 2000 19:28:56 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 6134 invoked from network); 30 Nov 2000 19:28:51 -0000 Received: from imo-r07.mx.aol.com (152.163.225.7) by sourceware.cygnus.com with SMTP; 30 Nov 2000 19:28:51 -0000 Received: from AshCan@aol.com by imo-r07.mx.aol.com (mail_out_v28.34.) id r.b2.dd84303 (15700) for ; Thu, 30 Nov 2000 14:28:11 -0500 (EST) Received: from web49.aolmail.aol.com (web49.aolmail.aol.com [205.188.161.10]) by air-id05.mx.aol.com (v77.14) with ESMTP; Thu, 30 Nov 2000 14:28:11 -0500 Date: Thu, 30 Nov 2000 14:28:08 EST From: AshCan@aol.com Subject: gcc 2.95.2 build fails building jc1 To: Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 7bit X-Mailer: Unknown Message-ID: I am trying to build the latest arm-elf bin utilities, gcc, g++ under Linux RedHat 6.2. My Linux gcc is egcs-2.91.66. ---- To configure for binutils, I did: cd /opt/arm-tools/build-binutils /my-binutils-2.10.1-install-path/configure --target=arm-elf --prefix=/opt/arm-tools make No errors ---- To configure gcc, I did: cd /opt/arm-tools/build-gcc /my-gcc-2.95.2-install-path/configure --target=arm-elf --prefix=/opt/arm-tools ---- I get errors when the compiler attempts to build jc1. ---- I get the following error message. I don't even get any ld specific error. cd java; make "AR_FLAGS_FOR_TARGET=rc" "AR_FOR_TARGET=arm-elf-ar" "BISON=bison" "BISONFLAGS=" "CFLAGS=-g -O2" "CLIB=" "GCC_FOR_TARGET=/opt/arm-tools/build-gcc/gcc/xgcc -B/opt/arm-tools/build-gcc/gcc/ -B/usr/bin/arm-elf/bin/ -I/usr/bin/arm-elf/include" "LDFLAGS=" "LEX=flex" "LEXFLAGS=" "LN=ln" "LN_S=ln -s" "MAKEINFO=/opt/arm-tools/build-gcc/texinfo/makeinfo/makeinfo " "MAKEINFOFLAGS=" "RANLIB_FOR_TARGET=arm-elf-ranlib" "RANLIB_TEST_FOR_TARGET=[ -f arm-elf-ranlib ] || ( [ "i686-pc-linux-gnu" = "arm-unknown-elf" ] && [ -f /usr/bin/ranlib -o -f /bin/ranlib ] )" "SHELL=/bin/sh" "STAGE_PREFIX=" "exeext=" "build_exeext=" "objext=.o" "exec_prefix=/usr/bin" "prefix=/opt/arm-tools" "local_prefix=/usr/local" "gxx_include_dir=/usr/bin/lib/gcc-lib/arm-elf/2.95.2/../../../..`echo /usr/bin | sed -e 's|^/opt/arm-tools||' -e 's|/[^/]*|/..|g'`/include/g++-3" "tooldir=/usr/bin/arm-elf" "gcc_tooldir=/usr/bin/lib/gcc-lib/arm-elf/2.95.2/../../../`echo /usr/bin | sed -e 's|^/opt/arm-tools||' -e 's|/! $||' -e 's|^[^/]|/|' -e 's|/[^/] *|../|g'`arm-elf" "bindir=/usr/bin/bin" "libsubdir=/usr/bin/lib/gcc-lib/arm-elf/2.95.2" "datadir=/opt/arm-tools/share" "distdir=../tmp/\$(subdir)" "localedir=/opt/arm-tools/share/locale" "CC=gcc" "JAVA_FOR_BUILD=" "JAVAFLAGS=" "JAVA_FOR_TARGET=" ../jc1 make[2]: Entering directory `/opt/arm-tools/build-gcc/gcc/java' rm -f ../jc1 gcc -DIN_GCC -g -O2 -o ../jc1 \ parse.o class.o decl.o expr.o constants.o lang.o typeck.o except.o verify.o zextract.o jcf-io.o jcf-parse.o mangle.o jcf-write.o buffer.o check-init.o jcf-depend.o jcf-path.o xref.o `cat ../stamp-objlist` `if [ xobstack.o != x ]; then echo ../obstack.o; else true; fi` ../../libiberty/libiberty.a collect2: ld returned 1 exit status make[2]: *** [../jc1] Error 1 make[2]: Leaving directory `/opt/arm-tools/build-gcc/gcc/java' make[1]: *** [jc1] Error 2 make[1]: Leaving directory `/opt/arm-tools/build-gcc/gcc' make: *** [all-gcc] Error 2 From gcc-help-return-4192-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 21:36:39 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 785 invoked by alias); 30 Nov 2000 21:36:38 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 741 invoked from network); 30 Nov 2000 21:36:37 -0000 Received: from gatekeeper.qms.com (161.33.3.1) by sourceware.cygnus.com with SMTP; 30 Nov 2000 21:36:37 -0000 Received: (qmail 8313 invoked from network); 30 Nov 2000 21:36:34 -0000 Received: from sun470.qms.com (HELO sun470.rd.qms.com) (161.33.128.1) by 161.33.254.2 with SMTP; 30 Nov 2000 21:36:34 -0000 Received: from boulder.qms.com by sun470.rd.qms.com (SMI-8.6/SMI-4.1) id PAA26764; Thu, 30 Nov 2000 15:36:32 -0600 Received: from boulder.qms.com by boulder.qms.com (SMI-8.6/37-42) id OAA11756; Thu, 30 Nov 2000 14:36:28 -0700 Message-ID: <3A26C85E.A8094D1D@boulder.qms.com> Date: Thu, 30 Nov 2000 14:36:30 -0700 From: Darrell Bellert X-Mailer: Mozilla 4.75 [en] (X11; U; Linux 2.2.16-22 i686) X-Accept-Language: en MIME-Version: 1.0 To: gcc-help@gcc.gnu.org Subject: Issues in building i686 to mips cross compiler Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Hello, I have a couple of concerns in creating a mips-ecoff cross compiler on RedHat 7.0 that I was hoping someone could address. First, however, here is the script I used (modeled after section 4.1 of the FAQ) in order to create the compiler: ------------------------------------------------------------------------------------------------------------------------------------- #!/bin/sh ######################################################################################################## #Script to create a cross compiler ######################################################################################################## #<<<<<------------------------- VARIABLES -------------------------->>>>> ############################################ ##### VERSIONS OF UTILITIES TO INSTALL ##### ############################################ BINUTILS=binutils-2.10.1 # Name of bin-utils directory GCC=gcc-2.95.2 # Name of gcc directory NEWLIB=newlib-1.8.2 # Name of newlib directory GDB=gdb-5.0 # Name of gdb directory ################################### ##### INSTALLATION PARAMETERS ##### ################################### HOST=i686-pc-linux-gnu # Host machine (machine where you are building the compiler) TARGET=mips-ecoff # Target machine (machine for which the compiler will generate code) PREFIX=/pika/dbellert/MIPS2 # Root directory for compiler HEADERS=`pwd`/Include # Target machine header files LIBS=`pwd`/Lib # Target machine libraries CC=/usr/bin/gcc # A working C compiler #<<<<<------------------------- PROCEDURE -------------------------->>>>> ########################################################### ##### THROW IN SOME BLANK SPACE TO DELINEATE SECTIONS ##### ########################################################### delineate(){ echo echo echo echo $1 echo "<--------------------------------------------------------------------------------->" echo echo echo } ################################################# ##### REPORT A CONFIGURATION ERROR AND EXIT ##### ################################################# config_err(){ echo echo echo "Error configuring $1" exit } ######################################## ##### REPORT A MAKE ERROR AND EXIT ##### ######################################## make_err(){ echo echo echo "Error making $1" exit } ############################################### ##### PROCEDURE FOR MAKING CROSS COMPILER ##### ############################################### export CC PATH=$PATH:$PREFIX/bin for i in build-binutils build-gcc build-newlib build-gdb do if [[ -d $i ]] then rm -r $i fi mkdir $i done cd build-binutils delineate "CONFIGURING BINUTILS" ../$BINUTILS/configure --host=$HOST --target=$TARGET --prefix=$PREFIX -v || config_err BINUTILS delineate "MAKING BINUTILS" make all install || make_err BINUTILS cd ../build-gcc delineate "CONFIGURING GCC" ../$GCC/configure --host=$HOST --target=$TARGET --prefix=$PREFIX -v --with-headers=$HEADERS --with-libs=$LIBS --with-gnu-as --with-gnu-ld --with-newlib || config_err GCC delineate "MAKING GCC" make all install || make_err GCC cd ../build-newlib delineate "CONFIGURING NEWLIB" ../$NEWLIB/configure --host=$HOST --target=$TARGET --prefix=$PREFIX -v || config_err NEWLIB delineate "MAKING NEWLIB" make all install || make_err NEWLIB cd ../build-gdb delineate "CONFIGURING GDB" ../$GDB/configure --target=$TARGET --prefix=$PREFIX -v || config_err GDB delineate "MAKING GDB" make all install || make_err GDB -------------------------------------------------------------------------------------------------------------------------------------------------------- Here are my concerns: (1) In order for GCC to build correctly, I had to setup the PATH variable to include $PREFIX/bin. Without doing this, I would get an error: /bin/sh: mips-ecoff-ar: command not found The reason for this concern is that the FAQ does not mention modifying the PATH variable until you get to NEWLIB. I just wanted to make sure that modifying my path did not have any adverse effects that are not obvious. Any thoughts? (2) I got three errors while making GCC: make[3]: Entering directory `/pika/dbellert/Stuff6/build-gcc/mips-ecoff/libstdc++/testsuite' make[3]: Leaving directory `/pika/dbellert/Stuff6/build-gcc/mips-ecoff/libstdc++/testsuite' make[2]: Leaving directory `/pika/dbellert/Stuff6/build-gcc/mips-ecoff/libstdc++' make[1]: Leaving directory `/pika/dbellert/Stuff6/build-gcc/mips-ecoff/libstdc++' Configuring in mips-ecoff/libf2c creating cache ./config.cache checking if compiler f771 has been built... yes checking for gcc... /home/dbellert/Stuff6/build-gcc/gcc/xgcc -B/home/dbellert/Stuff6/build-gcc/gcc/ -B/home/dbellert/Stuff6/Build/mips-ecoff/bin/ checking whether the C compiler (/home/dbellert/Stuff6/build-gcc/gcc/xgcc -B/home/dbellert/Stuff6/build-gcc/gcc/ -B/home/dbellert/Stuff6/Build/mips-ecoff/bin/ -g -O2 ) works... no configure: error: installation or configuration problem: C compiler cannot create executables. Configuring in mips-ecoff/libchill creating cache ./config.cache checking if compiler cc1chill has been built... yes checking for gcc... /home/dbellert/Stuff6/build-gcc/gcc/xgcc -B/home/dbellert/Stuff6/build-gcc/gcc/ -B/home/dbellert/Stuff6/Build/mips-ecoff/bin/ checking whether the C compiler (/home/dbellert/Stuff6/build-gcc/gcc/xgcc -B/home/dbellert/Stuff6/build-gcc/gcc/ -B/home/dbellert/Stuff6/Build/mips-ecoff/bin/ -g -O2 ) works... no configure: error: installation or configuration problem: C compiler cannot create executables. Configuring in mips-ecoff/libobjc creating cache ./config.cache checking if compiler cc1obj has been built... yes checking for gcc... /home/dbellert/Stuff6/build-gcc/gcc/xgcc -B/home/dbellert/Stuff6/build-gcc/gcc/ -B/home/dbellert/Stuff6/Build/mips-ecoff/bin/ checking whether the C compiler (/home/dbellert/Stuff6/build-gcc/gcc/xgcc -B/home/dbellert/Stuff6/build-gcc/gcc/ -B/home/dbellert/Stuff6/Build/mips-ecoff/bin/ -g -O2 ) works... no configure: error: installation or configuration problem: C compiler cannot create executables. /bin/sh ../gcc-2.95.2/mkinstalldirs /home/dbellert/Stuff6/Build /home/dbellert/Stuff6/Build Even though installation ultimately completed, is there any reason for concern for the above errors (configure: error: installation or configuration problem: C compiler cannot create executables.)? (3) I got numerous warnings during the make process (about 4300). Is this normal or should this also be a cause for concern? If anyone has any comments for these concerns, please share. Thanks, Darrell From gcc-help-return-4193-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 21:40:33 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 2187 invoked by alias); 30 Nov 2000 21:40:32 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 2167 invoked from network); 30 Nov 2000 21:40:30 -0000 Received: from mail.moene.indiv.nluug.nl (HELO moene.indiv.nluug.nl) (mail@195.109.255.217) by sourceware.cygnus.com with SMTP; 30 Nov 2000 21:40:30 -0000 Received: from localhost (moene.indiv.nluug.nl) [127.0.0.1] (toon) by moene.indiv.nluug.nl with esmtp (Exim 2.05 #1 (Debian)) id 141apt-0003Dr-00; Thu, 30 Nov 2000 22:01:45 +0100 Message-ID: <3A26C037.59A39F30@moene.indiv.nluug.nl> Date: Thu, 30 Nov 2000 22:01:43 +0100 From: Toon Moene Organization: Moene Computational Physics, Maartensdijk, The Netherlands X-Mailer: Mozilla 4.07 [en] (X11; I; Linux 2.2.12 i686) MIME-Version: 1.0 To: vijaykumar CC: gnu Subject: Re: f90 compilation on Ultra5 References: <3A25C8C3.BEBC8CE6@mcs.ipc.ibaraki.ac.jp> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit vijaykumar wrote: > I have some fortran library archives compiled on Sun Ultra4 (older > verstion of f90 compiler) > and which are to be ported on to a new version of f90 compiler on Sun > Ultra5 > work staion. > On compilation it gives errors "undefined symbol" > > Is there anyway I can overcome this.... Note that you sent this message to the gcc-help mailing list, which is meant to provide help on issues with compilers in the GNU Compiler Collection. However, there's no GNU Fortran 90 compiler (yet), so your problem must be with a compiler from someone else. Please try to determine your Fortran 90 compiler supplier and contact their help mailing list. Hope this helps, -- Toon Moene - mailto:toon@moene.indiv.nluug.nl - phoneto: +31 346 214290 Saturnushof 14, 3738 XG Maartensdijk, The Netherlands GNU Fortran 77: http://gcc.gnu.org/onlinedocs/g77_news.html GNU Fortran 95: http://g95.sourceforge.net/ (under construction) From gcc-help-return-4194-listarch-gcc-help=gcc.gnu.org@gcc.gnu.org Thu Nov 30 22:03:31 2000 Return-Path: Delivered-To: listarch-gcc-help@gcc.gnu.org Received: (qmail 12740 invoked by alias); 30 Nov 2000 22:03:30 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Delivered-To: mailing list gcc-help@gcc.gnu.org Received: (qmail 12704 invoked from network); 30 Nov 2000 22:03:29 -0000 Received: from runyon.cygnus.com (HELO cygnus.com) (205.180.230.5) by sourceware.cygnus.com with SMTP; 30 Nov 2000 22:03:29 -0000 Received: from guarana.lsd.ic.unicamp.br (cse.cygnus.com [205.180.230.236]) by runyon.cygnus.com (8.8.7-cygnus/8.8.7) with ESMTP id OAA01184; Thu, 30 Nov 2000 14:03:24 -0800 (PST) Received: (from aoliva@localhost) by guarana.lsd.ic.unicamp.br (8.11.0/8.11.0) id eAUM3Ls07803; Thu, 30 Nov 2000 20:03:21 -0200 To: Darrell Bellert Cc: gcc-help@gcc.gnu.org Subject: Re: Issues in building i686 to mips cross compiler References: <3A26C85E.A8094D1D@boulder.qms.com> From: Alexandre Oliva Organization: GCC Team, Red Hat Date: 30 Nov 2000 20:03:20 -0200 In-Reply-To: Darrell Bellert's message of "Thu, 30 Nov 2000 14:36:30 -0700" Message-ID: Lines: 37 User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.1 (Channel Islands) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii On Nov 30, 2000, Darrell Bellert wrote: > The reason for this concern is that the FAQ does not mention modifying > the PATH variable until you get to NEWLIB. I just wanted to make sure > that modifying my path did not have any adverse effects that are not > obvious. Any thoughts? It doesn't have any adverse effects and, indeed, it is necessary. > (2) I got three errors while making GCC: > -B/home/dbellert/Stuff6/Build/mips-ecoff/bin/ -g -O2 ) works... no > configure: error: installation or configuration problem: C compiler > cannot create executables. You must build newlib before other target libraries that depend on a fully-working C compiler. The easiest way to accomplish this is to use the unified tree, as recommended in the Cross GCC FAQ. The hard way is to build just `all-gcc', then proceed to building newlib, then go back and make `all-target'. > Even though installation ultimately completed, is there any reason for > concern for the above errors (configure: error: installation or > configuration problem: C compiler cannot create executables.)? Only if you want support for languages other than C. > (3) I got numerous warnings during the make process (about 4300). Is > this normal or should this also be a cause for concern? It's normal. -- Alexandre Oliva Enjoy Guarana', see http://www.ic.unicamp.br/~oliva/ Red Hat GCC Developer aoliva@{cygnus.com, redhat.com} CS PhD student at IC-Unicamp oliva@{lsd.ic.unicamp.br, gnu.org} Free Software Evangelist *Please* write to mailing lists, not to me