From owner-sc22wg5+sc22wg5-dom8=www.open-std.org@open-std.org  Fri Aug 11 16:00:15 2017
Return-Path: <owner-sc22wg5+sc22wg5-dom8=www.open-std.org@open-std.org>
X-Original-To: sc22wg5-dom8
Delivered-To: sc22wg5-dom8@www.open-std.org
Received: by www.open-std.org (Postfix, from userid 521)
	id 182AA3588A7; Fri, 11 Aug 2017 16:00:15 +0200 (CEST)
Delivered-To: sc22wg5@open-std.org
X-Greylist: delayed 415 seconds by postgrey-1.34 at www5.open-std.org; Fri, 11 Aug 2017 16:00:14 CEST
Received: from postout1.mail.lrz.de (postout1.mail.lrz.de [129.187.255.137])
	(using TLSv1 with cipher ADH-AES256-SHA (256/256 bits))
	(No client certificate requested)
	by www.open-std.org (Postfix) with ESMTP id CD5673585D8
	for <sc22wg5@open-std.org>; Fri, 11 Aug 2017 16:00:14 +0200 (CEST)
Received: from lxmhs51.srv.lrz.de (localhost [127.0.0.1])
	by postout1.mail.lrz.de (Postfix) with ESMTP id 3xTRKn603szyWl
	for <sc22wg5@open-std.org>; Fri, 11 Aug 2017 15:53:17 +0200 (CEST)
Authentication-Results: postout.lrz.de (amavisd-new); dkim=pass (2048-bit key)
	reason="pass (just generated, assumed good)" header.d=lrz.de
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=lrz.de; h=
	mime-version:content-type:content-type:content-language
	:accept-language:message-id:date:date:subject:subject:from:from
	:received:received:received:received; s=postout; t=1502459597;
	 bh=W45NF5wd3sc9PIDal6uFkrZMAeOvITDZHVGWmVsEF1Y=; b=FoM7s6zLzkyd
	xzAA4Xd6de7vjI9F8vHoMyOlrxJvCbCl4PFIYpdEv/BKcIx22Ri0z+Tk5omEvGT2
	neWwuMKyfX9jmin6ShaxY8kyA11LiD+SK6Ps1yZO58wrmnWQ0LXUVcl1dLVWau5g
	gKD7UeZLrtMoj6DHCp1z344HEUQ1urPdUFz5IJSninUfvhSuJ05rMMXH740FUY6Q
	stShCj3sKNZ6gp7t/V9LyLlsqrGHSw2B7hpsQhEfwCf8X2c7xHfQBx+YGDNbvIEx
	8aLgIL3MDtwISsl/cNoE22PjG3Vrm9Rke6hpv28eGz3rieYdefrToE8SjYLErbbP
	tXE50M+Myg==
X-Virus-Scanned: by amavisd-new at lrz.de in lxmhs51.srv.lrz.de
X-Spam-Flag: NO
X-Spam-Score: -2.877
X-Spam-Level:
X-Spam-Status: No, score=-2.877 tagged_above=-999 required=5
	tests=[ALL_TRUSTED=-1, BAYES_00=-1.9, HTML_MESSAGE=0.001,
	LRZ_BND_MS=0.001, LRZ_DATE_TZ_0000=0.001, LRZ_DKIM_DESTROY_MTA=0.001,
	LRZ_DMARC_LRZ_FAIL=0.001, LRZ_DMARC_OVERWRITE=0.001,
	LRZ_ENVFROM_FROM_ALIGNED_STRICT=0.001, LRZ_ENVFROM_FROM_MATCH=0.001,
	LRZ_ENVFROM_LRZ_S=0.001, LRZ_FROM_AP_PHRASE=0.001,
	LRZ_FROM_HOSTED_DOMAIN=0.001, LRZ_FROM_LRZ_S=0.001,
	LRZ_FROM_PHRASE=0.001, LRZ_FROM_PRE_SUR_ADDR=0.001,
	LRZ_FWD_MS_EX=0.001, LRZ_HAS_BND=0.001, LRZ_HAS_CLANG=0.001,
	LRZ_HAS_THREAD_INDEX=0.001, LRZ_HAS_X_ORIG_IP=0.001,
	LRZ_MSGID_HL32=0.001, LRZ_RCVD_BADWLRZ_EXCH=0.001,
	LRZ_RCVD_MS_EX=0.001, SPF_HELO_NONE=0.001]
	autolearn=no autolearn_force=no
Received: from postout1.mail.lrz.de ([127.0.0.1])
	by lxmhs51.srv.lrz.de (lxmhs51.srv.lrz.de [127.0.0.1]) (amavisd-new, port 20024)
	with LMTP id LBiDg2MdHWXu for <sc22wg5@open-std.org>;
	Fri, 11 Aug 2017 15:53:17 +0200 (CEST)
