[Shootout-list] f90 update

Simon Geard simon@whiteowl.co.uk
Mon, 17 Jan 2005 22:15:18 +0000


This is a multi-part message in MIME format.
--------------060004010009000609090109
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit

I've just seen the appearance of the f90 progs on the alpha page - 
thanks for that. I've checked the ones marked error and attach versions 
that give identical output to the corresponding c programs. Also 
included are mandelbrot.f90 and nbody.f90.

Simon

--------------060004010009000609090109
Content-Type: application/octet-stream;
 name="f90updates.tgz"
Content-Transfer-Encoding: base64
Content-Disposition: attachment;
 filename="f90updates.tgz"

H4sIAJQ47EEAA+1b+W/bRhbOr9VfMV7srimZoji86YULZLNtUbRBg2SxR1AgoEVKoi2RKg9b
0l+/3xve1GG3m7i7gAaITM58M++YN++9mWHSzMvCNAunqTJz1VdfpKgotmkWf63iLzcM8RfF
skz7FVe5rasa1zh/hUauWq/YF2KnW/I08xLGXqXhKo5O4oIkPdFeClP//T8pF+xDbQHMm06D
NGWzPJpmYRyxcLVeBqsgIkQcDYAlJbHvAi/xZcYnXJuoxuACDX/Nw6UfRnMWRrNYQcVNpwjM
j2GUbxgbszwlZLYI2PdRFizZt3GSJV7kqmwar9bhMkiuRYe6hDMgWNoxVTb+SWdjUTcdL8Pb
6cZj47gFEkP8M4z+9Y5ovsHI3i/sH2GaezVFZinWtEuKRu4RmizD6J5+b9detrj+g3/987sk
nifein0LZtOf34bTJE7jWVYN/yHL/TD+2Z+5zs/o9gdB4s12/hhGYGXumrWgXeLUckjKtlhK
sAmo18Ufo2u2V0xVpaZV4Ider10zVcUUtlkg+u19hPcQJN48+OQHD6GYf8C5ZipqjQBTkQ9T
aEOwrhXD4Y6uE+LBS8DHNGhT0lTH7oxyHzz2OVFb7fd5ksVpmLYxY65oqq2p2mAwWJdz0Zp5
Jiw3nIYZi+IooHcY2jxIWCSzUGZREqwDL0tldo+2JPCWI4d5kEJmqfgF33i8R3uOB9IV/cLm
U45/Gv7p+Geg83ThJd40CxJpGUQ3zpB5yfyhISgzP8QCSqEb6XooM2+5jKde5t0uA3Z9zXw8
yuw2n83aXdYYchVgTILcosN9Gu4CdsNMDoFBE6OweQC/NZe4TASHhRi+RC/yaFhLiPrqEf1X
3gYdqoohjXXB3qOfWIzEDMPyrqYVDK3zDJiS6UAihFQzNCSqEYZV8dePB2Jm6D1iV4wPypXL
pIh9zQgvug+HRCsaVDNZj01KkFqwYQ2hFoxK1XWdH3SYGu6PJ3jVRmJEGqE9opD0ptL73ogC
XjQEEdRQgoSCR/JIptobrg7FOFJEUMJBBZxcWJTB0QWDShdjoYuTcnYlPCBbV6pIdOoKsce+
mFv4KeHRBbY2hAwmmYo5Y/c3XG4bCwpZO8YVy0JK81XJ56Scs5TTjCtq+aZ13vTOm9F+A7EQ
xJqZFwPh54p5t2khWDiEtoh+M1WCAH6uWAUZC8BopDUYIouffYzeYIgZ/OxjjGamKyMmVyCY
q4SGPxBsTKRozEvm0hL0S5JJaK9q7wUvo2giCewIv1plevAmggsMM0IXyEAC65XefVqiwnPX
E19yJSbzpzzDehRLNQnSfCkm7DEJMeUj+VLy5FAdXg7Z5aG4cCkUX4GRbAF3KEhcCj93ALof
LS4Lx7iHPRQ3gCWd7mEPRZDLwgn3ZJtxTbGEeIdiyqVw2f0uTtnjUIQhKvf9Dm7Z4VDIuRTB
ACucM2QjKy8TTKnoMRjQmvfCKB000aTOoXoTejQyUHWUSWE0rALDMXTbl6IA/Rgn9wK9jOch
osNp9MpL758/9ipatsEifFYVCWQOp2wVRnA9A1FLrqMZRFQRPdRKEyYpWZIHiiwcwZBNinbi
vmwf815bob2WH0EOSrmgcGhjRKvllkUBVk4Wk4ehtTELkzRjC285q8NQ5Xsm2hWvPALkouUm
WBfMysRn7XiIKfJHhVeWgJZ4E0EIWtUBosy8ZRooorXlRyj4rWJfimSs8xvI0I19LdnMkSQI
gsPhlXgqHiuSAYbf6yYcdAkGclK5mTpm0UPPDgeDVjLUtMV+8Dkt9ECmU5toRRyaRz6FjAS/
oWgpjWXjF5nKA6RrGRHgxXx16+uoJxRBqGsaolSFmPiG0v7kqv05K02lZ8JVnzJ0UM/ue2Vp
rZFIqY0kBC95Cjo8D/cmCv0GA6o6kNl+9v1f5t3P1l9u6y/KE/t/bhpi/29x0zS5bWP/r6v6
ef//IuWC/Z0s4Ll7fvuF9/y1eR7Z7ov2377Tb4Z/2U1+S6xShnJbXy35Qq79fWyZXYgQXD4X
ueDeVlQrt6LP3C+KChoILgvEJWSwsoZ/IhVvkqSZqnBKkUqincwHpoTp7ZtTlgbLmRh9midp
+BDsZUhEbiOzrcx21cCSj8rCXRbofvQp8XWY3bKvb9imG19pDEiz24ugZQPRFbTHXFF9Vd7K
u6FMFduyYidviopdWbGRtydjLLCo6vjuYiI/v9/+XAUbvC/s/Z/2/yrqivNfXTd0uFCumVw7
+/+XKPDv+epXHvxaL33wW9josRPffPVfHPWWQ7/wGW9bICFBz/2TTMcPMYvsO19hC4vatHcC
J/y6KY/k1imVGI4V2BTJalV18Niq8fbFgULaTUbR8fc22nP5bAVLw4+/cAh4yv9bduP/bc2i
/F9TzbP/f4lywd4LC/gfv/trzPRIFCgAvz0QtAi8bCzoS1aJUkaEOiSUAh6NCr1ro+/fwtVz
3XUt5zjmNTC6Y9vHEW+A0FzT1p++6iJ8REGpfalGlelz9yCILM2tRNSOWehYmKnEVZVS8e7Z
eGt/wjXFLYJWszfZP5Stx2NScT5zaq9RILpnXan3II61ll5KOyZDK04/y1c69BOPI9LxFdQo
Y0IKGg3p6mwIKAGeADPobylqeCcIl8bwGdb/CiMFy9skzn637z8M1TLE+Y9tazo3xPcfqmGf
/f9LlIuLP05GYuP+Haw/Ez4zp9X/oxfNc28esA+LOM7iPIPjWmTZ+noyScsaxVuGcbZQ/OA2
9CIlTuYT4d/6m4WJaor61763zgKfDnlro5uy2y2RniOMTBeLeLl7sZjSNf0jcaUB/fbY0iP0
svHlkJRtsXo7j5a8xzcgjzJbyOUZzG2YfSp8ddkq3Ye08RhiYrPgE9KK/aZelPlBLbcwT8Do
wpgfjVUh/b1hpjpoHHkDEM46XIUZ3ScbFEJa8ogLiGPhjVS7DDYFU6j+KLM3g/qqjcH48zmF
jE8t1T0v4D2iYkFXCfhbqrFURKU6vP6gti9/17crtsAYQe+yU1xbvjMue9s3uboUfpQv2aW8
KMLr9kaVF2Ne38tv8P44rm/GGAX9KYTeSBoparSZoFUxfVUu3reTRXEg1lzTf6QLPBGZZbXb
0lEM3ZWJK8C6Wdy3qDJNXouDcsSPoxHd/L9p19Npn7j5+jhCgL+bSx+HQ/Z1Obe9j0uOcNC6
rWtKsAmzdlX7yw/W/Tyg5KIz7j7lC3ijNPQD4ZjSIGNpLP5kizCl6aYry47ErUkP40QK08Us
k6pKGcvhB96otX2eWVCDhTxFTj1Grk+qIza0UL83Zlo9XbWEIK3UiBvmHFLKaywLYNKKx7j+
qmHVBrZsmw8vZc9/oDv/m8sohjXTUq3ZHR4R6oeutK311VEi8bwhbmHjh/j9BhqIZ8xjSfxI
/C6DWTa+Q9YQzrZC10KYx4AtKCX0CH1YouP6dsaUMD7KznD48ipoT3Bt5OVDO+VsebffO2c5
l89XotvY377A/a9V5vv7+T/Hlk6c/1iGZtjc4uL+V+Pn/P8lysVzc3/23OyfibPkJLzNKddH
dt/ZDlCanC49apol2ASzt15yz94oyKyXy9BbpaywyDvvwRPDFbn64eRcQFltwu3jElE5OJHD
FheNcnFkERZfAh9LAffTSWSTWZoF6+LLJO4fTjqBYu++p0MWBfta09UsUzcd13b1Ex0+/PTj
6/ef3r7+8IEyVTaiEejnaIe/vf73h0/vvnn/6d/fvH5PxCxT0YwWBUKR6Nl2jXBFehHevmws
r1Jl9oCnBzw+7OhrmTQt40C7Fz1L9NzPze/ydZl/U6vE/lwFGENxDG5gW4/FbRm2prqUI1IL
UkhuqbqmqoaharahObpLTXVXyjF1S9PQDr/ANZ2rrj9Wucy4YlnkSuAxbHTWLddAgw41dXTR
GstWLNeFq+HgxrUN1dDMwz3GluKqhkWn0i64teCJdCDNE2O7imnYLnd1BzLqGlgjNmnmmqkU
3+Me1V7qZXkS7SvPUXRD1y3L5o5mGKbtOrZ/pbZ1ZCgcTtN1TMvAg67iuYcYY7Ojm5pucOgQ
7HHd4YUWG4im2BYmwOSqrVmOpRmcP6FPQ3FBVHNUTIvhclvTnSd6aAq4A9C1TVu3Ld3V3Cf0
qimO6Tim66iWZSEkOFz7lXrN4WzytKXXrzAsVzTHNWAzpgVluBxmBZUJfXxVWJ0JO+EmN8gG
HEsH2Xa7pmi6rkIKx6EFDWmMSp9fCa5dC/bDdRtzYluIZ0c1U8B124F527pruoajuqZ6Cj6m
4eFCTMsxsWpAxLSOqfErMU8wH9iOCjsyOSR2nRLecjOnlRgF6yyPgn3rhKJ028UygV05pupy
y6wU1RiWSQuDQyGwF4AN3oNwxXY107FhGKaqY6g969QUCxZgA2G4qu64uqY9YWpwDxoWDLdV
4DVDw9BP9BhjDZN/1kzDhH/gYEh9wjpNBSYCdlT4J5gnR8c9zT6x6vN6yRc7Z/aMPycGb76/
NMW5NapD8Z1/8VB8YguicuWt5dLxyOVCkeu5ngx/3Zm9QMazGfZ0b2O6NMpX6FHQFUf1IB5E
QTLfSk3lgVP7YNB8rFud/4uxy82PJIKuzFoj11uWZ5PofLSU5tjS5FkIoXv837fJtA6dupcD
xUeth6eh89EsiHRnpR2d1wi9a4TedfGx0npT5BV+sX9bb7uvu85r+4vVNsPVOPi5KqlK4fBP
DxuYaPNKgf4vNZ4I4aeD357AEyf46eB3R/CtE5Sy+V5wc8PG682kses+YisQ2xOInUDsuggi
d3RyB72pP2peh2+EBOzo6js17U1O5mPKfUy5v6O+9B8hpgHlXfNWjoq09G4gPow+OslouLsJ
rw7PP4gUHqacjA0bV293eGtg2w5s24FtG9iuA9t1YLsa1uBLsar/JeNvRj4Zo78d+WRk/m7k
7xpmITt9lSfS6gmT6t4jduBxuE+uY+M33dcxqWLUYpfsEhWFvvf6kz6672NS0vMH2PUGIF35
u6cG6I901xWleL3qiBKe4uSuFKXzetWR5Mn+u27/nZi3k/37p0iVaEdtuG2gXXO9Ks1h1JnN
fq++9R7ste336hvzwV67QfueuedTSq9x6H/97EWiZzmLIwHikKtox6TCT5ROlug+Nz7U6PLh
iv4riq8emt0m8RFFOh5RhIl20UejiTDHo9hdby6G9bHlaa/3bL/3bM/3bN/3q53e/iSMmbSn
/a7XGMI9VmT+0sxlZaW9Fdizye5/LSmOSX7vQ6hzOZdzOZdzOZdzOZdzOZdzOZdz+eLlPzDM
jy8AUAAA
--------------060004010009000609090109--