Received: from BADWLRZ-SWMBX11.ads.mwn.de (BADWLRZ-SWMBX11.ads.mwn.de [IPv6:2001:4ca0:0:108::167])
	(using TLSv1.2 with cipher ECDHE-RSA-AES256-SHA384 (256/256 bits))
	(Client CN "BADWLRZ-SWMBX11", Issuer "BADWLRZ-SWMBX11" (not verified))
	by postout1.mail.lrz.de (Postfix) with ESMTPS id 3xTRKn3qP6zyVc
	for <sc22wg5@open-std.org>; Fri, 11 Aug 2017 15:53:17 +0200 (CEST)
Received: from BADWLRZ-SWMBX05.ads.mwn.de (2001:4ca0:0:108::161) by
 BADWLRZ-SWMBX11.ads.mwn.de (2001:4ca0:0:108::167) with Microsoft SMTP Server
 (version=TLS1_2, cipher=TLS_ECDHE_RSA_WITH_AES_256_CBC_SHA384_P256) id
 15.1.845.34; Fri, 11 Aug 2017 15:53:17 +0200
Received: from BADWLRZ-SWMBX05.ads.mwn.de ([fe80::4095:4fb3:50be:d2bd]) by
 BADWLRZ-SWMBX05.ads.mwn.de ([fe80::4095:4fb3:50be:d2bd%12]) with mapi id
 15.01.0845.036; Fri, 11 Aug 2017 15:53:17 +0200
From: "Bader, Reinhold" <Reinhold.Bader@lrz.de>
To: WG5 <sc22wg5@open-std.org>
Subject: cobounds inside a CHANGE TEAM
Thread-Topic: cobounds inside a CHANGE TEAM
Thread-Index: AdMSp5Xw67E7ofmsRHKF/fKMU6tamQ==
Date: Fri, 11 Aug 2017 13:53:17 +0000
Message-ID: <5b53f1fd60854b0b86bee50a84e53016@lrz.de>
Accept-Language: de-DE, en-US
Content-Language: de-DE
X-MS-Has-Attach: yes
X-MS-TNEF-Correlator:
x-originating-ip: [2001:4ca0:0:f000:41fb:ba47:625d:d514]
Content-Type: multipart/signed; protocol="application/x-pkcs7-signature";
	micalg=SHA1; boundary="----=_NextPart_000_0017_01D312B9.F0A2D7D0"
MIME-Version: 1.0
Sender: owner-sc22wg5@open-std.org
Precedence: bulk

------=_NextPart_000_0017_01D312B9.F0A2D7D0
Content-Type: multipart/alternative;
	boundary="----=_NextPart_001_0018_01D312B9.F0A2D7D0"


------=_NextPart_001_0018_01D312B9.F0A2D7D0
Content-Type: text/plain;
	charset="us-ascii"
Content-Transfer-Encoding: 7bit

Dear J3/WG5,

 

consider the following code:

 

PROGRAM co

  INTEGER :: ic[2:*]

  INTEGER :: mt

  TYPE(team_type) :: t

  

  mt = ... ! determine which team the image belongs to

  FORM TEAM ( mt, t )

  CHANGE TEAM ( t )

      WRITE(*,*)  LCOBOUND(ic, 1)

  END TEAM

END PROGRAM

 

Based on TS 18508 (N2074) [10:29-30], I would expect that all images print
"2". However, this edit was rejected (see 16-176r1), and I have not been
able to 

deduce this result from the current draft. Is something missing here? 

 

Regards

Reinhold


------=_NextPart_001_0018_01D312B9.F0A2D7D0
Content-Type: text/html;
	charset="us-ascii"
Content-Transfer-Encoding: quoted-printable

<html xmlns:v=3D"urn:schemas-microsoft-com:vml" =
xmlns:o=3D"urn:schemas-microsoft-com:office:office" =
xmlns:w=3D"urn:schemas-microsoft-com:office:word" =
xmlns:m=3D"http://schemas.microsoft.com/office/2004/12/omml" =
xmlns=3D"http://www.w3.org/TR/REC-html40"><head><META =
HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; =
charset=3Dus-ascii"><meta name=3DGenerator content=3D"Microsoft Word 15 =
(filtered medium)"><style><!--
/* Font Definitions */
@font-face
	{font-family:"Cambria Math";
	panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
	{font-family:Calibri;
	panose-1:2 15 5 2 2 2 4 3 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
	{margin:0cm;
	margin-bottom:.0001pt;
	font-size:11.0pt;
	font-family:"Calibri",sans-serif;
	mso-fareast-language:EN-US;}
a:link, span.MsoHyperlink
	{mso-style-priority:99;
	color:#0563C1;
	text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
	{mso-style-priority:99;
	color:#954F72;
	text-decoration:underline;}
span.E-MailFormatvorlage17
	{mso-style-type:personal-compose;
	font-family:"Calibri",sans-serif;
	color:windowtext;}
.MsoChpDefault
	{mso-style-type:export-only;
	font-family:"Calibri",sans-serif;
	mso-fareast-language:EN-US;}
@page WordSection1
	{size:612.0pt 792.0pt;
	margin:70.85pt 70.85pt 2.0cm 70.85pt;}
div.WordSection1
	{page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext=3D"edit" spidmax=3D"1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext=3D"edit">
<o:idmap v:ext=3D"edit" data=3D"1" />
</o:shapelayout></xml><![endif]--></head><body lang=3DDE =
link=3D"#0563C1" vlink=3D"#954F72"><div class=3DWordSection1><p =
class=3DMsoNormal>Dear J3/WG5,<o:p></o:p></p><p =
class=3DMsoNormal><o:p>&nbsp;</o:p></p><p class=3DMsoNormal>consider the =
following code:<o:p></o:p></p><p =
class=3DMsoNormal><o:p>&nbsp;</o:p></p><p class=3DMsoNormal>PROGRAM =
co<o:p></o:p></p><p class=3DMsoNormal><span lang=3DEN-US>&nbsp; INTEGER =
:: ic[2:*]<o:p></o:p></span></p><p class=3DMsoNormal><span =
lang=3DEN-US>&nbsp; INTEGER :: mt<o:p></o:p></span></p><p =
class=3DMsoNormal><span lang=3DEN-US>&nbsp; TYPE(team_type) :: =
t<o:p></o:p></span></p><p class=3DMsoNormal><span lang=3DEN-US>&nbsp; =
<o:p></o:p></span></p><p class=3DMsoNormal><span =
lang=3DEN-US>&nbsp;&nbsp;mt =3D ... ! determine which team the image =
belongs to<o:p></o:p></span></p><p class=3DMsoNormal>&nbsp; FORM TEAM ( =
mt, t )<o:p></o:p></p><p class=3DMsoNormal>&nbsp; CHANGE TEAM ( t =
)<o:p></o:p></p><p class=3DMsoNormal><span =
lang=3DEN-US>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; WRITE(*,*)&nbsp; =
LCOBOUND(ic, 1)<o:p></o:p></span></p><p class=3DMsoNormal><span =
lang=3DEN-US>&nbsp; END TEAM<o:p></o:p></span></p><p =
class=3DMsoNormal><span lang=3DEN-US>END PROGRAM<o:p></o:p></span></p><p =
class=3DMsoNormal><span lang=3DEN-US><o:p>&nbsp;</o:p></span></p><p =
class=3DMsoNormal><span lang=3DEN-US>Based on TS 18508 (N2074) =
[10:29-30], I would expect that all images print &quot;2&quot;. However, =
this edit was rejected (see 16-176r1), and I have not been able to =
<o:p></o:p></span></p><p class=3DMsoNormal><span lang=3DEN-US>deduce =
this result from the current draft. Is something missing here? =
<o:p></o:p></span></p><p class=3DMsoNormal><span =
lang=3DEN-US><o:p>&nbsp;</o:p></span></p><p class=3DMsoNormal><span =
lang=3DEN-US>Regards<o:p></o:p></span></p><p class=3DMsoNormal><span =
lang=3DEN-US>Reinhold</span><o:p></o:p></p></div></body></html>
------=_NextPart_001_0018_01D312B9.F0A2D7D0--

------=_NextPart_000_0017_01D312B9.F0A2D7D0
Content-Type: application/pkcs7-signature; name="smime.p7s"
Content-Transfer-Encoding: base64
Content-Disposition: attachment; filename="smime.p7s"

MIAGCSqGSIb3DQEHAqCAMIACAQExCzAJBgUrDgMCGgUAMIAGCSqGSIb3DQEHAQAAoIIZ/DCCA58w
ggKHoAMCAQICASYwDQYJKoZIhvcNAQEFBQAwcTELMAkGA1UEBhMCREUxHDAaBgNVBAoTE0RldXRz
Y2hlIFRlbGVrb20gQUcxHzAdBgNVBAsTFlQtVGVsZVNlYyBUcnVzdCBDZW50ZXIxIzAhBgNVBAMT
GkRldXRzY2hlIFRlbGVrb20gUm9vdCBDQSAyMB4XDTk5MDcwOTEyMTEwMFoXDTE5MDcwOTIzNTkw
MFowcTELMAkGA1UEBhMCREUxHDAaBgNVBAoTE0RldXRzY2hlIFRlbGVrb20gQUcxHzAdBgNVBAsT
FlQtVGVsZVNlYyBUcnVzdCBDZW50ZXIxIzAhBgNVBAMTGkRldXRzY2hlIFRlbGVrb20gUm9vdCBD
QSAyMIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAqwujNeCLKRSxFIWvPBDkOW81XUqu
3ephjZVJ9G9koxpgZqSpQCKE2dSl5XiTDmgBrblNXDrO07ioQkDfz6O6gllqkhusHJraCCslJ/lp
I0fx4Ossepv1EwLQfjR8wp48AFmr9doM9TI8K6xQ2tbD3oOUyqgMmTIOCEhWW2r72uFYWAFJX3JB
PBUGAY5draq4k7TNnuun6GotUjTbOu9cdVHa2/Mx+e5xmDLEVBVEDPmbVe2t3xgIoKOGiknuUwWP
GUzV3lh5m9JqHEKrxdWnz2gPluThYZh2YciRfNY+AOKRUIfhnQrmrZfSHcY6fcu82gM01Y5bAfVq
B7cWtm5KfwIDAQABo0IwQDAdBgNVHQ4EFgQUMcN5G7r1U9cX4Il6LRdsCrMrnTMwDwYDVR0TBAgw
BgEB/wIBBTAOBgNVHQ8BAf8EBAMCAQYwDQYJKoZIhvcNAQEFBQADggEBAJRkWa05ZOcp6xP+WsOL
E1fIBCTwdHfAYONn++mJpoO/loJ8btTDPe+egG67KbSYerE7VOs5F0d+Go4L/B8xWTEEss4X8yzH
YjZV4iLYiVW0mEiqZPrWHDbYRHhaWiM6V5f1ejBPrp9qTEsrjqAD4z7gqdTSe9KzqOJyPK2e/4BZ
5JtFtPY7sM05GZgy5eohYZDkMSGONLH3LzVKhRDa54o3Ib5ZY+DyhYgxU9RUFIVwefQuBncndS8f
uIr5/sW62Dbkg+znZbe/Y1rzRq+BlDfUQYzWI9Yez/VoG0Rjolq6pzVZoeVwBZsOI1eZlAptujlj
KIaS8xiE2PvRzwVWZFcwggUSMIID+qADAgECAgkA4wvV+K8l2YEwDQYJKoZIhvcNAQELBQAwgYIx
CzAJBgNVBAYTAkRFMSswKQYDVQQKDCJULVN5c3RlbXMgRW50ZXJwcmlzZSBTZXJ2aWNlcyBHbWJI
MR8wHQYDVQQLDBZULVN5c3RlbXMgVHJ1c3QgQ2VudGVyMSUwIwYDVQQDDBxULVRlbGVTZWMgR2xv
YmFsUm9vdCBDbGFzcyAyMB4XDTE2MDIyMjEzMzgyMloXDTMxMDIyMjIzNTk1OVowgZUxCzAJBgNV
BAYTAkRFMUUwQwYDVQQKEzxWZXJlaW4genVyIEZvZXJkZXJ1bmcgZWluZXMgRGV1dHNjaGVuIEZv
cnNjaHVuZ3NuZXR6ZXMgZS4gVi4xEDAOBgNVBAsTB0RGTi1QS0kxLTArBgNVBAMTJERGTi1WZXJl
aW4gQ2VydGlmaWNhdGlvbiBBdXRob3JpdHkgMjCCASIwDQYJKoZIhvcNAQEBBQADggEPADCCAQoC
ggEBAMtg1/9moUHN0vqHl4pzq5lN6mc5WqFggEcVToyVsuXPztNXS43O+FZsFVV2B+pG/cgDRWM+
cNSrVICxI5y+NyipCf8FXRgPxJiZN7Mg9mZ4F4fCnQ7MSjLnFp2uDo0peQcAIFTcFV9Kltd4tjTT
wXS1nem/wHdN6r1ZB+BaL2w8pQDcNb1lDY9/Mm3yWmpLYgHurDg0WUU2SQXaeMpqbVvAgWsRzNI8
qIv4cRrKO+KA3Ra0Z3qLNupOkSk9s1FcragMvp0049ENF4N1xDkesJQLEvHVaY4l9Lg9K7/AjsMe
O6W/VRCrKq4Xl14zzsjz9AkH4wKGMUZrAcUQDBHHWekCAwEAAaOCAXQwggFwMA4GA1UdDwEB/wQE
AwIBBjAdBgNVHQ4EFgQUk+PYMiba1fFKpZFK4OpL4qIMz+EwHwYDVR0jBBgwFoAUv1kgNgB5oKAi
a4zV8mHSuCzLgkowEgYDVR0TAQH/BAgwBgEB/wIBAjAzBgNVHSAELDAqMA8GDSsGAQQBga0hgiwB
AQQwDQYLKwYBBAGBrSGCLB4wCAYGZ4EMAQICMEwGA1UdHwRFMEMwQaA/oD2GO2h0dHA6Ly9wa2kw
MzM2LnRlbGVzZWMuZGUvcmwvVGVsZVNlY19HbG9iYWxSb290X0NsYXNzXzIuY3JsMIGGBggrBgEF
BQcBAQR6MHgwLAYIKwYBBQUHMAGGIGh0dHA6Ly9vY3NwMDMzNi50ZWxlc2VjLmRlL29jc3ByMEgG
CCsGAQUFBzAChjxodHRwOi8vcGtpMDMzNi50ZWxlc2VjLmRlL2NydC9UZWxlU2VjX0dsb2JhbFJv
b3RfQ2xhc3NfMi5jZXIwDQYJKoZIhvcNAQELBQADggEBAIcL/z4Cm2XIVi3WO5qYi3FP2ropqiH5
Ri71sqQPrhE4eTizDnS6dl2e6BiClmLbTDPo3flq3zK9LExHYFV/53RrtCyD2HlrtrdNUAtmB7Xt
s5et6u5/MOaZ/SLick0+hFvu+c+Z6n/XUjkurJgARH5pO7917tALOxrN5fcPImxHhPalR6D90Bo0
fa3SPXez7vTXTf/D6OWST1k+kEcQSrCFWMBvf/iu7QhCnh7U3xQuTY+8npTD5+32GPg8SecmqKc2
2CzeIs2LgtjZeOJVEqM7h0S2EQvVDFKvaYwPBt/QolOLV5h7z/0HJPT8vcP9SpIClxvyt7bPZYoa
orVyGTkwggU1MIIEHaADAgECAggRnBSMwawOlTANBgkqhkiG9w0BAQsFADBxMQswCQYDVQQGEwJE
RTEcMBoGA1UEChMTRGV1dHNjaGUgVGVsZWtvbSBBRzEfMB0GA1UECxMWVC1UZWxlU2VjIFRydXN0
IENlbnRlcjEjMCEGA1UEAxMaRGV1dHNjaGUgVGVsZWtvbSBSb290IENBIDIwHhcNMTYwNDI1MDkw
MTM5WhcNMTkwNzA5MjM1OTU5WjCBgjELMAkGA1UEBhMCREUxKzApBgNVBAoMIlQtU3lzdGVtcyBF
bnRlcnByaXNlIFNlcnZpY2VzIEdtYkgxHzAdBgNVBAsMFlQtU3lzdGVtcyBUcnVzdCBDZW50ZXIx
JTAjBgNVBAMMHFQtVGVsZVNlYyBHbG9iYWxSb290IENsYXNzIDIwggEiMA0GCSqGSIb3DQEBAQUA
A4IBDwAwggEKAoIBAQCqX9obX+hzkeXaXPSi5kfl82hVYAUdAqSzm1nzHoqvNK38DcLZSBnuaY/J
IPwhqgcZ7bBcrGXHX+0CfHt8LRvWurmAwhiCFoT6ZrAIxlQjgeTNuUk/9k9uN0goOA/FvudocP05
l03Sx5iRUKrERLMjfTlH6VJi1hKTXrcxlkIF+3anHqP1wvzpesVsqXFP6st4vGCvx9702cu+fjOl
bpSD8DT6IavqjnKgP6TeMFvvhk1qlVtDRKgQFRzlAVfFmPHmBiiRqiDFt1MmUUOyCxGVWOHAD3bZ
wI18gfNycJ5v/hqO2V81xrJvNHy+SE/iWjnX2J14np+GPgNeGYtEotXHAgMBAAGjggG9MIIBuTAP
BgNVHRMBAf8EBTADAQH/MD8GA1UdIAQ4MDYwNAYJKwYBBAG9Rw0VMCcwJQYIKwYBBQUHAgEWGWh0
dHA6Ly93d3cudGVsZXNlYy5kZS9jcHMwDgYDVR0PAQH/BAQDAgEGMIHYBgNVHR8EgdAwgc0wL6At
oCuGKWh0dHA6Ly9wa2kudGVsZXNlYy5kZS9ybC9EVF9ST09UX0NBXzIuY3JsMIGZoIGWoIGThoGQ
bGRhcDovL3BraS50ZWxlc2VjLmRlL0NOPURldXRzY2hlJTIwVGVsZWtvbSUyMFJvb3QlMjBDQSUy
MDIsT1U9VC1UZWxlU2VjJTIwVHJ1c3QlMjBDZW50ZXIsTz1EZXV0c2NoZSUyMFRlbGVrb20lMjBB
RyxDPURFP0F1dGhvcml0eVJldm9jYXRpb25MaXN0MDoGCCsGAQUFBwEBBC4wLDAqBggrBgEFBQcw
AYYeaHR0cDovL29jc3AwMi50ZWxlc2VjLmRlL29jc3ByMB0GA1UdDgQWBBS/WSA2AHmgoCJrjNXy
YdK4LMuCSjAfBgNVHSMEGDAWgBQxw3kbuvVT1xfgiXotF2wKsyudMzANBgkqhkiG9w0BAQsFAAOC
AQEABo+KajB2EGBo5lWqUw9f2tMDDZind4kkbKLEZeqFJVSIR8GNXwxqCjPvX0xk9NjPifMp6ADG
BRgj8FgBwqOirlITD/VNmJVJcur2WiuW8j+lo+ZNSA4hkuBO6/oiV14HlNHgf+r0KEKceL+FAXSh
OBdcqobbzGHXazqD5hccDqbjLjwfh/j85A30EGEOx6KKXDR9PO4gCOI0DgX9xGywMkCwrqvwQqOZ
4/Qw8ZKtWTPz/JMwnoXJiFQZB5YyrrnN1WRfGGsfmhecApqoJ6y7VR4IfQoI8DLetqgEOO20QwcG
A2M3a/MMPijMSQuzI5HVzZ0DIERiqnzuWndF5qAChzCCBawwggSUoAMCAQICBxtjutAeLD0wDQYJ
KoZIhvcNAQELBQAwgZUxCzAJBgNVBAYTAkRFMUUwQwYDVQQKEzxWZXJlaW4genVyIEZvZXJkZXJ1
bmcgZWluZXMgRGV1dHNjaGVuIEZvcnNjaHVuZ3NuZXR6ZXMgZS4gVi4xEDAOBgNVBAsTB0RGTi1Q
S0kxLTArBgNVBAMTJERGTi1WZXJlaW4gQ2VydGlmaWNhdGlvbiBBdXRob3JpdHkgMjAeFw0xNjA1
MjQxMTM4NDBaFw0zMTAyMjIyMzU5NTlaMIGNMQswCQYDVQQGEwJERTFFMEMGA1UECgw8VmVyZWlu
IHp1ciBGb2VyZGVydW5nIGVpbmVzIERldXRzY2hlbiBGb3JzY2h1bmdzbmV0emVzIGUuIFYuMRAw
DgYDVQQLDAdERk4tUEtJMSUwIwYDVQQDDBxERk4tVmVyZWluIEdsb2JhbCBJc3N1aW5nIENBMIIB
IjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAnTt5HEfeH4bLxmnXEJ4519miMNtyHAV/KV9L
aPGtGdZM4WsbsQt/oavge4uL2C3Obog6EO5X5R5/BFE267pwbWOgvpYuQOHRg0xmPRxkaeWbpK1y
rmg5UYd5zBfTri9dY3FLOXrrQqeXkGkFv5D/pEBwvQPnv54YiB+fmYhNDkeNSF9lmRDS2SpJ7cG5
LR2fEssV0z9/HlQvOq6TV6d+eMrVSuIa5e1BfVNfyLMq9YowrO0XBSQ/tqALB/1NGpoDUqA2nN4k
h2Xk5/rHlnMkFM3Q6BtonhhZrnZ+99EKeDyHS7A3z1PKOjgQ88tHbYxkPTxaRUq6yoB8uPPnp0xM
zQIDAQABo4ICBTCCAgEwEgYDVR0TAQH/BAgwBgEB/wIBATAOBgNVHQ8BAf8EBAMCAQYwKQYDVR0g
BCIwIDANBgsrBgEEAYGtIYIsHjAPBg0rBgEEAYGtIYIsAQEEMB0GA1UdDgQWBBRrOpiL+fJTidrg
rbIyHgkf6Ko7dDAfBgNVHSMEGDAWgBST49gyJtrV8UqlkUrg6kviogzP4TCBjwYDVR0fBIGHMIGE
MECgPqA8hjpodHRwOi8vY2RwMS5wY2EuZGZuLmRlL2dsb2JhbC1yb290LWcyLWNhL3B1Yi9jcmwv
Y2FjcmwuY3JsMECgPqA8hjpodHRwOi8vY2RwMi5wY2EuZGZuLmRlL2dsb2JhbC1yb290LWcyLWNh
L3B1Yi9jcmwvY2FjcmwuY3JsMIHdBggrBgEFBQcBAQSB0DCBzTAzBggrBgEFBQcwAYYnaHR0cDov
L29jc3AucGNhLmRmbi5kZS9PQ1NQLVNlcnZlci9PQ1NQMEoGCCsGAQUFBzAChj5odHRwOi8vY2Rw
MS5wY2EuZGZuLmRlL2dsb2JhbC1yb290LWcyLWNhL3B1Yi9jYWNlcnQvY2FjZXJ0LmNydDBKBggr
BgEFBQcwAoY+aHR0cDovL2NkcDIucGNhLmRmbi5kZS9nbG9iYWwtcm9vdC1nMi1jYS9wdWIvY2Fj
ZXJ0L2NhY2VydC5jcnQwDQYJKoZIhvcNAQELBQADggEBAIF4RaROpH8OVfAJsWo+eMxoNakc85We
P/P432s4d4ksjbWtPsfylM2gBq66zKixrTMItiSGYjZMeG5Q8NVuYI1PUjFDl0Z18GLkbmZRwUIx
Z1DlSec5HsufyoZI3ggU/xVLK2aboDifAM79p+vRf1ctyExf3BARlz6WBAJchKgpOWyU/BCSBnue
7thGtBu1Aww42dywqT9xBguyAwczwo1IYyUlPHp7V273igU477igri/02wfVW4QYwam4S85skBqC
5Lk9+nfx0h8zAr9T53b53CYlQW8vphv6pBOQ+nx+2QtgXey/ykGgYfsRSSnYqC11FdhKGOoW71U0
IhoTjQYwggZWMIIFPqADAgECAgwdhvBt3+OKZJXu1kEwDQYJKoZIhvcNAQELBQAwgY0xCzAJBgNV
BAYTAkRFMUUwQwYDVQQKDDxWZXJlaW4genVyIEZvZXJkZXJ1bmcgZWluZXMgRGV1dHNjaGVuIEZv
cnNjaHVuZ3NuZXR6ZXMgZS4gVi4xEDAOBgNVBAsMB0RGTi1QS0kxJTAjBgNVBAMMHERGTi1WZXJl
aW4gR2xvYmFsIElzc3VpbmcgQ0EwHhcNMTcwNzEzMTMxNzE3WhcNMjAwNzEyMTMxNzE3WjCByjEL
MAkGA1UEBhMCREUxDzANBgNVBAgMBkJheWVybjEdMBsGA1UEBwwUR2FyY2hpbmcgYi4gTXVlbmNo
ZW4xLzAtBgNVBAoMJkJheWVyaXNjaGUgQWthZGVtaWUgZGVyIFdpc3NlbnNjaGFmdGVuMR4wHAYD
VQQLDBVMZWlibml6LVJlY2hlbnplbnRydW0xHTAbBgNVBAsMFEhvY2hsZWlzdHVuZ3NzeXN0ZW1l
MRswGQYDVQQDDBJEci4gUmVpbmhvbGQgQmFkZXIwggEiMA0GCSqGSIb3DQEBAQUAA4IBDwAwggEK
AoIBAQDxBWghCYRPNdb19RgRh2YofZ8ESN0QzN3FVXhwLSgGnM/chPBfNRiGftdvNqk731jcFkky
q8Rcr2uQ+ABv0J4SNC6tz3vErUSTWd9RUyQhmecSyVswFJfMfRWtCzwdz5OjIi2rLljazbfACAVm
NAsKW7siImCCgImRg0OSOelw/3CWlwNvGGZ4E4FvZbJGCScjJsRROzSx4mCldr2TpQn85Gv/4vWM
4f8fT60Ni0/OwbY0YpTDyRAN1nQLa66/snuE5wUyhQpUhBh0KXLuAZypPf1vpSZBvXS/YK+Hv4n9
Nf03vVW7ndYpGs9PSxlDdy+1mgGG8iTxUbEcpnDWuZ5bAgMBAAGjggJ1MIICcTBABgNVHSAEOTA3
MBEGDysGAQQBga0hgiwBAQQDBTARBg8rBgEEAYGtIYIsAgEEAwEwDwYNKwYBBAGBrSGCLAEBBDAJ
BgNVHRMEAjAAMA4GA1UdDwEB/wQEAwIF4DAdBgNVHSUEFjAUBggrBgEFBQcDAgYIKwYBBQUHAwQw
HQYDVR0OBBYEFErsrrQd/F9qu2f1PPUbUtIzRatpMB8GA1UdIwQYMBaAFGs6mIv58lOJ2uCtsjIe
CR/oqjt0MEUGA1UdEQQ+MDyBFVJlaW5ob2xkLkJhZGVyQGxyei5kZYEVcmVpbmhvbGQuYmFkZXJA
bHJ6LmRlgQxCYWRlckBscnouZGUwgY0GA1UdHwSBhTCBgjA/oD2gO4Y5aHR0cDovL2NkcDEucGNh
LmRmbi5kZS9kZm4tY2EtZ2xvYmFsLWcyL3B1Yi9jcmwvY2FjcmwuY3JsMD+gPaA7hjlodHRwOi8v
Y2RwMi5wY2EuZGZuLmRlL2Rmbi1jYS1nbG9iYWwtZzIvcHViL2NybC9jYWNybC5jcmwwgdsGCCsG
AQUFBwEBBIHOMIHLMDMGCCsGAQUFBzABhidodHRwOi8vb2NzcC5wY2EuZGZuLmRlL09DU1AtU2Vy
dmVyL09DU1AwSQYIKwYBBQUHMAKGPWh0dHA6Ly9jZHAxLnBjYS5kZm4uZGUvZGZuLWNhLWdsb2Jh
bC1nMi9wdWIvY2FjZXJ0L2NhY2VydC5jcnQwSQYIKwYBBQUHMAKGPWh0dHA6Ly9jZHAyLnBjYS5k
Zm4uZGUvZGZuLWNhLWdsb2JhbC1nMi9wdWIvY2FjZXJ0L2NhY2VydC5jcnQwDQYJKoZIhvcNAQEL
BQADggEBAE0JOKh9wjfu1tQ+97ReQ+L6dwdiCyjKjUF06mkmfhVH/rB+MzORIDsvNVr6GcW3lHVs
cvMxIQtniCJw2fF9UdZxVyRPb/BH1etY2Wtop/qbjyH3PQEd8fDPpaPyloOIoDU4ZC59LR2UPiyg
4+p8ThK6039h6zpMmwVtENRHGJ+fvwdbWVM21swz1hexndX3jkbAdPgWBTkEufYQ9u0m/FrL1BOL
Dbl7NxDTUG8uc5gamNCVswerB1/Tx4xfHd4hSnj/XLV5mX8DguMIFrXkUu32r6ZCTj/hbffvFA9l
6MhNE2d5VJ395O4HQwjkdBNtilGpq8vM+TywvqprfyKZOBoxggQjMIIEHwIBATCBnjCBjTELMAkG
A1UEBhMCREUxRTBDBgNVBAoMPFZlcmVpbiB6dXIgRm9lcmRlcnVuZyBlaW5lcyBEZXV0c2NoZW4g
Rm9yc2NodW5nc25ldHplcyBlLiBWLjEQMA4GA1UECwwHREZOLVBLSTElMCMGA1UEAwwcREZOLVZl
cmVpbiBHbG9iYWwgSXNzdWluZyBDQQIMHYbwbd/jimSV7tZBMAkGBSsOAwIaBQCgggJZMBgGCSqG
SIb3DQEJAzELBgkqhkiG9w0BBwEwHAYJKoZIhvcNAQkFMQ8XDTE3MDgxMTEzNTMxM1owIwYJKoZI
hvcNAQkEMRYEFL7R2XjfieXJfkzSj5fO3TGi1oZ7MIGTBgkqhkiG9w0BCQ8xgYUwgYIwCwYJYIZI
AWUDBAEqMAsGCWCGSAFlAwQBFjAKBggqhkiG9w0DBzALBglghkgBZQMEAQIwDgYIKoZIhvcNAwIC
AgCAMA0GCCqGSIb3DQMCAgFAMAcGBSsOAwIaMAsGCWCGSAFlAwQCAzALBglghkgBZQMEAgIwCwYJ
YIZIAWUDBAIBMIGvBgkrBgEEAYI3EAQxgaEwgZ4wgY0xCzAJBgNVBAYTAkRFMUUwQwYDVQQKDDxW
ZXJlaW4genVyIEZvZXJkZXJ1bmcgZWluZXMgRGV1dHNjaGVuIEZvcnNjaHVuZ3NuZXR6ZXMgZS4g
Vi4xEDAOBgNVBAsMB0RGTi1QS0kxJTAjBgNVBAMMHERGTi1WZXJlaW4gR2xvYmFsIElzc3Vpbmcg
Q0ECDB2G8G3f44pkle7WQTCBsQYLKoZIhvcNAQkQAgsxgaGggZ4wgY0xCzAJBgNVBAYTAkRFMUUw
QwYDVQQKDDxWZXJlaW4genVyIEZvZXJkZXJ1bmcgZWluZXMgRGV1dHNjaGVuIEZvcnNjaHVuZ3Nu
ZXR6ZXMgZS4gVi4xEDAOBgNVBAsMB0RGTi1QS0kxJTAjBgNVBAMMHERGTi1WZXJlaW4gR2xvYmFs
IElzc3VpbmcgQ0ECDB2G8G3f44pkle7WQTANBgkqhkiG9w0BAQEFAASCAQBgpifXE0qp4mIG+Rpw
FwuYfEMzgjaHZcU0POn/DXoWYLGJnXcvEVg6maCB24cmOhS+axJgaHaqJhz1SlJYBSl7ABZMWRoK
4O4lWMjsHTc6PYo+F6McgqUKSbFzoHUhj27hqVPXVs3ylAwrsXYVyhbxzvpz7y7qXn2WnM1k3KrH
Wel6AWGz7HBy4JQxndCQfOoUPtLF9j71EOcU1hl3jhFC/Ho05EcoF4AHb0JJrljoAY3SZlEhKDWM
3k4dKXV+ID2yNsLF9yS2+Mzk1BV17J5zVMR7GxfhSvL2Kezzos6dqzOAtYBxW4DLk4xn3hSnTLJQ
yuGRQS+OkZmPjnyx1KM1AAAAAAAA

------=_NextPart_000_0017_01D312B9.F0A2D7D0--
