<86>Nov 12 08:09:43 userdel[120919]: delete user 'rooter' <86>Nov 12 08:09:43 userdel[120919]: removed group 'rooter' owned by 'rooter' <86>Nov 12 08:09:43 userdel[120919]: removed shadow group 'rooter' owned by 'rooter' <86>Nov 12 08:09:44 groupadd[120959]: group added to /etc/group: name=rooter, GID=624 <86>Nov 12 08:09:44 groupadd[120959]: group added to /etc/gshadow: name=rooter <86>Nov 12 08:09:44 useradd[121021]: new user: name=rooter, UID=624, GID=624, home=/root, shell=/bin/bash <86>Nov 12 08:09:44 userdel[121043]: delete user 'builder' <86>Nov 12 08:09:44 groupadd[121209]: group added to /etc/group: name=builder, GID=625 <86>Nov 12 08:09:44 groupadd[121209]: group added to /etc/gshadow: name=builder <86>Nov 12 08:09:44 groupadd[121209]: new group: name=builder, GID=625 <86>Nov 12 08:09:44 useradd[121315]: new user: name=builder, UID=625, GID=625, home=/usr/src, shell=/bin/bash <13>Nov 12 08:09:51 rpmi: libjpeg-2:1.5.1-alt1 1498218318 installed <13>Nov 12 08:09:51 rpmi: libpng16-1.6.35-alt1 sisyphus.214397.100 1539159349 installed <13>Nov 12 08:09:51 rpmi: libexpat-2.2.4-alt1 1503305345 installed <13>Nov 12 08:09:51 rpmi: perl-Try-Tiny-0.30-alt1 1514318058 installed <13>Nov 12 08:09:51 rpmi: perl-libnet-1:3.11-alt1 1511423541 installed <13>Nov 12 08:09:51 rpmi: libtiff5-4.0.3-alt1 1348347501 installed <13>Nov 12 08:09:51 rpmi: perl-Module-Runtime-0.016-alt1 1509549848 installed <13>Nov 12 08:09:51 rpmi: perl-HTTP-Date-6.02-alt1 1348645274 installed <13>Nov 12 08:09:51 rpmi: perl-Term-ANSIColor-4.06-alt1 1479407083 installed <13>Nov 12 08:09:51 rpmi: libgdbm-1.8.3-alt10 1454943334 installed <13>Nov 12 08:09:51 rpmi: libidn2-2.0.5-alt1 1526923875 installed <13>Nov 12 08:09:51 rpmi: libnspr-1:4.19-alt1 1521589033 installed <13>Nov 12 08:09:51 rpmi: libICE-1.0.9-alt1 1409902721 installed <13>Nov 12 08:09:51 rpmi: libpaper-1.1.24-alt4 1315383465 installed <13>Nov 12 08:09:51 rpmi: udev-rules-1:239-alt3 sisyphus.215710.300 1540765573 installed <13>Nov 12 08:09:51 rpmi: libkmod-25-alt1 1522318408 installed <13>Nov 12 08:09:51 rpmi: kmod-25-alt1 1522318408 installed <13>Nov 12 08:09:51 rpmi: psutils-2:1.23-alt2 sisyphus.216379.100 1541920784 installed <13>Nov 12 08:09:52 rpmi: libSM-1.2.3-alt1 sisyphus.215747.100 1540812795 installed <13>Nov 12 08:09:52 rpmi: perl-Module-Implementation-0.09-alt1 1418836057 installed <13>Nov 12 08:09:52 rpmi: perl-Dist-CheckConflicts-0.11-alt1 1397076608 installed <13>Nov 12 08:09:52 rpmi: python-module-sphinxcontrib-2.1.1-alt2.1.2 1526455698 installed <13>Nov 12 08:09:52 rpmi: perl-Tie-RefHash-1.39-alt1 1316492563 installed <13>Nov 12 08:09:52 rpmi: perl-MRO-Compat-0.13-alt1 1491292748 installed <13>Nov 12 08:09:52 rpmi: perl-TimeDate-2.30-alt1 1374766201 installed <13>Nov 12 08:09:52 rpmi: perl-IO-stringy-2.111-alt1 1432302202 installed <13>Nov 12 08:09:52 rpmi: perl-Unicode-Normalize-1:5.26.2-alt2 1534850821 installed <13>Nov 12 08:09:52 rpmi: perl-File-Which-1.22-alt1 1506480125 installed <13>Nov 12 08:09:52 rpmi: perl-Devel-StackTrace-1:2.03-alt1 1511420922 installed <13>Nov 12 08:09:52 rpmi: perl-Sub-Exporter-Progressive-0.001013-alt1 1479395404 installed <13>Nov 12 08:09:52 rpmi: libtcl-8.6.8-alt1 1518663643 installed <13>Nov 12 08:09:52 rpmi: libnuma-2.0.11-alt1 1450022594 installed <13>Nov 12 08:09:52 rpmi: libsqlite3-3.25.2-alt2 sisyphus.215082.100 1539700318 installed <13>Nov 12 08:09:52 rpmi: libopenblas-0.2.20-alt1 1527005646 installed <13>Nov 12 08:09:52 rpmi: libpixman-3:0.34.0-alt1 1480491657 installed <13>Nov 12 08:09:52 rpmi: libglvnd-7:1.1.0-alt3 sisyphus.215982.100 1541498632 installed <13>Nov 12 08:09:52 rpmi: libwayland-server-1.16.0-alt1 1535614871 installed <13>Nov 12 08:09:52 rpmi: libmnl-1.0.4-alt1 1480571791 installed <13>Nov 12 08:09:52 rpmi: perl-IO-Socket-IP-0.39-alt1 1494508514 installed <13>Nov 12 08:09:52 rpmi: perl-LWP-MediaTypes-6.02-alt1 1329754558 installed <13>Nov 12 08:09:52 rpmi: perl-Compress-Raw-Zlib-2.081-alt1 1523236573 installed <13>Nov 12 08:09:52 rpmi: perl-HTML-Tagset-3.20-alt2 1317725093 installed <13>Nov 12 08:09:52 rpmi: libopenjpeg2.0-2.3.0-alt2 sisyphus.216213.100 1541598437 installed <13>Nov 12 08:09:52 rpmi: libquadmath0-7.3.1-alt5 1531512767 installed <13>Nov 12 08:09:52 rpmi: libgfortran4-7.3.1-alt5 1531512767 installed <13>Nov 12 08:09:52 rpmi: liblz4-1:1.8.3-alt1 sisyphus.213737.100 1538009686 installed <13>Nov 12 08:09:52 rpmi: libiptables-1.4.21-alt3 1435789455 installed <13>Nov 12 08:09:52 rpmi: msulogin-1.0-alt1 1366288515 installed <13>Nov 12 08:09:52 rpmi: mount-2.32-alt2 1528296111 installed <13>Nov 12 08:09:52 rpmi: libdevmapper-1.02.150-alt1 1534113691 installed <13>Nov 12 08:09:53 rpmi: sysvinit-2.88-alt5 1424350686 installed <13>Nov 12 08:09:53 rpmi: libquadmath7-devel-7.3.1-alt5 1531512767 installed <13>Nov 12 08:09:53 rpmi: libnetlink-4.18.0-alt1 1534194784 installed <13>Nov 12 08:09:53 rpmi: libnuma-devel-2.0.11-alt1 1450022594 installed <13>Nov 12 08:09:53 rpmi: tcl-8.6.8-alt1 1518663643 installed <13>Nov 12 08:09:53 rpmi: perl-Devel-GlobalDestruction-1:0.14-alt1 1479389769 installed <13>Nov 12 08:09:53 rpmi: perl-File-HomeDir-1.004-alt1 1525450444 installed <13>Nov 12 08:09:53 rpmi: perl-unicore-1:5.26.2-alt2 1534850660 installed <13>Nov 12 08:09:53 rpmi: perl-Net-IDN-Encode-2.401-alt1 sisyphus.213503.100 1537609149 installed <13>Nov 12 08:09:53 rpmi: perl-OLE-Storage_Lite-0.19-alt2 1291028388 installed <13>Nov 12 08:09:53 rpmi: perl-Role-Tiny-2.000006-alt1 1513709006 installed <13>Nov 12 08:09:53 rpmi: perl-autodie-2.29-alt1 1445013559 installed <13>Nov 12 08:09:53 rpmi: libgdbm-devel-1.8.3-alt10 1454943334 installed <13>Nov 12 08:09:53 rpmi: perl-Data-Dump-1.23-alt1 1444601978 installed <13>Nov 12 08:09:53 rpmi: perl-File-Listing-6.04-alt1 1329758996 installed <13>Nov 12 08:09:53 rpmi: libjasper-2.0.14-alt1 1530105217 installed <13>Nov 12 08:09:53 rpmi: zziplib-0.13.69-alt1 1523001476 installed <13>Nov 12 08:09:53 rpmi: tex-common-0.2-alt4 1244804096 installed <13>Nov 12 08:09:53 rpmi: t1utils-1.41-alt1 1502978415 installed <13>Nov 12 08:09:53 rpmi: python-module-imagesize-0.7.1-alt1 1461387704 installed <13>Nov 12 08:09:53 rpmi: python-sphinx-objects.inv-1:2.3.8.20181109-alt1 sisyphus.216361.100 1541805649 installed <13>Nov 12 08:09:53 rpmi: python-module-google-0.4.2-alt2.1 1517733343 installed <13>Nov 12 08:09:53 rpmi: python-module-enum34-1.1.6-alt3 1527251693 installed <13>Nov 12 08:09:53 rpmi: python-modules-curses-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:09:53 rpmi: perl-Text-Unidecode-1.30-alt1 1480505027 installed <13>Nov 12 08:09:53 rpmi: perl-Unicode-Map-0.112-alt7 1530370831 installed <13>Nov 12 08:09:53 rpmi: perl-Math-Complex-1.59-alt1 1334229876 installed <13>Nov 12 08:09:53 rpmi: perl-XML-RegExp-0.04-alt1 1348526543 installed <13>Nov 12 08:09:53 rpmi: perl-Package-Stash-XS-0.28-alt2.1.1.1.1 1513353139 installed <13>Nov 12 08:09:53 rpmi: perl-Package-Stash-0.37-alt1 1412723835 installed <13>Nov 12 08:09:53 rpmi: perl-Sub-Identify-0.14-alt1.1 1513353208 installed <13>Nov 12 08:09:53 rpmi: perl-Sub-Quote-2.005001-alt1 1524683989 installed <13>Nov 12 08:09:53 rpmi: perl-Mail-Sendmail-0.80-alt1 1504118031 installed <13>Nov 12 08:09:53 rpmi: perl-Mail-Sender-1:0.903-alt1 1479576662 installed <13>Nov 12 08:09:53 rpmi: ppp-common-0.5.1-alt1 1244040597 installed <13>Nov 12 08:09:53 rpmi: sendmail-common-1.7-alt3 1353029717 installed <13>Nov 12 08:09:53 rpmi: perl-Locale-Maketext-Simple-0.21-alt3 1321333616 installed <13>Nov 12 08:09:53 rpmi: perl-IPC-System-Simple-1.25-alt2_1 1388863478 installed <13>Nov 12 08:09:53 rpmi: perl-Term-Cap-1.17-alt1 1445018869 installed <13>Nov 12 08:09:53 rpmi: perl-Pod-Escapes-1.07-alt1 1418767892 installed <13>Nov 12 08:09:53 rpmi: perl-File-Copy-Recursive-0.44-alt1 1525447381 installed <13>Nov 12 08:09:53 rpmi: perl-Email-Date-Format-1.005-alt1 1413796337 installed <13>Nov 12 08:09:53 rpmi: perl-Digest-SHA1-2.13-alt5.1.1.1.1 1513357544 installed <13>Nov 12 08:09:53 rpmi: perl-Digest-Perl-MD5-1.9-alt1 1394057208 installed <13>Nov 12 08:09:53 rpmi: perl-PadWalker-2.3-alt1.1 1513353104 installed <13>Nov 12 08:09:53 rpmi: perl-Devel-Caller-2.06-alt2.1.1.1.1 1513353240 installed <13>Nov 12 08:09:53 rpmi: perl-Devel-LexAlias-0.05-alt2_17 1531757320 installed <13>Nov 12 08:09:53 rpmi: perl-Eval-Closure-0.14-alt1 1465147597 installed <13>Nov 12 08:09:53 rpmi: perl-DBI-1.642-alt1 sisyphus.215860.100 1540963448 installed <13>Nov 12 08:09:53 rpmi: perl-Crypt-RC4-2.02-alt1 1319549646 installed <13>Nov 12 08:09:53 rpmi: perl-Class-Data-Inheritable-0.08-alt2 1316996762 installed <13>Nov 12 08:09:53 rpmi: perl-Exception-Class-1.44-alt1 1513614520 installed <13>Nov 12 08:09:53 rpmi: perl-Params-ValidationCompiler-0.30-alt1 1533170707 installed <13>Nov 12 08:09:53 rpmi: perl-Variable-Magic-0.62-alt1.1 1513353175 installed <13>Nov 12 08:09:53 rpmi: perl-B-Hooks-EndOfScope-0.24-alt1 1524680298 installed <13>Nov 12 08:09:53 rpmi: perl-namespace-clean-0.27-alt1 1464272543 installed <13>Nov 12 08:09:53 rpmi: perl-namespace-autoclean-0.28-alt1 1444994071 installed <13>Nov 12 08:09:53 rpmi: pciids-20181105-alt1 sisyphus.216126.100 1541459123 installed <13>Nov 12 08:09:53 rpmi: ncompress-4.2.4.4-alt1 1366160442 installed <13>Nov 12 08:09:53 rpmi: tcsh-6.20.00-alt2 1503603381 installed <13>Nov 12 08:09:53 rpmi: rpm-macros-mpi-selector-1.0.3-alt3 1504498675 installed <13>Nov 12 08:09:53 rpmi: mpi-selector-1.0.3-alt3 1504498675 installed <13>Nov 12 08:09:53 rpmi: mailx-8.1.2-alt7 1366314832 installed <13>Nov 12 08:09:53 rpmi: sharutils-4.6.3-alt1.1.qa2.1 1449219807 installed <13>Nov 12 08:09:53 rpmi: libyaml2-0.2.1-alt1 sisyphus.214707.100 1539464411 installed <13>Nov 12 08:09:53 rpmi: libxapian-1.4.5-alt3 sisyphus.215025.100 1539610704 installed <13>Nov 12 08:09:53 rpmi: torque-4.2.1-alt1.qa2 1518180774 installed <13>Nov 12 08:09:53 rpmi: libtorque-4.2.1-alt1.qa2 1518180774 installed <13>Nov 12 08:09:54 rpmi: libtexlua5-2018-alt2_4 sisyphus.215831.100 1540947212 installed <13>Nov 12 08:09:54 rpmi: libteckit-2.5.1-alt2.1 1319227325 installed <13>Nov 12 08:09:54 rpmi: libteckit-utils-2.5.1-alt2.1 1319227325 installed <13>Nov 12 08:09:54 rpmi: libsynctex1-2018-alt2_4 sisyphus.215831.100 1540947212 installed <13>Nov 12 08:09:54 rpmi: libruby-2.5.1-alt4 sisyphus.209945.120 1537061465 installed <13>Nov 12 08:09:54 rpmi: libqqwing-1.3.4-alt2 1436192940 installed <13>Nov 12 08:09:54 rpmi: qqwing-1.3.4-alt2 1436192940 installed <13>Nov 12 08:09:54 rpmi: poppler-data-0.4.9-alt1 sisyphus.216033.100 1541141723 installed <13>Nov 12 08:09:54 rpmi: libpng12-1.2.50-alt2 1347753435 installed <13>Nov 12 08:09:54 rpmi: libpci-3.6.2-alt1.S1 sisyphus.213446.100 1537513661 installed <13>Nov 12 08:09:54 rpmi: pciutils-3.6.2-alt1.S1 sisyphus.213446.100 1537513661 installed <13>Nov 12 08:09:54 rpmi: libnumpy-1:1.13.3-alt2.2.qa1 sisyphus.214885.100 1539806695 installed <13>Nov 12 08:09:54 rpmi: xorg-rgb-1.0.4-alt1.qa1 1366268679 installed <13>Nov 12 08:09:54 rpmi: libnetpbm-10.35.97-alt1.qa1 sisyphus.214808.100 1539731139 installed <13>Nov 12 08:09:54 rpmi: liblcms2-2.9-alt1 1516411892 installed <13>Nov 12 08:09:54 rpmi: libxblas-1.0.248-alt1.1 1496143682 installed <13>Nov 12 08:09:54 rpmi: liblapack-1:3.8.0-alt1 1527158339 installed <13>Nov 12 08:09:54 rpmi: libkpathsea6-2018-alt2_4 sisyphus.215831.100 1540947212 installed <13>Nov 12 08:09:54 rpmi: libptexenc1-2018-alt2_4 sisyphus.215831.100 1540947212 installed <13>Nov 12 08:09:54 rpmi: libjbig-2.1-alt1 1401380926 installed <13>Nov 12 08:09:55 rpmi: libicu63-1:6.3.1-alt1 sisyphus.215328.100 1540049988 installed <13>Nov 12 08:09:55 rpmi: libnl3-3.4.0-alt2 1507570088 installed <13>Nov 12 08:09:55 rpmi: libibverbs-20.1-alt1 sisyphus.215851.40 1541165555 installed <13>Nov 12 08:09:55 rpmi: librdmacm-20.1-alt1 sisyphus.215851.40 1541165555 installed <13>Nov 12 08:09:55 rpmi: openmpi-2.0.1-alt6 1530784323 installed <13>Nov 12 08:09:55 rpmi: libibumad-20.1-alt1 sisyphus.215851.40 1541165555 installed <13>Nov 12 08:09:56 rpmi: libwebp7-1.0.0-alt2.1 sisyphus.215162.400 1539895628 installed <13>Nov 12 08:09:56 rpmi: libdatrie-0.2.9-alt1_6 1511686676 installed <13>Nov 12 08:09:56 rpmi: libthai-0.1.28-alt1_1 sisyphus.214516.100 1539257851 installed <13>Nov 12 08:09:56 rpmi: libsombok-2.4.0-alt1_8 sisyphus.214514.100 1539257353 installed <13>Nov 12 08:09:56 rpmi: publicsuffix-list-dafsa-20181106-alt1 sisyphus.216228.100 1541611754 installed <13>Nov 12 08:09:56 rpmi: libpsl-0.20.2-alt2 sisyphus.216228.200 1541611889 installed <13>Nov 12 08:09:56 rpmi: libnghttp2-1.34.0-alt1 sisyphus.214524.100 1539249634 installed <13>Nov 12 08:09:56 rpmi: libxshmfence-1.2-alt2 1518613552 installed <13>Nov 12 08:09:56 rpmi: libX11-locales-3:1.6.7-alt1 sisyphus.214413.200 1539171080 installed <13>Nov 12 08:09:56 rpmi: libXdmcp-1.1.1-alt1 1334617701 installed <13>Nov 12 08:09:56 rpmi: libXau-1.0.8-alt1 1369565808 installed <13>Nov 12 08:09:56 rpmi: libxcb-1.13.1-alt1 sisyphus.214413.100 1539170896 installed <13>Nov 12 08:09:56 rpmi: libX11-3:1.6.7-alt1 sisyphus.214413.200 1539171143 installed <13>Nov 12 08:09:56 rpmi: libXext-1.3.3-alt1 1409902959 installed <13>Nov 12 08:09:56 rpmi: libXt-1.1.4-alt1 1369984722 installed <13>Nov 12 08:09:56 rpmi: libXmu-1.1.2-alt1 1391072530 installed <13>Nov 12 08:09:56 rpmi: libXpm-3.5.11-alt1 1391072398 installed <13>Nov 12 08:09:56 rpmi: libXrender-0.9.8-alt1 1371312112 installed <13>Nov 12 08:09:56 rpmi: libXaw-1.0.12-alt1 1391072624 installed <13>Nov 12 08:09:56 rpmi: libXxf86vm-1.1.4-alt2 1527672187 installed <13>Nov 12 08:09:56 rpmi: libXdamage-1.1.3-alt4 1297162593 installed <13>Nov 12 08:09:56 rpmi: libXfixes-5.0.1-alt1 1369809608 installed <13>Nov 12 08:09:56 rpmi: libwayland-client-1.16.0-alt1 1535614871 installed <13>Nov 12 08:09:56 rpmi: libpciaccess-1:0.14-alt1 1528969252 installed <13>Nov 12 08:09:56 rpmi: libdrm-1:2.4.96-alt1 sisyphus.215486.100 1540374027 installed <13>Nov 12 08:09:56 rpmi: libGLX-mesa-4:18.2.4-alt1 sisyphus.215982.200 1541499328 installed <13>Nov 12 08:09:56 rpmi: libGLX-7:1.1.0-alt3 sisyphus.215982.100 1541498632 installed <13>Nov 12 08:09:56 rpmi: libGL-7:1.1.0-alt3 sisyphus.215982.100 1541498632 installed <13>Nov 12 08:09:56 rpmi: libgbm-4:18.2.4-alt1 sisyphus.215982.200 1541499328 installed <13>Nov 12 08:09:56 rpmi: libEGL-mesa-4:18.2.4-alt1 sisyphus.215982.200 1541499328 installed <13>Nov 12 08:09:56 rpmi: libEGL-7:1.1.0-alt3 sisyphus.215982.100 1541498632 installed <13>Nov 12 08:09:56 rpmi: less-481-alt2 1477575586 installed <13>Nov 12 08:09:56 rpmi: libatm-2.5.1-alt4 1349943444 installed <13>Nov 12 08:09:56 rpmi: chrooted-0.3.9-alt1 1524554183 installed <13>Nov 12 08:09:56 rpmi: chrooted-resolv-0.3.1-alt2 1176155250 installed <13>Nov 12 08:09:56 rpmi: perl-Compress-Raw-Bzip2-2.081-alt1 1523236188 installed <13>Nov 12 08:09:56 rpmi: perl-Filter-1.59-alt1 1533737242 installed <13>Nov 12 08:09:56 rpmi: perl-Encode-2.98-alt1 1525447819 installed <13>Nov 12 08:09:56 rpmi: perl-URI-1.74-alt1 1525446424 installed <13>Nov 12 08:09:56 rpmi: perl-HTML-Parser-3.72-alt1.1.1 1513340808 installed <13>Nov 12 08:09:56 rpmi: perl-IO-Compress-2.081-alt1 1523237108 installed <13>Nov 12 08:09:56 rpmi: perl-Net-HTTP-6.18-alt1 1526560501 installed <13>Nov 12 08:09:56 rpmi: perl-WWW-RobotRules-6.02-alt1 1329756211 installed <13>Nov 12 08:09:56 rpmi: perl-Encode-Locale-1.05-alt1 1444608613 installed <13>Nov 12 08:09:56 rpmi: perl-IO-HTML-1.001-alt1 1404821752 installed <13>Nov 12 08:09:56 rpmi: perl-HTTP-Message-6.18-alt1 1528288416 installed <13>Nov 12 08:09:56 rpmi: perl-HTTP-Cookies-6.04-alt1 1504116575 installed <13>Nov 12 08:09:56 rpmi: perl-HTTP-Negotiate-6.01-alt1 1329760563 installed <13>Nov 12 08:09:56 rpmi: perl-libwww-6.36-alt1 sisyphus.215515.100 1540400896 installed <13>Nov 12 08:09:56 rpmi: perl-XML-Parser-2.44-alt2.1.1 1513346417 installed <13>Nov 12 08:09:56 rpmi: perl-XML-DOM-1.46-alt1 1474815568 installed <13>Nov 12 08:09:56 rpmi: perl-XML-XPath-1.44-alt1 sisyphus.215541.100 1540451758 installed <13>Nov 12 08:09:56 rpmi: perl-HTML-Form-6.03-alt1_18 1531781634 installed <13>Nov 12 08:09:56 rpmi: perl-XML-Writer-0.625-alt1 1402417374 installed <13>Nov 12 08:09:56 rpmi: perl-Pod-Simple-3.35-alt1 1482098090 installed <13>Nov 12 08:09:56 rpmi: perl-Pod-Usage-1.69-alt1 1464274721 installed <13>Nov 12 08:09:56 rpmi: perl-podlators-4.11-alt1 1525935408 installed <13>Nov 12 08:09:56 rpmi: perl-HTML-Formatter-2.16-alt1 1482105372 installed <13>Nov 12 08:09:56 rpmi: perl-HTML-Tree-5.07-alt1 1506480309 installed <13>Nov 12 08:09:56 rpmi: perl-WWW-Mechanize-1.89-alt1 sisyphus.215539.100 1540448373 installed <13>Nov 12 08:09:56 rpmi: perl-MIME-Types-2.17-alt1 1517533413 installed <13>Nov 12 08:09:56 rpmi: perl-MIME-Charset-1.012.2-alt1 1494353584 installed <13>Nov 12 08:09:56 rpmi: perl-Unicode-LineBreak-2018.003-alt1 1522477367 installed <13>Nov 12 08:09:56 rpmi: perl-Text-CSV_XS-1.37-alt1 sisyphus.214305.100 1539023311 installed <13>Nov 12 08:09:56 rpmi: perl-Spreadsheet-ParseExcel-1:0.65-alt1 1395677487 installed <13>Nov 12 08:09:56 rpmi: perl-YAML-Tiny-1.73-alt1 1520430664 installed <13>Nov 12 08:09:56 rpmi: libdb4.7-devel-4.7.25-alt9 1490438479 installed <13>Nov 12 08:09:56 rpmi: perl-devel-1:5.26.2-alt2 1534850821 installed <13>Nov 12 08:09:56 rpmi: hwinfo-utils-21.23-alt1 1449144049 installed <13>Nov 12 08:09:56 rpmi: perl-Test-Fatal-0.014-alt1 1418768336 installed <13>Nov 12 08:09:56 rpmi: perl-Specio-0.43-alt1 sisyphus.215861.100 1540964587 installed <13>Nov 12 08:09:56 rpmi: hd2u-1.0.3-alt2 1400842666 installed <13>Nov 12 08:09:56 rpmi: libverto-0.3.0-alt1_5 1525957714 installed <13>Nov 12 08:09:56 rpmi: libkeyutils-1.5.10-alt1 1489994063 installed <13>Nov 12 08:09:56 rpmi: libcom_err-1.44.3-alt1 1532134732 installed <13>Nov 12 08:09:56 rpmi: libgraphite2-1.3.12-alt2.1 sisyphus.215942.100 1540990757 installed <13>Nov 12 08:09:56 rpmi: libharfbuzz-2.0.2-alt1 sisyphus.215425.100 1540400162 installed <13>Nov 12 08:09:56 rpmi: libfreetype-2.9.1-alt1.S1 1530781053 installed <13>Nov 12 08:09:56 rpmi: fontconfig-2.13.1-alt1 sisyphus.215917.100 1540973886 installed Updating fonts cache: <29>Nov 12 08:09:57 fontconfig: Updating fonts cache: succeeded [ DONE ] <13>Nov 12 08:09:57 rpmi: libXft-2.3.2-alt1 1409902660 installed <13>Nov 12 08:09:57 rpmi: libtk-8.6.8-alt1 1518663864 installed <13>Nov 12 08:09:57 rpmi: tk-8.6.8-alt1 1518663864 installed <13>Nov 12 08:09:58 rpmi: perl-Tk-804.034-alt1.1 1513447202 installed <13>Nov 12 08:09:58 rpmi: fonts-type1-urw-3:1.0.7pre44-alt2 1419342366 installed <13>Nov 12 08:09:58 rpmi: libcairo-1:1.16.0-alt1 sisyphus.215566.100 1540457683 installed <13>Nov 12 08:09:58 rpmi: libgd3-2.2.5-alt2.S1 1525496226 installed <13>Nov 12 08:09:58 rpmi: ttf2pt1-3.4.4-alt1.qa1 1366267507 installed <13>Nov 12 08:09:58 rpmi: gcc-fortran-common-1.4.22-alt1 1519183788 installed <13>Nov 12 08:09:58 rpmi: libgfortran7-devel-7.3.1-alt5 1531512767 installed <13>Nov 12 08:09:59 rpmi: gcc7-fortran-7.3.1-alt5 1531512767 installed <13>Nov 12 08:09:59 rpmi: gcc-fortran-7-alt6 1528289187 installed <13>Nov 12 08:09:59 rpmi: gcc-c++-common-1.4.22-alt1 1519183788 installed <13>Nov 12 08:09:59 rpmi: libstdc++7-devel-7.3.1-alt5 1531512767 installed <13>Nov 12 08:10:00 rpmi: gcc7-c++-7.3.1-alt5 1531512767 installed <13>Nov 12 08:10:00 rpmi: gcc-c++-7-alt6 1528289187 installed <13>Nov 12 08:10:00 rpmi: libseccomp-2.3.3-alt1.S1.1 1525143458 installed <13>Nov 12 08:10:00 rpmi: libpcre2-10.32-alt1 sisyphus.212994.100 1536866761 installed <13>Nov 12 08:10:00 rpmi: libjson-c-0.12.1-alt2 1517446106 installed <13>Nov 12 08:10:00 rpmi: libargon2-20171227-alt1 1517446229 installed <13>Nov 12 08:10:00 rpmi: libgpg-error-1.31-alt1.S1 1529015802 installed <13>Nov 12 08:10:00 rpmi: libgcrypt20-1.8.3-alt3 sisyphus.214019.140 1538990448 installed <13>Nov 12 08:10:00 rpmi: libsystemd-1:239-alt3 sisyphus.215710.300 1540765641 installed <13>Nov 12 08:10:00 rpmi: libdbus-1.12.10-alt1 sisyphus.212941.100 1536831873 installed <13>Nov 12 08:10:00 rpmi: libavahi-0.6.32-alt1 1500485702 installed <13>Nov 12 08:10:00 rpmi: libcryptsetup-2.0.2-alt1 1522280004 installed <13>Nov 12 08:10:00 rpmi: libxslt-1.1.32-alt2 1517429984 installed <13>Nov 12 08:10:00 rpmi: hwclock-1:2.32-alt2 1528296111 installed <13>Nov 12 08:10:00 rpmi: startup-0.9.9.5-alt1.2 1397832469 installed <13>Nov 12 08:10:00 rpmi: systemd-utils-1:239-alt3 sisyphus.215710.300 1540765641 installed <13>Nov 12 08:10:00 rpmi: udev-hwdb-1:239-alt3 sisyphus.215710.300 1540765573 installed <13>Nov 12 08:10:00 rpmi: hashalot-0.3-alt1.qa1 1366323553 installed <13>Nov 12 08:10:00 rpmi: losetup-2.32-alt2 1528296111 installed <13>Nov 12 08:10:00 rpmi: lsblk-2.32-alt2 1528296111 installed <13>Nov 12 08:10:00 rpmi: dmsetup-1.02.150-alt1 1534113691 installed <86>Nov 12 08:10:00 groupadd[35858]: group added to /etc/group: name=tape, GID=499 <86>Nov 12 08:10:00 groupadd[35858]: group added to /etc/gshadow: name=tape <86>Nov 12 08:10:00 groupadd[35858]: new group: name=tape, GID=499 <86>Nov 12 08:10:00 groupadd[35932]: group added to /etc/group: name=dialout, GID=498 <86>Nov 12 08:10:00 groupadd[35932]: group added to /etc/gshadow: name=dialout <86>Nov 12 08:10:00 groupadd[35932]: new group: name=dialout, GID=498 <86>Nov 12 08:10:01 groupadd[35974]: group added to /etc/group: name=input, GID=497 <86>Nov 12 08:10:01 groupadd[35974]: group added to /etc/gshadow: name=input <86>Nov 12 08:10:01 groupadd[35974]: new group: name=input, GID=497 <86>Nov 12 08:10:01 groupadd[36027]: group added to /etc/group: name=video, GID=496 <86>Nov 12 08:10:01 groupadd[36027]: group added to /etc/gshadow: name=video <86>Nov 12 08:10:01 groupadd[36027]: new group: name=video, GID=496 <86>Nov 12 08:10:01 groupadd[36091]: group added to /etc/group: name=render, GID=495 <86>Nov 12 08:10:01 groupadd[36091]: group added to /etc/gshadow: name=render <86>Nov 12 08:10:01 groupadd[36091]: new group: name=render, GID=495 <13>Nov 12 08:10:01 rpmi: udev-1:239-alt3 sisyphus.215710.300 1540765641 installed <13>Nov 12 08:10:01 rpmi: libdialog-1.3.20171209-alt1 1529583087 installed <13>Nov 12 08:10:01 rpmi: dialog-1.3.20171209-alt1 1529583087 installed <13>Nov 12 08:10:01 rpmi: libtasn1-4.13-alt2 1521133850 installed <13>Nov 12 08:10:01 rpmi: libp11-kit-0.23.9-alt5 1525798298 installed <13>Nov 12 08:10:01 rpmi: rpm-macros-alternatives-0.4.5-alt1.1 1404382149 installed <13>Nov 12 08:10:01 rpmi: alternatives-0.4.5-alt1.1 1404382149 installed <13>Nov 12 08:10:02 rpmi: libnss-3.39.0-alt1 sisyphus.212781.200 1536519404 installed <13>Nov 12 08:10:02 rpmi: nss-utils-3.39.0-alt1 sisyphus.212781.200 1536519404 installed <13>Nov 12 08:10:02 rpmi: netpbm-10.35.97-alt1.qa1 sisyphus.214808.100 1539731139 installed <13>Nov 12 08:10:02 rpmi: ca-certificates-2018.09.09-alt1 sisyphus.212781.100 1536518628 installed <13>Nov 12 08:10:02 rpmi: ca-trust-0.1.1-alt2 1515595785 installed <13>Nov 12 08:10:02 rpmi: p11-kit-trust-0.23.9-alt5 1525798298 installed <13>Nov 12 08:10:02 rpmi: libcrypto1.1-1.1.0i-alt1 1535471315 installed <13>Nov 12 08:10:02 rpmi: libssl1.1-1.1.0i-alt1 1535471315 installed <86>Nov 12 08:10:02 groupadd[37861]: group added to /etc/group: name=_keytab, GID=494 <86>Nov 12 08:10:02 groupadd[37861]: group added to /etc/gshadow: name=_keytab <86>Nov 12 08:10:02 groupadd[37861]: new group: name=_keytab, GID=494 <13>Nov 12 08:10:02 rpmi: libkrb5-1.16.2-alt1 sisyphus.216047.100 1541159177 installed <13>Nov 12 08:10:02 rpmi: rpm-build-python3-0.1.13.1-alt2 1535450458 installed <13>Nov 12 08:10:02 rpmi: tests-for-installed-python3-pkgs-0.1.13.1-alt2 1535450458 installed <13>Nov 12 08:10:02 rpmi: python3-3.6.5-alt1.1 1535734576 installed <13>Nov 12 08:10:03 rpmi: python3-base-3.6.5-alt1.1 1535734576 installed <13>Nov 12 08:10:03 rpmi: libpython3-3.6.5-alt1.1 1535734576 installed <13>Nov 12 08:10:03 rpmi: libcrypto10-1.0.2p-alt2 1535474186 installed <13>Nov 12 08:10:03 rpmi: libssl10-1.0.2p-alt2 1535474186 installed <13>Nov 12 08:10:04 rpmi: ruby-stdlibs-2.5.1-alt4 sisyphus.209945.120 1537061465 installed <13>Nov 12 08:10:04 rpmi: ruby-2.5.1-alt4 sisyphus.209945.120 1537061465 installed <13>Nov 12 08:10:04 rpmi: libcups-2.2.6-alt1 1510070343 installed <13>Nov 12 08:10:04 rpmi: libgs-9.25-alt2 sisyphus.213398.100 1537455990 installed <13>Nov 12 08:10:05 rpmi: ghostscript-common-9.25-alt2 sisyphus.213398.100 1537455952 installed <13>Nov 12 08:10:05 rpmi: ghostscript-classic-9.25-alt2 sisyphus.213398.100 1537455990 installed <13>Nov 12 08:10:05 rpmi: libcurl-7.62.0-alt2 sisyphus.215995.100 1541066190 installed <13>Nov 12 08:10:05 rpmi: libpoppler78-0.67.0-alt2 sisyphus.216206.300 1541601226 installed <13>Nov 12 08:10:05 rpmi: libtirpc-1.0.3-alt1 1532008017 installed <13>Nov 12 08:10:05 rpmi: libnsl2-1.1.0-alt1_1 1511548749 installed <13>Nov 12 08:10:05 rpmi: python-modules-compiler-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:05 rpmi: python-modules-email-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:05 rpmi: python-modules-unittest-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:05 rpmi: python-modules-nis-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:05 rpmi: python-modules-encodings-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:06 rpmi: python-modules-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:06 rpmi: python-module-six-1.11.0-alt2 1535611135 installed <13>Nov 12 08:10:06 rpmi: python-modules-xml-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:06 rpmi: python-modules-ctypes-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:06 rpmi: python-module-pkg_resources-1:40.5.0-alt1 sisyphus.216029.100 1541106477 installed <13>Nov 12 08:10:06 rpmi: python-modules-json-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:06 rpmi: python-modules-multiprocessing-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:06 rpmi: python-modules-logging-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:06 rpmi: python-modules-hotshot-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:06 rpmi: python-module-py-1.7.0-alt1 sisyphus.214414.220 1539670883 installed <13>Nov 12 08:10:06 rpmi: python-module-chardet-3.0.4-alt1 1506613818 installed <13>Nov 12 08:10:06 rpmi: python-tools-2to3-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:06 rpmi: python-module-future-0.16.0-alt2 1500998941 installed <13>Nov 12 08:10:06 rpmi: python-module-pyglet-1.3.0-alt4.a1.hg20150730.1.1.1 1460413686 installed <13>Nov 12 08:10:06 rpmi: python-module-whoosh-2.7.4-alt1 1527697941 installed <13>Nov 12 08:10:06 rpmi: python-module-webencodings-0.5.1-alt1.1 1517943573 installed <13>Nov 12 08:10:06 rpmi: python-module-more-itertools-4.3.0-alt1 1533048475 installed <13>Nov 12 08:10:06 rpmi: python-modules-bsddb-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:06 rpmi: python-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:06 rpmi: python-strict-2.7.14-alt7.1 sisyphus.212296.100 1535808793 installed <13>Nov 12 08:10:06 rpmi: python-modules-distutils-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:06 rpmi: python-module-idna-2.7-alt1 1530720902 installed <13>Nov 12 08:10:06 rpmi: python-module-numpy-1:1.13.3-alt2.2.qa1 sisyphus.214885.100 1539806695 installed <13>Nov 12 08:10:06 rpmi: python-module-numpy-testing-1:1.13.3-alt2.2.qa1 sisyphus.214885.100 1539806695 installed <13>Nov 12 08:10:07 rpmi: python-module-pycparser-2.19-alt1 sisyphus.216095.100 1541345023 installed <13>Nov 12 08:10:07 rpmi: python-module-cffi-1.10.0-alt1.1 1525117736 installed <13>Nov 12 08:10:07 rpmi: python-module-asn1crypto-0.24.0-alt1 1521037480 installed <13>Nov 12 08:10:07 rpmi: python-module-PyStemmer-1.0.1-alt1.2.1 1321388303 installed <13>Nov 12 08:10:07 rpmi: python-module-snowballstemmer-1.2.0-alt2.1 1457859319 installed <13>Nov 12 08:10:07 rpmi: python-module-cssselect-0.9.1-alt1.2 1526980827 installed <13>Nov 12 08:10:07 rpmi: python-module-html5lib-1:0.999999999-alt4.qa1 sisyphus.214868.100 1539741045 installed <13>Nov 12 08:10:07 rpmi: python-module-lxml-4.2.1-alt1.1 1525119302 installed <13>Nov 12 08:10:07 rpmi: python-module-docutils-0.14-alt2 1535729778 installed <13>Nov 12 08:10:07 rpmi: python-module-ntlm-1.1.0-alt1.1.1.1 1460405346 installed <13>Nov 12 08:10:07 rpmi: python-module-pytz-1:2016.10-alt1 1484291011 installed <13>Nov 12 08:10:07 rpmi: python-module-babel-1:2.4.0-alt1.1 1517644530 installed <13>Nov 12 08:10:07 rpmi: python-module-attrs-18.2.0-alt1 sisyphus.214354.100 1539088435 installed <13>Nov 12 08:10:07 rpmi: python-module-ipaddress-1.0.18-alt1.1 1517713372 installed <13>Nov 12 08:10:07 rpmi: python-module-cryptography-2.3.0-alt1.1 sisyphus.212297.100 1535813262 installed <13>Nov 12 08:10:07 rpmi: python-module-OpenSSL-18.0.0-alt1 1532996168 installed <13>Nov 12 08:10:07 rpmi: python-module-simplejson-3.15.0-alt1.qa1 sisyphus.214917.100 1539845528 installed <13>Nov 12 08:10:07 rpmi: python-module-ndg-0.4.2-alt1.qa1 1531457735 installed <13>Nov 12 08:10:07 rpmi: python-module-ndg-httpsclient-0.4.2-alt1.qa1 1531457735 installed <13>Nov 12 08:10:07 rpmi: python-module-backports-3.5.0.1-alt1.1.1 1517645428 installed <13>Nov 12 08:10:07 rpmi: python-module-backports.ssl_match_hostname-3.5.0.1-alt1.1.1 1517645428 installed <13>Nov 12 08:10:07 rpmi: python-module-urllib3-2:1.21.1-alt1 1506613994 installed <13>Nov 12 08:10:07 rpmi: python-module-requests-2.19.1-alt1 1530831197 installed <13>Nov 12 08:10:07 rpmi: python-module-typing-3.6.4-alt1 1517577671 installed <13>Nov 12 08:10:07 rpmi: python-module-markupsafe-0.23-alt1.2.1.1 1525118834 installed <13>Nov 12 08:10:07 rpmi: python-module-jinja2-2.10-alt1 1521724576 installed <13>Nov 12 08:10:07 rpmi: python-modules-sqlite3-2.7.14-alt7.1 sisyphus.212296.100 1535808823 installed <13>Nov 12 08:10:08 rpmi: python-module-SQLAlchemy-1.0.12-alt1.1 1525119509 installed <13>Nov 12 08:10:08 rpmi: python-module-funcsigs-1.0.2-alt1.1 1517699355 installed <13>Nov 12 08:10:08 rpmi: python-module-scandir-1.9.0-alt1 1535455370 installed <13>Nov 12 08:10:08 rpmi: python-module-pathlib2-2.3.2-alt1 1535455443 installed <13>Nov 12 08:10:08 rpmi: python-module-atomicwrites-1.2.1-alt1 sisyphus.214347.100 1539076636 installed <13>Nov 12 08:10:08 rpmi: python-module-mpmath-0.19-alt1.git20150621.1.1.1.1 1496417680 installed <13>Nov 12 08:10:08 rpmi: python-module-sympy-1:1.1.1-alt1.1 1517989815 installed <13>Nov 12 08:10:08 rpmi: python-module-sympy-tests-1:1.1.1-alt1.1 1517989815 installed <13>Nov 12 08:10:08 rpmi: python-module-xapian-1.4.5-alt2.qa1 1531484078 installed <13>Nov 12 08:10:09 rpmi: python-module-pluggy-0.8.0-alt1 sisyphus.215346.100 1540073015 installed <13>Nov 12 08:10:09 rpmi: python-module-pytest-3.9.3-alt1 sisyphus.215666.100 1540687418 installed <13>Nov 12 08:10:09 rpmi: python-module-sphinxcontrib-websupport-1.0.1-alt3.qa1 sisyphus.214922.100 1539851266 installed <13>Nov 12 08:10:09 rpmi: python-module-alabaster-0.7.6-alt3 1526385201 installed <13>Nov 12 08:10:09 rpmi: python-module-Pygments-2.2.0-alt2 1526455576 installed <13>Nov 12 08:10:09 rpmi: python-module-sphinx-1:1.6.5-alt3 sisyphus.213215.100 1537280252 installed <13>Nov 12 08:10:09 rpmi: perl-Net-SSLeay-1.85-alt1.1 1535797032 installed <13>Nov 12 08:10:09 rpmi: perl-IO-Socket-SSL-2.060-alt1 sisyphus.213414.100 1537479277 installed <13>Nov 12 08:10:09 rpmi: perl-Net-HTTPS-6.18-alt1 1526560501 installed <13>Nov 12 08:10:09 rpmi: perl-LWP-Protocol-https-6.07-alt1 1494527383 installed <13>Nov 12 08:10:09 rpmi: perl-Net-SMTP-SSL-1.04-alt1 1479470835 installed <13>Nov 12 08:10:09 rpmi: perl-MailTools-2.20-alt1 1517533205 installed <13>Nov 12 08:10:09 rpmi: perl-MIME-Lite-3.030-alt1 1383865152 installed <13>Nov 12 08:10:09 rpmi: perl-Log-Dispatch-2.68-alt1 sisyphus.212465.100 1535917600 installed <13>Nov 12 08:10:09 rpmi: perl-Log-Log4perl-1.49-alt1 1489613295 installed <86>Nov 12 08:10:09 groupadd[43974]: group added to /etc/group: name=iputils, GID=493 <86>Nov 12 08:10:09 groupadd[43974]: group added to /etc/gshadow: name=iputils <86>Nov 12 08:10:09 groupadd[43974]: new group: name=iputils, GID=493 <86>Nov 12 08:10:09 useradd[44013]: new user: name=iputils, UID=499, GID=493, home=/dev/null, shell=/dev/null <86>Nov 12 08:10:09 groupadd[44026]: group added to /etc/group: name=netadmin, GID=492 <86>Nov 12 08:10:09 groupadd[44026]: group added to /etc/gshadow: name=netadmin <86>Nov 12 08:10:09 groupadd[44026]: new group: name=netadmin, GID=492 <13>Nov 12 08:10:09 rpmi: iputils-20180629-alt1 1535650704 installed sysctl: cannot stat /proc/sys/net/ipv4/ping_group_range: No such file or directory <13>Nov 12 08:10:09 rpmi: iproute2-4.18.0-alt1 1534194784 installed <13>Nov 12 08:10:09 rpmi: rdma-core-20.1-alt1 sisyphus.215851.40 1541165555 installed <13>Nov 12 08:10:09 rpmi: ibacm-20.1-alt1 sisyphus.215851.40 1541165555 installed <13>Nov 12 08:10:09 rpmi: rdma-core-devel-20.1-alt1 sisyphus.215851.40 1541165555 installed <13>Nov 12 08:10:09 rpmi: gambit-4.7.7-alt1.1.1 1520125611 installed <13>Nov 12 08:10:09 rpmi: foomatic-db-engine-4.0.12-alt1 1449527983 installed <13>Nov 12 08:10:09 rpmi: ghostscript-utils-9.25-alt2 sisyphus.213398.100 1537455952 installed <13>Nov 12 08:10:10 rpmi: texlive-2018-alt2_4 sisyphus.215831.100 1540947212 installed <13>Nov 12 08:10:23 rpmi: texlive-collection-basic-2018-alt1_5 sisyphus.215114.200 1539918315 installed <13>Nov 12 08:10:23 rpmi: openmpi-devel-2.0.1-alt6 1530784323 installed Building target platforms: i586 Building for target i586 Wrote: /usr/src/in/nosrpm/mct-2.8.3-alt1.nosrc.rpm Installing mct-2.8.3-alt1.src.rpm Building target platforms: i586 Building for target i586 Executing(%prep): /bin/sh -e /usr/src/tmp/rpm-tmp.79981 + umask 022 + /bin/mkdir -p /usr/src/RPM/BUILD + cd /usr/src/RPM/BUILD + cd /usr/src/RPM/BUILD + rm -rf mct-2.8.3 + echo 'Source #0 (MCT.tar.gz):' Source #0 (MCT.tar.gz): + /bin/tar -xf - + /bin/gzip -dc /usr/src/RPM/SOURCES/MCT.tar.gz + cd mct-2.8.3 + /bin/chmod -c -Rf u+rwX,go-w . ++ find ./ -name .cvsignore + rm -f + exit 0 Executing(%build): /bin/sh -e /usr/src/tmp/rpm-tmp.46489 + umask 022 + /bin/mkdir -p /usr/src/RPM/BUILD + cd /usr/src/RPM/BUILD + cd mct-2.8.3 + mpi-selector --set openmpi + source /usr/lib/openmpi/bin/mpivars.sh ++ grep -q /usr/lib/openmpi/bin ++ echo /usr/src/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/games ++ PATH=/usr/lib/openmpi/bin:/usr/src/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/games ++ export PATH ++ grep -q /usr/lib/openmpi/lib ++ echo ++ LD_LIBRARY_PATH=/usr/lib/openmpi/lib ++ export LD_LIBRARY_PATH ++ echo ++ grep -q /usr/lib/openmpi/man ++ MANPATH=/usr/lib/openmpi/man: ++ export MANPATH + export 'OMPI_LDFLAGS=-Wl,--as-needed,-rpath,/usr/lib/openmpi/lib -L/usr/lib/openmpi/lib' + OMPI_LDFLAGS='-Wl,--as-needed,-rpath,/usr/lib/openmpi/lib -L/usr/lib/openmpi/lib' + autoreconf -fisv autoreconf-default: Entering directory `.' autoreconf-default: configure.ac: not using Gettext autoreconf-default: running: aclocal --force autoreconf-default: configure.ac: tracing autoreconf-default: configure.ac: not using Libtool autoreconf-default: configure.ac: not using Intltool autoreconf-default: configure.ac: not using gtk-doc autoreconf-default: running: /usr/bin/autoconf-2.60 --force autoreconf-default: running: /usr/bin/autoheader-2.60 --force autoreconf-default: configure.ac: not using Automake autoreconf-default: Leaving directory `.' + MPILIBS='-L/usr/lib/openmpi/lib -lmpi_f90' + MPILIBS='-L/usr/lib/openmpi/lib -lmpi_f90 -lmpi_f77 -lmpi -Wl,-rpath,/usr/lib/openmpi/lib' + CFLAGS='-pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic' + export CFLAGS + CXXFLAGS='-pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic' + export CXXFLAGS + FFLAGS='-pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic' + export FFLAGS + '[' -n '' ']' ++ printf %s '-pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic' ++ sed -r 's/(^|[[:space:]]+)-[^m][^[:space:]]*//g' + ASFLAGS=' -march=i586 -mtune=generic' + export ASFLAGS + export lt_cv_deplibs_check_method=pass_all + lt_cv_deplibs_check_method=pass_all + readlink -e -- ./configure + xargs -ri dirname -- '{}' + xargs -ri find '{}' -type f '(' -name config.sub -or -name config.guess ')' -printf '%h/\n' + sort -u + xargs -rn1 install -pm755 -- /usr/share/gnu-config/config.sub /usr/share/gnu-config/config.guess + ./configure --build=i586-alt-linux --host=i586-alt-linux --prefix=/usr --exec-prefix=/usr --bindir=/usr/bin --sbindir=/usr/sbin --sysconfdir=/etc --datadir=/usr/share --includedir=/usr/include --libdir=/usr/lib --libexecdir=/usr/lib --localstatedir=/var/lib --sharedstatedir=/var/lib --mandir=/usr/share/man --infodir=/usr/share/info --disable-dependency-tracking --without-included-gettext 'MPILIBS=-L/usr/lib/openmpi/lib -lmpi_f90 -lmpi_f77 -lmpi -Wl,-rpath,/usr/lib/openmpi/lib' MPIHEADER=-I/usr/lib/openmpi/include FC=mpif77 F90=mpif90 CC=mpicc 'OPT=-pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC' configure: WARNING: unrecognized options: --disable-dependency-tracking, --without-included-gettext checking for i586-alt-linux-cc... mpicc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... o checking whether we are using the GNU C compiler... yes checking whether mpicc accepts -g... yes checking for mpicc option to accept ISO C89... none needed checking how to run the C preprocessor... mpicc -E checking for grep that handles long lines and -e... /bin/grep checking for egrep... /bin/grep -E checking for ANSI C header files... yes checking for sys/types.h... yes checking for sys/stat.h... yes checking for stdlib.h... yes checking for string.h... yes checking for memory.h... yes checking for strings.h... yes checking for inttypes.h... yes checking for stdint.h... yes checking for unistd.h... yes checking whether byte ordering is bigendian... no checking for i586-alt-linux-nagfor... mpif77 checking whether we are using the GNU Fortran compiler... yes checking whether mpif77 accepts -g... yes checking for Fortran flag to compile .F90 files... none checking for mpif90... mpif90 checking for mpif.h... yes Checking Compiler Version checking how to get the version output from mpif77... --version checking for Fortran flag to compile preprocessed .F files... none checking how to define symbols for preprocessed Fortran... -D checking how to get verbose linking output from mpif77... -v checking for Fortran libraries of mpif77... -L/usr/lib/openmpi/lib -L/usr/lib/gcc/i586-alt-linux/7 -L/usr/lib/gcc/i586-alt-linux/7/../../.. -lmpi_usempif08 -lmpi_usempi_ignore_tkr -lmpi_mpifh -lmpi -lgfortran -lm -lquadmath -lpthread checking for dummy main to link with Fortran libraries... none checking for Fortran name-mangling scheme... lower case, underscore, no extra underscore Hostname=localhost.localdomain Machine=i686 OS=Linux Output Variables: {CC=mpicc} {CFLAGS=-pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic} {FC=mpif77} {FCFLAGS=-g -O2} {PROGFCFLAGS=}{CPPDEFS= -DSYSLINUX -DCPR} {OPT=-pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC} {DEBUG=} {REAL8=} {BIT64=} {ENDIAN=} {MPIFC=mpif90} {MPILIBS=-L/usr/lib/openmpi/lib -lmpi_f90 -lmpi_f77 -lmpi -Wl,-rpath,/usr/lib/openmpi/lib} {MPIHEADER=-I/usr/lib/openmpi/include} {INCLUDEFLAG=-I} {INCLUDEPATH=} {AR=ar cq} {BABELROOT=} {COMPILER_ROOT=} {PYTHON=} {PYTHONOPTS=} {FORT_SIZE=} {prefix=/usr} {SRCDIR=} {FC_DEFINE=-D} configure: creating ./config.status config.status: creating Makefile.conf config.status: creating config.h configure: WARNING: unrecognized options: --disable-dependency-tracking, --without-included-gettext Please check the Makefile.conf Have a nice day! + make make: Entering directory '/usr/src/RPM/BUILD/mct-2.8.3' make[1]: Entering directory '/usr/src/RPM/BUILD/mct-2.8.3/mpeu' mpicc -c -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -I/usr/lib/openmpi/include -I. -I../ get_zeits.c mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_mpif.F90 m_mpif.F90:31:1: module m_mpif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:32:1: implicit none 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:33:1: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:35:1: public :: MPI_INTEGER 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:36:1: public :: MPI_REAL 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:37:1: public :: MPI_DOUBLE_PRECISION 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:38:1: public :: MPI_LOGICAL 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:39:1: public :: MPI_CHARACTER 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:41:1: public :: MPI_REAL4 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:42:1: public :: MPI_REAL8 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:44:1: public :: MPI_COMM_WORLD 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:45:1: public :: MPI_COMM_NULL 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:47:1: public :: MPI_SUM 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:48:1: public :: MPI_PROD 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:49:1: public :: MPI_MIN 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:50:3: public :: MPI_MAX 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:52:1: public :: MPI_MAX_ERROR_STRING 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:53:1: public :: MPI_STATUS_SIZE 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:54:1: public :: MPI_ANY_SOURCE 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:66:1: character(len=*),parameter :: myname='MCT(MPEU)::m_mpif' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif.F90:68:1: end module m_mpif 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_realkinds.F90 m_realkinds.F90:17:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_realkinds.F90:19:24: public :: kind_r4 ! real*4 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_realkinds.F90:20:24: public :: kind_r8 ! real*8 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_realkinds.F90:21:23: public :: kind_r ! default real 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_realkinds.F90:22:19: public :: SP ! default REAL 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_realkinds.F90:23:19: public :: DP ! default DOUBLE_PRECISION 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_realkinds.F90:24:19: public :: FP ! general floating point precision 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_stdio.F90 m_stdio.F90:16:1: module m_stdio 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_stdio.F90:17:1: implicit none 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_stdio.F90:18:1: private 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_stdio.F90:20:1: public :: stdin ! a unit linked to UNIX stdin 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_stdio.F90:21:1: public :: stdout ! a unit linked to UNIX stdout 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_stdio.F90:22:1: public :: stderr ! a unit linked to UNIX stderr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_stdio.F90:24:1: public :: LEN_FILENAME 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_stdio.F90:36:1: integer, parameter :: stdin = 5 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_stdio.F90:37:1: integer, parameter :: stdout = 6 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_stdio.F90:46:1: integer, parameter :: stderr = 0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_stdio.F90:49:1: integer, parameter :: LEN_FILENAME = 128 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_mpif90.F90 m_mpif90.F90:26:36: use m_mpif, only : MP_INTEGER => MPI_INTEGER 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:27:33: use m_mpif, only : MP_REAL => MPI_REAL 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:28:45: use m_mpif, only : MP_DOUBLE_PRECISION & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:29:1: => MPI_DOUBLE_PRECISION 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:30:36: use m_mpif, only : MP_LOGICAL => MPI_LOGICAL 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:31:38: use m_mpif, only : MP_CHARACTER => MPI_CHARACTER 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:33:34: use m_mpif, only : MP_REAL4 => MPI_REAL4 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:34:34: use m_mpif, only : MP_REAL8 => MPI_REAL8 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:36:39: use m_mpif, only : MP_COMM_WORLD => MPI_COMM_WORLD 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:37:38: use m_mpif, only : MP_COMM_NULL => MPI_COMM_NULL 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:38:32: use m_mpif, only : MP_SUM => MPI_SUM 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:39:33: use m_mpif, only : MP_PROD => MPI_PROD 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:40:33: use m_mpif, only : MP_MIN => MPI_MIN 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:41:33: use m_mpif, only : MP_MAX => MPI_MAX 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:42:45: use m_mpif, only : MP_MAX_ERROR_STRING & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:43:1: => MPI_MAX_ERROR_STRING 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:45:39: use m_mpif, only : MP_ANY_SOURCE => MPI_ANY_SOURCE 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:142:36: interface MP_type; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:143:10: typeI_, & ! MPI_INTEGER 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:144:10: typeL_, & ! MPI_LOGICAL 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:145:10: typeC_, & ! MPI_CHARACTER 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:146:11: typeSP_, & ! MPI_REAL 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:147:11: typeDP_, & ! MPI_DOUBLE_PRECISION 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:148:11: typeI1_, & ! MPI_INTEGER 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:149:11: typeL1_, & ! MPI_LOGICAL 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:150:11: typeC1_, & ! MPI_CHARACTER 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:151:12: typeSP1_, & ! MPI_REAL 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:152:12: typeDP1_, & ! MPI_DOUBLE_PRECISION 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:153:11: typeI2_, & ! MPI_INTEGER 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:154:11: typeL2_, & ! MPI_LOGICAL 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:155:11: typeC2_, & ! MPI_CHARACTER 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:156:12: typeSP2_, & ! MPI_REAL 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:157:11: typeDP2_ ! MPI_DOUBLE_PRECISION 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:217:58: subroutine MPI_cart_create(comm_old,ndims,dims,periods, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:218:3: reorder,comm_cart,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:217:58: subroutine MPI_cart_create(comm_old,ndims,dims,periods, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:218:3: reorder,comm_cart,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:676:39: write(stderr,'(4a,i4)') proc,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:677:1: MP_proc,' error, ierror =',ierror 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:676:39: write(stderr,'(4a,i4)') proc,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:677:1: MP_proc,' error, ierror =',ierror 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:676:39: write(stderr,'(4a,i4)') proc,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:677:1: MP_proc,' error, ierror =',ierror 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:676:39: write(stderr,'(4a,i4)') proc,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:677:1: MP_proc,' error, ierror =',ierror 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:676:39: write(stderr,'(4a,i4)') proc,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:677:1: MP_proc,' error, ierror =',ierror 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:679:36: write(stderr,'(6a)') proc,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:680:1: MP_proc,' error, "',estr(1:ln),'"' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:679:36: write(stderr,'(6a)') proc,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:680:1: MP_proc,' error, "',estr(1:ln),'"' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:679:36: write(stderr,'(6a)') proc,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:680:1: MP_proc,' error, "',estr(1:ln),'"' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:679:36: write(stderr,'(6a)') proc,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:680:1: MP_proc,' error, "',estr(1:ln),'"' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:679:36: write(stderr,'(6a)') proc,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:680:1: MP_proc,' error, "',estr(1:ln),'"' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpif90.F90:631:26: function typeDP2_(rval) 1 Warning: Unused dummy argument 'rval' at (1) [-Wunused-dummy-argument] m_mpif90.F90:604:26: function typeSP2_(rval) 1 Warning: Unused dummy argument 'rval' at (1) [-Wunused-dummy-argument] m_mpif90.F90:579:25: function typeC2_(cval) 1 Warning: Unused dummy argument 'cval' at (1) [-Wunused-dummy-argument] m_mpif90.F90:554:25: function typeL2_(lval) 1 Warning: Unused dummy argument 'lval' at (1) [-Wunused-dummy-argument] m_mpif90.F90:529:25: function typeI2_(ival) 1 Warning: Unused dummy argument 'ival' at (1) [-Wunused-dummy-argument] m_mpif90.F90:502:26: function typeDP1_(rval) 1 Warning: Unused dummy argument 'rval' at (1) [-Wunused-dummy-argument] m_mpif90.F90:475:26: function typeSP1_(rval) 1 Warning: Unused dummy argument 'rval' at (1) [-Wunused-dummy-argument] m_mpif90.F90:450:25: function typeC1_(cval) 1 Warning: Unused dummy argument 'cval' at (1) [-Wunused-dummy-argument] m_mpif90.F90:425:25: function typeL1_(lval) 1 Warning: Unused dummy argument 'lval' at (1) [-Wunused-dummy-argument] m_mpif90.F90:400:25: function typeI1_(ival) 1 Warning: Unused dummy argument 'ival' at (1) [-Wunused-dummy-argument] m_mpif90.F90:373:25: function typeDP_(rval) 1 Warning: Unused dummy argument 'rval' at (1) [-Wunused-dummy-argument] m_mpif90.F90:346:25: function typeSP_(rval) 1 Warning: Unused dummy argument 'rval' at (1) [-Wunused-dummy-argument] m_mpif90.F90:321:24: function typeC_(cval) 1 Warning: Unused dummy argument 'cval' at (1) [-Wunused-dummy-argument] m_mpif90.F90:296:24: function typeL_(lval) 1 Warning: Unused dummy argument 'lval' at (1) [-Wunused-dummy-argument] m_mpif90.F90:271:24: function typeI_(ival) 1 Warning: Unused dummy argument 'ival' at (1) [-Wunused-dummy-argument] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_dropdead.F90 m_dropdead.F90:17:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_dropdead.F90:19:13: public :: die ! terminate a program with a condition 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_dropdead.F90:21:38: interface die; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_dropdead.F90:22:1: die_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_dropdead.F90:23:1: diex_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_dropdead.F90:53:43: character(len=*),intent(in) :: where ! where it is called 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_dropdead.F90:79:50: write(stderr,'(z3.3,5a)') myrank,'.',myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_dropdead.F90:92:51: write(stderr,'(5a)') 'unknown rank .',myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_dropdead.F90:127:43: character(len=*),intent(in) :: where ! where it is called 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_dropdead.F90:158:50: write(stderr,'(z3.3,9a)') myrank,'.',myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_dropdead.F90:159:34: ': from ',trim(where),'()', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_dropdead.F90:160:39: ', line ',trim(adjustl(lineno)), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_dropdead.F90:174:51: write(stderr,'(9a)') 'unknown rank .',myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_dropdead.F90:175:34: ': from ',trim(where),'()', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_dropdead.F90:176:39: ', line ',trim(adjustl(lineno)), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_chars.F90 m_chars.F90:15:1: module m_chars 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:16:1: implicit none 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:17:1: private 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:19:1: public :: operator (.upper.) ! convert a string to uppercase 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:20:1: public :: uppercase 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:22:1: public :: operator (.lower.) ! convert a string to lowercase 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:23:1: public :: lowercase 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:25:1: interface operator (.upper.) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:26:1: module procedure upper_case 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:27:1: end interface 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:28:1: interface uppercase 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:29:1: module procedure upper_case 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:30:1: end interface 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:32:1: interface operator (.lower.) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:33:1: module procedure lower_case 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:34:1: end interface 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:35:1: interface lowercase 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:36:1: module procedure lower_case 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:37:1: end interface 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:71:46: if(str(i:i).ge.'a'.and.str(i:i).le.'z') & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:72:7: ustr(i:i)=char(ichar(str(i:i))+il2u) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:71:46: if(str(i:i).ge.'a'.and.str(i:i).le.'z') & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:72:7: ustr(i:i)=char(ichar(str(i:i))+il2u) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:71:46: if(str(i:i).ge.'a'.and.str(i:i).le.'z') & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:72:7: ustr(i:i)=char(ichar(str(i:i))+il2u) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:71:46: if(str(i:i).ge.'a'.and.str(i:i).le.'z') & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:72:7: ustr(i:i)=char(ichar(str(i:i))+il2u) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:101:46: if(str(i:i).ge.'A'.and.str(i:i).le.'Z') & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:102:7: lstr(i:i)=char(ichar(str(i:i))+iu2l) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:101:46: if(str(i:i).ge.'A'.and.str(i:i).le.'Z') & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:102:7: lstr(i:i)=char(ichar(str(i:i))+iu2l) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:101:46: if(str(i:i).ge.'A'.and.str(i:i).le.'Z') & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:102:7: lstr(i:i)=char(ichar(str(i:i))+iu2l) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:101:46: if(str(i:i).ge.'A'.and.str(i:i).le.'Z') & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_chars.F90:102:7: lstr(i:i)=char(ichar(str(i:i))+iu2l) 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_flow.F90 m_flow.F90:17:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_flow.F90:185:14: integer :: i 1 Warning: Unused variable 'i' declared at (1) [-Wunused-variable] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_ioutil.F90 m_ioutil.F90:18:1: module m_ioutil 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:19:1: implicit none 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:20:1: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:22:1: public :: opntext,clstext ! open/close a text file 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:23:1: public :: opnieee,clsieee ! open/close a binary sequential file 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:24:1: public :: luavail ! return a free logical unit 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:25:1: public :: luflush ! flush the buffer of a given unit 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:40:1: character(len=*),parameter :: myname="MCT(MPEU)::m_ioutil" 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:41:1: integer,parameter :: MX_LU=99 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:93:1: character(len=*),parameter :: myname_=myname//'::opnieee' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:95:1: integer,parameter :: iA=ichar('a') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:96:1: integer,parameter :: mA=ichar('A') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:97:1: integer,parameter :: iZ=ichar('z') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:99:1: logical :: direct 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:100:1: character(len=16) :: clen 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:101:1: character(len=len(status)) :: Ustat 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:102:1: integer :: i,ic 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:107:1: ier = 0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:109:1: direct=.false. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:110:1: if(present(recl)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:111:1: if(recl<0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:112:1: clen='****************' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:113:1: write(clen,'(i16)',iostat=ier) recl 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:114:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:116:1: ier=-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:117:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:118:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:119:1: direct = recl>0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:120:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:139:1: do i=1,len(status) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:140:1: ic=ichar(status(i:i)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:141:1: if(ic >= iA .and. ic <= iZ) ic=ic+(mA-iA) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:142:1: Ustat(i:i)=char(ic) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:143:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:145:1: select case(Ustat) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:147:1: case ('APPEND') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:149:1: if(direct) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:150:1: write(stderr,'(2a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:152:1: ier=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:153:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:154:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:156:1: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:157:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:156:9: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:157:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:156:9: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:157:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:158:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:160:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:1: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:163:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:156:9: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:157:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:156:9: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:157:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:158:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:157:15: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:158:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:157:15: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:158:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:157:15: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:158:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:157:15: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:158:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:158:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:158:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:158:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:158:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:158:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:158:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:158:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:160:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:26: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:160:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:26: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:160:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:26: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:160:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:26: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:160:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:26: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:160:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:159:26: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:160:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:1: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:160:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:1: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:160:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:1: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:160:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:1: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:160:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:1: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:160:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:1: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:161:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:163:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:25: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:163:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:25: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:163:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:162:25: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:163:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:165:1: case default 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:167:1: if(direct) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:168:1: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:169:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:168:11: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:169:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:168:11: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:169:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:170:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:172:1: access ='direct', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:174:1: recl =recl, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:175:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:168:11: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:169:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:168:11: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:169:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:170:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:169:17: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:170:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:169:17: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:170:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:169:17: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:170:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:169:17: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:170:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:170:20: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:170:20: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:170:20: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:170:20: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:170:20: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:170:20: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:170:20: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:172:1: access ='direct', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:28: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:172:1: access ='direct', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:28: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:172:1: access ='direct', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:28: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:172:1: access ='direct', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:28: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:172:1: access ='direct', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:28: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:172:1: access ='direct', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:171:28: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:172:1: access ='direct', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:172:25: access ='direct', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:172:25: access ='direct', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:172:25: access ='direct', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:172:25: access ='direct', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:172:25: access ='direct', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:174:1: recl =recl, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:174:1: recl =recl, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:174:1: recl =recl, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:174:1: recl =recl, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:174:1: recl =recl, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:174:1: recl =recl, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:174:1: recl =recl, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:174:1: recl =recl, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:173:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:174:1: recl =recl, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:175:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:174:19: recl =recl, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:175:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:174:19: recl =recl, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:175:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:174:19: recl =recl, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:175:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:177:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:178:1: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:179:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:178:11: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:179:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:178:11: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:179:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:180:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:182:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:185:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:178:11: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:179:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:178:11: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:179:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:180:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:179:17: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:180:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:179:17: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:180:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:179:17: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:180:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:179:17: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:180:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:180:20: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:180:20: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:180:20: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:180:20: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:180:20: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:180:20: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:180:20: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:1: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:182:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:28: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:182:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:28: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:182:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:28: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:182:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:28: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:182:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:28: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:182:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:181:28: form ='unformatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:182:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:182:29: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:182:29: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:182:29: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:182:29: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:182:29: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:183:23: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:185:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:25: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:185:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:25: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:185:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:184:25: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:185:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:186:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:188:1: end select 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:190:1: end subroutine opnieee 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:209:1: subroutine clsieee(lu,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:210:1: implicit none 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:211:1: integer, intent(in) :: lu ! the unit used by opnieee() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:212:1: integer, intent(out) :: ier ! the status 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:218:1: close(lu,iostat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:223:1: end subroutine clsieee 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:257:1: character(len=*),parameter :: myname_=myname//'::opntext' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:259:1: integer,parameter :: iA=ichar('a') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:260:1: integer,parameter :: mA=ichar('A') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:261:1: integer,parameter :: iZ=ichar('z') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:263:1: character(len=len(status)) :: Ustat 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:264:1: integer :: i,ic 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:271:1: do i=1,len(status) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:272:1: ic=ichar(status(i:i)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:273:1: if(ic >= iA .and. ic <= iZ) ic=ic+(mA-iA) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:274:1: Ustat(i:i)=char(ic) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:275:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:277:1: select case(Ustat) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:279:1: case ('APPEND') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:281:1: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:282:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:281:9: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:282:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:281:9: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:282:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:283:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:285:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:1: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:288:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:281:9: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:282:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:281:9: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:282:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:283:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:282:15: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:283:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:282:15: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:283:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:282:15: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:283:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:282:15: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:283:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:283:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:283:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:283:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:283:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:283:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:283:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:283:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:285:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:24: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:285:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:24: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:285:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:24: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:285:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:24: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:285:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:24: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:285:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:284:24: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:285:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:1: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:285:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:1: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:285:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:1: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:285:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:1: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:285:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:1: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:285:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:1: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:286:24: status ='unknown', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:1: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:288:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:25: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:288:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:25: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:288:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:287:25: position ='append', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:288:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:290:1: case default 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:292:1: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:293:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:292:9: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:293:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:292:9: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:293:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:294:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:296:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:299:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:292:9: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:293:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:292:9: open( & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:293:1: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:294:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:293:15: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:294:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:293:15: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:294:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:293:15: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:294:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:293:15: unit =lu, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:294:1: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:294:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:294:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:294:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:294:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:294:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:294:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:294:18: file =fname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:1: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:296:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:24: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:296:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:24: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:296:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:24: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:296:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:24: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:296:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:24: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:296:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:295:24: form ='formatted', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:296:1: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:296:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:296:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:296:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:296:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:296:27: access ='sequential', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:1: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:21: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:21: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:21: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:21: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:21: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:21: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:21: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:21: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:21: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:297:21: status =status, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:1: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:299:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:23: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:299:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:23: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:299:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:298:23: position ='asis', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:299:1: iostat =ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:301:1: end select 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:303:1: end subroutine opntext 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:327:1: close(lu,iostat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:332:1: end subroutine clstext 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:347:1: function luavail() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:348:1: use m_stdio 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:349:1: implicit none 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:350:1: integer :: luavail ! result 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:369:1: integer lu,ios 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:370:1: logical inuse 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:372:1: lu=10 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:373:1: ios=0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:374:1: inuse=.true. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:376:1: do while(ios.eq.0 .and. inuse .and. lu.le.MX_LU) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:377:1: lu=lu+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:378:1: inquire(unit=lu,opened=inuse,iostat=ios) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:379:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:381:1: if(ios.ne.0) lu=-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:382:1: luavail=lu 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ioutil.F90:417:16: integer :: ier 1 Warning: Unused variable 'ier' declared at (1) [-Wunused-variable] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_mpout.F90 m_mpout.F90:18:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpout.F90:20:22: public :: mpout ! The file handle as a Fortran logical unit 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpout.F90:22:27: public :: mpout_open ! open the multiple output streams 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpout.F90:23:28: public :: mpout_close ! close the multiple output streams 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpout.F90:24:27: public :: mpout_sync ! sync. the multiple output streams 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpout.F90:25:28: public :: mpout_flush ! flush the multople output streams 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpout.F90:26:27: public :: mpout_ison ! verify if mpout is proper defined 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpout.F90:27:26: public :: mpout_log ! write a message to mpout 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpout.F90:73:36: integer,parameter :: mpout_MASK=3 ! every four PEs 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpout.F90:149:39: write(stderr,'(4a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mpout.F90:195:46: write(stderr,'(2a,i3.3,a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_die.F90 m_die.F90:18:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:20:20: public :: die ! signal an exception 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:21:21: public :: diex ! a special die() supporting macros 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:22:26: public :: perr,warn ! message(s) to stderr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:23:25: public :: perr_die ! to be phased out 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:24:23: public :: MP_die ! a special die() for MPI errors 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:25:24: public :: MP_perr ! perr for MPI errors, from m_mpif90 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:26:28: public :: MP_perr_die ! a special die() for MPI errors 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:27:24: public :: assert_ ! used by ASSERT() macro of assert.H 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:29:38: interface die; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:30:1: die0_, & ! die(where) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:31:1: die1_, & ! die(where,message) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:32:1: die2_, & ! die(where,proc,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:33:1: die4_ ! die(where,mesg1,ival1,mesg2,ival2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:36:39: interface diex; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:37:1: diex_ ! diex(where,filename,lineno) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:40:39: interface perr; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:41:1: perr1_, & ! perr(where,message) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:42:1: perr2_, & ! perr(where,proc,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:43:1: perr4_ ! perr(where,mesg1,ival1,mesg2,ival2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:45:39: interface warn; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:46:1: perr1_, & ! perr(where,message) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:47:1: perr2_, & ! perr(where,proc,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:48:1: perr4_ ! perr(where,mesg1,ival1,mesg2,ival2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:51:43: interface perr_die; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:52:1: die2_ ! perr_die(where,proc,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:55:41: interface MP_die; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:56:1: MPdie2_ ! MP_die(where,proc,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:58:46: interface MP_perr_die; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:59:1: MPdie2_ ! MP_die(where,proc,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:292:35: write(stderr,'(5a)') where,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:293:1: proc,' error, stat =',trim(adjustl(cer)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:292:35: write(stderr,'(5a)') where,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:293:1: proc,' error, stat =',trim(adjustl(cer)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:292:35: write(stderr,'(5a)') where,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:293:1: proc,' error, stat =',trim(adjustl(cer)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:292:35: write(stderr,'(5a)') where,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:293:1: proc,' error, stat =',trim(adjustl(cer)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:292:35: write(stderr,'(5a)') where,': ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:293:1: proc,' error, stat =',trim(adjustl(cer)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:329:43: write(stderr,'(10a)') where,': error, ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:330:1: mesg1,'=',trim(adjustl(cval1)),', ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:329:43: write(stderr,'(10a)') where,': error, ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:330:1: mesg1,'=',trim(adjustl(cval1)),', ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:329:43: write(stderr,'(10a)') where,': error, ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:330:1: mesg1,'=',trim(adjustl(cval1)),', ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:329:43: write(stderr,'(10a)') where,': error, ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:330:1: mesg1,'=',trim(adjustl(cval1)),', ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:329:43: write(stderr,'(10a)') where,': error, ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:330:1: mesg1,'=',trim(adjustl(cval1)),', ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:331:1: mesg2,'=',trim(adjustl(cval2)),'.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:330:38: mesg1,'=',trim(adjustl(cval1)),', ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:331:1: mesg2,'=',trim(adjustl(cval2)),'.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:330:38: mesg1,'=',trim(adjustl(cval1)),', ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:331:1: mesg2,'=',trim(adjustl(cval2)),'.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:330:38: mesg1,'=',trim(adjustl(cval1)),', ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:331:1: mesg2,'=',trim(adjustl(cval2)),'.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:330:38: mesg1,'=',trim(adjustl(cval1)),', ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:331:1: mesg2,'=',trim(adjustl(cval2)),'.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:377:42: Character(Len=*), Intent(In) :: str ! a message 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:378:43: Character(Len=*), Intent(In) :: file ! a filename 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:379:34: Integer, Intent(In) :: line ! a line number 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_die.F90:372:26: subroutine assert_(str, file, line) 1 Warning: Unused dummy argument 'str' at (1) [-Wunused-dummy-argument] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_IndexBin_char.F90 m_IndexBin_char.F90:16:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:19:44: interface IndexBin; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:20:1: IndexBin0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:21:1: IndexBin1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:22:1: IndexBin1w_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:65:1: allocate(inew(n),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:66:1: if(ier /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:67:1: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:69:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:70:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:74:10: lc(0)=1 ! the location of values the same as key0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:80:16: lc(1)=ln(0)+1 ! the location of values not the same as key0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:104:1: deallocate(inew) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:144:1: allocate(ibin(n),inew(n),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:145:1: if(ier /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:146:1: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:148:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:149:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:162:40: call search_(keys(ix),nbin,bins,ib) ! ib = 1:nbin; =0 if not found 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:179:15: ib=ibin(i) ! the bin-index of keys(indx(i)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:187:21: inew(ni)=indx(i) ! the current value is put in the new order 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_char.F90:194:1: deallocate(ibin,inew) 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_IndexBin_integer.F90 m_IndexBin_integer.F90:16:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:19:44: interface IndexBin; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:20:1: IndexBin0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:21:1: IndexBin1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:22:1: IndexBin1w_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:65:1: allocate(inew(n),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:66:1: if(ier /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:67:1: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:69:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:70:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:74:10: lc(0)=1 ! the location of values the same as key0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:80:16: lc(1)=ln(0)+1 ! the location of values not the same as key0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:104:1: deallocate(inew) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:144:1: allocate(ibin(n),inew(n),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:145:1: if(ier /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:146:1: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:148:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:149:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:162:40: call search_(keys(ix),nbin,bins,ib) ! ib = 1:nbin; =0 if not found 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:179:15: ib=ibin(i) ! the bin-index of keys(indx(i)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:187:21: inew(ni)=indx(i) ! the current value is put in the new order 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_integer.F90:194:1: deallocate(ibin,inew) 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_IndexBin_logical.F90 m_IndexBin_logical.F90:16:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_logical.F90:19:44: interface IndexBin; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_logical.F90:20:1: IndexBin0_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_logical.F90:63:1: allocate(inew(n),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_logical.F90:64:1: if(ier /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_logical.F90:65:1: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_logical.F90:67:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_logical.F90:68:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_logical.F90:72:10: lc(0)=1 ! the location of values the same as key0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_logical.F90:78:16: lc(1)=ln(0)+1 ! the location of values not the same as key0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_IndexBin_logical.F90:102:1: deallocate(inew) 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_mall.F90 m_mall.F90:17:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:34:46: interface mall_mci; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:35:1: ciI0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:36:1: ciI1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:37:1: ciI2_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:38:1: ciI3_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:39:1: ciR0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:40:1: ciR1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:41:1: ciR2_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:42:1: ciR3_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:43:1: ciD0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:44:1: ciD1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:45:1: ciD2_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:46:1: ciD3_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:47:1: ciL0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:48:1: ciL1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:49:1: ciL2_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:50:1: ciL3_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:51:1: ciC0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:52:1: ciC1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:53:1: ciC2_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:54:1: ciC3_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:57:46: interface mall_mco; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:58:1: coI0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:59:1: coI1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:60:1: coI2_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:61:1: coI3_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:62:1: coR0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:63:1: coR1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:64:1: coR2_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:65:1: coR3_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:66:1: coD0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:67:1: coD1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:68:1: coD2_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:69:1: coD3_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:70:1: coL0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:71:1: coL1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:72:1: coL2_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:73:1: coL3_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:74:1: coC0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:75:1: coC1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:76:1: coC2_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:77:1: coC3_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:101:30: integer, save :: nreset = 0 ! number of reset_() calls 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:102:37: logical, save :: started = .false. ! the module is in use 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:104:25: integer, save :: n_ =0 ! number of accouting bins. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:110:34: logical,save :: mall_on=.false. ! mall activity switch 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:113:38: integer,dimension(MXL),save :: mci_ ! maximum ci_() calls 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:115:38: integer,dimension(MXL),save :: nci_ ! net ci_() calls 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:117:38: integer,dimension(MXL),save :: hwm_ ! high-water-mark of allocate() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:119:38: integer,dimension(MXL),save :: nwm_ ! net-water-mark of allocate() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:741:37: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1332:37: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1381:40: write(stderr,'(2a,i4)') trim(thread), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1412:40: write(stderr,'(2a,i4)') trim(thread), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1459:51: write(lu,'(a,t39,4(2x,a))',iostat=ier) '[MALL]', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1490:54: write(lu,'(a,2(2x,i6),a,2(2x,a6),a)') name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1491:1: mci_(i),nci_(i),flag_ci,hwm_wd,nwm_wd,flag_wm 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1490:54: write(lu,'(a,2(2x,i6),a,2(2x,a6),a)') name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1491:1: mci_(i),nci_(i),flag_ci,hwm_wd,nwm_wd,flag_wm 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1490:54: write(lu,'(a,2(2x,i6),a,2(2x,a6),a)') name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1491:1: mci_(i),nci_(i),flag_ci,hwm_wd,nwm_wd,flag_wm 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1490:54: write(lu,'(a,2(2x,i6),a,2(2x,a6),a)') name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1491:1: mci_(i),nci_(i),flag_ci,hwm_wd,nwm_wd,flag_wm 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1490:54: write(lu,'(a,2(2x,i6),a,2(2x,a6),a)') name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1491:1: mci_(i),nci_(i),flag_ci,hwm_wd,nwm_wd,flag_wm 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1504:52: write(lu,'(a,2(2x,i6),a,2(2x,a6),a)') name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1505:1: mci,nci,flag_ci,hwm_wd,nwm_wd,flag_wm 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1504:52: write(lu,'(a,2(2x,i6),a,2(2x,a6),a)') name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1505:1: mci,nci,flag_ci,hwm_wd,nwm_wd,flag_wm 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1504:52: write(lu,'(a,2(2x,i6),a,2(2x,a6),a)') name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1505:1: mci,nci,flag_ci,hwm_wd,nwm_wd,flag_wm 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1504:52: write(lu,'(a,2(2x,i6),a,2(2x,a6),a)') name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1505:1: mci,nci,flag_ci,hwm_wd,nwm_wd,flag_wm 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1504:52: write(lu,'(a,2(2x,i6),a,2(2x,a6),a)') name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1505:1: mci,nci,flag_ci,hwm_wd,nwm_wd,flag_wm 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1509:49: if(nreset /= 1) write(lu,'(2a,i3,a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_mall.F90:1094:25: subroutine coL0_(marg,thread) 1 Warning: Unused dummy argument 'marg' at (1) [-Wunused-dummy-argument] m_mall.F90:986:25: subroutine coD0_(marg,thread) 1 Warning: Unused dummy argument 'marg' at (1) [-Wunused-dummy-argument] m_mall.F90:878:25: subroutine coR0_(marg,thread) 1 Warning: Unused dummy argument 'marg' at (1) [-Wunused-dummy-argument] m_mall.F90:774:25: subroutine coI0_(marg,thread) 1 Warning: Unused dummy argument 'marg' at (1) [-Wunused-dummy-argument] m_mall.F90:503:25: subroutine ciL0_(marg,thread) 1 Warning: Unused dummy argument 'marg' at (1) [-Wunused-dummy-argument] m_mall.F90:395:25: subroutine ciD0_(marg,thread) 1 Warning: Unused dummy argument 'marg' at (1) [-Wunused-dummy-argument] m_mall.F90:287:25: subroutine ciR0_(marg,thread) 1 Warning: Unused dummy argument 'marg' at (1) [-Wunused-dummy-argument] m_mall.F90:183:25: subroutine ciI0_(marg,thread) 1 Warning: Unused dummy argument 'marg' at (1) [-Wunused-dummy-argument] m_mall.F90:1365:0: subroutine cix_(thread,stat,fnam,line) Warning: 'cix_' defined but not used [-Wunused-function] m_mall.F90:1397:0: subroutine cox_(thread,stat,fnam,line) Warning: 'cox_' defined but not used [-Wunused-function] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_String.F90 m_String.F90:24:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:28:23: public :: String ! The class data structure 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:39:23: public :: toChar 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:40:21: public :: char ! convert to a CHARACTER(*) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:43:21: public :: init ! set a CHARACTER(*) type to a String 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:46:22: public :: clean ! Deallocate memory occupied by a String 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:49:20: public :: len ! length of a String 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:52:22: public :: bcast ! Broadcast a String 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:60:36: interface char; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:61:1: str2ch0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:62:1: ch12ch0_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:65:38: interface toChar; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:66:1: str2ch0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:67:1: ch12ch0_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:70:43: interface String_init; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:71:1: initc_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:72:1: initc1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:73:1: inits_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:76:36: interface init; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:77:1: initc_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:78:1: initc1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:79:1: inits_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:89:41: interface String_mci; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:90:11: mci0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:91:11: mci1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:92:11: mci2_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:96:41: interface String_mco; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:97:11: mco0_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:98:11: mco1_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:99:11: mco2_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:103:40: interface ptr_chars; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:240:1: if(mall_ison()) call mall_mci(str%c,myname) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:291:1: if(mall_ison()) call mall_mci(str%c,myname) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:339:1: allocate(oStr%c(ln),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:340:1: if(ier /= 0) call die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:342:1: if(mall_ison()) call mall_mci(oStr%c,myname) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:383:1: if(mall_ison()) call mall_mco(str%c,myname) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:475:1: if(mall_ison()) call mall_mci(Str%c,myname) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_String.F90:532:22: subroutine mco0_(marg,thread) 1 Warning: Unused dummy argument 'marg' at (1) [-Wunused-dummy-argument] m_String.F90:498:22: subroutine mci0_(marg,thread) 1 Warning: Unused dummy argument 'marg' at (1) [-Wunused-dummy-argument] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_List.F90 m_List.F90:57:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:61:21: public :: List ! The class data structure 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:67:1: character(len=1),dimension(:),pointer :: bf 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:68:1: integer, dimension(:,:),pointer :: lc 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:95:36: interface init ; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:96:13: init_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:97:16: initStr_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:102:36: interface index; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:109:36: interface get ; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:110:12: get_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:111:15: getall_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:203:29: type(List),intent(out) :: aList ! an indexed string values 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:224:23: if(ib==i) ib=i+1 ! moving ib up, starting from the next 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:227:1: ni=ni+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:228:1: id=1 ! mark a ':' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:230:13: ib=i+1 ! moving ib up, starting from the next 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:233:21: if(id==1) then ! count an earlier marked ':' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:234:1: id=0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:235:1: le=le+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:249:1: if(mall_ison()) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:250:1: call mall_mci(aList%bf,myname) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:251:1: call mall_mci(aList%lc,myname) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:252:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:266:23: if(ib==i) ib=i+1 ! moving ib up, starting from the next 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:269:1: ni=ni+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:270:1: aList%lc(0:1,ni)=(/lb,le/) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:271:1: id=1 ! mark a ':' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:274:13: ib=i+1 ! moving ib up, starting from the next 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:275:14: lb=le+2 ! skip to the next non-':' and non-',' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:278:21: if(id==1) then ! copy an earlier marked ':' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:279:1: id=0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:280:1: le=le+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:320:30: type(String),intent(in) :: pstr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:324:29: type(List),intent(out) :: aList ! an indexed string values 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:374:43: type(String),dimension(:),intent(in) :: strs 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:378:29: type(List),intent(out) :: aList ! an indexed string values 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:395:12: le=le+n-1 ! for n-1 ":"s 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:397:1: allocate(ch1(le),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:398:1: if(ier/=0) call die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:414:1: deallocate(ch1,stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:415:1: if(ier/=0) call die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:470:1: stat=ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:472:1: if(ier /= 0) call warn(myname_,'deallocate(aList%...)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:601:43: type(List), intent(in) :: aList ! a List of names 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:602:42: character(len=*),intent(in) :: item ! a given item name 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:622:40: ITEM_COMPARE: do i=1,size(aList%lc,2) ! == nitem_(aList) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:644:1: if(aList%bf(lb+j-1) == item(j:j)) then ! a match for this character 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:645:1: nMatch = nMatch + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:646:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:647:1: EXIT 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:648:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:657:1: index_ = i 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:658:1: EXIT 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:699:43: type(List), intent(in) :: aList ! a List of names 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:771:25: subroutine copy_(yL,xL) ! yL=xL 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:817:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1225:1: call get_(DummStr, n, yL) ! retrieve nth tag as a String 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1227:1: if( indexStr_(xL, Dummstr) /= n ) then ! a discrepency spotted. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1228:1: call String_clean(Dummstr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1229:1: myIdentical = .FALSE. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1230:1: EXIT 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1231:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1232:1: call String_clean(Dummstr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1233:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1235:1: myIdentical = .TRUE. ! we survived the whole test process. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1293:40: type(List), intent(in) :: aList ! an indexed string values 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1409:40: type(List), intent(in) :: aList ! an indexed string values 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1584:1: call init_(oList,'') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1586:1: if((nitem_(iList1) == 0) .and. (nitem_(iList2) > 0)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1587:1: call copy_(oList, iList2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1588:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1589:1: if((nitem_(iList1) > 0) .and. (nitem_(iList2) == 0)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1590:1: call copy_(oList,iList1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1591:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1606:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1608:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1615:1: CatBuff(i) = iList1%bf(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1621:1: CatBuff(Length1 + 1 + i) = iList2%bf(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1638:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1640:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1727:1: call die(myname_, 'Attempting to broadcast an empty list!',& 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:1728:1: CharBufferSize_(ioList)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_List.F90:409:15: ch1(lc:le)=ptr_chars(strs(i)) 1 Warning: POINTER-valued function appears on right-hand side of assignment at (1) [-Wsurprising] m_List.F90:983:0: end function CharBufferSize_ Warning: '__result_charbuffersize_' may be used uninitialized in this function [-Wmaybe-uninitialized] m_List.F90:957:0: integer function CharBufferSize_(inList) note: '__result_charbuffersize_' was declared here mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_MergeSorts.F90 m_MergeSorts.F90:22:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:29:1: module procedure setn_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:30:1: module procedure set_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:33:1: module procedure iSortn_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:34:1: module procedure rSortn_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:35:1: module procedure dSortn_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:36:1: module procedure cSortn_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:37:1: module procedure iSort_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:38:1: module procedure rSort_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:39:1: module procedure dSort_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:40:1: module procedure cSort_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:41:1: module procedure iSort1_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:42:1: module procedure rSort1_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:43:1: module procedure dSort1_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:44:1: module procedure cSort1_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:95:31: integer, intent(in) :: n ! size of indx(:) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:96:49: integer, dimension(n), intent(out) :: indx ! indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:119:49: integer, dimension(:), intent(out) :: indx ! indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:299:37: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:416:37: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:533:37: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:649:37: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:766:37: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:884:37: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:1002:37: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MergeSorts.F90:1119:37: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_Filename.F90 m_Filename.F90:16:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Filename.F90:18:30: public :: Filename_base ! basename() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Filename.F90:19:29: public :: Filename_dir ! dirname() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Filename.F90:57:9: lb=l+1 ! correct either a '/' is in the string or not. 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_FcComms.F90 m_FcComms.F90:30:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_Permuter.F90 m_Permuter.F90:16:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:18:24: public :: permute 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:21:40: interface permute; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:22:1: permutei_, & ! integer in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:23:1: permuteio_, & ! integer with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:24:1: permutei1_, & ! integer in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:25:1: permuteio1_, & ! integer with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:26:1: permuter_, & ! real in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:27:1: permutero_, & ! real with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:28:1: permuter1_, & ! real in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:29:1: permutero1_, & ! real with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:30:1: permuted_, & ! dble in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:31:1: permutedo_, & ! dble with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:32:1: permuted1_, & ! dble in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:33:1: permutedo1_, & ! dble with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:34:1: permutel_, & ! logical in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:35:1: permutelo_, & ! logical with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:36:1: permutel1_, & ! logical in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:37:1: permutelo1_ ! logical with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:40:42: interface unpermute; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:41:1: unpermutei_, & ! integer in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:42:1: unpermuteio_, & ! integer with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:43:1: unpermutei1_, & ! integer in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:44:1: unpermuteio1_, & ! integer with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:45:1: unpermuter_, & ! real in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:46:1: unpermutero_, & ! real with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:47:1: unpermuter1_, & ! real in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:48:1: unpermutero1_, & ! real with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:49:1: unpermuted_, & ! dble in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:50:1: unpermutedo_, & ! dble with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:51:1: unpermuted1_, & ! dble in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:52:1: unpermutedo1_, & ! dble with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:53:1: unpermutel_, & ! logical in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:54:1: unpermutelo_, & ! logical with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:55:1: unpermutel1_, & ! logical in place 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:56:1: unpermutelo1_ ! logical with an output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:96:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:105:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:170:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:179:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:245:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:254:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:321:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:330:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:397:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:406:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:473:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:482:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:548:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:557:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:622:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:631:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:697:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:706:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:773:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:782:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:850:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:859:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:928:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:937:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:1006:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:1015:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:1084:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:1093:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:1161:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:1170:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:1237:1: if(ier/=0) call perr_die(myname_,'allocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Permuter.F90:1246:1: if(ier/=0) call perr_die(myname_,'deallocate()',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_rankMerge.F90 m_rankMerge.F90:16:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:18:24: public :: rankSet ! set inital ranks 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:19:26: public :: rankMerge ! merge two ranks 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:24:44: interface rankMerge; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:25:1: imerge_, & ! rank-merging two integer arrays 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:26:1: rmerge_, & ! rank-merging two real arrays 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:27:1: dmerge_, & ! rank-merging two dble arrays 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:28:1: uniq_ ! merging to rank arrays 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:31:51: interface IndexedRankMerge; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:32:1: iindexmerge_, & ! merging two index arrays of integers 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:33:1: rindexmerge_, & ! merging two index arrays of reals 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:34:1: dindexmerge_ ! merging two index arrays of dbles 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:85:52: integer,dimension(:),intent(in) :: value_j ! value of j-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:86:52: integer,dimension(:),intent(in) :: value_i ! value of i-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:88:52: integer,dimension(:),intent(inout) :: krank_i ! rank of i-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:89:52: integer,dimension(:),intent(inout) :: krank_j ! rank of j-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:115:10: krank=0 ! a preset rank value 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:120:22: if(geti) then ! .eqv. j>nj 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:121:24: if(i>ni) exit ! i>ni 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:123:13: else ! .eqv. j<=nj 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:137:24: krank=krank+1 ! the next rank value 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:165:53: real(SP),dimension(:),intent(in) :: value_i ! value of i-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:166:53: real(SP),dimension(:),intent(in) :: value_j ! value of j-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:168:52: integer,dimension(:),intent(inout) :: krank_i ! rank of i-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:169:52: integer,dimension(:),intent(inout) :: krank_j ! rank of j-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:195:10: krank=0 ! a preset rank value 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:200:22: if(geti) then ! .eqv. j>nj 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:201:24: if(i>ni) exit ! i>ni 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:203:13: else ! .eqv. j<=nj 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:217:24: krank=krank+1 ! the next rank value 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:245:53: real(DP),dimension(:),intent(in) :: value_i ! value of i-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:246:53: real(DP),dimension(:),intent(in) :: value_j ! value of j-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:248:52: integer,dimension(:),intent(inout) :: krank_i ! rank of i-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:249:52: integer,dimension(:),intent(inout) :: krank_j ! rank of j-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:275:10: krank=0 ! a preset rank value 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:280:22: if(geti) then ! .eqv. j>nj 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:281:24: if(i>ni) exit ! i>ni 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:283:13: else ! .eqv. j<=nj 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:297:24: krank=krank+1 ! the next rank value 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:325:51: integer,dimension(:),intent(in) :: indx_i ! of the i-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:326:51: integer,dimension(:),intent(in) :: indx_j ! of the j-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:327:50: integer,dimension(:),intent(in) :: value ! of the full 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:329:52: integer,dimension(:),intent(inout) :: krank_i ! rank of i-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:330:52: integer,dimension(:),intent(inout) :: krank_j ! rank of j-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:356:10: krank=0 ! a preset rank value 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:361:22: if(geti) then ! .eqv. j>nj 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:362:24: if(i>ni) exit ! i>ni 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:363:1: li=indx_i(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:365:13: else ! .eqv. j<=nj 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:366:1: lj=indx_j(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:369:1: li=indx_i(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:381:24: krank=krank+1 ! the next rank value 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:410:51: integer,dimension(:),intent(in) :: indx_i ! of the i-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:411:51: integer,dimension(:),intent(in) :: indx_j ! of the j-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:412:51: real(SP),dimension(:),intent(in) :: value ! of the full 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:414:52: integer,dimension(:),intent(inout) :: krank_i ! rank of i-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:415:52: integer,dimension(:),intent(inout) :: krank_j ! rank of j-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:441:10: krank=0 ! a preset rank value 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:446:22: if(geti) then ! .eqv. j>nj 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:447:24: if(i>ni) exit ! i>ni 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:448:1: li=indx_i(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:450:13: else ! .eqv. j<=nj 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:451:1: lj=indx_j(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:454:1: li=indx_i(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:466:24: krank=krank+1 ! the next rank value 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:494:51: integer,dimension(:),intent(in) :: indx_i ! of the i-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:495:51: integer,dimension(:),intent(in) :: indx_j ! of the j-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:496:51: real(DP),dimension(:),intent(in) :: value ! of the full 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:498:52: integer,dimension(:),intent(inout) :: krank_i ! rank of i-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:499:52: integer,dimension(:),intent(inout) :: krank_j ! rank of j-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:525:10: krank=0 ! a preset rank value 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:530:22: if(geti) then ! .eqv. j>nj 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:531:24: if(i>ni) exit ! i>ni 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:532:1: li=indx_i(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:534:13: else ! .eqv. j<=nj 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:535:1: lj=indx_j(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:538:1: li=indx_i(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:550:24: krank=krank+1 ! the next rank value 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:577:52: integer,dimension(:),intent(inout) :: krank_i ! rank of i-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:578:52: integer,dimension(:),intent(inout) :: krank_j ! rank of j-vec 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:600:22: if(geti) then ! .eqv. j>nj 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:601:24: if(i>ni) exit ! i>ni 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:602:13: else ! .eqv. j<=nj 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:604:51: if(geti) geti = krank_i(i) <= krank_j(j) ! if(i<=ni) .. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:607:22: krank=krank+1 ! the next rank value 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:609:1: if(geti) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:610:1: krank_i(i)=krank 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:611:1: i=i+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:612:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:613:1: krank_j(j)=krank 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:614:1: j=j+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_rankMerge.F90:615:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_SortingTools.F90 m_SortingTools.F90:34:23: use m_MergeSorts !only : IndexSet,IndexSort 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SortingTools.F90:35:29: use m_IndexBin_integer !only : IndexBin 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SortingTools.F90:36:26: use m_IndexBin_char !only : IndexBin 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SortingTools.F90:37:29: use m_IndexBin_logical !only : IndexBin 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SortingTools.F90:38:22: use m_rankMerge !only : RankSet,RankMerge,IndexedRankMerge 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SortingTools.F90:39:21: use m_Permuter !only : Permute, Unpermute 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SortingTools.F90:43:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SortingTools.F90:45:25: public :: IndexSet ! define an initial list of indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SortingTools.F90:46:26: public :: IndexSort ! index for a new rank out of the old 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SortingTools.F90:47:25: public :: IndexBin ! index for sorting bins 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SortingTools.F90:48:24: public :: RankSet ! define an initial list of ranks 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SortingTools.F90:49:26: public :: RankMerge ! merge two arrays by re-ranking 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_StrTemplate.F90 m_StrTemplate.F90:36:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:38:28: public :: StrTemplate ! Substitute variables in a template 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:41:1: module procedure strTemplate_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:57:55: character(len=3),parameter,dimension(12) :: mon_lc = (/ & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:58:38: 'jan','feb','mar','apr','may','jun', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:59:37: 'jul','aug','sep','oct','nov','dec' /) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:61:55: character(len=3),parameter,dimension(12) :: mon_wd = (/ & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:62:38: 'Jan','Feb','Mar','Apr','May','Jun', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:63:37: 'Jul','Aug','Sep','Oct','Nov','Dec' /) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:65:55: character(len=3),parameter,dimension(12) :: mon_uc = (/ & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:66:38: 'JAN','FEB','MAR','APR','MAY','JUN', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:67:37: 'JUL','AUG','SEP','OCT','NOV','DEC' /) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:86:42: character(len=*),intent(out) :: str ! the output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:88:43: character(len=*),intent(in ) :: tmpl ! a "format" 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:133:55: write(stderr,'(4a)') myname_,': unknown class: ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:134:1: trim(tmpl_class),'.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:133:55: write(stderr,'(4a)') myname_,': unknown class: ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:134:1: trim(tmpl_class),'.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:133:55: write(stderr,'(4a)') myname_,': unknown class: ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:134:1: trim(tmpl_class),'.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:133:55: write(stderr,'(4a)') myname_,': unknown class: ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:134:1: trim(tmpl_class),'.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:133:55: write(stderr,'(4a)') myname_,': unknown class: ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:134:1: trim(tmpl_class),'.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:189:1: if(nymd < 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:190:1: call perr(myname_,'nymd < 0',nymd) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:191:1: if(.not.present(stat)) call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:192:1: stat=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:193:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:194:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:209:1: if(nhms < 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:210:1: call perr(myname_,'nhms < 0',nhms) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:211:1: if(.not.present(stat)) call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:212:1: stat=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:213:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:214:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:223:25: ln_tmpl=len_trim(tmpl) ! size of the format template 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:224:19: ln_str =len(str) ! size of the output string 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:234:30: do while( i+istp <= ln_tmpl ) ! A loop over all tokens in (tmpl) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:236:20: if(k>ln_Str) exit ! truncate the output here. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:254:1: write(stderr,'(2a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:256:1: if(.not.present(stat)) call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:257:1: stat=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:258:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:271:12: k=k+1 ! kstp=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:286:1: write(stderr,'(2a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:288:1: if(.not.present(stat)) call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:289:1: stat=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:290:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:296:1: write(stderr,'(2a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:298:1: if(.not.present(stat)) call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:299:1: stat=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:300:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:306:38: write(stderr,'(4a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:312:17: end select ! case(c1//c2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:313:15: end select ! case(c1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:321:1: write(sbuf,'(i2.2)') iy2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:322:1: kstp=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:324:1: write(sbuf,'(i4.4)') iy4 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:325:1: kstp=4 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:327:1: write(stderr,'(4a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:329:1: if(.not.present(stat)) call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:330:1: stat=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:331:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:337:1: if(imo < 10) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:338:1: write(sbuf,'(i1)') imo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:339:1: kstp=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:340:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:341:1: write(sbuf,'(i2)') imo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:342:1: kstp=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:343:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:345:1: write(sbuf,'(i2.2)') imo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:346:1: kstp=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:348:1: sbuf=mon_lc(imo) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:349:1: kstp=3 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:351:1: write(stderr,'(4a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:353:1: if(.not.present(stat)) call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:354:1: stat=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:355:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:361:1: sbuf=mon_wd(imo) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:362:1: kstp=3 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:364:1: sbuf=mon_uc(imo) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:365:1: kstp=3 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:367:1: write(stderr,'(4a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:369:1: if(.not.present(stat)) call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:370:1: stat=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:371:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:377:1: if(idy < 10) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:378:1: write(sbuf,'(i1)') idy 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:379:1: kstp=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:380:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:381:1: write(sbuf,'(i2)') idy 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:382:1: kstp=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:383:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:385:1: write(sbuf,'(i2.2)') idy 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:386:1: kstp=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:388:1: write(stderr,'(4a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:390:1: if(.not.present(stat)) call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:391:1: stat=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:392:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:398:1: if(ihr < 10) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:399:1: write(sbuf,'(i1)') ihr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:400:1: kstp=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:401:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:402:1: write(sbuf,'(i2)') ihr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:403:1: kstp=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:404:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:406:1: write(sbuf,'(i2.2)') ihr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:407:1: kstp=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:409:1: write(sbuf,'(i3.3)') ihr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:410:1: kstp=3 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:412:1: write(stderr,'(4a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:414:1: if(.not.present(stat)) call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:415:1: stat=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:416:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:422:1: write(sbuf,'(i2.2)') imn 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:423:1: kstp=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:425:1: write(stderr,'(4a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:427:1: if(.not.present(stat)) call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:428:1: stat=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:429:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:433:1: write(stderr,'(4a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:435:1: if(.not.present(stat)) call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:436:1: stat=2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:438:15: end select ! case(c1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_StrTemplate.F90:450:13: end select ! case(c0) 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_FileResolv.F90 m_FileResolv.F90:96:31: character(len=*), parameter :: myname = 'MCT(MPEU)::FileResolv' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_FileResolv.F90:195:1: else ! shut down 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_inpak90.F90 m_inpak90.F90:242:24: public :: I90_AtoF ! ASCII to float (function) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:243:24: public :: I90_AtoI ! ASCII to integer (function) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:246:24: public :: I90_GInt ! returns next integer number (function) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:252:1: fltgetsp, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:253:1: fltgetdp 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:295:36: integer,parameter :: MALLSIZE_=10 ! just an estimation 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:404:38: if(i90_depth <= 0) nullify(i90_now) ! just an initialization 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:409:1: call perr(myname_,'(overflow)',i90_depth) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:410:1: ier=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:411:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:415:1: if(ier /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:416:1: call perr(myname_,'allocate(new)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:417:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:418:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:420:1: if(mall_ison()) call mall_ci(MALLSIZE_,myname) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:423:1: if(ier /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:424:1: call perr(myname_,'allocate(new%..)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:425:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:426:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:428:1: if(mall_ison()) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:429:1: call mall_mci(new%buffer,myname) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:430:1: call mall_mci(new%this_line,myname) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:431:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:464:1: call perr(myname_,'(underflow)',i90_depth) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:465:1: ier=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:466:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:471:1: if(mall_ison()) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:472:1: call mall_mco(i90_now%this_line,myname) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:473:1: call mall_mco(i90_now%buffer,myname) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:474:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:477:1: if(ier /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:478:1: call perr(myname_,'deallocate(new%..)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:479:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:480:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:482:1: if(mall_ison()) call mall_co(MALLSIZE_,myname) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:485:1: if(ier /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:486:1: call perr(myname_,'deallocate(new)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:487:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:488:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:505:1: use m_die,only : perr,die 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:506:1: implicit none 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:507:1: integer,optional, intent(out) :: stat 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:568:1: use m_ioutil, only : luavail,opntext,clstext 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:569:1: use m_die, only : perr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:632:1: call perr(myname_,'(overflow)',i90_depth) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:633:1: iret=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:634:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:641:21: lu = luavail() ! a more portable version 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:652:1: write(stderr,'(2a,i5)') myname_,': opntext() error, ios =',ios 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:663:22: call push_(ios) ! to create buffer space 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:665:1: write(stderr,'(2a,i5)') myname_,': push_() error, ios =',ios 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:704:1: call clstext(lu,ios) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:705:1: if(ios /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:706:1: iret=-99 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:707:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:708:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:778:1: if(i90_depth <= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:779:1: iret = -1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:780:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:781:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:897:1: if(i90_depth <= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:898:1: iret = -1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:899:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:900:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1008:1: if(i90_depth <= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1009:1: iret = -1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1010:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1011:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1021:50: ie = min(index(i90_now%this_line,BLK), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1022:1: index(i90_now%this_line,EOL)) - 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1021:50: ie = min(index(i90_now%this_line,BLK), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1022:1: index(i90_now%this_line,EOL)) - 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1021:50: ie = min(index(i90_now%this_line,BLK), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1022:1: index(i90_now%this_line,EOL)) - 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1134:1: if(i90_depth <= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1135:1: iret = -1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1136:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1137:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1210:1: if(i90_depth <= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1211:1: iret = -1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1212:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1213:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1217:38: read(token,*,iostat=ios) x ! Does it require an extension? 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1274:1: if(i90_depth <= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1275:1: iret = -1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1276:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1277:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1546:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1547:1: string(i:i) .ne. '$' ) go to 11 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1607:41: if ( string(i:i) .ne. ' ' .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1608:1: string(i:i) .ne. TAB ) go to 21 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1669:1: write(stderr,'(2a)') 'i90/lablin: cannot find label ', label 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1939:16: print *, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1949:16: print *, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_inpak90.F90:1721:17: fltgetsp = x 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] m_inpak90.F90:1947:32: subroutine iunits ( mifans, moftrm, moferr, miftrm ) 1 Warning: Unused dummy argument 'mifans' at (1) [-Wunused-dummy-argument] m_inpak90.F90:1947:56: subroutine iunits ( mifans, moftrm, moferr, miftrm ) 1 Warning: Unused dummy argument 'miftrm' at (1) [-Wunused-dummy-argument] m_inpak90.F90:1947:48: subroutine iunits ( mifans, moftrm, moferr, miftrm ) 1 Warning: Unused dummy argument 'moferr' at (1) [-Wunused-dummy-argument] m_inpak90.F90:1947:40: subroutine iunits ( mifans, moftrm, moferr, miftrm ) 1 Warning: Unused dummy argument 'moftrm' at (1) [-Wunused-dummy-argument] m_inpak90.F90:1276:0: return Warning: control reaches end of non-void function [-Wreturn-type] m_inpak90.F90:1212:0: return Warning: control reaches end of non-void function [-Wreturn-type] m_inpak90.F90:1882:0: subroutine TokGet ( token, default ) Warning: 'tokget' defined but not used [-Wunused-function] m_inpak90.F90:1938:0: subroutine iniin() Warning: 'iniin' defined but not used [-Wunused-function] m_inpak90.F90:1947:0: subroutine iunits ( mifans, moftrm, moferr, miftrm ) Warning: 'iunits' defined but not used [-Wunused-function] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_TraceBack.F90 m_TraceBack.F90:35:1: GenTraceBackString1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_TraceBack.F90:36:1: GenTraceBackString2 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -I. -I../ -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 m_zeit.F90 m_zeit.F90:17:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:19:24: public :: zeit_ci ! push a new name to the timer 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:20:24: public :: zeit_co ! pop the current name on the timer 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:21:27: public :: zeit_flush ! print per PE timing 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:22:30: public :: zeit_allflush ! print all PE timing 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:23:27: public :: zeit_reset ! reset the timers to its initial state 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:27:24: public :: MWTIME ! MPI_Wtime() wall-clock time 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:28:24: public :: XWTIME ! times() wall-clock time 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:29:24: public :: PUTIME ! times() process user time 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:30:24: public :: PSTIME ! times() process system time 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:31:24: public :: CUTIME ! times() user time of all child-processes 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:32:24: public :: CSTIME ! times() system time of all child-processes 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:33:24: public :: ALLTIME ! all of above 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:166:60: integer,parameter :: ALLTIME = MWTIME + XWTIME + PUTIME + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:167:1: PSTIME + CUTIME + CSTIME 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:166:60: integer,parameter :: ALLTIME = MWTIME + XWTIME + PUTIME + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:167:1: PSTIME + CUTIME + CSTIME 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:166:60: integer,parameter :: ALLTIME = MWTIME + XWTIME + PUTIME + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:167:1: PSTIME + CUTIME + CSTIME 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:170:36: integer,parameter :: MASKS(0:5) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:171:1: (/ MWTIME,XWTIME,PUTIME,PSTIME,CUTIME,CSTIME /) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:170:36: integer,parameter :: MASKS(0:5) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:171:1: (/ MWTIME,XWTIME,PUTIME,PSTIME,CUTIME,CSTIME /) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:170:36: integer,parameter :: MASKS(0:5) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:171:1: (/ MWTIME,XWTIME,PUTIME,PSTIME,CUTIME,CSTIME /) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:170:36: integer,parameter :: MASKS(0:5) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:171:1: (/ MWTIME,XWTIME,PUTIME,PSTIME,CUTIME,CSTIME /) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:174:46: character(len=8),parameter :: HEADER(0:5) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:175:7: (/ '[MWTIME]','[XWTIME]','[PUTIME]', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:176:34: '[PSTIME]','[CUTIME]','[CSTIME]' /) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:179:32: integer,parameter :: MXN= 250 ! the size of a name list 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:182:31: integer,parameter :: NSZ= 36 ! the size of a name 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:183:31: integer,parameter :: MXS= 64 ! the depth of the timer stack 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:189:22: character(len=NSZ), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:190:1: save :: ciname=' ' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:191:22: character(len=NSZ), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:192:1: save :: coname=' ' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:194:26: integer,save :: mxdep=0 ! the maximum ndep value recorded 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:195:26: integer,save :: ndep=-1 ! depth, number of net ci_() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:196:31: integer,save :: lnk_n(0:MXS) ! name index of the depth 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:198:15: integer,save :: nname=-1 ! number of accounts 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:199:22: character(len=NSZ), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:200:1: save,dimension(0:MXN) :: name_l ! the accounts 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:201:32: integer,save,dimension(0:MXN) :: knt_l ! counts of ci_() calls 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:202:43: integer,save,dimension(0:MXN) :: level_l ! remaining ci_() counts 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:204:29: real*8,save,dimension(0:5) :: zts_sv ! the last timings 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:206:45: real*8,save,dimension(0:5,0:MXN) :: zts_l ! credited to a name 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:207:45: real*8,save,dimension(0:5,0:MXN) :: szts_l ! all under the name 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:208:46: real*8,save,dimension(0:5,0:MXN) :: szts_sv ! the last ci_ timings 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:246:37: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:271:21: zts_sv(i)=zts(i) ! update the record 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:328:43: character(len=*), intent(in) :: name ! account name 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:352:37: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:370:34: level_l(lname)=level_l(lname)-1 ! close a level 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:373:29: tms0=zts(i)- zts_sv(i) ! NET by the _account_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:374:35: tms1=zts(i)-szts_sv(i,lname) ! within its SCOPE 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:378:30: if(level_l(lname) == 0) & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:395:22: tms(i,1)=tms1 ! only the sub-segments 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:503:25: found = nname >= MXN ! Can not handle too many accounts? 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:504:12: ith=MXN ! Then use the account for ".foo." 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:506:24: if(.not.found) then ! Otherwise, add a new account. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:517:1: szts_l(i,ith)=0. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:545:31: integer,intent(in) :: lu ! logical unit for the output 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:571:46: if(.not.balanced) write(lu,'(5a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:584:34: if(iand(MASKS(i),imask) /= 0) & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:625:31: real*8,parameter :: res=.001 ! (sec) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:647:42: write(lu,'(a,t14,a,t21,a,t31,a,t52,a)') & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:648:36: HEADER(itm), 'counts','period', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:649:27: 'NET m:s %', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:688:1: write(num,'(i4)') mxdep 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:690:1: write(lu,'(2(a,i3),2a,t26,2(1x,f8.2,1x,i4.2,a,i2.2,1x,f6.2,a))')& 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:691:1: name(1:ln),nreset,'s',ndep,'/',num, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:692:1: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:691:39: name(1:ln),nreset,'s',ndep,'/',num, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:692:1: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:691:39: name(1:ln),nreset,'s',ndep,'/',num, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:692:1: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:691:39: name(1:ln),nreset,'s',ndep,'/',num, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:692:1: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:691:39: name(1:ln),nreset,'s',ndep,'/',num, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:692:1: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:693:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:692:40: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:693:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:692:40: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:693:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:692:40: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:693:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:692:40: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:693:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:702:1: name(1:ln),knt_l(l),zt_percall, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:703:1: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:702:35: name(1:ln),knt_l(l),zt_percall, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:703:1: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:702:35: name(1:ln),knt_l(l),zt_percall, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:703:1: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:702:35: name(1:ln),knt_l(l),zt_percall, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:703:1: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:702:35: name(1:ln),knt_l(l),zt_percall, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:703:1: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:704:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:703:40: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:704:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:703:40: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:704:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:703:40: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:704:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:703:40: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:704:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:710:1: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:711:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:710:40: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:711:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:710:40: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:711:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:710:40: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:711:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:710:40: zt,zt_min,':',zt_sec,zt_percent,tag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:711:1: sz,sz_min,':',sz_sec,sz_percent,tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:751:24: real*8,dimension(0:5) :: zts 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:783:1: ztbf(i,0,l)=ztbf(i,0,l) + zts(i) - zts_sv(i ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:784:1: ztbf(i,1,l)=ztbf(i,1,l) + zts(i) -szts_sv(i,l) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:792:37: write(stderr,'(2a,i3)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:805:1: ztbf,nbf,mp_Type_ztbf,root,comm,ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:807:39: write(stderr,'(2a,i3)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:816:39: write(stderr,'(2a,i3)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:823:39: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:829:1: ztmp,nbf,mp_Type_ztbf,root,comm,ier ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:831:39: write(stderr,'(2a,i3)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:847:36: if(iand(MASKS(i),imask) /= 0) & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:848:1: call mp_balances_(lu,i,nPE,ztmp,indx_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:847:36: if(iand(MASKS(i),imask) /= 0) & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:848:1: call mp_balances_(lu,i,nPE,ztmp,indx_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:847:36: if(iand(MASKS(i),imask) /= 0) & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:848:1: call mp_balances_(lu,i,nPE,ztmp,indx_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:847:36: if(iand(MASKS(i),imask) /= 0) & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:848:1: call mp_balances_(lu,i,nPE,ztmp,indx_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:847:36: if(iand(MASKS(i),imask) /= 0) & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:848:1: call mp_balances_(lu,i,nPE,ztmp,indx_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:847:36: if(iand(MASKS(i),imask) /= 0) & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:848:1: call mp_balances_(lu,i,nPE,ztmp,indx_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:856:39: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:920:31: real*8,parameter :: res=.001 ! (sec) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:939:31: write(lu,'(3a,t18,a,t58,a)') & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:940:34: HEADER(itm),'x',adjustl(num), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:941:42: 'NET avg max imx x% r% i%', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:964:32: zts_o=zts_o+ztmp(itm,0,l,k) ! compute sum() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:965:32: zts_s=zts_s+ztmp(itm,1,l,k) ! compute sum() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:972:25: zta_o=zts_o/max(1,nPE) ! compute mean() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:973:25: zta_s=zts_s/max(1,nPE) ! compute mean() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:998:1: name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:999:1: zta_o,ztm_o,ix_o,x_o,r_o,i_o, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:998:13: name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:999:1: zta_o,ztm_o,ix_o,x_o,r_o,i_o, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:998:13: name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:999:1: zta_o,ztm_o,ix_o,x_o,r_o,i_o, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:998:13: name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:999:1: zta_o,ztm_o,ix_o,x_o,r_o,i_o, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:998:13: name(1:ln), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:999:1: zta_o,ztm_o,ix_o,x_o,r_o,i_o, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:1000:1: zta_s,ztm_s,ix_s,x_s,r_s,i_s 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:999:31: zta_o,ztm_o,ix_o,x_o,r_o,i_o, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:1000:1: zta_s,ztm_s,ix_s,x_s,r_s,i_s 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:999:31: zta_o,ztm_o,ix_o,x_o,r_o,i_o, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:1000:1: zta_s,ztm_s,ix_s,x_s,r_s,i_s 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:999:31: zta_o,ztm_o,ix_o,x_o,r_o,i_o, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:1000:1: zta_s,ztm_s,ix_s,x_s,r_s,i_s 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:999:31: zta_o,ztm_o,ix_o,x_o,r_o,i_o, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:1000:1: zta_s,ztm_s,ix_s,x_s,r_s,i_s 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_zeit.F90:753:0: real*8,dimension(:,:,:,:),allocatable :: ztmp Warning: 'ztmp.dim[3].stride' may be used uninitialized in this function [-Wmaybe-uninitialized] rm -f libmpeu.a ar cq libmpeu.a get_zeits.o m_IndexBin_char.o m_IndexBin_integer.o m_IndexBin_logical.o m_List.o m_MergeSorts.o m_Filename.o m_FcComms.o m_Permuter.o m_SortingTools.o m_String.o m_StrTemplate.o m_chars.o m_die.o m_dropdead.o m_FileResolv.o m_flow.o m_inpak90.o m_ioutil.o m_mall.o m_mpif.o m_mpif90.o m_mpout.o m_rankMerge.o m_realkinds.o m_stdio.o m_TraceBack.o m_zeit.o make[1]: Leaving directory '/usr/src/RPM/BUILD/mct-2.8.3/mpeu' make[1]: Entering directory '/usr/src/RPM/BUILD/mct-2.8.3/mct' mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_MCTWorld.F90 m_MCTWorld.F90:35:24: integer :: ncomps ! Total number of components 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MCTWorld.F90:38:48: integer,dimension(:),pointer :: nprocspid ! Number of processes 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MCTWorld.F90:184:26: integer, intent(in) :: ncomps ! number of components 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MCTWorld.F90:185:26: integer, intent(in) :: globalcomm ! global communicator 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MCTWorld.F90:250:1: globalcomm, reqs(i), ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MCTWorld.F90:404:26: integer, intent(in) :: ncomps ! number of components 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MCTWorld.F90:405:26: integer, intent(in) :: globalcomm ! global communicator 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MCTWorld.F90:406:26: integer, intent(in) :: mycomm ! my communicator 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MCTWorld.F90:712:26: integer, intent(in) :: comp_rank ! process rank on the communicator 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MCTWorld.F90:714:26: integer, intent(in) :: comp_id ! component id 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MCTWorld.F90:753:1: comp_id 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MCTWorld.F90:770:1: comp_rank, "on component ",comp_id 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MCTWorld.F90:812:26: integer, intent(in) :: comp_id ! component id 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MCTWorld.F90:831:1: world_comp_root 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MCTWorld.F90:503:38: integer :: ier,Gsize,myGid,MCTcomm,i,j 1 Warning: Unused variable 'i' declared at (1) [-Wunused-variable] m_MCTWorld.F90:503:40: integer :: ier,Gsize,myGid,MCTcomm,i,j 1 Warning: Unused variable 'j' declared at (1) [-Wunused-variable] m_MCTWorld.F90:195:45: integer :: ier,myGid,myLid,i,mysize,Gsize,j 1 Warning: Unused variable 'j' declared at (1) [-Wunused-variable] m_MCTWorld.F90:287:0: tmparray = -1 Warning: 'tmparray.dim[1].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_MCTWorld.F90:344:0: root_idGprocid = transpose(tmparray) Warning: 'root_idgprocid.offset' may be used uninitialized in this function [-Wmaybe-uninitialized] m_MCTWorld.F90:344:0: Warning: 'root_idgprocid.dim[0].lbound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_MCTWorld.F90:344:0: Warning: 'root_idgprocid.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_MCTWorld.F90:344:0: Warning: 'root_idgprocid.dim[1].lbound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_MCTWorld.F90:344:0: Warning: 'root_idgprocid.dim[1].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_MCTWorld.F90:202:0: integer, dimension(:,:),pointer :: tmparray Warning: 'tmparray.dim[1].stride' may be used uninitialized in this function [-Wmaybe-uninitialized] m_MCTWorld.F90:202:0: Warning: 'tmparray.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_MCTWorld.F90:202:0: Warning: 'tmparray.offset' may be used uninitialized in this function [-Wmaybe-uninitialized] m_MCTWorld.F90:370:0: deallocate(compids,reqs,status,nprocs,tmparray,stat=ier) Warning: 'tmparray.data' may be used uninitialized in this function [-Wmaybe-uninitialized] m_MCTWorld.F90:271:0: call MPI_WAITALL(size(reqs), reqs, status, ier) Warning: 'reqs.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_AttrVect.F90 m_AttrVect.F90:77:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:117:21: public :: init ! create a local vector 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:118:22: public :: clean ! clean the local vector 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:119:21: public :: zero ! zero the local vector 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:120:22: public :: lsize ! size of the local vector 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:121:23: public :: nIAttr ! number of integer attributes on local 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:122:23: public :: nRAttr ! number of real attributes on local 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:123:24: public :: indexIA ! index the integer attributes 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:124:24: public :: indexRA ! index the real attributes 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:137:21: public :: Copy ! copy attributes from one Av to another 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:138:22: public :: RCopy ! copy real attributes from one Av to another 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:139:22: public :: ICopy ! copy integer attributes from one Av to another 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:153:40: interface init ; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:324:1: call init(aV%rList,rList) ! init.List() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:330:1: call init(aV%iList,iList) ! init.List() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:334:22: nIA=nitem(aV%iList) ! nitem.List() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:335:22: nRA=nitem(aV%rList) ! nitem.List() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:340:45: allocate( aV%iAttr(nIA,n),aV%rAttr(nRA,n), stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:614:1: call List_clean(aV%iList,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:615:1: if(ier/=0) stat=ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:617:1: call List_clean(aV%iList) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:627:1: call List_clean(aV%rList,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:628:1: if(ier/=0) stat=ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:630:1: call List_clean(aV%rList) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:646:1: if(present(stat)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:647:1: stat=ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:648:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:649:1: call warn(myname_,'deallocate(aV%iAttr)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:650:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:666:1: if(present(stat)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:667:1: stat=ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:668:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:669:1: call warn(myname_,'deallocate(aV%rAttr)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:670:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:750:1: call die(myname_,'attribute array length mismatch', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:751:1: iLength-rLength) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:755:1: lsize_ = rLength 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:759:1: lsize_ = iLength 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:790:20: use m_die,only : die 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:791:22: use m_stdio,only : stderr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1097:1: call GenTraceBackString(myTrace, perrWith, myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1099:1: call GenTraceBackString(myTrace, myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1116:1: write(stderr,'(5a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1119:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1204:1: call GenTraceBackString(myTrace, perrWith, myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1206:1: call GenTraceBackString(myTrace, myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1218:1: write(stderr,'(5a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1223:1: write(stderr,'(5a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1226:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1491:1: status = 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1493:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1560:1: status = 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1562:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1818:1: call GenTraceBackString(myTrace, perrWith, myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1820:1: call GenTraceBackString(myTrace, myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1836:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1840:1: write(stderr,'(2a)') 'Traceback: ',String_ToChar(myTrace) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1841:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1846:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1848:1: write(stderr,'(2a)') 'Traceback: ',String_ToChar(myTrace) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1849:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1962:1: call GenTraceBackString(myTrace, perrWith, myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1964:1: call GenTraceBackString(myTrace, myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1980:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1984:1: write(stderr,'(2a)') 'Traceback: ',String_ToChar(myTrace) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1985:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1990:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1992:1: write(stderr,'(2a)') 'Traceback: ',String_ToChar(myTrace) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:1993:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2069:1: call GenTraceBackString(myTrace, perrWith, myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2071:1: call GenTraceBackString(myTrace, myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2087:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2091:1: write(stderr,'(2a)') 'Traceback: ',String_ToChar(myTrace) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2092:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2097:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2099:1: write(stderr,'(2a)') 'Traceback: ',String_ToChar(myTrace) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2100:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2178:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2182:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2187:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2191:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2266:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2270:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2275:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2279:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2347:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2351:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2356:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2360:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2679:1: do j=1,aVsize 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2680:1: aVout%rAttr(outxmin+i,j) = aVin%rAttr(inxmin+i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2681:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2682:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2689:1: do i=1,num_indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2690:1: aVout%rAttr(outxmin+i,j) = aVin%rAttr(inxmin+i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2691:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2692:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3019:4: aVout%iAttr(outxmin+i,j) = aVin%iAttr(inxmin+i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3029:4: aVout%iAttr(outxmin+i,j) = aVin%iAttr(inxmin+i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3174:1: TrListIsPresent = .false. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3175:1: if(present(TrList)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3176:1: if(len_trim(TrList) > 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3177:1: TrListIsPresent = .true. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3178:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3179:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3186:1: if(TrListIsPresent) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3187:1: call RCopyL_(aVin,aVout,rList,TrList,vector=usevector) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3188:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3189:1: call RCopyL_(aVin,aVout,rList,vector=usevector) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3190:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3198:1: TiListIsPresent = .false. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3199:1: if(present(TiList)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3200:1: if(len_trim(TiList) > 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3201:1: TiListIsPresent = .true. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3202:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3203:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3210:1: if(TiListIsPresent) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3211:1: call ICopyL_(aVin,aVout,iList,TiList,vector=usevector) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3212:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3213:1: call ICopyL_(aVin,aVout,iList,vector=usevector) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3214:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3364:1: rIndex(n) = List_index(aV%rList, String_tochar(key)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3366:1: rIndex(n) = 0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3369:1: iIndex(n) = List_index(aV%iList, String_tochar(key)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3371:1: iIndex(n) = 0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3381:1: if(.not.present(dieWith)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3382:1: if(present(perrWith)) write(stderr,'(4a)') myname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3385:1: call die(myname_,":: both iIndex(n) and rIndex(n) > 0.") 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3386:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3387:1: if(present(perrWith)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3388:1: write(stderr,'(4a)') myname_,":: ", perrWith, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3391:1: call die(myname_,dieWith) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3392:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3401:1: if(.not.present(dieWith)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3402:1: if(present(perrWith)) write(stderr,'(4a)') myname,":: ", & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3403:1: perrWith, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3405:1: call die(myname_,":: both iIndex(n) and rIndex(n) <= 0.") 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3406:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3407:1: if(present(perrWith)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3408:1: write(stderr,'(4a)') myname_,":: ", perrWith, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3411:1: call die(myname_,dieWith) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3412:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3451:1: if(present(descend)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3452:1: call IndexSort(length, perm, aV%iAttr(iIndex(n),:), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3453:1: descend_copy(n)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3454:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3455:4: call IndexSort(length, perm, aV%iAttr(iIndex(n),:), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3456:16: descend=.false.) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3457:1: endif ! if(present(descend)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3459:1: if(rIndex(n) > 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3460:1: if(present(descend)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3461:1: call IndexSort(length, perm, aV%rAttr(rIndex(n),:), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3462:1: descend_copy(n)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3463:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3464:1: call IndexSort(length, perm, aV%rAttr(rIndex(n),:), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3465:16: descend=.false.) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3466:1: endif ! if(present(descend)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3467:1: endif ! if (rIndex(n) > 0)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3534:1: if(present(perrWith)) write(stderr,'(4a,i8,a,i8)') myname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3538:1: write(stderr,'(4a,i8,a,i8)') myname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3539:33: ":: size mismatch, ", dieWith, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3541:1: call die(dieWith) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3549:1: do i=1,nIAttr_(aV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3550:1: call Permute(aV%iAttr(i,:),perm,lsize_(aV)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3551:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3556:1: do i=1,nRAttr_(aV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3557:1: call Permute(aV%rAttr(i,:),perm,lsize_(aV)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3558:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3619:1: if(present(perrWith)) write(stderr,'(4a,i8,a,i8)') myname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3623:1: write(stderr,'(4a,i8,a,i8)') myname, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3624:33: ":: size mismatch, ", dieWith, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3626:1: call die(dieWith) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3634:1: do i=1,nIAttr_(aV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3635:1: call Unpermute(aV%iAttr(i,:),perm,lsize_(aV)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3636:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3641:1: do i=1,nRAttr_(aV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3642:1: call Unpermute(aV%rAttr(i,:),perm,lsize_(aV)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3643:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:3705:1: dieWith=dieWith) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVect.F90:2001:18: outVect(n) = aV%rAttr(index,n) 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] m_AttrVect.F90:3153:47: integer, dimension(:), pointer :: aVinindices, aVoutindices 1 Warning: Unused variable 'avinindices' declared at (1) [-Wunused-variable] m_AttrVect.F90:3153:61: integer, dimension(:), pointer :: aVinindices, aVoutindices 1 Warning: Unused variable 'avoutindices' declared at (1) [-Wunused-variable] m_AttrVect.F90:3148:23: logical :: contiguous ! true if index segments are contiguous in memory 1 Warning: Unused variable 'contiguous' declared at (1) [-Wunused-variable] m_AttrVect.F90:3150:26: character*7 :: data_flag ! character variable used as data type flag 1 Warning: Unused variable 'data_flag' declared at (1) [-Wunused-variable] m_AttrVect.F90:3142:14: integer :: i,j,ier ! dummy variables 1 Warning: Unused variable 'i' declared at (1) [-Wunused-variable] m_AttrVect.F90:3142:20: integer :: i,j,ier ! dummy variables 1 Warning: Unused variable 'ier' declared at (1) [-Wunused-variable] m_AttrVect.F90:3146:33: integer :: inxmin, outxmin, inx, outx ! Index variables 1 Warning: Unused variable 'inx' declared at (1) [-Wunused-variable] m_AttrVect.F90:3146:19: integer :: inxmin, outxmin, inx, outx ! Index variables 1 Warning: Unused variable 'inxmin' declared at (1) [-Wunused-variable] m_AttrVect.F90:3142:16: integer :: i,j,ier ! dummy variables 1 Warning: Unused variable 'j' declared at (1) [-Wunused-variable] m_AttrVect.F90:3143:24: integer :: num_indices ! Overlapping attribute index number 1 Warning: Unused variable 'num_indices' declared at (1) [-Wunused-variable] m_AttrVect.F90:3145:26: integer :: num_inindices, num_outindices ! Number of matching indices in aV 1 Warning: Unused variable 'num_inindices' declared at (1) [-Wunused-variable] m_AttrVect.F90:3145:42: integer :: num_inindices, num_outindices ! Number of matching indices in aV 1 Warning: Unused variable 'num_outindices' declared at (1) [-Wunused-variable] m_AttrVect.F90:3146:39: integer :: inxmin, outxmin, inx, outx ! Index variables 1 Warning: Unused variable 'outx' declared at (1) [-Wunused-variable] m_AttrVect.F90:3146:28: integer :: inxmin, outxmin, inx, outx ! Index variables 1 Warning: Unused variable 'outxmin' declared at (1) [-Wunused-variable] m_AttrVect.F90:2942:26: character*7 :: data_flag ! character variable used as data type flag 1 Warning: Unused variable 'data_flag' declared at (1) [-Wunused-variable] m_AttrVect.F90:2937:26: integer :: num_inindices, num_outindices ! Number of matching indices in aV 1 Warning: Unused variable 'num_inindices' declared at (1) [-Wunused-variable] m_AttrVect.F90:2937:42: integer :: num_inindices, num_outindices ! Number of matching indices in aV 1 Warning: Unused variable 'num_outindices' declared at (1) [-Wunused-variable] m_AttrVect.F90:2774:26: integer :: num_inindices, num_outindices ! Number of matching indices in aV 1 Warning: Unused variable 'num_inindices' declared at (1) [-Wunused-variable] m_AttrVect.F90:2774:42: integer :: num_inindices, num_outindices ! Number of matching indices in aV 1 Warning: Unused variable 'num_outindices' declared at (1) [-Wunused-variable] m_AttrVect.F90:2604:26: character*7 :: data_flag ! character variable used as data type flag 1 Warning: Unused variable 'data_flag' declared at (1) [-Wunused-variable] m_AttrVect.F90:2599:26: integer :: num_inindices, num_outindices ! Number of matching indices in aV 1 Warning: Unused variable 'num_inindices' declared at (1) [-Wunused-variable] m_AttrVect.F90:2599:42: integer :: num_inindices, num_outindices ! Number of matching indices in aV 1 Warning: Unused variable 'num_outindices' declared at (1) [-Wunused-variable] m_AttrVect.F90:2433:26: integer :: num_inindices, num_outindices ! Number of matching indices in aV 1 Warning: Unused variable 'num_inindices' declared at (1) [-Wunused-variable] m_AttrVect.F90:2433:42: integer :: num_inindices, num_outindices ! Number of matching indices in aV 1 Warning: Unused variable 'num_outindices' declared at (1) [-Wunused-variable] m_AttrVect.F90:2333:32: integer :: index, aVsize, ierr, n, mysize 1 Warning: Unused variable 'ierr' declared at (1) [-Wunused-variable] m_AttrVect.F90:2252:32: integer :: index, aVsize, ierr, n, mysize 1 Warning: Unused variable 'ierr' declared at (1) [-Wunused-variable] m_AttrVect.F90:2164:32: integer :: index, aVsize, ierr, n, mysize 1 Warning: Unused variable 'ierr' declared at (1) [-Wunused-variable] m_AttrVect.F90:3312:0: integer, dimension(:), allocatable :: rIndex, iIndex Warning: 'iindex.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_AttrVect.F90:3312:0: Warning: 'rindex.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_GlobalMap.F90 m_GlobalMap.F90:59:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:63:26: public :: GlobalMap ! The class data structure 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:67:23: integer :: gsize ! the Global size 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:68:23: integer :: lsize ! my local size 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:69:45: integer,dimension(:),pointer :: counts ! all local sizes 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:70:45: integer,dimension(:),pointer :: displs ! PE ordered locations 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:86:38: interface init ; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:87:15: initd_, & ! initialize from all PEs 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:88:14: initr_ ! initialize from the root 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:183:31: GMap%lsize=GMap%counts(myID) ! the local size 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:184:15: GMap%gsize=l ! the global size 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:255:44: write(stderr,'(2a,2(a,i4))') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:256:28: ': _root_ argument error', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:257:28: ', size(lns) =',size(lns), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:276:31: GMap%lsize=GMap%counts(myID) ! the local size 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:277:15: GMap%gsize=l ! the global size 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:379:44: write(stderr,'(2a,2(a,i4))') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:380:28: ': _root_ argument error', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:402:23: GMap%gsize = l ! the global size 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalMap.F90:579:10: rank=-1 ! if nowhere fits 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_GlobalSegMap.F90 m_GlobalSegMap.F90:34:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:79:25: integer :: comp_id ! Component ID number 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:80:23: integer :: ngseg ! No. of Global segments 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:81:23: integer :: gsize ! No. of Global elements 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:82:44: integer,dimension(:),pointer :: start ! global seg. start index 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:83:45: integer,dimension(:),pointer :: length ! segment lengths 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:84:45: integer,dimension(:),pointer :: pe_loc ! PE locations 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:87:38: interface init ; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:88:16: initd_, & ! initialize from all PEs 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:90:16: initp_, & ! initialize in parallel from replicated arrays 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:116:1: rank1_ , & ! single rank case 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:117:1: rankm_ ! degenerate (multiple) ranks for halo case 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:121:1: PermuteInPlace_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:124:1: SortPermuteInPlace_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:257:1: ier = -1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:258:1: call die(myname_,'pe_loc/start array size mismatch',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:294:1: call die(myname_, 'allocate(counts,...',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:299:1: call die(myname_, 'allocate(counts,...',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:315:1: ngseg = ngseg + counts(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:317:1: displs(i) = 0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:318:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:319:1: displs(i) = displs(i-1) + counts(i-1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:320:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:340:1: root_pe_loc(ngseg), stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:342:1: call die(myname_, 'allocate(root_start...',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:348:1: root_pe_loc(1), stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:350:1: call die(myname_, 'allocate((non)root_start...',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:492:44: write(stderr,'(2a,2(a,i4))') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:493:28: ': _root_ argument error', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:494:32: ', size(start) =',size(start), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:499:44: write(stderr,'(2a,2(a,i4))') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:500:28: ': _root_ argument error', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:501:34: ', size(length) =',size(length), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:506:44: write(stderr,'(2a,2(a,i4))') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:507:28: ': _root_ argument error', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:508:34: ', size(pe_loc) =',size(pe_loc), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:576:1: GSMap%gsize = gsize 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:583:1: GSMap%gsize = GSMap%gsize + GSMap%length(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:985:1: write(6,*) rank,'init_index: SIZE ',nseg 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:987:1: do n=1,nseg 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:989:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:998:3: comp_id) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1146:1: nlocseg = nlocseg + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1420:1: pe_storage = pe_storage + GSMap%length(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1455:45: integer, intent(in) :: PEno ! input process number 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1559:1: local_size = local_size + GSMap%length(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1589:45: integer, intent(in) :: i_g ! a global index 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1603:10: rank=-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1643:45: integer, intent(in) :: i_g ! a global index 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1683:15: rank = -1 ! null value 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1697:1: ilc = GSMap%start(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1698:1: ile = ilc + GSMap%length(i) - 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1702:1: if(ilc <= i_g .and. i_g <= ile) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1703:1: n = n + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1704:1: rank(n) = GSMap%pe_loc(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1705:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1791:1: new = .true. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1796:1: do i=1, count 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1797:1: if(GSMap%pe_loc(n) == temp_list(i)) new = .false. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1798:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1803:1: if(new) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1804:1: count = count + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1805:1: temp_list(count) = GSMap%pe_loc(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1806:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1809:1: ierr = 2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1810:1: call die(myname_,'negative value of GSMap%pe_loc',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1823:1: call die(myname_,'allocate(pe_list...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1827:1: pe_list(n) = temp_list(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1840:1: call die(myname_,'deallocate(perm)',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1936:1: lower_index = pointGSMap%start(iseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1937:1: upper_index = lower_index + pointGSMap%length(iseg) - 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1939:1: if((points(ipoint) >= lower_index) .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1940:1: (points(ipoint) <= upper_index)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1941:1: pe_locs(ipoint) = pointGSMap%pe_loc(iseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:1942:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:2072:1: overlap = .TRUE. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:2073:1: EXIT 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:2152:1: call die(myname_,'key2 GSMap size mismatch',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:2156:1: call die(myname_,'key1 key2 size mismatch',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:2300:1: call die(myname_,'key2 GSMap size mismatch',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:2304:1: call die(myname_,'key1 key2 size mismatch',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMap.F90:2409:10: use m_MCTWorld, only: ThisMCTWorld 1 Warning: Unused module variable 'thismctworld' which has been explicitly imported at (1) [-Wunused-variable] m_GlobalSegMap.F90:918:33: integer :: i,j,k,n ! generic indicies 1 Warning: Unused variable 'k' declared at (1) [-Wunused-variable] m_GlobalSegMap.F90:478:23: integer :: myID,ier,l,i 1 Warning: Unused variable 'l' declared at (1) [-Wunused-variable] m_GlobalSegMap.F90:228:31: integer :: nPEs, myID, ier, l, i 1 Warning: Unused variable 'l' declared at (1) [-Wunused-variable] m_GlobalSegMap.F90:2366:0: integer, allocatable:: last_index(:) Warning: 'last_index.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_GlobalSegMap.F90:1763:0: integer, dimension(:), allocatable :: temp_list Warning: 'temp_list.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_GlobalSegMap.F90:1203:0: integer, allocatable:: segcount(:) ! segments on proc i Warning: 'segcount.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_GlobalSegMapComms.F90 m_GlobalSegMapComms.F90:509:1: IntBuffer(n) = GSMap%start(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMapComms.F90:510:1: IntBuffer(GSMap%ngseg+n) = GSMap%length(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMapComms.F90:511:1: IntBuffer(2*GSMap%ngseg+n) = GSMap%pe_loc(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMapComms.F90:521:1: GSMap%pe_loc(GSMap%ngseg), stat=ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMapComms.F90:523:1: if(.not. present(status)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMapComms.F90:524:1: call die(myname_,'off-root allocate(GSMap%start...)',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMapComms.F90:525:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMapComms.F90:526:1: write(stderr,*) myname_,':: error during off-root allocate(GSMap%start...)' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMapComms.F90:527:1: status = 7 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMapComms.F90:528:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMapComms.F90:529:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMapComms.F90:533:1: GSMap%start(n) = IntBuffer(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMapComms.F90:534:1: GSMap%length(n) = IntBuffer(GSMap%ngseg+n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalSegMapComms.F90:535:1: GSMap%pe_loc(n) = IntBuffer(2*GSMap%ngseg+n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_Accumulator.F90 m_Accumulator.F90:51:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:72:22: public :: clean ! destruction method 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:74:22: public :: lsize ! local length of the data arrays 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:78:23: public :: nIAttr ! number of integer fields 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:79:23: public :: nRAttr ! number of real fields 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:80:24: public :: indexIA ! index the integer fields 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:81:24: public :: indexRA ! index the real fields 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:82:25: public :: getIList ! Return tag from INTEGER 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:84:25: public :: getRList ! Return tag from REAL attribute 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:100:40: interface init ; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:101:14: init_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:102:15: inits_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:106:40: interface initp ; module procedure initp_ ; end interface 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:366:1: call initp_(aC=aC, iAction=my_iAction, num_steps=num_steps, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:367:1: steps_done=my_steps_done) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:380:1: call initp_(aC=aC, rAction=my_rAction, num_steps=num_steps, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:381:1: steps_done=my_steps_done) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:400:1: call AttrVect_init(aV=aC%data,iList=iList,lsize=lsize) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:403:1: call AttrVect_init(aV=aC%data,rList=rList,lsize=lsize) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:523:1: call AttrVect_init(aV=aC%data,iList=iList,lsize=lsize) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:526:1: call AttrVect_init(aV=aC%data,rList=rList,lsize=lsize) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:620:1: allocate(aC%iAction(size(iAction)),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:621:1: if(ier /= 0) call die(myname_,"iAction allocate",ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:623:1: do i=1,size(iAction) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:624:1: aC%iAction(i) = iAction(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:625:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:635:1: allocate(aC%rAction(size(rAction)),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:636:1: if(ier /= 0) call die(myname_,"iAction allocate",ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:638:1: do i=1,size(rAction) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:639:1: aC%rAction(i) = rAction(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:640:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:764:1: iActionArray(i)=bC%iAction(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:770:1: rActionArray(i)=bC%rAction(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:780:1: rList=ListExportToChar(temp_rList), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:781:1: rAction=rActionArray, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:790:1: call init_(aC, iList=ListExportToChar(temp_iList), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:791:1: iAction=iActionArray, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:793:1: num_steps=myNumSteps, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:800:1: call init_(aC, rList=ListExportToChar(temp_rList), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:801:1: rAction=rActionArray, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:802:1: lsize=aC_lsize, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:803:1: num_steps=myNumSteps, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:974:1: if(present(stat)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:975:1: stat=ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:976:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:977:1: call warn(myname_,'deallocate(aC%iAction)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:978:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:988:1: if(present(stat)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:989:1: stat=ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:990:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:991:1: call warn(myname_,'deallocate(aC%rAction)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:992:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1078:1: if(present(source_name)) write(stderr,*) source_name, myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1080:1: call die(myname_,"Neither aC%iAction nor aC%rAction are associated") 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1090:1: if(present(source_name)) write(stderr,*) source_name, myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1092:1: call die(myname_,"Neither aC%data%iList nor aC%data%rList are allocated") 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1100:1: initialized_ = .false. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1101:1: aC_associated = .false. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1102:1: if(kill) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1103:1: if(present(source_name)) write(stderr,*) source_name, myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1105:1: call die(myname_,"size(aC%iAction<=0), size = ", size(aC%iAction)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1106:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1112:1: initialized_ = .false. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1113:1: aC_associated = .false. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1114:1: if(kill) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1115:1: if(present(source_name)) write(stderr,*) source_name, myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1117:1: call die(myname_,"size(aC%rAction<=0), size = ", size(aC%rAction)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1118:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1127:1: initialized_ = .false. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1128:1: if(kill) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1129:1: if(present(source_name)) write(stderr,*) source_name, myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1131:1: call die(myname_,"No attributes found in aC%data") 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1132:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1137:1: if( size(aC%iAction) /= Attr_nIAttr(aC%data) ) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1138:1: initialized_ = .false. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1139:1: if(kill) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1140:1: if(present(source_name)) write(stderr,*) source_name, myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1142:1: call die(myname_,"size(aC%iAction) /= nIAttr(aC%data)") 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1143:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1144:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1146:1: do i=1,Attr_nIAttr(aC%data) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1147:1: if( (aC%iAction(i) /= MCT_SUM) .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1149:1: initialized_ = .false. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1150:1: if(kill) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1151:1: if(present(source_name)) write(stderr,*) source_name, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1152:1: myname_, ":: ERROR, Invalid value found in aC%iAction" 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1153:1: call die(myname_,"Invalid value found in aC%iAction", & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1154:1: aC%iAction(i)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1155:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1156:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1157:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1163:1: if( size(aC%rAction) /= Attr_nRAttr(aC%data) ) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1164:1: initialized_ = .false. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1165:1: if(kill) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1166:1: if(present(source_name)) write(stderr,*) source_name, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1167:1: myname_, ":: ERROR, size(aC%rAction) /= nRAttr(aC%data)" 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1168:1: call die(myname_,"size(aC%rAction) /= nRAttr(aC%data)") 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1169:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1170:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1172:1: do i=1,Attr_nRAttr(aC%data) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1173:1: if( (aC%rAction(i) /= MCT_SUM) .and. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1175:1: initialized_ = .false. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1176:1: if(kill) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1177:1: if(present(source_name)) write(stderr,*) source_name, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1178:1: myname_, ":: ERROR, Invalid value found in aC%rAction", & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1179:1: aC%rAction(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1180:1: call die(myname_,"Invalid value found in aC%rAction", & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1181:1: aC%iAction(i)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1182:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1183:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1184:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1273:1: myNumSteps 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1322:1: myStepsDone 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1549:1: if(indexIA_==0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1550:1: if(.not.present(dieWith)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1551:1: if(present(perrWith)) write(stderr,'(4a)') perrWith, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1553:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1554:1: write(stderr,'(4a)') dieWith, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1556:1: call die(dieWith) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1557:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1558:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1620:1: if(indexRA_==0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1621:1: if(.not.present(dieWith)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1622:1: if(present(perrWith)) write(stderr,'(4a)') perrWith, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1624:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1625:1: write(stderr,'(4a)') dieWith, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1627:1: call die(dieWith) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1628:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:1629:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:2309:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:2311:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:2312:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:2348:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:2350:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:2351:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Accumulator.F90:2430:20: integer :: aCindex, aVindex 1 Warning: Unused variable 'acindex' declared at (1) [-Wunused-variable] m_Accumulator.F90:2429:45: integer, dimension(:), pointer :: aCindices, aVindices 1 Warning: Unused variable 'acindices' declared at (1) [-Wunused-variable] m_Accumulator.F90:2430:29: integer :: aCindex, aVindex 1 Warning: Unused variable 'avindex' declared at (1) [-Wunused-variable] m_Accumulator.F90:2429:56: integer, dimension(:), pointer :: aCindices, aVindices 1 Warning: Unused variable 'avindices' declared at (1) [-Wunused-variable] m_Accumulator.F90:2433:17: integer :: ierr, l, n 1 Warning: Unused variable 'ierr' declared at (1) [-Wunused-variable] m_Accumulator.F90:2426:24: integer :: num_indices 1 Warning: Unused variable 'num_indices' declared at (1) [-Wunused-variable] m_Accumulator.F90:868:14: integer :: i,ier 1 Warning: Unused variable 'i' declared at (1) [-Wunused-variable] m_Accumulator.F90:868:18: integer :: i,ier 1 Warning: Unused variable 'ier' declared at (1) [-Wunused-variable] m_Accumulator.F90:866:23: integer :: myNumSteps, myStepsDone 1 Warning: Unused variable 'mynumsteps' declared at (1) [-Wunused-variable] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_AttrVectComms.F90 m_AttrVectComms.F90:37:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:39:23: public :: gather ! gather all local vectors to the root 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:40:24: public :: scatter ! scatter from the root to all PEs 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:41:22: public :: bcast ! bcast from root to all PEs 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:42:21: public :: send ! send an AttrVect 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:43:21: public :: recv ! receive an AttrVect 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:46:1: GM_gather_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:47:1: GSM_gather_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:50:1: GM_scatter_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:51:1: GSM_scatter_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:175:1: write(stderr,*) myname_,':: call List_send(inAV%iList...' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:176:1: status = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:177:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:179:1: call die(myname_,':: call List_send(inAV%iList...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:188:1: write(stderr,*) myname_,':: call List_send(inAV%rList...' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:189:1: status = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:190:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:192:1: call die(myname_,':: call List_send(inAV%rList...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:221:1: call MPI_SEND(inAV%iAttr(1,1), AVlength*List_nitem(inAV%iList), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:224:1: if(ierr /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:225:1: call MP_perr_die(myname_,':: call MPI_SEND(inAV%iAttr...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:226:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:234:1: call MPI_SEND(inAV%rAttr(1,1), AVlength*List_nitem(inAV%rList), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:237:1: if(ierr /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:238:1: call MP_perr_die(myname_,':: call MPI_SEND(inAV%rAttr...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:239:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:332:1: write(stderr,*) myname_,':: call List_recv(outAV%iList...' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:333:1: status = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:334:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:336:1: call die(myname_,':: call List_recv(outAV%iList...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:345:1: write(stderr,*) myname_,':: call List_recv(outAV%rList...' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:346:1: status = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:347:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:349:1: call die(myname_,':: call List_recv(outAV%rList...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:376:1: call MPI_RECV(outAV%iAttr(1,1), AVlength*List_nitem(outAV%iList), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:379:1: if(ierr /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:380:1: call MP_perr_die(myname_,':: call MPI_RECV(outAV%iAttr...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:381:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:394:1: call MPI_RECV(outAV%rAttr(1,1), AVlength*List_nitem(outAV%rList), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:397:1: if(ierr /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:398:1: call MP_perr_die(myname_,':: call MPI_RECV(outAV%rAttr...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:399:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:489:48: write(stderr,'(2a,i4,a,i4,a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:490:41: ': invalid input, lsize(GMap) =',niV, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:509:26: nIA=AttrVect_nIAttr(iV) ! number of INTEGER attributes 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:510:26: nRA=AttrVect_nRAttr(iV) ! number of REAL attributes 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:518:57: call fc_gatherv_int(iV%iAttr,niV*nIA,MP_INTEGER, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:524:57: call fc_gatherv_int(iV%iAttr,niV*nIA,MP_INTEGER, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:536:56: call fc_gatherv_fp(iV%rAttr,niV*nRA,mp_type_Av, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:542:56: call fc_gatherv_fp(iV%rAttr,niV*nRA,mp_type_Av, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:555:41: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:703:1: call MP_perr_die(myname_,':: call MPI_COMM_RANK()',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:735:1: lns(n) = lns(n) + GSMap%length(iseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:785:1: write(stderr,*) myname_,':: allocate(current_pos(..) failed,', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:787:1: if(present(stat)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:788:1: stat=ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:789:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:790:1: call die(myname_,'allocate(current_pos(..) failed.' ) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:791:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:797:1: current_pos(n) = workGMap%displs(n) + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:809:1: pe = GSMap%pe_loc(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:813:1: ilb = current_pos(pe) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:814:1: iub = current_pos(pe) + GSMap%length(n) - 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:818:1: olb = GSMap%start(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:819:1: oub = GSMap%start(n) + GSMap%length(n) - 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:823:1: current_pos(pe) = current_pos(pe) + GSMap%length(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:827:1: do m=1,AttrVect_nIAttr(iV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:828:4: oV%iAttr(m,olb:oub) = workV%iAttr(m,ilb:iub) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:829:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:831:1: do m=1,AttrVect_nRAttr(iV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:832:4: oV%rAttr(m,olb:oub) = workV%rAttr(m,ilb:iub) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:833:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:841:1: write(stderr,*) myname_,'error in deallocate(current_pos), stat=',ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:842:1: if(present(stat)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:843:1: stat=ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:844:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:845:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:846:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:976:51: write(stderr,'(2a,i5,a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:998:31: nIA = AttrVect_nIAttr(iV) ! number of INTEGER attributes 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:999:31: nRA = AttrVect_nRAttr(iV) ! number of REAL attributes 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1002:1: call List_copy(iList,iV%iList) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1006:1: call List_copy(rList,iV%rList) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1041:57: call MPI_scatterv(iV%iAttr(1,1),GMap%counts*nIA, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1050:64: call MPI_scatterv(nonRootAV%iAttr(1,1),GMap%counts*nIA, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1070:57: call MPI_scatterv(iV%rAttr(1,1),GMap%counts*nRA, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1080:59: call MPI_scatterv(nonRootAV%rAttr,GMap%counts*nRA, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1096:41: write(stderr,'(2a,i4)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1257:1: write(stderr,'(2a,i5,a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1259:1: GSMap%gsize, ', lsize(iV) =',AttrVect_lsize(iV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1260:1: if(present(stat)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1261:1: stat=-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1262:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1263:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1264:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1307:1: stat=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1308:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1310:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1320:1: write(stderr,*) myname_,':: allocate(lns...) failed, stat=',ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1321:1: if(present(stat)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1322:1: stat=ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1323:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1324:1: call die(myname_,'allocate(lns)',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1325:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1333:1: lns(n) = lns(n) + GSMap%length(iseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1349:1: write(stderr,*) myname_,':: allocate(lns...) failed, stat=',ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1350:1: if(present(stat)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1351:1: stat=ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1352:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1353:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1354:1: call die(myname_,'allocate(lns(1))',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1355:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1376:1: write(stderr,*) myname_,':: allocate(current_pos..) failed, stat=', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1377:1: ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1378:1: if(present(stat)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1379:1: stat=ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1380:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1381:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1382:1: call die(myname_,'allocate(current_pos)',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1383:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1389:1: current_pos(n) = GMap%displs(n) + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1401:1: pe = GSMap%pe_loc(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1405:1: ilb = GSMap%start(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1406:1: iub = GSMap%start(n) + GSMap%length(n) - 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1410:1: olb = current_pos(pe) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1411:1: oub = current_pos(pe) + GSMap%length(n) - 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1415:1: current_pos(pe) = current_pos(pe) + GSMap%length(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1419:1: do m=1,AttrVect_nIAttr(iV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1420:4: workV%iAttr(m,olb:oub) = iV%iAttr(m,ilb:iub) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1421:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1423:1: do m=1,AttrVect_nRAttr(iV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1424:4: workV%rAttr(m,olb:oub) = iV%rAttr(m,ilb:iub) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1425:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1433:1: write(stderr,*) myname_,':: deallocate(current_pos) failed. ', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1435:1: if(present(stat)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1436:1: stat=ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1437:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1438:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1439:1: call die(myname_,'deallocate(current_pos)',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1440:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1455:1: ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1457:1: stat = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1458:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1460:1: call die(myname_,'ERROR returning from GM_scatter_()',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1476:1: stat=ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1477:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1479:1: call die(myname_,'deallocate(lns)',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1591:49: call String_bcast(iLStr,root,comm,stat=ier) ! bcast.String() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1594:1: write(stderr,*) myname_,'bcast.String(iLstr), ier=',ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1595:1: if(present(stat)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1596:1: stat=ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1597:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1598:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1599:1: call die(myname_,'String_bcast(iLStr) failed',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1600:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1610:49: call String_bcast(rLStr,root,comm,stat=ier) ! bcast.String() 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1612:1: write(stderr,*) myname_,'bcast.String(iLstr), ier=',ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1613:1: if(present(stat)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1614:1: stat=ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1615:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1616:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1617:1: call die(myname_,'String_bcast(iLStr) failed',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1618:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1626:1: call AttrVect_init(aV,iList=char(iLStr),rList=char(rLStr), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1627:1: lsize=lsize) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1631:1: call AttrVect_init(aV,iList=char(iLStr),lsize=lsize) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1635:1: call AttrVect_init(aV,rList=char(rLStr),lsize=lsize) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1639:1: write(stderr,*) myname_,':: Nonpositive numbers of both ',& 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1641:1: if(present(stat)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1642:1: stat = -1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1643:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1644:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1645:1: call die(myname_,'AV has not been initialized',-1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1646:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1659:1: call MP_perr_die(myname_,'MPI_bcast(iAttr) failed.',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectComms.F90:1671:1: call MP_perr_die(myname_,'MPI_bcast(rAttr) failed.',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_SparseMatrix.F90 m_SparseMatrix.F90:81:1: integer :: ncols 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:82:1: type(AttrVect) :: data 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:151:1: exportGlobalRowIndices_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:155:1: exportGlobalColumnIndices_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:159:1: exportLocalRowIndices_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:163:1: exportLocalColumnIndices_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:167:1: exportMatrixElementsSP_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:168:1: exportMatrixElementsDP_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:172:1: importGlobalRowIndices_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:176:1: importGlobalColumnIndices_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:180:1: importLocalRowIndices_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:184:1: importLocalColumnIndices_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:188:1: importMatrixElementsSP_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:189:1: importMatrixElementsDP_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:195:1: GlobalNumElements_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:199:1: ComputeSparsitySP_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:200:1: ComputeSparsityDP_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:204:1: local_row_range_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:208:1: global_row_range_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:212:1: local_col_range_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:216:1: global_col_range_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:220:1: CheckBounds_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:224:1: row_sumSP_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:225:1: row_sumDP_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:229:1: row_sum_checkSP_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:230:1: row_sum_checkDP_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:1973:1: call MP_perr_die(myname_,"MPI_ALLREDUCE(MySparsity...",ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2057:1: call MP_perr_die(myname_,"MPI_ALLREDUCE(MySparsity...",ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2140:1: (sMat%data%iAttr(igrow,i) <= 0)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2141:1: ierror = 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2142:1: call die(myname_,"Row index out of bounds",ierror) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2148:1: (sMat%data%iAttr(igcol,i) <= 0)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2149:1: ierror = 2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2150:1: call die(myname_,"Column index out of bounds",ierror) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2255:1: sMat%data%rAttr(iwgt,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2376:1: sMat%data%rAttr(iwgt,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2471:1: if(abs(sums(i) - valid_sums(j)) > abs_tol) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2472:1: num_invalid = num_invalid + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2473:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2481:1: valid = .FALSE. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2482:1: EXIT 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2556:1: if(abs(sums(i) - valid_sums(j)) > abs_tol) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2557:1: num_invalid = num_invalid + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2558:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2566:1: valid = .FALSE. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2567:1: EXIT 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrix.F90:2271:9: sums = gsums 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] m_SparseMatrix.F90:1976:16: sparsity = MySparsity 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] m_SparseMatrix.F90:1840:40: subroutine global_col_range_(sMat, comm, start_col, end_col) 1 Warning: Unused dummy argument 'comm' at (1) [-Wunused-dummy-argument] m_SparseMatrix.F90:1719:40: subroutine global_row_range_(sMat, comm, start_row, end_row) 1 Warning: Unused dummy argument 'comm' at (1) [-Wunused-dummy-argument] m_SparseMatrix.F90:382:20: integer :: row,col 1 Warning: Unused variable 'col' declared at (1) [-Wunused-variable] m_SparseMatrix.F90:2340:0: real(FP), dimension(:), allocatable :: gsums Warning: 'gsums.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_SparseMatrix.F90:2219:0: real(FP), dimension(:), allocatable :: gsums Warning: 'gsums.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_SparseMatrix.F90:384:0: integer, dimension(:) , allocatable :: nr, rn Warning: 'rn.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_SparseMatrix.F90:384:0: Warning: 'nr.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_Navigator.F90 m_Navigator.F90:40:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:44:26: public :: Navigator ! The class data structure 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:47:29: integer :: NumSegments ! Number of defined Segments 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:48:30: integer :: VectorLength ! Length of the Vector being indexed 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:65:47: interface Navigator_init; module procedure & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:147:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:149:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:378:1: write(stderr,'(3a,2(i8,a))') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:382:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:525:1: write(stderr,'(3a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:528:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:534:1: write(stderr,'(2a,2(a,i8))') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:537:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:543:1: write(stderr,'(2a,2(a,i8))') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:546:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:626:1: write(stderr,'(3a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:629:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:635:1: write(stderr,'(2a,2(a,i8))') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:638:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:644:1: write(stderr,'(2a,2(a,i8))') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Navigator.F90:647:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_AttrVectReduce.F90 m_AttrVectReduce.F90:45:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:182:1: do i=1,AttrVect_nIAttr(outAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:183:1: outAV%iAttr(i,1) = outAV%iAttr(i,1) + inAV%iAttr(i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:184:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:188:1: do i=1,AttrVect_nRAttr(outAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:189:1: outAV%rAttr(i,1) = outAV%rAttr(i,1) + inAV%rAttr(i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:190:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:198:1: outAV%iAttr(i,1) = inAV%iAttr(i,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:202:1: outAV%rAttr(i,1) = inAV%rAttr(i,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:208:1: do i=1,AttrVect_nIAttr(outAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:209:1: if(inAV%iAttr(i,j) < outAV%iAttr(i,1)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:210:1: outAV%iAttr(i,1) = inAV%iAttr(i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:211:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:212:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:216:1: do i=1,AttrVect_nRAttr(outAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:217:1: if(inAV%rAttr(i,j) < outAV%rAttr(i,1)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:218:1: outAV%rAttr(i,1) = inAV%rAttr(i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:219:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:220:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:228:1: outAV%iAttr(i,1) = inAV%iAttr(i,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:232:1: outAV%rAttr(i,1) = inAV%rAttr(i,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:238:1: do i=1,AttrVect_nIAttr(outAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:239:1: if(inAV%iAttr(i,j) > outAV%iAttr(i,1)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:240:1: outAV%iAttr(i,1) = inAV%iAttr(i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:241:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:242:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:246:1: do i=1,AttrVect_nRAttr(outAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:247:1: if(inAV%rAttr(i,j) > outAV%rAttr(i,1)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:248:1: outAV%rAttr(i,1) = inAV%rAttr(i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:249:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:250:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:366:1: do i=1,AttrVect_nRAttr(outAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:367:1: outAV%rAttr(i,1) = outAV%rAttr(i,1) + inAV%rAttr(i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:368:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:376:1: outAV%rAttr(i,1) = inAV%rAttr(i,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:382:1: do i=1,AttrVect_nRAttr(outAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:383:1: if(inAV%rAttr(i,j) < outAV%rAttr(i,1)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:384:1: outAV%rAttr(i,1) = inAV%rAttr(i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:385:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:386:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:394:1: outAV%rAttr(i,1) = inAV%rAttr(i,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:400:1: do i=1,AttrVect_nRAttr(outAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:401:1: if(inAV%rAttr(i,j) > outAV%rAttr(i,1)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:402:1: outAV%rAttr(i,1) = inAV%rAttr(i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:403:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:404:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:519:1: call MPI_AllReduce(inAV%rAttr, outAV%rAttr, BufferSize, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:520:1: MP_Type(inAV%rAttr(1,1)), MP_SUM, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:521:1: comm, ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:523:1: call MPI_AllReduce(inAV%rAttr, outAV%rAttr, BufferSize, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:527:1: call MPI_AllReduce(inAV%rAttr, outAV%rAttr, BufferSize, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:531:1: write(stderr,'(2a,i8,a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:537:1: write(stderr,*) myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:539:1: call MP_perr_die(myname_, 'MPI_AllReduce() failed.', ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:551:1: call MPI_AllReduce(inAV%iAttr, outAV%iAttr, BufferSize, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:552:1: MP_Type(inAV%iAttr(1,1)), MP_SUM, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:553:1: comm, ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:555:1: call MPI_AllReduce(inAV%iAttr, outAV%iAttr, BufferSize, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:559:1: call MPI_AllReduce(inAV%iAttr, outAV%iAttr, BufferSize, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:563:1: write(stderr,'(2a,i8,a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:569:1: write(stderr,*) myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:571:1: call MP_perr_die(myname_, 'MPI_AllReduce() failed.', ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:753:1: AttrVect_lsize(inAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:763:1: lsize=1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:779:1: do i=1,AttrVect_nRAttr(inAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:780:1: outAV%rAttr(i,1) = outAV%rAttr(i,1) + inAV%rAttr(i,j) * weights(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:781:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:783:1: outAV%rAttr(AttrVect_nRAttr(outAV),1) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:784:1: outAV%rAttr(AttrVect_nRAttr(outAV),1) + weights(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:790:1: do i=1,AttrVect_nRAttr(inAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:791:1: outAV%rAttr(i,1) = outAV%rAttr(i,1) + inAV%rAttr(i,j) * weights(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:792:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:864:1: AttrVect_lsize(inAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:874:1: lsize=1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:890:1: do i=1,AttrVect_nRAttr(inAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:891:1: outAV%rAttr(i,1) = outAV%rAttr(i,1) + inAV%rAttr(i,j) * weights(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:892:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:894:1: outAV%rAttr(AttrVect_nRAttr(outAV),1) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:895:1: outAV%rAttr(AttrVect_nRAttr(outAV),1) + weights(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:901:1: do i=1,AttrVect_nRAttr(inAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:902:1: outAV%rAttr(i,1) = outAV%rAttr(i,1) + inAV%rAttr(i,j) * weights(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:903:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:998:1: AttrVect_lsize(inAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:1004:1: WeightSumAttr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:1084:1: AttrVect_lsize(inAV) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AttrVectReduce.F90:1090:1: WeightSumAttr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_AccumulatorComms.F90 m_AccumulatorComms.F90:37:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:43:23: public :: gather ! gather all local vectors to the root 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:44:24: public :: scatter ! scatter from the root to all PEs 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:45:22: public :: bcast ! bcast from root to all PEs 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:660:1: nIAttr = size(aC%iAction) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:662:1: nIAttr = 0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:666:1: nRAttr = size(aC%rAction) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:668:1: nRAttr = 0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:699:1: AccBuff(4+i) = aC%iAction(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:705:1: AccBuff(4+nIAttr+i) = aC%rAction(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:755:1: call Accumulator_initp(aC,iAction=aC_iAction,rAction=aC_rAction, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:766:1: if(myID /= root) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:767:1: call Accumulator_initp(aC,iAction=aC_iAction, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:770:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:771:1: deallocate(aC_iAction,stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:772:1: if(ier /= 0) call die(myname_,"deallocate aC_iAction...",ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:776:1: if(myID /= root) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:777:1: call Accumulator_initp(aC,rAction=aC_rAction, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:780:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:781:1: deallocate(aC_rAction,stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:782:1: if(ier /= 0) call die(myname_,"deallocate aC_iAction...",ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_AccumulatorComms.F90:643:19: logical :: status 1 Warning: Unused variable 'status' declared at (1) [-Wunused-variable] m_AccumulatorComms.F90:237:24: integer :: myID, ier, i 1 Warning: Unused variable 'i' declared at (1) [-Wunused-variable] m_AccumulatorComms.F90:136:24: integer :: myID, ier, i 1 Warning: Unused variable 'i' declared at (1) [-Wunused-variable] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_GeneralGrid.F90 m_GeneralGrid.F90:125:1: initCartesianDP_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:129:1: initUnstructuredDP_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:374:1: NumShared,CoordListIndices,CoordSortOrderIndices) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:380:1: call die(myname_,'CoordSortOrder must have the same items & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:394:1: (.not.present(CoordSortOrder)) ) .or. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:395:1: (size(descend) /= nitems) ) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:394:1: (.not.present(CoordSortOrder)) ) .or. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:395:1: (size(descend) /= nitems) ) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:397:1: write(stderr,*) myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:404:1: call die(myname_, 'ERROR using -descend- argument; & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:806:1: call die(myname_,"size(iGGrid%descend) must equal ncoord, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:820:1: call die(myname_,"allocate(oGGrid%descend...", ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:824:1: oGGrid%descend(i) = iGGrid%descend(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:996:1: write(stderr,'(2a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:998:1: Dims(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:999:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1047:1: write(stderr,'(4a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1052:1: call die(myname_,'size of and arguments must match') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1107:1: NumShared,CoordListIndices,CoordSortOrderIndices) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1113:1: call die(myname_,'CoordSortOrder must have the same items & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1180:1: write(stderr,'(4a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1182:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1196:1: do i=1,n-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1197:1: nCycles = nCycles * Dims(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1198:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1203:1: do i=n+1,NumDims 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1204:1: nRepeat = nRepeat * Dims(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1205:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1217:1: do j=1,Dims(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1218:1: do k=1,nRepeat 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1219:1: GGrid%data%rAttr(iAxis,index) = AxisData(j,n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1220:1: index = index+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1221:1: end do ! do k=1,nRepeat 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1222:1: end do ! do j=1,Dims(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1344:1: write(stderr,'(2a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1346:1: Dims(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1347:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1395:1: write(stderr,'(4a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1400:1: call die(myname_,'size of and arguments must match') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1455:1: NumShared,CoordListIndices,CoordSortOrderIndices) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1461:1: call die(myname_,'CoordSortOrder must have the same items & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1528:1: write(stderr,'(4a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1530:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1544:1: do i=1,n-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1545:1: nCycles = nCycles * Dims(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1546:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1551:1: do i=n+1,NumDims 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1552:1: nRepeat = nRepeat * Dims(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1553:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1565:1: do j=1,Dims(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1566:1: do k=1,nRepeat 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1567:1: GGrid%data%rAttr(iAxis,index) = AxisData(j,n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1568:1: index = index+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1569:1: end do ! do k=1,nRepeat 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1570:1: end do ! do j=1,Dims(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1780:1: List_nitem(GGrid%coordinate_list) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1818:1: NumShared,CoordListIndices,CoordSortOrderIndices) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1824:1: call die(myname_,'CoordSortOrder must have the same items & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:1878:1: GGrid%data%rAttr(i,n) = PointData(nOffset + i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2033:1: List_nitem(GGrid%coordinate_list) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2071:1: NumShared,CoordListIndices,CoordSortOrderIndices) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2077:1: call die(myname_,'CoordSortOrder must have the same items & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2131:1: GGrid%data%rAttr(i,n) = PointData(nOffset + i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2219:1: call List_clean(GGrid%coordinate_sort_order,ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2220:1: if(ierr/=0) stat=ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2224:1: call List_clean(GGrid%weight_list,ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2225:1: if(ierr/=0) stat=ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2229:1: call List_clean(GGrid%other_list,ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2230:1: if(ierr/=0) stat=ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2234:1: call List_clean(GGrid%index_list,ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2235:1: if(ierr/=0) stat=ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2239:1: deallocate(GGrid%descend, stat=ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2240:1: if(ierr/=0) stat=ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2250:1: call List_clean(GGrid%coordinate_sort_order) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2254:1: call List_clean(GGrid%weight_list) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2258:1: call List_clean(GGrid%other_list) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2262:1: call List_clean(GGrid%index_list) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2266:1: deallocate(GGrid%descend, stat=ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:2267:1: if(ierr/=0) call die(myname_,'deallocate(GGrid%descend)',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:3141:1: call die(myname_, "GGrid%coordinate_aort_order must be & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:3146:1: call Sort_(GGrid, GGrid%coordinate_sort_order, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:3147:1: perm, GGrid%descend) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:3149:1: call Sort_(GGrid=GGrid, key_list=GGrid%coordinate_sort_order, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:3150:1: perm=perm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGrid.F90:786:30: integer :: n, ncoord, norder 1 Warning: Unused variable 'norder' declared at (1) [-Wunused-variable] m_GeneralGrid.F90:2635:0: end function lsize_ Warning: '__result_lsize_' may be used uninitialized in this function [-Wmaybe-uninitialized] m_GeneralGrid.F90:2597:0: integer function lsize_(GGrid) note: '__result_lsize_' was declared here mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_GeneralGridComms.F90 m_GeneralGridComms.F90:178:1: write(stderr,*) myname_,':: Error. GeneralGrid%coordinate_list undefined.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:179:1: status = -1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:180:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:182:1: call die(myname_,':: Error. GeneralGrid%coordinate_list undefined.',-1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:213:1: call MP_perr_die(myname_,':: call MPI_SEND(size(iGGrid%descend)...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:219:1: call MP_perr_die(myname_,':: call MPI_SEND(iGGrid%descend...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:277:1: write(stderr,*) myname_,':: Error. GeneralGrid%index_list undefined.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:278:1: status = -2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:279:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:281:1: call die(myname_,':: Error. GeneralGrid%index_list undefined.',-2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:291:1: write(stderr,*) myname_,':: call AttrVect_send(iGGrid%data...' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:292:1: status = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:293:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:295:1: call die(myname_,':: call AttrVect_send(iGGrid%data...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:445:1: write(stderr,*) myname_,':: Error. GeneralGrid%coordinate_list undefined.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:446:1: status = -1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:447:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:449:1: call die(myname_,':: Error. GeneralGrid%coordinate_list undefined.',-1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:459:1: if(present(status)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:460:1: write(stderr,*) myname_,':: Error calling ',& 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:462:1: status = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:463:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:464:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:465:1: call die(myname_,':: call List_recv(oGGrid%coordinate_sort_order...', ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:466:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:479:1: call MP_perr_die(myname_,':: call MPI_RECV(size(oGGrid%descend)...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:484:1: if(present(status)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:485:1: write(stderr,*) myname_,':: allocate(oGGrid%descend...' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:486:1: status = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:487:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:488:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:489:1: call die(myname_,':: allocate(oGGrid%descend... failed.',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:490:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:496:1: call MP_perr_die(myname_,':: call MPI_RECV(oGGrid%descend...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:554:1: write(stderr,*) myname_,':: Error. GeneralGrid%index_list undefined.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:555:1: status = -2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:556:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:558:1: call die(myname_,':: Error. GeneralGrid%index_list undefined.',-2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:568:1: write(stderr,*) myname_,':: call AttrVect_recv(oGGrid%data...' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:569:1: status = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:570:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:572:1: call die(myname_,':: call AttrVect_recv(oGGrid%data...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:688:1: stat=ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:689:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:691:1: call die(myname_,'call AttrVect_Gather(ig%data...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:910:1: stat = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:911:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:913:1: call die(myname_,'call bcastGeneralGridHeader_(oG...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:926:1: stat = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:927:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:929:1: call die(myname_,'call AttrVect_scatter(iG%data...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:1028:1: stat = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:1029:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:1031:1: call die(myname_,'bcastGeneralGridHeader_(oG...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:1043:1: stat = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:1044:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:1046:1: call die(myname_,'call AttrVect_scatter(iG%data...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:1137:1: stat = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:1138:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:1140:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:1151:1: stat = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:1152:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:1154:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:1498:1: write(stderr,*) myname_,':: ERROR--allocate(iGGrid%descend(... failed.',& 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:1503:1: oGGrid%descend(i) = iGGrid%descend(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GeneralGridComms.F90:880:25: logical :: DescendAssoc 1 Warning: Unused variable 'descendassoc' declared at (1) [-Wunused-variable] m_GeneralGridComms.F90:881:24: integer :: DescendSize 1 Warning: Unused variable 'descendsize' declared at (1) [-Wunused-variable] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_SpatialIntegralV.F90 m_SpatialIntegralV.F90:26:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:43:1: SpatialIntegralRAttrVSP_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:44:1: SpatialIntegralRAttrVDP_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:47:1: SpatialAverageRAttrVSP_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:48:1: SpatialAverageRAttrVDP_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:51:1: MaskedSpatialIntegralRAttrVSP_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:52:1: MaskedSpatialIntegralRAttrVDP_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:55:1: MaskedSpatialAverageRAttrVSP_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:56:1: MaskedSpatialAverageRAttrVDP_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:59:1: PairedSpatialIntegralRAttrVSP_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:60:1: PairedSpatialIntegralRAttrVDP_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:63:1: PairedSpatialAverageRAttrVSP_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:64:1: PairedSpatialAverageRAttrVDP_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:132:1: GlobalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:134:1: LocalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:173:1: write(stderr,'(3a)') myname_,':: FATAL--If the input argument SumWeights=.TRUE.,', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:175:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:186:1: call AttrVect_GlobalWeightedSumRAttr(inAV, outAV, Weights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:187:2: comm, WeightTag) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:189:1: call AttrVect_GlobalWeightedSumRAttr(inAV, outAV, Weights, comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:195:1: call AttrVect_LocalWeightedSumRAttr(inAV, outAV, Weights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:198:1: call AttrVect_LocalWeightedSumRAttr(inAV, outAV, Weights) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:230:1: GlobalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:232:1: LocalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:271:1: write(stderr,'(3a)') myname_,':: FATAL--If the input argument SumWeights=.TRUE.,', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:273:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:284:1: call AttrVect_GlobalWeightedSumRAttr(inAV, outAV, Weights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:285:2: comm, WeightTag) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:287:1: call AttrVect_GlobalWeightedSumRAttr(inAV, outAV, Weights, comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:293:1: call AttrVect_LocalWeightedSumRAttr(inAV, outAV, Weights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:296:1: call AttrVect_LocalWeightedSumRAttr(inAV, outAV, Weights) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:380:1: .TRUE., 'weights', comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:405:1: / integratedAv%rAttr(iweight,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:470:1: .TRUE., 'weights', comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:495:1: / integratedAv%rAttr(iweight,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:564:1: GlobalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:566:1: LocalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:608:1: ierr = AttrVect_lsize(inAv) - size(iMask) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:609:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:613:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:619:1: ierr = AttrVect_lsize(inAv) - size(rMask) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:620:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:624:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:631:1: write(stderr,'(3a)') myname_,':: FATAL--If the input argument SumWeights=.TRUE.,', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:633:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:655:1: if(present(iMask)) then ! use it and rMask to form Weights(:) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:656:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:657:1: Weights(i) = rMask(i) * SpatialWeights(i) * iMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:658:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:659:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:660:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:661:1: Weights(i) = rMask(i) * SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:662:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:663:1: endif ! if(present(iMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:665:1: if(present(iMask)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:666:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:667:1: Weights(i) = SpatialWeights(i) * iMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:668:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:669:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:670:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:671:1: Weights(i) = SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:672:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:673:1: endif ! if(present(iMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:682:1: if(present(iMask)) then ! use it and rMask to form Weights(:) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:683:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:684:1: select case(iMask(i)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:685:1: case(0) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:686:1: Weights(i) = 0._FP 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:687:1: case(1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:688:1: if(rMask(i) == 1._FP) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:689:1: Weights(i) = SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:690:1: elseif(rMask(i) == 0._FP) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:691:1: Weights(i) = 0._FP 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:692:1: elseif((rMask(i) > 0._FP) .and. (rMask(i) < 1._FP)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:693:1: Weights(i) = rMask(i) * SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:694:1: else ! rMask(i) < 0. or rMask(i) > 1. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:695:1: write(stderr,'(3a,i8,a,f10.7)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:698:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:700:1: case default 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:701:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:704:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:705:1: end select 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:706:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:707:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:708:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:709:1: if(rMask(i) == 1._FP) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:710:1: Weights(i) = SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:711:1: elseif(rMask(i) == 0._FP) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:712:1: Weights(i) = 0._FP 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:713:1: elseif((rMask(i) > 0._FP) .and. (rMask(i) < 1._FP)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:714:1: Weights(i) = rMask(i) * SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:715:1: else ! rMask(i) < 0. or rMask(i) > 1. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:716:1: write(stderr,'(3a,i8,a,e10.6)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:719:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:720:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:721:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:722:1: endif ! if(present(iMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:724:1: if(present(iMask)) then ! check iMask entries... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:725:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:726:1: select case(iMask(i)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:727:1: case(0) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:728:1: Weights(i) = 0._FP 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:729:1: case(1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:730:1: Weights(i) = SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:731:1: case default 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:732:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:735:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:736:1: end select 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:737:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:738:1: else ! straight assignment of SpatialWeights(:) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:739:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:740:1: Weights(i) = SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:741:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:742:1: endif ! if(present(iMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:754:1: call AttrVect_GlobalWeightedSumRAttr(inAV, outAV, Weights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:755:4: comm, WeightSumTag) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:757:1: call AttrVect_GlobalWeightedSumRAttr(inAV, outAV, Weights, comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:763:1: call AttrVect_LocalWeightedSumRAttr(inAV, outAV, Weights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:764:1: WeightSumAttr=WeightSumTag) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:766:1: call AttrVect_LocalWeightedSumRAttr(inAV, outAV, Weights) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:808:1: GlobalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:810:1: LocalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:851:1: ierr = AttrVect_lsize(inAv) - size(iMask) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:852:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:856:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:862:1: ierr = AttrVect_lsize(inAv) - size(rMask) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:863:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:867:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:874:1: write(stderr,'(3a)') myname_,':: FATAL--If the input argument SumWeights=.TRUE.,', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:876:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:898:1: if(present(iMask)) then ! use it and rMask to form Weights(:) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:899:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:900:1: Weights(i) = rMask(i) * SpatialWeights(i) * iMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:901:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:902:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:903:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:904:1: Weights(i) = rMask(i) * SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:905:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:906:1: endif ! if(present(iMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:908:1: if(present(iMask)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:909:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:910:1: Weights(i) = SpatialWeights(i) * iMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:911:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:912:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:913:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:914:1: Weights(i) = SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:915:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:916:1: endif ! if(present(iMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:925:1: if(present(iMask)) then ! use it and rMask to form Weights(:) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:926:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:927:1: select case(iMask(i)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:928:1: case(0) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:929:1: Weights(i) = 0._FP 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:930:1: case(1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:931:1: if(rMask(i) == 1._FP) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:932:1: Weights(i) = SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:933:1: elseif(rMask(i) == 0._FP) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:934:1: Weights(i) = 0._FP 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:935:1: elseif((rMask(i) > 0._FP) .and. (rMask(i) < 1._FP)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:936:1: Weights(i) = rMask(i) * SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:937:1: else ! rMask(i) < 0. or rMask(i) > 1. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:938:1: write(stderr,'(3a,i8,a,f10.7)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:941:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:943:1: case default 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:944:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:947:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:948:1: end select 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:949:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:950:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:951:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:952:1: if(rMask(i) == 1._FP) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:953:1: Weights(i) = SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:954:1: elseif(rMask(i) == 0._FP) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:955:1: Weights(i) = 0._FP 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:956:1: elseif((rMask(i) > 0._FP) .and. (rMask(i) < 1._FP)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:957:1: Weights(i) = rMask(i) * SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:958:1: else ! rMask(i) < 0. or rMask(i) > 1. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:959:1: write(stderr,'(3a,i8,a,e10.6)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:962:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:963:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:964:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:965:1: endif ! if(present(iMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:967:1: if(present(iMask)) then ! check iMask entries... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:968:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:969:1: select case(iMask(i)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:970:1: case(0) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:971:1: Weights(i) = 0._FP 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:972:1: case(1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:973:1: Weights(i) = SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:974:1: case default 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:975:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:978:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:979:1: end select 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:980:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:981:1: else ! straight assignment of SpatialWeights(:) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:982:1: do i=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:983:1: Weights(i) = SpatialWeights(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:984:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:985:1: endif ! if(present(iMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:997:1: call AttrVect_GlobalWeightedSumRAttr(inAV, outAV, Weights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:998:4: comm, WeightSumTag) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1000:1: call AttrVect_GlobalWeightedSumRAttr(inAV, outAV, Weights, comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1006:1: call AttrVect_LocalWeightedSumRAttr(inAV, outAV, Weights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1007:1: WeightSumAttr=WeightSumTag) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1009:1: call AttrVect_LocalWeightedSumRAttr(inAV, outAV, Weights) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1129:1: ierr = AttrVect_lsize(inAv) - size(iMask) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1130:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1134:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1140:1: ierr = AttrVect_lsize(inAv) - size(rMask) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1141:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1145:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1156:1: if(present(rMask)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1157:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1158:1: iMask, rMask, UseFastMethod, .TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1160:1: else ! no rMask 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1161:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1162:1: iMask=iMask, UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1164:1: WeightSumTag='MaskedWeightsSum', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1165:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1166:1: endif ! if(present(rMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1170:1: if(present(rMask)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1171:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1172:1: rMask=rMask, UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1173:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1174:1: WeightSumTag='MaskedWeightsSum', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1175:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1176:1: else ! neither rMask nor iMask present: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1177:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1178:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1179:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1180:1: WeightSumTag='MaskedWeightsSum', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1181:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1182:1: endif ! if(present(rMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1190:1: if(present(rMask)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1191:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1192:1: iMask, rMask, UseFastMethod, .TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1194:1: else ! no rMask 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1195:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1196:1: iMask=iMask, UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1198:1: WeightSumTag='MaskedWeightsSum') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1199:1: endif ! if(present(rMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1203:1: if(present(rMask)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1204:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1205:1: rMask=rMask, UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1206:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1207:1: WeightSumTag='MaskedWeightsSum') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1208:1: else ! neither rMask nor iMask present: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1209:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1210:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1211:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1212:1: WeightSumTag='MaskedWeightsSum') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1213:1: endif ! if(present(rMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1243:1: / integratedAv%rAttr(iweight,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1324:1: ierr = AttrVect_lsize(inAv) - size(iMask) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1325:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1329:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1335:1: ierr = AttrVect_lsize(inAv) - size(rMask) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1336:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1340:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1351:1: if(present(rMask)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1352:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1353:1: iMask, rMask, UseFastMethod, .TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1355:1: else ! no rMask 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1356:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1357:1: iMask=iMask, UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1359:1: WeightSumTag='MaskedWeightsSum', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1360:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1361:1: endif ! if(present(rMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1365:1: if(present(rMask)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1366:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1367:1: rMask=rMask, UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1368:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1369:1: WeightSumTag='MaskedWeightsSum', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1370:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1371:1: else ! neither rMask nor iMask present: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1372:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1373:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1374:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1375:1: WeightSumTag='MaskedWeightsSum', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1376:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1377:1: endif ! if(present(rMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1385:1: if(present(rMask)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1386:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1387:1: iMask, rMask, UseFastMethod, .TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1389:1: else ! no rMask 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1390:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1391:1: iMask=iMask, UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1393:1: WeightSumTag='MaskedWeightsSum') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1394:1: endif ! if(present(rMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1398:1: if(present(rMask)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1399:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1400:1: rMask=rMask, UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1401:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1402:1: WeightSumTag='MaskedWeightsSum') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1403:1: else ! neither rMask nor iMask present: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1404:1: call MaskedSpatialIntegralV(inAv, integratedAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1405:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1406:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1407:1: WeightSumTag='MaskedWeightsSum') 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1408:1: endif ! if(present(rMask))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1438:1: / integratedAv%rAttr(iweight,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1507:1: LocalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1650:1: LocalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1818:1: LocalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1850:40: character*8, parameter :: WeightName1='WeightSum1' 1 Warning: CHARACTER expression at (1) is being truncated (10/8) [-Wcharacter-truncation] m_SpatialIntegralV.F90:1851:40: character*8, parameter :: WeightName2='WeightSum2' 1 Warning: CHARACTER expression at (1) is being truncated (10/8) [-Wcharacter-truncation] m_SpatialIntegralV.F90:1888:1: / integratedAv1%rAttr(iweight1,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1893:1: / integratedAv2%rAttr(iweight2,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1932:1: LocalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1964:40: character*8, parameter :: WeightName1='WeightSum1' 1 Warning: CHARACTER expression at (1) is being truncated (10/8) [-Wcharacter-truncation] m_SpatialIntegralV.F90:1965:40: character*8, parameter :: WeightName2='WeightSum2' 1 Warning: CHARACTER expression at (1) is being truncated (10/8) [-Wcharacter-truncation] m_SpatialIntegralV.F90:2002:1: / integratedAv1%rAttr(iweight1,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:2007:1: / integratedAv2%rAttr(iweight2,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegralV.F90:1961:20: integer :: i, ierr, iweight1, iweight2 1 Warning: Unused variable 'ierr' declared at (1) [-Wunused-variable] m_SpatialIntegralV.F90:1847:20: integer :: i, ierr, iweight1, iweight2 1 Warning: Unused variable 'ierr' declared at (1) [-Wunused-variable] m_SpatialIntegralV.F90:1679:26: integer :: ierr, length1, length2, PairedBufferLength 1 Warning: Unused variable 'length1' declared at (1) [-Wunused-variable] m_SpatialIntegralV.F90:1679:35: integer :: ierr, length1, length2, PairedBufferLength 1 Warning: Unused variable 'length2' declared at (1) [-Wunused-variable] m_SpatialIntegralV.F90:1536:26: integer :: ierr, length1, length2, PairedBufferLength 1 Warning: Unused variable 'length1' declared at (1) [-Wunused-variable] m_SpatialIntegralV.F90:1536:35: integer :: ierr, length1, length2, PairedBufferLength 1 Warning: Unused variable 'length2' declared at (1) [-Wunused-variable] m_SpatialIntegralV.F90:1308:28: integer :: i, ierr, length, iweight 1 Warning: Unused variable 'length' declared at (1) [-Wunused-variable] m_SpatialIntegralV.F90:1309:25: logical :: mySumWeights 1 Warning: Unused variable 'mysumweights' declared at (1) [-Wunused-variable] m_SpatialIntegralV.F90:1113:28: integer :: i, ierr, length, iweight 1 Warning: Unused variable 'length' declared at (1) [-Wunused-variable] m_SpatialIntegralV.F90:1114:25: logical :: mySumWeights 1 Warning: Unused variable 'mysumweights' declared at (1) [-Wunused-variable] m_SpatialIntegralV.F90:464:20: integer :: i, ierr, iweight 1 Warning: Unused variable 'ierr' declared at (1) [-Wunused-variable] m_SpatialIntegralV.F90:374:20: integer :: i, ierr, iweight 1 Warning: Unused variable 'ierr' declared at (1) [-Wunused-variable] m_SpatialIntegralV.F90:254:25: integer :: ierr, length 1 Warning: Unused variable 'length' declared at (1) [-Wunused-variable] m_SpatialIntegralV.F90:156:25: integer :: ierr, length 1 Warning: Unused variable 'length' declared at (1) [-Wunused-variable] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_SpatialIntegral.F90 m_SpatialIntegral.F90:67:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:90:1: SpatialIntegralRAttrGG_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:93:1: SpatialAverageRAttrGG_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:96:1: MaskedSpatialIntegralRAttrGG_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:99:1: MaskedSpatialAverageRAttrGG_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:102:1: PairedSpatialIntegralRAttrGG_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:105:1: PairedSpatialAverageRAttrGG_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:108:1: PairedMaskedIntegralRAttrGG_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:111:1: PairedMaskedAverageRAttrGG_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:251:1: WeightTag, comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:354:1: .TRUE., comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:357:1: .TRUE.) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:380:1: / integratedAv%rAttr(iweight,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:472:1: GlobalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:474:1: LocalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:531:1: write(stderr,'(3a)') myname_,':: FATAL--If the input argument SumWeights=.TRUE.,', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:533:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:542:1: write(stderr,'(3a)') myname_,':: ERROR--an INTEGER mask list with', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:551:1: write(stderr,'(3a)') myname_,':: ERROR--an REAL mask list with', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:587:1: write(stderr,'(3a,i8)') myname_,':: allocate(iMask(...) failed,', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:589:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:597:1: call List_get(DummStr, i, iMaskList) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:598:1: call GeneralGrid_exportIAttr(GGrid, String_toChar(DummStr), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:599:1: iMaskTemp, TempMaskLength) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:600:1: call String_clean(DummStr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:601:1: if(TempMaskLength /= length) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:602:1: write(stderr,'(3a,i8,a,i8)') myname_,& 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:606:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:607:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:609:1: if(i == 1) then ! first pass--examine iMaskTemp(:) only 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:611:1: if(UseFastMethod) then ! straight copy of iMaskTemp(:) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:612:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:613:1: iMask(j) = iMaskTemp(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:614:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:615:1: else ! go through the entries of iMaskTemp(:) one-by-one 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:616:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:617:1: select case(iMaskTemp(j)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:618:1: case(0) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:619:1: iMask(j) = 0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:620:1: case(1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:621:1: iMask(j) = 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:622:1: case default 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:623:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:626:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:627:1: end select ! select case(iMaskTemp(j))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:628:1: end do ! do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:629:1: endif ! if(UseFastMethod)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:631:1: else ! That is, i /= 1 ... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:633:1: if(UseFastMethod) then ! straight product of iMask(:) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:635:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:636:1: iMask(j) = iMask(j) * iMaskTemp(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:637:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:638:1: else ! go through the entries of iMaskTemp(:) one-by-one 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:639:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:640:1: select case(iMaskTemp(j)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:641:1: case(0) ! zero out iMask(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:642:1: iMask(j) = 0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:643:1: case(1) ! do nothing 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:644:1: case default 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:645:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:648:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:649:1: end select ! select case(iMaskTemp(j))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:650:1: end do ! do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:651:1: endif ! if(UseFastMethod)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:653:1: endif ! if(i == 1)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:669:1: write(stderr,'(3a,i8)') myname_,':: allocate(rMask(...) failed,', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:671:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:679:1: call List_get(DummStr, i, rMaskList) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:680:1: call GeneralGrid_exportRAttr(GGrid, String_toChar(DummStr), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:681:1: rMaskTemp, TempMaskLength) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:682:1: call String_clean(DummStr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:683:1: if(TempMaskLength /= length) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:684:1: write(stderr,'(3a,i8,a,i8)') myname_,& 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:688:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:689:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:691:1: if(i == 1) then ! first pass--examine rMaskTemp(:) only 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:693:1: if(UseFastMethod) then ! straight copy of rMaskTemp(:) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:694:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:695:1: rMask(j) = rMaskTemp(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:696:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:697:1: else ! go through the entries of rMaskTemp(:) one-by-one 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:699:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:700:1: if((rMaskTemp(j) >= 0.) .or. (rMaskTemp(j) <=1.)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:701:1: rMask(j) = rMaskTemp(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:702:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:703:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:706:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:707:1: endif ! if((rMaskTemp(j) >= 0.) .or. (rMaskTemp(j) <=1.))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:708:1: end do ! do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:709:1: endif ! if(UseFastMethod)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:711:1: else ! That is, i /= 1 ... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:713:1: if(UseFastMethod) then ! straight product of rMask(:) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:715:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:716:1: rMask(j) = rMask(j) * rMaskTemp(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:717:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:718:1: else ! go through the entries of rMaskTemp(:) one-by-one 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:720:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:721:1: if((rMaskTemp(j) >= 0.) .or. (rMaskTemp(j) <=1.)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:722:1: rMask(j) = rMask(j) * rMaskTemp(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:723:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:724:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:727:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:728:1: endif ! if((rMaskTemp(j) >= 0.) .or. (rMaskTemp(j) <=1.))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:729:1: end do ! do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:730:1: endif ! if(UseFastMethod)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:732:1: endif ! if(i == 1)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:747:1: if(present(comm)) then ! compute distributed AllReduce-style sum: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:749:1: if(mySumWeights) then ! return the global masked sum of the 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:751:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:752:1: iMask, rMask, UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:753:1: SumWeights, WeightSumTag, comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:754:1: else ! Do not return the masked sum of the weights 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:755:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:756:1: iMask, rMask, UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:757:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:758:1: endif ! if(mySumWeights)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:760:1: else ! compute local sum: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:762:1: if(mySumWeights) then ! return the global masked sum of the 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:764:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:765:1: iMask, rMask, UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:766:1: SumWeights, WeightSumTag) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:767:1: else ! Do not return the masked sum of the weights 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:768:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:769:1: iMask, rMask, UseFastMethod) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:770:1: endif ! if(mySumWeights)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:772:1: endif ! if(present(comm))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:776:1: if(present(comm)) then ! compute distributed AllReduce-style sum: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:778:1: if(mySumWeights) then ! return the global masked sum of the 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:780:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:781:1: rMask=rMask, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:782:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:783:1: SumWeights=SumWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:784:1: WeightSumTag=WeightSumTag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:785:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:786:1: else ! Do not return the masked sum of the weights 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:787:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:788:1: rMask=rMask, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:789:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:790:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:791:1: endif ! if(mySumWeights)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:793:1: else ! compute local sum: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:795:1: if(mySumWeights) then ! return the global masked sum of the 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:797:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:798:1: rMask=rMask, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:799:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:800:1: SumWeights=SumWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:801:1: WeightSumTag=WeightSumTag) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:802:1: else ! Do not return the masked sum of the weights 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:803:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:804:1: rMask=rMask, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:805:1: UseFastMethod=UseFastMethod) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:806:1: endif ! if(mySumWeights)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:808:1: endif ! if(present(comm))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:815:1: if(present(comm)) then ! compute distributed AllReduce-style sum: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:817:1: if(mySumWeights) then ! return the global masked sum of the 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:819:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:820:1: iMask=iMask, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:821:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:822:1: SumWeights=SumWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:823:1: WeightSumTag=WeightSumTag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:824:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:825:1: else ! Do not return the masked sum of the weights 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:826:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:827:1: iMask=iMask, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:828:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:829:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:830:1: endif ! if(mySumWeights)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:832:1: else ! compute local sum: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:834:1: if(mySumWeights) then ! return the global masked sum of the 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:836:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:837:1: iMask=iMask, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:838:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:839:1: SumWeights=SumWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:840:1: WeightSumTag=WeightSumTag) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:841:1: else ! Do not return the masked sum of the weights 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:842:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:843:1: iMask=iMask, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:844:1: UseFastMethod=UseFastMethod) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:845:1: endif ! if(mySumWeights)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:847:1: endif ! if(present(comm))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:851:1: if(present(comm)) then ! compute distributed AllReduce-style sum: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:853:1: if(mySumWeights) then ! return the global masked sum of the 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:855:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:856:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:857:1: SumWeights=SumWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:858:1: WeightSumTag=WeightSumTag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:859:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:860:1: else ! Do not return the masked sum of the weights 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:861:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:862:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:863:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:864:1: endif ! if(mySumWeights)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:866:1: else ! compute local sum: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:868:1: if(mySumWeights) then ! return the global masked sum of the 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:870:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:871:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:872:1: SumWeights=SumWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:873:1: WeightSumTag=WeightSumTag) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:874:1: else ! Do not return the masked sum of the weights 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:875:1: call MaskedSpatialIntegralV(inAv, outAv, SpatialWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:876:1: UseFastMethod=UseFastMethod) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:877:1: endif ! if(mySumWeights)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:879:1: endif ! if(present(comm))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:894:1: write(stderr,'(3a,i8)') myname_,':: deallocate(iMask(...) failed,', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:896:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:904:1: write(stderr,'(3a,i8)') myname_,':: deallocate(rMask(...) failed,', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:906:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:964:3: comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1028:1: if(present(comm)) then ! a distributed parallel sum 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1029:1: call MaskedSpatialIntegralRAttrGG_(inAv, integratedAv, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1030:1: SpatialWeightTag, iMaskTags, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1031:1: rMaskTags, UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1032:1: .TRUE., WeightSumTag, comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1033:1: else ! a purely local sum 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1034:1: call MaskedSpatialIntegralRAttrGG_(inAv, integratedAv, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1035:1: SpatialWeightTag, iMaskTags, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1036:1: rMaskTags, UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1037:1: .TRUE., WeightSumTag) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1038:1: endif ! if(present(comm))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1042:1: if(present(comm)) then ! a distributed parallel sum 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1043:1: call MaskedSpatialIntegralRAttrGG_(inAv, integratedAv, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1044:1: SpatialWeightTag, iMaskTags, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1045:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1046:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1047:1: WeightSumTag=WeightSumTag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1048:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1050:1: else ! a purely local sum 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1051:1: call MaskedSpatialIntegralRAttrGG_(inAv, integratedAv, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1052:1: SpatialWeightTag, iMaskTags, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1053:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1054:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1055:1: WeightSumTag=WeightSumTag) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1056:1: endif ! if(present(comm))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1064:1: if(present(comm)) then ! a distributed parallel sum 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1065:1: call MaskedSpatialIntegralRAttrGG_(inAv, integratedAv, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1066:1: SpatialWeightTag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1067:1: rMaskTags=rMaskTags, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1068:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1069:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1070:1: WeightSumTag=WeightSumTag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1071:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1072:1: else ! a purely local sum 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1073:1: call MaskedSpatialIntegralRAttrGG_(inAv, integratedAv, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1074:1: SpatialWeightTag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1075:1: rMaskTags=rMaskTags, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1076:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1077:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1078:1: WeightSumTag=WeightSumTag) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1079:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1083:1: if(present(comm)) then ! a distributed parallel sum 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1084:1: call MaskedSpatialIntegralRAttrGG_(inAv, integratedAv, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1085:1: SpatialWeightTag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1086:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1087:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1088:1: WeightSumTag=WeightSumTag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1089:1: comm=comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1090:1: else ! a purely local sum 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1091:1: call MaskedSpatialIntegralRAttrGG_(inAv, integratedAv, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1092:1: SpatialWeightTag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1093:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1094:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1095:1: WeightSumTag=WeightSumTag) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1096:1: endif ! if(present(comm))... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1127:1: / integratedAv%rAttr(iweight,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1186:1: SumWeights, comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1205:1: LocalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1284:1: inAv2, outAv2, gridweights2, WeightTag2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1359:1: LocalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1397:1: inAv2, integratedAv2, GGrid2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1398:1: WeightTag2, .TRUE., comm) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1431:1: / integratedAv1%rAttr(iweight1,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1436:1: / integratedAv2%rAttr(iweight2,1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1529:1: LocalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1606:1: call MaskedSpatialIntegralRAttrGG_(inAv1, outAv1, GGrid1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1607:1: SpatialWeightTag1, iMaskTags1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1608:1: rMaskTags1, UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1609:1: mySumWeights, SpatialWeightTag1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1611:1: call MaskedSpatialIntegralRAttrGG_(inAv1, outAv1, GGrid1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1612:1: SpatialWeightTag1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1613:1: iMaskTags=iMaskTags1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1614:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1615:1: SumWeights=mySumWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1616:1: WeightSumTag=SpatialWeightTag1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1622:1: call MaskedSpatialIntegralRAttrGG_(inAv1, outAv1, GGrid1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1623:1: SpatialWeightTag=SpatialWeightTag1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1624:1: rMaskTags=rMaskTags1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1625:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1626:1: SumWeights=mySumWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1627:1: WeightSumTag=SpatialWeightTag1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1629:1: call MaskedSpatialIntegralRAttrGG_(inAv1, outAv1, GGrid1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1630:1: SpatialWeightTag=SpatialWeightTag1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1631:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1632:1: SumWeights=mySumWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1633:1: WeightSumTag=SpatialWeightTag1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1644:1: call MaskedSpatialIntegralRAttrGG_(inAv2, outAv2, GGrid2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1645:1: SpatialWeightTag2, iMaskTags2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1646:1: rMaskTags2, UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1647:1: mySumWeights, SpatialWeightTag2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1649:1: call MaskedSpatialIntegralRAttrGG_(inAv2, outAv2, GGrid2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1650:1: SpatialWeightTag2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1651:1: iMaskTags=iMaskTags2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1652:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1653:1: SumWeights=mySumWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1654:1: WeightSumTag=SpatialWeightTag2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1660:1: call MaskedSpatialIntegralRAttrGG_(inAv2, outAv2, GGrid2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1661:1: SpatialWeightTag=SpatialWeightTag2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1662:1: rMaskTags=rMaskTags2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1663:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1664:1: SumWeights=mySumWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1665:1: WeightSumTag=SpatialWeightTag2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1667:1: call MaskedSpatialIntegralRAttrGG_(inAv2, outAv2, GGrid2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1668:1: SpatialWeightTag=SpatialWeightTag2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1669:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1670:1: SumWeights=mySumWeights, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1671:1: WeightSumTag=SpatialWeightTag2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1793:1: LocalWeightedSumRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1867:1: call MaskedSpatialIntegralRAttrGG_(inAv1, LocalIntegral1, GGrid1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1868:1: SpatialWeightTag1, iMaskTags1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1869:1: rMaskTags1, UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1870:1: .TRUE., SpatialWeightTag1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1872:1: call MaskedSpatialIntegralRAttrGG_(inAv1, LocalIntegral1, GGrid1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1873:1: SpatialWeightTag1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1874:1: iMaskTags=iMaskTags1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1875:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1876:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1877:1: WeightSumTag=SpatialWeightTag1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1883:1: call MaskedSpatialIntegralRAttrGG_(inAv1, LocalIntegral1, GGrid1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1884:1: SpatialWeightTag=SpatialWeightTag1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1885:1: rMaskTags=rMaskTags1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1886:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1887:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1888:1: WeightSumTag=SpatialWeightTag1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1890:1: call MaskedSpatialIntegralRAttrGG_(inAv1, LocalIntegral1, GGrid1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1891:1: SpatialWeightTag=SpatialWeightTag1, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1892:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1893:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1894:1: WeightSumTag=SpatialWeightTag1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1905:1: call MaskedSpatialIntegralRAttrGG_(inAv2, LocalIntegral2, GGrid2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1906:1: SpatialWeightTag2, iMaskTags2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1907:1: rMaskTags2, UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1908:1: .TRUE., SpatialWeightTag2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1910:1: call MaskedSpatialIntegralRAttrGG_(inAv2, LocalIntegral2, GGrid2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1911:1: SpatialWeightTag2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1912:1: iMaskTags=iMaskTags2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1913:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1914:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1915:1: WeightSumTag=SpatialWeightTag2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1921:1: call MaskedSpatialIntegralRAttrGG_(inAv2, LocalIntegral2, GGrid2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1922:1: SpatialWeightTag=SpatialWeightTag2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1923:1: rMaskTags=rMaskTags2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1924:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1925:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1926:1: WeightSumTag=SpatialWeightTag2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1928:1: call MaskedSpatialIntegralRAttrGG_(inAv2, LocalIntegral2, GGrid2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1929:1: SpatialWeightTag=SpatialWeightTag2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1930:1: UseFastMethod=UseFastMethod, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1931:1: SumWeights=.TRUE., & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1932:1: WeightSumTag=SpatialWeightTag2) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SpatialIntegral.F90:1392:20: integer :: i, ierr, iweight1, iweight2 1 Warning: Unused variable 'ierr' declared at (1) [-Wunused-variable] m_SpatialIntegral.F90:348:20: integer :: i, ierr, iweight 1 Warning: Unused variable 'ierr' declared at (1) [-Wunused-variable] m_SpatialIntegral.F90:1996:0: outAv1%rAttr(i,1) = WeightSumInv * OutPairedBuffer(i) Warning: 'weightsuminv' may be used uninitialized in this function [-Wmaybe-uninitialized] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_GlobalToLocal.F90 m_GlobalToLocal.F90:159:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalToLocal.F90:160:1: start(count) = GSMap%start(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalToLocal.F90:161:1: length(count) = GSMap%length(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalToLocal.F90:176:1: start(n) = 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalToLocal.F90:178:1: start(n) = start(n-1) + length(n-1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalToLocal.F90:274:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalToLocal.F90:282:1: local_index = local_start + (i_g - GSMap%start(n)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalToLocal.F90:283:1: found = .true. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalToLocal.F90:284:1: EXIT 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalToLocal.F90:285:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalToLocal.F90:286:1: local_start = local_start + GSMap%length(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalToLocal.F90:717:16: end subroutine GlobalSegMapToLocalMatrix_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_GlobalToLocal.F90:669:27: integer :: i, GlobalIndex, gindex, lindex, lsize 1 Warning: Unused variable 'globalindex' declared at (1) [-Wunused-variable] m_GlobalToLocal.F90:581:47: integer :: myID, ierr, ngseg, nlseg, n, count 1 Warning: Unused variable 'count' declared at (1) [-Wunused-variable] m_GlobalToLocal.F90:581:40: integer :: myID, ierr, ngseg, nlseg, n, count 1 Warning: Unused variable 'n' declared at (1) [-Wunused-variable] m_GlobalToLocal.F90:500:18: integer :: count, ierr, ngseg, nlseg, n 1 Warning: Unused variable 'count' declared at (1) [-Wunused-variable] m_GlobalToLocal.F90:502:24: integer :: local_start, local_index 1 Warning: Unused variable 'local_start' declared at (1) [-Wunused-variable] m_GlobalToLocal.F90:500:41: integer :: count, ierr, ngseg, nlseg, n 1 Warning: Unused variable 'n' declared at (1) [-Wunused-variable] m_GlobalToLocal.F90:500:31: integer :: count, ierr, ngseg, nlseg, n 1 Warning: Unused variable 'ngseg' declared at (1) [-Wunused-variable] m_GlobalToLocal.F90:500:38: integer :: count, ierr, ngseg, nlseg, n 1 Warning: Unused variable 'nlseg' declared at (1) [-Wunused-variable] m_GlobalToLocal.F90:349:18: integer :: count, ierr, ngseg, nlseg 1 Warning: Unused variable 'count' declared at (1) [-Wunused-variable] m_GlobalToLocal.F90:709:0: sMat%data%iAttr(lindex,i) = temp_lindex(i) Warning: 'lindex' may be used uninitialized in this function [-Wmaybe-uninitialized] m_GlobalToLocal.F90:703:0: temp_gindex(i) = sMat%data%iAttr(gindex,i) Warning: 'gindex' may be used uninitialized in this function [-Wmaybe-uninitialized] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_ConvertMaps.F90 m_ConvertMaps.F90:124:1: NumProcs,"size(GMap%displs) = ",size(GMap%displs)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:282:1: NumPEs,' NGSegs = ', NGSegs,'. See MCT API Document for more', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:285:1: status = 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:286:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:288:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:299:1: status = 2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:300:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:302:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:324:1: write(stderr,'(3a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:327:1: n,'. Number of segments = ',NumSegs(n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:328:1: deallocate(NumSegs, stat=ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:329:1: if(ierr /= 0) then ! problem cleaning up 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:330:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:333:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:334:1: if(present(status)) then ! return with error code 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:335:1: status = 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:336:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:337:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:338:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:339:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:382:1: CYCLE 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:384:1: convertible = .FALSE. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:385:1: EXIT 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:409:1: GMap%counts(GSMpe_locs(i)) = GSMlengths(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:413:1: GMap%displs(0) = 0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:415:1: GMap%displs(i) = GMap%displs(i-1) + GMap%counts(i-1) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ConvertMaps.F90:257:18: integer :: nlseg, NumActive, NumProcs, NumPEs, NGSegs 1 Warning: Unused variable 'nlseg' declared at (1) [-Wunused-variable] m_ConvertMaps.F90:257:29: integer :: nlseg, NumActive, NumProcs, NumPEs, NGSegs 1 Warning: Unused variable 'numactive' declared at (1) [-Wunused-variable] m_ConvertMaps.F90:257:39: integer :: nlseg, NumActive, NumProcs, NumPEs, NGSegs 1 Warning: Unused variable 'numprocs' declared at (1) [-Wunused-variable] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_ExchangeMaps.F90 m_ExchangeMaps.F90:192:1: RemoteRootID, SendTag, ThisMCTWorld%MCT_comm, ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:198:1: RemoteRootID, RecvTag, ThisMCTWorld%MCT_comm, status, ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:400:1: ierr = 2 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:401:1: write(stderr,*) myname_,":: MCTERROR, Map Type mismatch ", & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:403:1: RemoteMapPars(MapTypeIndex) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:404:1: call die(myname_,'Map Type mismatch',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:408:1: ierr = 3 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:409:1: write(stderr,*) myname_,":: MCTERROR, Grid Size mismatch ", & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:411:1: RemoteMapPars(GsizeIndex) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:412:1: call die(myname_,'Map Grid Size mismatch',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:416:1: ierr = 4 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:417:1: write(stderr,*) myname_,":: MCTERROR, Component ID mismatch ", & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:419:1: RemoteMapPars(ComponentIDIndex) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:420:1: call die(myname_,'Component ID mismatch',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:438:1: LocalGSMap%start(1:local_ngseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:440:1: LocalGSMap%length(1:local_ngseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:442:1: LocalGSMap%pe_loc(1:local_ngseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:447:1: ThisMCTWorld) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:455:1: remote_root, SendTag, ThisMCTWorld%MCT_comm, req, ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:461:1: remote_root, RecvTag, ThisMCTWorld%MCT_comm, status, ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:470:1: length(RemoteMapPars(NumSegIndex)), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:471:1: pe_loc(RemoteMapPars(NumSegIndex)), stat=ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:470:1: length(RemoteMapPars(NumSegIndex)), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:471:1: pe_loc(RemoteMapPars(NumSegIndex)), stat=ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:504:1: RemoteCompID, RemoteMapPars(GsizeIndex)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:520:1: call die(myname_,'deallocate(SendBuf...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_ExchangeMaps.F90:377:24: integer :: myID, ngseg, remote_root,req 1 Warning: Unused variable 'ngseg' declared at (1) [-Wunused-variable] m_ExchangeMaps.F90:219:0: subroutine LoadGlobalMapPars_(GMap, MapPars) Warning: 'loadglobalmappars_' defined but not used [-Wunused-function] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_Router.F90 m_Router.F90:43:23: public :: Router ! The class data structure 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:63:24: integer :: nprocs ! number of procs to talk to 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:89:16: initp_ ! initialize a Router locally with two GSMaps 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:141:26: integer, intent(in) :: othercomp 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:142:26: integer, intent(in) :: mycomm 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:167:13: integer :: ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:235:37: type(GlobalSegMap), intent(in) :: inGSMap 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:236:37: type(GlobalSegMap), intent(in) :: inRGSMap 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:237:14: integer , intent(in) :: mycomm 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:241:37: type(Router), intent(out) :: Rout 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:261:10: integer :: ier,i,j,k,m,n 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:262:10: integer :: mysize,myPid,othercomp 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:263:10: integer :: lmaxsize,totallength 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:291:21: type(GlobalSegMap) :: GSMap 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:292:21: type(GlobalSegMap) :: RGSMap 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:470:2: tmppe_list(ThisMCTWorld%nprocspid(othercomp)),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:587:1: Rout%rreqs(count),Rout%ireqs(count),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:613:1: if(tmpsegcount(i,j) /= 0) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:614:1: Rout%num_segs(i)=j 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:615:2: Rout%seg_starts(i,j)=tmpsegstart(i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:616:1: Rout%seg_lengths(i,j)=tmpsegcount(i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:617:1: totallength=totallength+Rout%seg_lengths(i,j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:618:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Router.F90:261:29: integer :: ier,i,j,k,m,n 1 Warning: Unused variable 'k' declared at (1) [-Wunused-variable] m_Router.F90:299:32: integer,save :: t_initialized=0 ! rml timers 1 Warning: Unused variable 't_initialized' declared at (1) [-Wunused-variable] m_Router.F90:302:25: integer,save :: t_load ! rml timers 1 Warning: Unused variable 't_load' declared at (1) [-Wunused-variable] m_Router.F90:300:25: integer,save :: t_loop ! rml timers 1 Warning: Unused variable 't_loop' declared at (1) [-Wunused-variable] m_Router.F90:301:26: integer,save :: t_loop2 ! rml timers 1 Warning: Unused variable 't_loop2' declared at (1) [-Wunused-variable] m_Router.F90:266:0: integer, dimension(:,:), pointer :: tmpsegcount,tmpsegstart Warning: 'tmpsegcount.dim[1].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Router.F90:266:0: Warning: 'tmpsegcount.dim[1].stride' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Router.F90:266:0: Warning: 'tmpsegcount.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Router.F90:266:0: Warning: 'tmpsegcount.offset' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Router.F90:266:0: Warning: 'tmpsegcount.data' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Router.F90:283:0: integer,allocatable :: rgs_count(:),rgs_lb(:,:),rgs_ub(:,:) Warning: 'rgs_count.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Router.F90:283:0: Warning: 'rgs_ub.dim[1].stride' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Router.F90:283:0: Warning: 'rgs_ub.offset' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Router.F90:283:0: Warning: 'rgs_lb.dim[1].stride' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Router.F90:283:0: Warning: 'rgs_lb.offset' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Router.F90:266:0: integer, dimension(:,:), pointer :: tmpsegcount,tmpsegstart Warning: 'tmpsegstart.dim[1].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Router.F90:266:0: Warning: 'tmpsegstart.dim[1].stride' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Router.F90:266:0: Warning: 'tmpsegstart.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Router.F90:266:0: Warning: 'tmpsegstart.offset' may be used uninitialized in this function [-Wmaybe-uninitialized] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_Rearranger.F90 m_Rearranger.F90:38:14: private ! except 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:171:1: SendingToMyself = .true. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:177:1: ReceivingFromMyself = .true. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:183:1: call die(myname_,"SendRouter is not compatible with RecvRouter") 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:217:1: temp_pe_list(temp_nprocs), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:234:1: allocate(OutRearranger%LocalPack(2, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:236:1: if(ier/=0) call die(myname_,'allocate(OutRearranger%LocalPack)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:237:1: OutRearranger%LocalPack = 0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:239:1: m=0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:240:1: do nseg = 1,OutRearranger%SendRouter%num_segs(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:241:1: src_seg_start = OutRearranger%SendRouter%seg_starts(i,nseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:242:1: src_seg_length = OutRearranger%SendRouter%seg_lengths(i,nseg)-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:243:1: do len=0,src_seg_length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:244:1: m=m+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:245:1: OutRearranger%LocalPack(2,m) = src_seg_start+len 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:246:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:247:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:252:1: procindex = procindex+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:253:1: temp_seg_starts(procindex,1:maxsegcount) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:255:1: temp_seg_lengths(procindex,1:maxsegcount) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:257:1: temp_pe_list(procindex) = OutRearranger%SendRouter%pe_list(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:258:1: temp_numsegs(procindex) = OutRearranger%SendRouter%num_segs(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:259:1: temp_locsize(procindex) = OutRearranger%SendRouter%locsize(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:260:1: temp_maxsize = max(temp_locsize(procindex),temp_maxsize) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:271:1: OutRearranger%SendRouter%pe_list, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:280:1: OutRearranger%SendRouter%pe_list(temp_nprocs), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:281:1: OutRearranger%SendRouter%num_segs(temp_nprocs), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:280:1: OutRearranger%SendRouter%pe_list(temp_nprocs), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:281:1: OutRearranger%SendRouter%num_segs(temp_nprocs), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:318:1: temp_pe_list(temp_nprocs),temp_numsegs(temp_nprocs), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:333:1: if( (SIZE(OutRearranger%LocalPack,2) /= & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:335:1: call die(myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:338:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:340:1: OutRearranger%LocalSize = OutRearranger%RecvRouter%locsize(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:342:1: m=0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:343:1: do nseg = 1,OutRearranger%RecvRouter%num_segs(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:344:1: trg_seg_start = OutRearranger%RecvRouter%seg_starts(i,nseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:345:1: trg_seg_length = OutRearranger%RecvRouter%seg_lengths(i,nseg)-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:346:1: do len=0,trg_seg_length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:347:1: m=m+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:348:1: OutRearranger%LocalPack(1,m) = trg_seg_start+len 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:349:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:350:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:355:1: procindex = procindex+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:356:1: temp_seg_starts(procindex,1:maxsegcount) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:357:1: OutRearranger%RecvRouter%seg_starts(i,1:maxsegcount) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:358:1: temp_seg_lengths(procindex,1:maxsegcount) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:360:1: temp_pe_list(procindex) = OutRearranger%RecvRouter%pe_list(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:361:1: temp_numsegs(procindex) = OutRearranger%RecvRouter%num_segs(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:362:1: temp_locsize(procindex) = OutRearranger%RecvRouter%locsize(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:363:1: temp_maxsize = max(temp_locsize(procindex),temp_maxsize) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:374:1: OutRearranger%RecvRouter%pe_list, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:383:1: OutRearranger%RecvRouter%pe_list(temp_nprocs), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:384:1: OutRearranger%RecvRouter%num_segs(temp_nprocs), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:383:1: OutRearranger%RecvRouter%pe_list(temp_nprocs), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:384:1: OutRearranger%RecvRouter%num_segs(temp_nprocs), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:463:1: status = ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:464:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:474:1: status = ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:475:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:487:1: if(present(status)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:488:1: status=ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:489:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:490:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:492:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:587:13: integer :: numi,numr,i,j,k,ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:746:1: do proc=1,SendRout%nprocs 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:749:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:751:1: allocate(ISendBuf(ISendSize),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:752:1: if(ier/=0) call die(myname_,'allocate(ISendBuf)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:761:1: do proc=1,SendRout%nprocs 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:764:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:766:1: allocate(RSendBuf(RSendSize),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:767:1: if(ier/=0) call die(myname_,'allocate(RSendBuf)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:782:1: do proc=1,RecvRout%nprocs 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:785:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:787:1: allocate(IRecvBuf(IRecvSize),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:788:1: if(ier/=0) call die(myname_,'allocate(IRecvBuf)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:797:1: do proc=1,RecvRout%nprocs 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:800:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:802:1: allocate(RRecvBuf(RRecvSize),stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:803:1: if(ier/=0) call die(myname_,'allocate(RRecvBuf)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:900:1: if( (RecvRout%num_segs(proc) > 1) .or. DoSum ) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:902:1: call MPI_IRECV(IRecvBuf(IRecvLoc(proc)), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:903:1: RecvRout%locsize(proc)*numi,MP_INTEGER, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:904:1: RecvRout%pe_list(proc),mytag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:905:1: ThisMCTWorld%MCT_comm,recv_ireqs(proc),ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:907:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:909:1: call MPI_IRECV(TargetAV%iAttr(1,RecvRout%seg_starts(proc,1)), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:910:1: RecvRout%locsize(proc)*numi,MP_INTEGER, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:914:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:916:1: if(ier /= 0) call MP_perr_die(myname_,'MPI_IRECV(ints)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:927:1: if( (RecvRout%num_segs(proc) > 1) .or. DoSum ) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:929:1: call MPI_IRECV(RRecvBuf(RRecvLoc(proc)), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:930:1: RecvRout%locsize(proc)*numr,mp_Type_rp, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:931:1: RecvRout%pe_list(proc),mytag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:932:1: ThisMCTWorld%MCT_comm,recv_rreqs(proc),ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:934:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:936:1: call MPI_IRECV(TargetAV%rAttr(1,RecvRout%seg_starts(proc,1)), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:937:1: RecvRout%locsize(proc)*numr,mp_Type_rp, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:938:1: RecvRout%pe_list(proc),mytag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:939:1: ThisMCTWorld%MCT_comm,recv_rreqs(proc),ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:941:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:943:1: if(ier /= 0) call MP_perr_die(myname_,'MPI_IRECV(reals)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:960:1: j=0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:961:1: k=0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:964:1: do nseg = 1,SendRout%num_segs(proc) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:965:1: seg_start = SendRout%seg_starts(proc,nseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:966:1: seg_end = seg_start + SendRout%seg_lengths(proc,nseg)-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:967:1: do VectIndex = seg_start,seg_end 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:968:1: do AttrIndex = 1,numi 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:969:1: ISendBuf(ISendLoc(proc)+j) = SourceAV%iAttr(AttrIndex,VectIndex) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:970:1: j=j+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:971:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:972:1: do AttrIndex = 1,numr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:973:1: RSendBuf(RSendLoc(proc)+k) = SourceAV%rAttr(AttrIndex,VectIndex) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:974:1: k=k+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:975:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:976:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:977:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:988:1: if( SendRout%num_segs(proc) > 1 ) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:990:1: call MPI_ISEND(ISendBuf(ISendLoc(proc)), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:991:1: SendRout%locsize(proc)*numi,MP_INTEGER, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:992:1: SendRout%pe_list(proc),mytag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:993:1: ThisMCTWorld%MCT_comm,send_ireqs(proc),ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:995:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:997:1: call MPI_ISEND(SourceAV%iAttr(1,SendRout%seg_starts(proc,1)), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:998:1: SendRout%locsize(proc)*numi,MP_INTEGER, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1002:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1004:1: if(ier /= 0) call MP_perr_die(myname_,'MPI_ISEND(ints)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1015:1: if( SendRout%num_segs(proc) > 1 ) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1017:1: call MPI_ISEND(RSendBuf(RSendLoc(proc)), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1018:1: SendRout%locsize(proc)*numr,mp_Type_rp, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1019:1: SendRout%pe_list(proc),mytag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1020:1: ThisMCTWorld%MCT_comm,send_rreqs(proc),ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1022:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1024:1: call MPI_ISEND(SourceAV%rAttr(1,SendRout%seg_starts(proc,1)), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1025:1: SendRout%locsize(proc)*numr,mp_Type_rp, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1026:1: SendRout%pe_list(proc),mytag, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1027:1: ThisMCTWorld%MCT_comm,send_rreqs(proc),ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1029:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1031:1: if(ier /= 0) call MP_perr_die(myname_,'MPI_ISEND(reals)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1079:1: TargetAV%iAttr(IAttrIndex,TrgVectIndex) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1080:1: SourceAV%iAttr(IAttrIndex,SrcVectIndex) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1083:1: TargetAV%rAttr(RAttrIndex,TrgVectIndex) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1084:1: SourceAV%rAttr(RAttrIndex,SrcVectIndex) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1113:1: call MPI_WAITALL(SendRout%nprocs,send_ireqs,send_istatus,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1114:1: if(ier /= 0) call MP_perr_die(myname_,'MPI_WAITALL(ints)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1120:1: call MPI_WAITALL(SendRout%nprocs,send_rreqs,send_rstatus,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1121:1: if(ier /= 0) call MP_perr_die(myname_,'MPI_WAITALL(reals)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1141:1: call MPI_WAIT(recv_ireqs(proc),recv_istatus,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1143:1: call MPI_WAITANY(RecvRout%nprocs,recv_ireqs,proc,recv_istatus,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1147:1: if(DoSum) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1151:1: do nseg = 1,RecvRout%num_segs(proc) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1152:1: seg_start = RecvRout%seg_starts(proc,nseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1153:1: seg_end = seg_start + RecvRout%seg_lengths(proc,nseg)-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1154:1: do VectIndex = seg_start,seg_end 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1155:1: do AttrIndex = 1,numi 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1156:1: TargetAV%iAttr(AttrIndex,VectIndex)= & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1158:1: j=j+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1159:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1160:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1161:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1163:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1165:1: if (( RecvRout%num_segs(proc) > 1 ) .or. (usealltoall)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1169:1: do nseg = 1,RecvRout%num_segs(proc) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1170:1: seg_start = RecvRout%seg_starts(proc,nseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1171:1: seg_end = seg_start + RecvRout%seg_lengths(proc,nseg)-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1172:1: do VectIndex = seg_start,seg_end 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1173:1: do AttrIndex = 1,numi 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1174:1: TargetAV%iAttr(AttrIndex,VectIndex)=IRecvBuf(IRecvLoc(proc)+j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1175:1: j=j+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1176:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1177:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1178:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1180:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1182:1: endif ! end of if DoSum 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1191:1: if(DoSum) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1193:1: call MPI_WAIT(recv_rreqs(proc),recv_rstatus,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1195:1: call MPI_WAITANY(RecvRout%nprocs,recv_rreqs,proc,recv_rstatus,ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1199:1: if(DoSum) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1203:1: do nseg = 1,RecvRout%num_segs(proc) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1204:1: seg_start = RecvRout%seg_starts(proc,nseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1205:1: seg_end = seg_start + RecvRout%seg_lengths(proc,nseg)-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1206:1: do VectIndex = seg_start,seg_end 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1207:1: do AttrIndex = 1,numr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1208:1: TargetAV%rAttr(AttrIndex,VectIndex) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1210:1: k=k+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1211:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1212:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1213:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1215:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1217:1: if (( RecvRout%num_segs(proc) > 1 ) .or. (usealltoall)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1221:1: do nseg = 1,RecvRout%num_segs(proc) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1222:1: seg_start = RecvRout%seg_starts(proc,nseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1223:1: seg_end = seg_start + RecvRout%seg_lengths(proc,nseg)-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1224:1: do VectIndex = seg_start,seg_end 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1225:1: do AttrIndex = 1,numr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1226:1: TargetAV%rAttr(AttrIndex,VectIndex)=RRecvBuf(RRecvLoc(proc)+k) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1227:1: k=k+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1228:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1229:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1230:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1232:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1234:1: endif ! end if DoSum 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1258:1: deallocate(ISendBuf,stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1259:1: if(ier/=0) call die(myname_,'deallocate(ISendBuf)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1266:1: deallocate(RSendBuf,stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1267:1: if(ier/=0) call die(myname_,'deallocate(RSendBuf)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1278:1: deallocate(IRecvBuf,stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1279:1: if(ier/=0) call die(myname_,'deallocate(IRecvBuf)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1286:1: deallocate(RRecvBuf,stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:1287:1: if(ier/=0) call die(myname_,'deallocate(RRecvBuf)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Rearranger.F90:587:24: integer :: numi,numr,i,j,k,ier 1 Warning: Unused variable 'i' declared at (1) [-Wunused-variable] m_Rearranger.F90:148:17: integer :: i,j,k,l,m,n,ier 1 Warning: Unused variable 'j' declared at (1) [-Wunused-variable] m_Rearranger.F90:148:19: integer :: i,j,k,l,m,n,ier 1 Warning: Unused variable 'k' declared at (1) [-Wunused-variable] m_Rearranger.F90:148:21: integer :: i,j,k,l,m,n,ier 1 Warning: Unused variable 'l' declared at (1) [-Wunused-variable] m_Rearranger.F90:148:25: integer :: i,j,k,l,m,n,ier 1 Warning: Unused variable 'n' declared at (1) [-Wunused-variable] m_Rearranger.F90:146:30: integer :: procindex,nprocs,nseg,len,myPid 1 Warning: Unused variable 'nprocs' declared at (1) [-Wunused-variable] m_Rearranger.F90:143:0: integer,dimension(:,:),pointer :: temp_seg_starts,temp_seg_lengths Warning: 'temp_seg_starts.dim[1].stride' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Rearranger.F90:143:0: Warning: 'temp_seg_starts.offset' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Rearranger.F90:143:0: Warning: 'temp_seg_lengths.dim[1].stride' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Rearranger.F90:143:0: Warning: 'temp_seg_lengths.offset' may be used uninitialized in this function [-Wmaybe-uninitialized] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_SparseMatrixDecomp.F90 m_SparseMatrixDecomp.F90:587:1: call die(myname_,'non-root allocate(starts...',ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:670:1: num_elements-size(element_pe_locs)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:675:1: num_elements-size(elements)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:684:1: nsegs = 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:690:1: if((elements(i) > elements(i-1) + 1) .or. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:691:1: (element_pe_locs(i) /= element_pe_locs(i-1))) then ! new segment 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:692:1: nsegs = nsegs + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:693:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:726:1: if((elements(i) > elements(i-1) + 1) .or. & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:727:1: (element_pe_locs(i) /= element_pe_locs(i-1))) then ! new segment 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:730:1: iseg = iseg + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:731:1: seg_starts(iseg) = i 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:732:1: seg_lengths(iseg) = 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:733:1: seg_pe_locs(iseg) = element_pe_locs(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:735:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:738:1: seg_lengths(iseg) = seg_lengths(iseg) + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixDecomp.F90:740:1: endif ! If new segment block 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_SparseMatrixComms.F90 m_SparseMatrixComms.F90:45:1: GM_gather_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixComms.F90:46:1: GSM_gather_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixComms.F90:157:1: call MP_perr_die(myname_,"MPI_COMM_RANK() failed",ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixComms.F90:179:1: write(stderr,*) myname_,":: AttrVect_Scatter(GsMat%data) failed--stat=", & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixComms.F90:180:1: ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixComms.F90:181:1: stat = ierr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixComms.F90:182:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixComms.F90:184:1: call die(myname_,"call AttrVect_Scatter(GsMat%data,..",ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixComms.F90:199:1: call MP_perr_die(myname_,"MPI_Bcast(NumRowsColumns...",ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_SparseMatrixToMaps.F90 m_SparseMatrixToMaps.F90:37:1: SparseMatrixToXGlobalSegMap_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:41:1: SparseMatrixToYGlobalSegMap_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:400:1: nsegs = 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:404:1: if(indices(i) > indices(i-1) + 1) then ! new segment 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:405:1: nsegs = nsegs + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:406:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:426:1: nsegs = 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:427:1: starts(nsegs) = indices(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:432:1: if(i == num_indices) then ! last point 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:433:1: if(indices(i) > indices(i-1) + 1) then ! new segment with 1 pt. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:435:1: lengths(nsegs) = indices(i-1) - starts(nsegs) + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:436:1: nsegs = nsegs + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:437:1: starts(nsegs) = indices(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:438:1: lengths(nsegs) = 1 ! (just one point) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:439:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:440:1: lengths(nsegs) = indices(i) - starts(nsegs) + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:441:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:442:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:443:1: if(indices(i) > indices(i-1) + 1) then ! new segment 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:444:1: lengths(nsegs) = indices(i-1) - starts(nsegs) + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:445:1: nsegs = nsegs + 1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:446:1: starts(nsegs) = indices(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:447:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:448:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixToMaps.F90:269:61: integer, dimension(:), allocatable :: gRow, element_pe_locs 1 Warning: Unused variable 'element_pe_locs' declared at (1) [-Wunused-variable] m_SparseMatrixToMaps.F90:124:61: integer, dimension(:), allocatable :: gCol, element_pe_locs 1 Warning: Unused variable 'element_pe_locs' declared at (1) [-Wunused-variable] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_SparseMatrixPlus.F90 m_SparseMatrixPlus.F90:126:1: integer :: Tag 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:299:1: write(stderr,'(3a,i8,2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:303:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:307:1: write(stderr,'(3a,i8,2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:311:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:345:1: comm, ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:348:1: root, comm, ComponentID) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:362:1: comm, ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:365:1: root, comm, ComponentID) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:528:1: root, comm, ComponentID) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:658:1: if(present(status)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:659:1: status = myStatus 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:660:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:661:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:662:1: write(stderr,'(3a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:665:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:672:1: if(present(status)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:673:1: status = myStatus 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:674:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:675:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:676:1: write(stderr,'(3a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:679:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:686:1: if(present(status)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:687:1: status = myStatus 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:688:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:689:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:690:1: write(stderr,'(3a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:693:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:698:1: if(present(status)) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:699:1: status = myStatus 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:700:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:701:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:702:1: write(stderr,'(3a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:705:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:721:1: status = myStatus 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_SparseMatrixPlus.F90:722:1: return 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_MatAttrVectMul.F90 m_MatAttrVectMul.F90:258:5: row = sMat%data%iAttr(irow,n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:259:5: col = sMat%data%iAttr(icol,n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:260:1: wgt = sMat%data%rAttr(iwgt,n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:265:1: do m=1,num_indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:267:1: yAV%rAttr(m,row) = yAV%rAttr(m,row) + wgt * xAV%rAttr(m,col) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:269:3: end do ! m=1,num_indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:306:1: xAVindices, yAVindices) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:326:1: contiguous=.false. 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:358:1: row = sMat%data%iAttr(irow,n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:359:1: col = sMat%data%iAttr(icol,n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:360:1: wgt = sMat%data%rAttr(iwgt,n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:364:3: do m=1,num_indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:365:1: yAV%rAttr(outxmin+m,row) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:366:1: yAV%rAttr(outxmin+m,row) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:367:1: wgt * xAV%rAttr(inxmin+m,col) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:374:1: row = sMat%data%iAttr(irow,n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:375:1: col = sMat%data%iAttr(icol,n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:376:1: wgt = sMat%data%rAttr(iwgt,n) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:380:3: do m=1,num_indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:381:1: yAV%rAttr(yAVindices(m),row) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:382:1: yAV%rAttr(yAVindices(m),row) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:383:1: wgt * xAV%rAttr(xAVindices(m),col) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:546:1: Vector=usevector,rList=rList,TrList=TrList) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:549:1: Vector=usevector,rList=rList) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:552:1: Vector=usevector) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_MatAttrVectMul.F90:622:1: String_ToChar(sMatPlus%Strategy),' not supported.' 1 Warning: Nonconforming tab character at (1) [-Wtabs] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_Merge.F90 m_Merge.F90:70:1: MergeThreeGGDP_ 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:254:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:257:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:263:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:266:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:328:1: call MergeInDataGGSP_(inAv1, iMaskTags1, rMaskTags1, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:331:1: call MergeInDataGGSP_(inAv1, iMaskTags=iMaskTags1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:333:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:339:1: call MergeInDataGGSP_(inAv1, rMaskTags=rMaskTags1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:341:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:343:1: call MergeInDataGGSP_(inAv1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:345:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:357:1: call MergeInDataGGSP_(inAv2, iMaskTags2, rMaskTags2, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:360:1: call MergeInDataGGSP_(inAv2, iMaskTags=iMaskTags2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:362:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:368:1: call MergeInDataGGSP_(inAv2, rMaskTags=rMaskTags2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:370:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:372:1: call MergeInDataGGSP_(inAv2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:374:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:386:1: invWeightSum = 1._FP / WeightSum(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:388:1: write(stderr,'(2a,i8,a)') myname_,':: FATAL--WeightSum(', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:389:1: i,') is zero!' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:390:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:394:1: outAv%rAttr(j,i) = invWeightSum * outAv%rAttr(j,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:489:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:492:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:498:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:501:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:563:1: call MergeInDataGGDP_(inAv1, iMaskTags1, rMaskTags1, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:566:1: call MergeInDataGGDP_(inAv1, iMaskTags=iMaskTags1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:568:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:574:1: call MergeInDataGGDP_(inAv1, rMaskTags=rMaskTags1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:576:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:578:1: call MergeInDataGGDP_(inAv1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:580:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:592:1: call MergeInDataGGDP_(inAv2, iMaskTags2, rMaskTags2, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:595:1: call MergeInDataGGDP_(inAv2, iMaskTags=iMaskTags2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:597:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:603:1: call MergeInDataGGDP_(inAv2, rMaskTags=rMaskTags2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:605:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:607:1: call MergeInDataGGDP_(inAv2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:609:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:621:1: invWeightSum = 1._FP / WeightSum(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:623:1: write(stderr,'(2a,i8,a)') myname_,':: FATAL--WeightSum(', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:624:1: i,') is zero!' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:625:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:629:1: outAv%rAttr(j,i) = invWeightSum * outAv%rAttr(j,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:820:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:823:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:829:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:832:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:902:1: call MergeInDataGGSP_(inAv1, iMaskTags1, rMaskTags1, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:905:1: call MergeInDataGGSP_(inAv1, iMaskTags=iMaskTags1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:907:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:913:1: call MergeInDataGGSP_(inAv1, rMaskTags=rMaskTags1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:915:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:917:1: call MergeInDataGGSP_(inAv1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:919:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:931:1: call MergeInDataGGSP_(inAv2, iMaskTags2, rMaskTags2, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:934:1: call MergeInDataGGSP_(inAv2, iMaskTags=iMaskTags2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:936:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:942:1: call MergeInDataGGSP_(inAv2, rMaskTags=rMaskTags2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:944:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:946:1: call MergeInDataGGSP_(inAv2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:948:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:960:1: call MergeInDataGGSP_(inAv3, iMaskTags3, rMaskTags3, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:963:1: call MergeInDataGGSP_(inAv3, iMaskTags=iMaskTags3, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:965:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:971:1: call MergeInDataGGSP_(inAv3, rMaskTags=rMaskTags3, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:973:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:975:1: call MergeInDataGGSP_(inAv3, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:977:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:989:1: invWeightSum = 1._FP / WeightSum(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:991:1: write(stderr,'(2a,i8,a)') myname_,':: FATAL--WeightSum(', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:992:1: i,') is zero!' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:993:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:997:1: outAv%rAttr(j,i) = invWeightSum * outAv%rAttr(j,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1102:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1105:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1111:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1114:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1184:1: call MergeInDataGGDP_(inAv1, iMaskTags1, rMaskTags1, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1187:1: call MergeInDataGGDP_(inAv1, iMaskTags=iMaskTags1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1189:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1195:1: call MergeInDataGGDP_(inAv1, rMaskTags=rMaskTags1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1197:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1199:1: call MergeInDataGGDP_(inAv1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1201:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1213:1: call MergeInDataGGDP_(inAv2, iMaskTags2, rMaskTags2, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1216:1: call MergeInDataGGDP_(inAv2, iMaskTags=iMaskTags2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1218:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1224:1: call MergeInDataGGDP_(inAv2, rMaskTags=rMaskTags2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1226:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1228:1: call MergeInDataGGDP_(inAv2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1230:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1242:1: call MergeInDataGGDP_(inAv3, iMaskTags3, rMaskTags3, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1245:1: call MergeInDataGGDP_(inAv3, iMaskTags=iMaskTags3, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1247:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1253:1: call MergeInDataGGDP_(inAv3, rMaskTags=rMaskTags3, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1255:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1257:1: call MergeInDataGGDP_(inAv3, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1259:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1271:1: invWeightSum = 1._FP / WeightSum(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1273:1: write(stderr,'(2a,i8,a)') myname_,':: FATAL--WeightSum(', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1274:1: i,') is zero!' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1275:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1279:1: outAv%rAttr(j,i) = invWeightSum * outAv%rAttr(j,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1492:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1495:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1502:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1505:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1583:1: call MergeInDataGGSP_(inAv1, iMaskTags1, rMaskTags1, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1586:1: call MergeInDataGGSP_(inAv1, iMaskTags=iMaskTags1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1588:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1594:1: call MergeInDataGGSP_(inAv1, rMaskTags=rMaskTags1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1596:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1598:1: call MergeInDataGGSP_(inAv1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1600:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1612:1: call MergeInDataGGSP_(inAv2, iMaskTags2, rMaskTags2, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1615:1: call MergeInDataGGSP_(inAv2, iMaskTags=iMaskTags2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1617:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1623:1: call MergeInDataGGSP_(inAv2, rMaskTags=rMaskTags2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1625:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1627:1: call MergeInDataGGSP_(inAv2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1629:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1641:1: call MergeInDataGGSP_(inAv3, iMaskTags3, rMaskTags3, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1644:1: call MergeInDataGGSP_(inAv3, iMaskTags=iMaskTags3, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1646:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1652:1: call MergeInDataGGSP_(inAv3, rMaskTags=rMaskTags3, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1654:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1656:1: call MergeInDataGGSP_(inAv3, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1658:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1670:1: call MergeInDataGGSP_(inAv4, iMaskTags4, rMaskTags4, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1673:1: call MergeInDataGGSP_(inAv4, iMaskTags=iMaskTags4, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1675:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1681:1: call MergeInDataGGSP_(inAv4, rMaskTags=rMaskTags4, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1683:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1685:1: call MergeInDataGGSP_(inAv4, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1687:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1699:1: invWeightSum = 1._FP / WeightSum(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1701:1: write(stderr,'(2a,i8,a)') myname_,':: FATAL--WeightSum(', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1702:1: i,') is zero!' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1703:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1707:1: outAv%rAttr(j,i) = invWeightSum * outAv%rAttr(j,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1823:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1826:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1833:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1836:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1914:1: call MergeInDataGGDP_(inAv1, iMaskTags1, rMaskTags1, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1917:1: call MergeInDataGGDP_(inAv1, iMaskTags=iMaskTags1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1919:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1925:1: call MergeInDataGGDP_(inAv1, rMaskTags=rMaskTags1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1927:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1929:1: call MergeInDataGGDP_(inAv1, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1931:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1943:1: call MergeInDataGGDP_(inAv2, iMaskTags2, rMaskTags2, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1946:1: call MergeInDataGGDP_(inAv2, iMaskTags=iMaskTags2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1948:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1954:1: call MergeInDataGGDP_(inAv2, rMaskTags=rMaskTags2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1956:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1958:1: call MergeInDataGGDP_(inAv2, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1960:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1972:1: call MergeInDataGGDP_(inAv3, iMaskTags3, rMaskTags3, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1975:1: call MergeInDataGGDP_(inAv3, iMaskTags=iMaskTags3, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1977:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1983:1: call MergeInDataGGDP_(inAv3, rMaskTags=rMaskTags3, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1985:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1987:1: call MergeInDataGGDP_(inAv3, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:1989:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2001:1: call MergeInDataGGDP_(inAv4, iMaskTags4, rMaskTags4, GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2004:1: call MergeInDataGGDP_(inAv4, iMaskTags=iMaskTags4, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2006:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2012:1: call MergeInDataGGDP_(inAv4, rMaskTags=rMaskTags4, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2014:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2016:1: call MergeInDataGGDP_(inAv4, GGrid=GGrid, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2018:1: WeightSum=WeightSum) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2030:1: invWeightSum = 1._FP / WeightSum(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2032:1: write(stderr,'(2a,i8,a)') myname_,':: FATAL--WeightSum(', & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2033:1: i,') is zero!' 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2034:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2038:1: outAv%rAttr(j,i) = invWeightSum * outAv%rAttr(j,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2178:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2181:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2187:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2190:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2237:1: stat=ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2239:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2241:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2256:1: call List_get(DummStr, i, iMaskList) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2259:1: call GeneralGrid_exportIAttr(GGrid, String_ToChar(DummStr), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2260:1: iDummy, length) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2262:1: if(.not.(CheckMasks)) then ! Merely multiply iMask by iDummy: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2263:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2264:1: iMask(j) = iMask(j) * iDummy(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2265:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2266:1: else ! check mask elements and include their effect on iMask 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2267:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2268:1: select case(iDummy(j)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2269:1: case(0) ! zeroes out iMask(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2270:1: iMask(j) = 0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2271:1: case(1) ! leaves iMask(j) untouched 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2272:1: case default ! shut down with an error 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2273:1: write(stderr,'(5a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2276:1: String_ToChar(DummStr),'(',j,')=',iDummy(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2277:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2278:1: end select 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2279:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2280:1: endif ! if(CheckMasks)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2282:1: call String_clean(DummStr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2296:1: stat=ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2298:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2300:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2315:1: call List_get(DummStr, i, rMaskList) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2318:1: call GeneralGrid_exportRAttr(GGrid, String_ToChar(DummStr), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2319:1: rDummy, length) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2321:1: if(.not.(CheckMasks)) then ! Merely multiply rMask by rDummy: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2322:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2323:1: rMask(j) = rMask(j) * rDummy(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2324:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2325:1: else ! check mask elements and include their effect on rMask 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2326:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2327:1: if((iDummy(j) >= 0.) .and. (iDummy(j) <= 1.)) then ! in [0,1] 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2328:1: rMask(j) = rMask(j) * rDummy(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2329:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2330:1: write(stderr,'(5a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2333:1: String_ToChar(DummStr),'(',j,')=',rDummy(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2334:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2335:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2336:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2337:1: endif ! if(CheckMasks)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2339:1: call String_clean(DummStr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2365:1: if(RAttrIdentical) then ! straight masked multiply 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2366:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2367:1: do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2368:1: outAv%rAttr(j,i) = outAv%rAttr(j,i) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2369:1: rMask(i) * iMask(i) * inAv%rAttr(j,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2370:1: end do ! do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2372:1: WeightSum(i) = WeightSum(i) + iMask(i) * rMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2373:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2374:1: else ! use previously generated cross-indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2375:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2376:1: do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2377:1: outAv%rAttr(outAVIndices(j),i) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2378:1: outAv%rAttr(outAvIndices(j),i) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2379:1: rMask(i) * iMask(i) * & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2380:1: inAv%rAttr(inAvIndices(j),i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2381:1: end do ! do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2383:1: WeightSum(i) = WeightSum(i) + iMask(i) * rMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2384:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2385:1: endif ! if(RAttrIdentical)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2389:1: if(RAttrIdentical) then ! straight masked multiply 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2390:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2391:1: do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2392:1: outAv%rAttr(j,i) = outAv%rAttr(j,i) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2393:1: rMask(i) * inAv%rAttr(j,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2394:1: end do ! do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2396:1: WeightSum(i) = WeightSum(i) + rMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2397:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2398:1: else ! use previously generated cross-indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2399:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2400:1: do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2401:1: outAv%rAttr(outAVIndices(j),i) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2402:1: outAv%rAttr(outAvIndices(j),i) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2403:1: rMask(i) * inAv%rAttr(inAvIndices(j),i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2404:1: end do ! do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2406:1: WeightSum(i) = WeightSum(i) + rMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2407:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2408:1: endif ! if(RAttrIdentical) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2416:1: if(RAttrIdentical) then ! straight masked multiply 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2417:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2418:1: do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2419:1: outAv%rAttr(j,i) = outAv%rAttr(j,i) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2420:1: iMask(i) * inAv%rAttr(j,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2421:1: end do ! do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2423:1: WeightSum(i) = WeightSum(i) + iMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2424:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2425:1: else ! use previously generated cross-indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2426:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2427:1: do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2428:1: outAv%rAttr(outAVIndices(j),i) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2429:1: outAv%rAttr(outAvIndices(j),i) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2430:1: iMask(i) * inAv%rAttr(inAvIndices(j),i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2431:1: end do ! do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2433:1: WeightSum(i) = WeightSum(i) + iMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2434:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2435:1: endif ! if(RAttrIdentical) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2439:1: if(RAttrIdentical) then ! straight masked multiply 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2440:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2441:1: do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2442:1: outAv%rAttr(j,i) = outAv%rAttr(j,i) + inAv%rAttr(j,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2443:1: end do ! do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2445:1: WeightSum(i) = WeightSum(i) + 1._FP 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2446:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2447:1: else ! use previously generated cross-indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2448:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2449:1: do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2450:1: outAv%rAttr(outAVIndices(j),i) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2451:1: outAv%rAttr(outAvIndices(j),i) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2452:1: inAv%rAttr(inAvIndices(j),i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2453:1: end do ! do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2455:1: WeightSum(i) = WeightSum(i) + 1._FP 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2456:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2457:1: endif ! if(RAttrIdentical) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2469:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2471:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2479:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2481:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2489:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2491:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2593:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2596:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2602:1: write(stderr,'(3a)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2605:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2652:1: stat=ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2654:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2656:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2671:1: call List_get(DummStr, i, iMaskList) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2674:1: call GeneralGrid_exportIAttr(GGrid, String_ToChar(DummStr), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2675:1: iDummy, length) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2677:1: if(.not.(CheckMasks)) then ! Merely multiply iMask by iDummy: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2678:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2679:1: iMask(j) = iMask(j) * iDummy(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2680:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2681:1: else ! check mask elements and include their effect on iMask 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2682:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2683:1: select case(iDummy(j)) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2684:1: case(0) ! zeroes out iMask(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2685:1: iMask(j) = 0 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2686:1: case(1) ! leaves iMask(j) untouched 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2687:1: case default ! shut down with an error 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2688:1: write(stderr,'(5a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2691:1: String_ToChar(DummStr),'(',j,')=',iDummy(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2692:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2693:1: end select 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2694:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2695:1: endif ! if(CheckMasks)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2697:1: call String_clean(DummStr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2711:1: stat=ierr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2713:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2715:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2730:1: call List_get(DummStr, i, rMaskList) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2733:1: call GeneralGrid_exportRAttr(GGrid, String_ToChar(DummStr), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2734:1: rDummy, length) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2736:1: if(.not.(CheckMasks)) then ! Merely multiply rMask by rDummy: 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2737:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2738:1: rMask(j) = rMask(j) * rDummy(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2739:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2740:1: else ! check mask elements and include their effect on rMask 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2741:1: do j=1,length 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2742:1: if((iDummy(j) >= 0.) .and. (iDummy(j) <= 1.)) then ! in [0,1] 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2743:1: rMask(j) = rMask(j) * rDummy(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2744:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2745:1: write(stderr,'(5a,i8,a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2748:1: String_ToChar(DummStr),'(',j,')=',rDummy(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2749:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2750:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2751:1: end do 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2752:1: endif ! if(CheckMasks)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2754:1: call String_clean(DummStr) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2780:1: if(RAttrIdentical) then ! straight masked multiply 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2781:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2782:1: do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2783:1: outAv%rAttr(j,i) = outAv%rAttr(j,i) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2784:1: rMask(i) * iMask(i) * inAv%rAttr(j,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2785:1: end do ! do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2787:1: WeightSum(i) = WeightSum(i) + iMask(i) * rMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2788:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2789:1: else ! use previously generated cross-indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2790:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2791:1: do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2792:1: outAv%rAttr(outAVIndices(j),i) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2793:1: outAv%rAttr(outAvIndices(j),i) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2794:1: rMask(i) * iMask(i) * & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2795:1: inAv%rAttr(inAvIndices(j),i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2796:1: end do ! do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2798:1: WeightSum(i) = WeightSum(i) + iMask(i) * rMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2799:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2800:1: endif ! if(RAttrIdentical)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2804:1: if(RAttrIdentical) then ! straight masked multiply 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2805:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2806:1: do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2807:1: outAv%rAttr(j,i) = outAv%rAttr(j,i) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2808:1: rMask(i) * inAv%rAttr(j,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2809:1: end do ! do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2811:1: WeightSum(i) = WeightSum(i) + rMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2812:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2813:1: else ! use previously generated cross-indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2814:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2815:1: do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2816:1: outAv%rAttr(outAVIndices(j),i) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2817:1: outAv%rAttr(outAvIndices(j),i) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2818:1: rMask(i) * inAv%rAttr(inAvIndices(j),i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2819:1: end do ! do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2821:1: WeightSum(i) = WeightSum(i) + rMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2822:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2823:1: endif ! if(RAttrIdentical) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2831:1: if(RAttrIdentical) then ! straight masked multiply 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2832:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2833:1: do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2834:1: outAv%rAttr(j,i) = outAv%rAttr(j,i) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2835:1: iMask(i) * inAv%rAttr(j,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2836:1: end do ! do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2838:1: WeightSum(i) = WeightSum(i) + iMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2839:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2840:1: else ! use previously generated cross-indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2841:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2842:1: do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2843:1: outAv%rAttr(outAVIndices(j),i) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2844:1: outAv%rAttr(outAvIndices(j),i) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2845:1: iMask(i) * inAv%rAttr(inAvIndices(j),i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2846:1: end do ! do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2848:1: WeightSum(i) = WeightSum(i) + iMask(i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2849:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2850:1: endif ! if(RAttrIdentical) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2854:1: if(RAttrIdentical) then ! straight masked multiply 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2855:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2856:1: do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2857:1: outAv%rAttr(j,i) = outAv%rAttr(j,i) + inAv%rAttr(j,i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2858:1: end do ! do j=1,AttrVect_nRAttr(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2860:1: WeightSum(i) = WeightSum(i) + 1._FP 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2861:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2862:1: else ! use previously generated cross-indices 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2863:1: do i=1, AttrVect_lsize(inAv) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2864:1: do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2865:1: outAv%rAttr(outAVIndices(j),i) = & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2866:1: outAv%rAttr(outAvIndices(j),i) + & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2867:1: inAv%rAttr(inAvIndices(j),i) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2868:1: end do ! do j=1,NumSharedRAttr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2870:1: WeightSum(i) = WeightSum(i) + 1._FP 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2871:1: end do ! do i=1,AttrVect_lsize(inAv)... 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2872:1: endif ! if(RAttrIdentical) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2884:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2886:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2894:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2896:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2904:1: write(stderr,'(2a,i8)') myname_, & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2906:1: call die(myname_) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Merge.F90:2372:22: WeightSum(i) = WeightSum(i) + iMask(i) * rMask(i) 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] m_Merge.F90:2383:22: WeightSum(i) = WeightSum(i) + iMask(i) * rMask(i) 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] m_Merge.F90:2396:22: WeightSum(i) = WeightSum(i) + rMask(i) 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] m_Merge.F90:2406:22: WeightSum(i) = WeightSum(i) + rMask(i) 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] m_Merge.F90:2445:22: WeightSum(i) = WeightSum(i) + 1._FP 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] m_Merge.F90:2455:22: WeightSum(i) = WeightSum(i) + 1._FP 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] m_Merge.F90:2892:0: deallocate(rMask, rDummy, stat=ierr) Warning: 'rmask.data' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Merge.F90:2567:0: real(FP), dimension(:), pointer :: rMask,rDummy ! REAL mask workspace Warning: 'rmask.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Merge.F90:2882:0: deallocate(iMask, iDummy, stat=ierr) Warning: 'imask.data' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Merge.F90:2566:0: integer, dimension(:), pointer :: iMask,iDummy ! INTEGER mask workspace Warning: 'imask.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Merge.F90:2477:0: deallocate(rMask, rDummy, stat=ierr) Warning: 'rmask.data' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Merge.F90:2152:0: real(FP), dimension(:), pointer :: rMask,rDummy ! REAL mask workspace Warning: 'rmask.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Merge.F90:2467:0: deallocate(iMask, iDummy, stat=ierr) Warning: 'imask.data' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Merge.F90:2151:0: integer, dimension(:), pointer :: iMask,iDummy ! INTEGER mask workspace Warning: 'imask.dim[0].ubound' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Merge.F90:2038:0: outAv%rAttr(j,i) = invWeightSum * outAv%rAttr(j,i) Warning: 'invweightsum' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Merge.F90:1707:0: outAv%rAttr(j,i) = invWeightSum * outAv%rAttr(j,i) Warning: 'invweightsum' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Merge.F90:1279:0: outAv%rAttr(j,i) = invWeightSum * outAv%rAttr(j,i) Warning: 'invweightsum' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Merge.F90:997:0: outAv%rAttr(j,i) = invWeightSum * outAv%rAttr(j,i) Warning: 'invweightsum' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Merge.F90:629:0: outAv%rAttr(j,i) = invWeightSum * outAv%rAttr(j,i) Warning: 'invweightsum' may be used uninitialized in this function [-Wmaybe-uninitialized] m_Merge.F90:394:0: outAv%rAttr(j,i) = invWeightSum * outAv%rAttr(j,i) Warning: 'invweightsum' may be used uninitialized in this function [-Wmaybe-uninitialized] mpif90 -c -I/usr/lib/openmpi/include -DSYSLINUX -DCPR -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC -g -O2 -I/usr/src/RPM/BUILD/mct-2.8.3/mpeu m_Transfer.F90 m_Transfer.F90:61:20: integer,parameter :: DefaultTag = 600 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:137:13: integer :: numi,numr,i,j,k,ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:216:1: seg_start = Rout%seg_starts(proc,nseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:217:1: seg_end = seg_start + Rout%seg_lengths(proc,nseg)-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:218:1: do VectIndex = seg_start,seg_end 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:219:1: do AttrIndex = 1,numi 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:220:1: Rout%ip1(proc)%pi(j) = aV%iAttr(AttrIndex,VectIndex) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:221:1: j=j+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:222:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:223:1: do AttrIndex = 1,numr 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:224:1: Rout%rp1(proc)%pr(k) = aV%rAttr(AttrIndex,VectIndex) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:225:1: k=k+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:226:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:227:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:240:1: call MPI_ISEND(Rout%ip1(proc)%pi(1), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:241:1: Rout%locsize(proc)*numi,MP_INTEGER,Rout%pe_list(proc), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:242:1: mytag,ThisMCTWorld%MCT_comm,Rout%ireqs(proc),ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:244:1: if(ier /= 0) call MP_perr_die(myname_,'MPI_ISEND(ints)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:257:1: Rout%locsize(proc)*numr,mp_Type_rp1,Rout%pe_list(proc), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:258:1: mytag,ThisMCTWorld%MCT_comm,Rout%rreqs(proc),ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:315:1: deallocate(Rout%ip1(proc)%pi,stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:316:1: if(ier/=0) call die(myname_,'deallocate(ip1%pi)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:327:1: deallocate(Rout%rp1(proc)%pr,stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:328:1: if(ier/=0) call die(myname_,'deallocate(rp1%pi)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:371:48: Type(AttrVect), intent(in) :: aV 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:456:13: integer :: numi,numr,i,j,k,ier 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:524:1: if( Rout%num_segs(proc) > 1 .or. DoSum ) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:526:1: call MPI_IRECV(Rout%ip1(proc)%pi(1), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:527:1: Rout%locsize(proc)*numi,MP_INTEGER,Rout%pe_list(proc), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:528:1: mytag,ThisMCTWorld%MCT_comm,Rout%ireqs(proc),ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:530:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:532:1: call MPI_IRECV(aV%iAttr(1,Rout%seg_starts(proc,1)), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:533:1: Rout%locsize(proc)*numi,MP_INTEGER,Rout%pe_list(proc), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:534:1: mytag,ThisMCTWorld%MCT_comm,Rout%ireqs(proc),ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:536:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:538:1: if(ier /= 0) call MP_perr_die(myname_,'MPI_IRECV(ints)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:549:1: if( Rout%num_segs(proc) > 1 .or. DoSum ) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:551:1: call MPI_IRECV(Rout%rp1(proc)%pr(1), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:552:1: Rout%locsize(proc)*numr,mp_Type_rp1,Rout%pe_list(proc), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:553:1: mytag,ThisMCTWorld%MCT_comm,Rout%rreqs(proc),ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:555:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:557:1: call MPI_IRECV(aV%rAttr(1,Rout%seg_starts(proc,1)), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:558:1: Rout%locsize(proc)*numr,mp_Type_rp1,Rout%pe_list(proc), & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:559:1: mytag,ThisMCTWorld%MCT_comm,Rout%rreqs(proc),ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:561:1: endif 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:563:1: if(ier /= 0) call MP_perr_die(myname_,'MPI_IRECV(reals)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:649:1: k=1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:651:1: if(DoSum) then 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:653:1: do nseg = 1,Rout%num_segs(proc) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:654:1: seg_start = Rout%seg_starts(proc,nseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:655:1: seg_end = seg_start + Rout%seg_lengths(proc,nseg)-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:656:1: do VectIndex = seg_start,seg_end 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:657:1: do AttrIndex = 1,Rout%numiatt 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:658:1: aV%iAttr(AttrIndex,VectIndex)= & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:659:1: aV%iAttr(AttrIndex,VectIndex)+Rout%ip1(proc)%pi(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:660:1: j=j+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:661:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:662:1: do AttrIndex = 1,Rout%numratt 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:663:1: aV%rAttr(AttrIndex,VectIndex)= & 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:664:1: aV%rAttr(AttrIndex,VectIndex)+Rout%rp1(proc)%pr(k) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:665:1: k=k+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:666:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:667:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:668:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:669:1: else 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:671:1: do nseg = 1,Rout%num_segs(proc) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:672:1: seg_start = Rout%seg_starts(proc,nseg) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:673:1: seg_end = seg_start + Rout%seg_lengths(proc,nseg)-1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:674:1: do VectIndex = seg_start,seg_end 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:675:1: do AttrIndex = 1,Rout%numiatt 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:676:1: aV%iAttr(AttrIndex,VectIndex)=Rout%ip1(proc)%pi(j) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:677:1: j=j+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:678:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:679:1: do AttrIndex = 1,Rout%numratt 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:680:1: aV%rAttr(AttrIndex,VectIndex)=Rout%rp1(proc)%pr(k) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:681:1: k=k+1 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:682:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:683:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:684:1: enddo 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:738:1: deallocate(Rout%ip1(proc)%pi,stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:739:1: if(ier/=0) call die(myname_,'deallocate(Rout%ip1%pi)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:748:1: deallocate(Rout%rp1(proc)%pr,stat=ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:749:1: if(ier/=0) call die(myname_,'deallocate(Rout%rp1%pr)',ier) 1 Warning: Nonconforming tab character at (1) [-Wtabs] m_Transfer.F90:456:24: integer :: numi,numr,i,j,k,ier 1 Warning: Unused variable 'i' declared at (1) [-Wunused-variable] m_Transfer.F90:456:26: integer :: numi,numr,i,j,k,ier 1 Warning: Unused variable 'j' declared at (1) [-Wunused-variable] m_Transfer.F90:456:28: integer :: numi,numr,i,j,k,ier 1 Warning: Unused variable 'k' declared at (1) [-Wunused-variable] m_Transfer.F90:459:34: integer :: proc,numprocs,nseg,mytag 1 Warning: Unused variable 'nseg' declared at (1) [-Wunused-variable] m_Transfer.F90:459:29: integer :: proc,numprocs,nseg,mytag 1 Warning: Unused variable 'numprocs' declared at (1) [-Wunused-variable] m_Transfer.F90:458:33: integer :: seg_start,seg_end 1 Warning: Unused variable 'seg_end' declared at (1) [-Wunused-variable] m_Transfer.F90:458:25: integer :: seg_start,seg_end 1 Warning: Unused variable 'seg_start' declared at (1) [-Wunused-variable] m_Transfer.F90:137:24: integer :: numi,numr,i,j,k,ier 1 Warning: Unused variable 'i' declared at (1) [-Wunused-variable] rm -f libmct.a ar cq libmct.a m_MCTWorld.o m_AttrVect.o m_GlobalMap.o m_GlobalSegMap.o m_GlobalSegMapComms.o m_Accumulator.o m_SparseMatrix.o m_Navigator.o m_AttrVectComms.o m_AttrVectReduce.o m_AccumulatorComms.o m_GeneralGrid.o m_GeneralGridComms.o m_SpatialIntegral.o m_SpatialIntegralV.o m_MatAttrVectMul.o m_Merge.o m_GlobalToLocal.o m_ExchangeMaps.o m_ConvertMaps.o m_SparseMatrixDecomp.o m_SparseMatrixToMaps.o m_SparseMatrixComms.o m_SparseMatrixPlus.o m_Router.o m_Rearranger.o m_Transfer.o make[1]: Leaving directory '/usr/src/RPM/BUILD/mct-2.8.3/mct' make: Leaving directory '/usr/src/RPM/BUILD/mct-2.8.3' + exit 0 Executing(%install): /bin/sh -e /usr/src/tmp/rpm-tmp.7173 + umask 022 + /bin/mkdir -p /usr/src/RPM/BUILD + cd /usr/src/RPM/BUILD + /bin/chmod -Rf u+rwX -- /usr/src/tmp/mct-buildroot + : + /bin/rm -rf -- /usr/src/tmp/mct-buildroot + cd mct-2.8.3 + source /usr/lib/openmpi/bin/mpivars.sh ++ grep -q /usr/lib/openmpi/bin ++ echo /usr/src/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/games ++ PATH=/usr/lib/openmpi/bin:/usr/src/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/games ++ export PATH ++ grep -q /usr/lib/openmpi/lib ++ echo ++ LD_LIBRARY_PATH=/usr/lib/openmpi/lib ++ export LD_LIBRARY_PATH ++ grep -q /usr/lib/openmpi/man ++ echo ++ MANPATH=/usr/lib/openmpi/man: ++ export MANPATH + export 'OMPI_LDFLAGS=-Wl,--as-needed,-rpath,/usr/lib/openmpi/lib -L/usr/lib/openmpi/lib' + OMPI_LDFLAGS='-Wl,--as-needed,-rpath,/usr/lib/openmpi/lib -L/usr/lib/openmpi/lib' + /usr/bin/make 'INSTALL=/bin/install -p' prefix=/usr/src/tmp/mct-buildroot/usr exec_prefix=/usr/src/tmp/mct-buildroot/usr bindir=/usr/src/tmp/mct-buildroot/usr/bin sbindir=/usr/src/tmp/mct-buildroot/usr/sbin sysconfdir=/usr/src/tmp/mct-buildroot/etc datadir=/usr/src/tmp/mct-buildroot/usr/share includedir=/usr/src/tmp/mct-buildroot/usr/include libdir=/usr/src/tmp/mct-buildroot/usr/lib libexecdir=/usr/src/tmp/mct-buildroot/usr/lib localstatedir=/usr/src/tmp/mct-buildroot/var/lib sharedstatedir=/usr/src/tmp/mct-buildroot/var/lib mandir=/usr/src/tmp/mct-buildroot/usr/share/man infodir=/usr/src/tmp/mct-buildroot/usr/share/info install make: Entering directory '/usr/src/RPM/BUILD/mct-2.8.3' make[1]: Entering directory '/usr/src/RPM/BUILD/mct-2.8.3/mpeu' make[1]: Nothing to be done for 'all'. make[1]: Leaving directory '/usr/src/RPM/BUILD/mct-2.8.3/mpeu' make[1]: Entering directory '/usr/src/RPM/BUILD/mct-2.8.3/mct' make[1]: Nothing to be done for 'all'. make[1]: Leaving directory '/usr/src/RPM/BUILD/mct-2.8.3/mct' make[1]: Entering directory '/usr/src/RPM/BUILD/mct-2.8.3/mpeu' /usr/src/RPM/BUILD/mct-2.8.3/mkinstalldirs /usr/src/tmp/mct-buildroot/usr/lib /usr/src/tmp/mct-buildroot/usr/include mkdir -p -- /usr/src/tmp/mct-buildroot/usr/lib /usr/src/tmp/mct-buildroot/usr/include /bin/install -p libmpeu.a -m 644 /usr/src/tmp/mct-buildroot/usr/lib /bin/install -p m_chars.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_die.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_dropdead.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_fccomms.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_filename.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_fileresolv.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_flow.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_indexbin_char.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_indexbin_integer.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_indexbin_logical.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_inpak90.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_ioutil.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_list.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_mall.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_mergesorts.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_mpif.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_mpif90.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_mpout.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_permuter.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_rankmerge.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_realkinds.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_sortingtools.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_stdio.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_string.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_strtemplate.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_traceback.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_zeit.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include make[1]: Leaving directory '/usr/src/RPM/BUILD/mct-2.8.3/mpeu' make[1]: Entering directory '/usr/src/RPM/BUILD/mct-2.8.3/mct' /usr/src/RPM/BUILD/mct-2.8.3/mkinstalldirs /usr/src/tmp/mct-buildroot/usr/lib /usr/src/tmp/mct-buildroot/usr/include /bin/install -p libmct.a -m 644 /usr/src/tmp/mct-buildroot/usr/lib /bin/install -p m_accumulator.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_accumulatorcomms.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_attrvect.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_attrvectcomms.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_attrvectreduce.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_convertmaps.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_exchangemaps.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_generalgrid.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_generalgridcomms.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_globalmap.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_globalsegmap.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_globalsegmapcomms.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_globaltolocal.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_matattrvectmul.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_mctworld.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_merge.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_navigator.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_rearranger.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_router.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_sparsematrix.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_sparsematrixcomms.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_sparsematrixdecomp.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_sparsematrixplus.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_sparsematrixtomaps.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_spatialintegral.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_spatialintegralv.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include /bin/install -p m_transfer.mod -m 644 /usr/src/tmp/mct-buildroot/usr/include make[1]: Leaving directory '/usr/src/RPM/BUILD/mct-2.8.3/mct' make: Leaving directory '/usr/src/RPM/BUILD/mct-2.8.3' + install -d /usr/src/tmp/mct-buildroot/usr/bin + install -d /usr/src/tmp/mct-buildroot/usr/share/mct/data + install -p -m644 data/grid.320x384.da data/kmt_full_40.da data/popx1_to_t42_c_mat.asc data/t42_to_popx1_c_mat.asc /usr/src/tmp/mct-buildroot/usr/share/mct/data + pushd /usr/src/tmp/mct-buildroot/usr/lib ~/tmp/mct-buildroot/usr/lib ~/RPM/BUILD/mct-2.8.3 + for i in libmpeu libmct + mpif90 -shared -Wl,--whole-archive libmpeu.a -Wl,--no-whole-archive -Wl,-rpath,/usr/lib/openmpi/lib -o libmpeu.so.0 -Wl,-soname,libmpeu.so.0 -L/usr/src/tmp/mct-buildroot/usr/lib -Wl,-z,defs + ln -s libmpeu.so.0 libmpeu.so + LIB=-lmpeu + for i in libmpeu libmct + mpif90 -shared -Wl,--whole-archive libmct.a -Wl,--no-whole-archive -Wl,-rpath,/usr/lib/openmpi/lib -o libmct.so.0 -Wl,-soname,libmct.so.0 -L/usr/src/tmp/mct-buildroot/usr/lib -lmpeu -Wl,-z,defs + ln -s libmct.so.0 libmct.so + LIB=-lmpeu + popd ~/RPM/BUILD/mct-2.8.3 + /usr/lib/rpm/brp-alt Cleaning files in /usr/src/tmp/mct-buildroot (auto) mode of './usr/lib/libmct.so.0' changed from 0755 (rwxr-xr-x) to 0644 (rw-r--r--) mode of './usr/lib/libmpeu.so.0' changed from 0755 (rwxr-xr-x) to 0644 (rw-r--r--) Verifying and fixing files in /usr/src/tmp/mct-buildroot (binconfig,pkgconfig,libtool,desktop) Checking contents of files in /usr/src/tmp/mct-buildroot/ (default) Compressing files in /usr/src/tmp/mct-buildroot (auto) Adjusting library links in /usr/src/tmp/mct-buildroot ./usr/lib: libmpeu.so.0 -> libmpeu.so.0 libmct.so.0 -> libmct.so.0 Verifying ELF objects in /usr/src/tmp/mct-buildroot (arch=normal,fhs=normal,lfs=relaxed,lint=relaxed,rpath=normal,stack=normal,textrel=normal,unresolved=normal) verify-elf: WARNING: ./usr/lib/libmct.so.0: RPATH entry found: /usr/lib/openmpi/lib verify-elf: WARNING: ./usr/lib/libmpeu.so.0: RPATH entry found: /usr/lib/openmpi/lib Hardlinking identical .pyc and .opt-?.pyc files Hardlinking identical .pyc and .pyo files Processing files: libmct-2.8.3-alt1 Executing(%doc): /bin/sh -e /usr/src/tmp/rpm-tmp.54085 + umask 022 + /bin/mkdir -p /usr/src/RPM/BUILD + cd /usr/src/RPM/BUILD + cd mct-2.8.3 + DOCDIR=/usr/src/tmp/mct-buildroot/usr/share/doc/libmct-2.8.3 + export DOCDIR + rm -rf /usr/src/tmp/mct-buildroot/usr/share/doc/libmct-2.8.3 + /bin/mkdir -p /usr/src/tmp/mct-buildroot/usr/share/doc/libmct-2.8.3 + cp -prL COPYRIGHT /usr/src/tmp/mct-buildroot/usr/share/doc/libmct-2.8.3 + chmod -R go-w /usr/src/tmp/mct-buildroot/usr/share/doc/libmct-2.8.3 + chmod -R a+rX /usr/src/tmp/mct-buildroot/usr/share/doc/libmct-2.8.3 + exit 0 Finding Provides (using /usr/lib/rpm/find-provides) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.gXhdmy find-provides: running scripts (alternatives,debuginfo,lib,pam,perl,pkgconfig,python,python3,shell) Finding Requires (using /usr/lib/rpm/find-requires) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.KjHE5z find-requires: running scripts (cpp,debuginfo,files,lib,pam,perl,pkgconfig,pkgconfiglib,python,python3,rpmlib,shebang,shell,static,symlinks) Provides: libmct.so.0 = set:md6r1RAZk4xZ38ho21fbUBLAu7tT3o8eZzb9n2cGwN3ATk7t9yA0VzGztNfUeZA6AyoR6lZLmTZ02ydsCe65KGZijhZC0NZxJfApCX2h0PjQpyxJH7kbZnaxlG3dN6TZivfdqb6jfUDZrMQKLnwchw9OHsKAIexeeQsBCJPATgZ2hP6lbwltVxKwRo8W80z7wyiu5us6oQntjI9JPFZobLNRjfdo3BSsIHU9okui9FHQyvwYImrSw2yFrUtWJr97oD0ijbDqBMFX8cPuiWsbdXeGhHDwW5pliFlkDnjA1isUrFMqbgES7bu3VxgCA20fuBHvno5sVQbCdLrmA2wJqZtlT2CX0ywwhFLPdWE2lySWpdO6eybV2v3WHcVr1M8MjCikZin5ohTMSkBRfG6doGx76YNmCXqyKyR3F1yb0rNTiSOhvaFRn01je4fmbMYG6HBOZfCCNzTRoHZ1wmhS9WZ02mdHM3ZteGhXbSPpxWXdKFPfo6tUN4cKSZ6dszfNX6Zbgtp4SuAZbOg7CGc5kAsZdmlNxSu0Dtk18uLrojDqyqeqhB7iXNfiFxQ0YH2SpgZmZ44FndIa0ZuNpPPAZhq9cZk2wBQHImacRaloBfooJQFfJHEbIKtelO2bdxR6E8cmuB9sXYn326iKExyHh4M9pWaRl0O3aIyM0OG, libmpeu.so.0 = set:mdtcdod9FPZ4ZKHTHzW5wcLM70135zxS6ME1CRwtPj8Zbc1RLorz6HngAJuNvaYwcQMdhbK1Z21IU27m4BPZdW8IgAnWj2J4lNhy7PopTRqcD63uHWR8Goo3hH49L60q1YocuWT0tNj2qdFO878lVJ3j9RVGQX9A9sZqw6E56ob15XayNdgzJnu00wv4twZEQRktYIMffzX22yXYnFP1fnD9vxNGdUHaLkZ2n8j2g7i34Viwr3jA5Zf2wQAdGuCGHld8sumszXqMrE6xkVE8OzdcwDdXPSuVOpFlombsJg8e4UtQrC0qPD5ZIrp2rZiunNqh6fe4Qb3m18ZHOWZ1MZiwu0g05he47f5akUH9kY1GDIZLIOA097IiGrgVXa8KBTof6viozIXa9d30iGEPcldVMLosEORXs9D2oGWZ0c94o0Z4KqOAX46LrPzAidfCfnbhYaSJaxSgUgBYzjOjVZK4Lk7pvd8Hl8rjq3LjTE51ET2AjpzZ3eAe3QZ5Z6ZzDu6iIiMSBiR938phKPaehIRYX4sQffI11jZsnUgJ8KR Requires: /usr/lib/openmpi/lib/libmpi_mpifh.so.20, libc.so.6(GLIBC_2.0), libc.so.6(GLIBC_2.1.3), libc.so.6(GLIBC_2.4), libgfortran.so.4 >= set:ojMCdZxCZBwLr5AfqB7gxcs8HcFjVaCLbfpllCnJDABejQ3bGcZ31ZezhTeHa2UlEEd1QkejvD1pQgELTrihobP3rjdkNZx, libgfortran.so.4(GFORTRAN_7), libm.so.6(GLIBC_2.0), libm.so.6(GLIBC_2.1), rtld(GNU_HASH) Requires(rpmlib): rpmlib(SetVersions) Finding debuginfo files (using /usr/lib/rpm/find-debuginfo-files) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.sctLbi Creating libmct-debuginfo package Processing files: libmct-devel-2.8.3-alt1 Finding Provides (using /usr/lib/rpm/find-provides) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.eAJD8z find-provides: running scripts (alternatives,debuginfo,lib,pam,perl,pkgconfig,python,python3,shell) Finding Requires (using /usr/lib/rpm/find-requires) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.JvNMEB find-requires: running scripts (cpp,debuginfo,files,lib,pam,perl,pkgconfig,pkgconfiglib,python,python3,rpmlib,shebang,shell,static,symlinks) Requires: libmct = 2.8.3-alt1, openmpi-devel, /usr/lib/libmct.so.0, /usr/lib/libmpeu.so.0 Finding debuginfo files (using /usr/lib/rpm/find-debuginfo-files) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.OEALXi Processing files: libmct-debuginfo-2.8.3-alt1 Finding Provides (using /usr/lib/rpm/find-provides) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.3pyxxJ find-provides: running scripts (debuginfo) Finding Requires (using /usr/lib/rpm/find-requires) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.BR8csR find-requires: running scripts (debuginfo) Provides: debug(libmct.so.0), debug(libmpeu.so.0) Requires: libmct = 2.8.3-alt1, /usr/lib/debug/usr/lib/openmpi/lib/libmpi_mpifh.so.20.debug, debug(libc.so.6), debug(libgfortran.so.4), debug(libm.so.6) Removing 2 extra deps from libmct-devel due to dependency on libmct warning: Installed (but unpackaged) file(s) found: /usr/lib/libmct.a /usr/lib/libmpeu.a Wrote: /usr/src/RPM/RPMS/i586/libmct-2.8.3-alt1.i586.rpm Wrote: /usr/src/RPM/RPMS/i586/libmct-devel-2.8.3-alt1.i586.rpm Wrote: /usr/src/RPM/RPMS/i586/libmct-debuginfo-2.8.3-alt1.i586.rpm 28.40user 2.01system 0:50.27elapsed 60%CPU (0avgtext+0avgdata 40472maxresident)k 0inputs+0outputs (0major+929450minor)pagefaults 0swaps 75.31user 8.88system 2:22.06elapsed 59%CPU (0avgtext+0avgdata 170176maxresident)k 7824inputs+0outputs (0major+1909793minor)pagefaults 0swaps --- libmct-2.8.3-alt1.i586.rpm.repo 2014-06-05 05:18:41.000000000 +0000 +++ libmct-2.8.3-alt1.i586.rpm.hasher 2018-11-12 08:11:58.398117003 +0000 @@ -10,4 +10,3 @@ /usr/share/mct/data/t42_to_popx1_c_mat.asc 100644 -Requires: /usr/lib/openmpi/lib/libmpi_f77.so.1 -Requires: /usr/lib/openmpi/lib/libmpi_f90.so.1 +Requires: /usr/lib/openmpi/lib/libmpi_mpifh.so.20 Requires: libc.so.6(GLIBC_2.0) @@ -15,6 +14,5 @@ Requires: libc.so.6(GLIBC_2.4) -Requires: libgfortran.so.3 >= set:niSzdfp5GcfqfFBebWxPxzcWPf1tvc3bM6cn51FuOJ2aajZc6YVZiemWC1FLzwcGyZA3RNXd53Qlww9FWwpojdkNZw +Requires: libgfortran.so.4 >= set:ojMCdZxCZBwLr5AfqB7gxcs8HcFjVaCLbfpllCnJDABejQ3bGcZ31ZezhTeHa2UlEEd1QkejvD1pQgELTrihobP3rjdkNZx Requires: rpmlib(SetVersions) -Requires: libgfortran.so.3(GFORTRAN_1.0) -Requires: libgfortran.so.3(GFORTRAN_1.4) +Requires: libgfortran.so.4(GFORTRAN_7) Requires: libm.so.6(GLIBC_2.0) @@ -23,4 +21,4 @@ Requires: rpmlib(PayloadIsLzma) -Provides: libmct.so.0 = set:md6r1lr1UiZI2uVbFTxNj8eZzb9n205i8LFeWi0AoHeS5ZwKPfpgaylHDmtT32ydsCmylZ5CyZt0yZzqv8iB41cfhDFzZwG5Zz54yqsXbvfs1cZ0ZpZrMQKLnwchw9OHsKgJwCb6dOrEu9qSEq1IGbfQ5I63h71oY0kkOHMzP0zZq4tJPFZobLNRjfdo3BSoXCwhV9B45Z3gumHdrg1NQdYeZ6TieMe1ACmeGYKzMcX9FPJQIXE6Ju2GnAl9BmhtZp19eYJkoNZmvIUdAVAk0UNHsVz0KsujLrmA2wJqZtlT2CX0ywwhFLPdWE2lySWpdO6eybV2v3WHcVr1M8MjCeGH2UOIFaHvk0v7YMwfSO4biNWxQ0N5wJ8dKFAmfUOzUNq1CnRoJkKZJQcuYK6rJf0JyIjQX11HClU1ZC7R8QsGLTUCeZwCh7uc1zHtLRMdZkYKhZyknuMOZlpE3jlC2aiKZmHGUgrfwPeEwLrojDqyqeqhBZ5Zhx64YH2SpgZmZ44FndIa0ZuNpPPAZhq9cZk2wBQHk5LlivCxRiDZkXaW2HrDj5Or7EaPgZl326iKExyHh4M9pWaRl0O3aIyM -Provides: libmpeu.so.0 = set:ldtcdod9NCPy5obGHRmm7RbkOGh8leaKDra75GCwSDyNgr3cI3nIxqXBbjErwZsmv6Zfc2YeWdjlworz6HnPMPyvubjoX5lLWVTRCrUxvzJMMJv47WEBEOwlML0XY1XUZK3ovBH37m4BPZdW82pHnRfxmyGP0kxWbc16bXKmPBZ4NdscQu7YWRxkxyfgZcZI6SXGPaj2vE4FhmzCflt3avnxMrAdLVgoYcxyfXH7M8XKiiP0wSM9VSNZdjT09O5cwpGanLHqeYD2U7lNYuCblFTj8jUYl869MQ5IMMRZaCnOqrDMUtruAZomhc7yPZoZ9HB8u5XmBIBWBKax3lOfe9fBZHjSNRrFAZEx2vJLKGzDlmLgSCQ6uDtKdZfx6w58crYrVLiZFg3XBvs8t6EoANvqZiAQSganTAeR48LkZ2nQ2R6YbMSBiR9rTG1ysViAsDlsyoHBWLw2eZcmQZyOj7Sww9vZi2Z7Km4TWWBuCGHld +Provides: libmct.so.0 = set:md6r1RAZk4xZ38ho21fbUBLAu7tT3o8eZzb9n2cGwN3ATk7t9yA0VzGztNfUeZA6AyoR6lZLmTZ02ydsCe65KGZijhZC0NZxJfApCX2h0PjQpyxJH7kbZnaxlG3dN6TZivfdqb6jfUDZrMQKLnwchw9OHsKAIexeeQsBCJPATgZ2hP6lbwltVxKwRo8W80z7wyiu5us6oQntjI9JPFZobLNRjfdo3BSsIHU9okui9FHQyvwYImrSw2yFrUtWJr97oD0ijbDqBMFX8cPuiWsbdXeGhHDwW5pliFlkDnjA1isUrFMqbgES7bu3VxgCA20fuBHvno5sVQbCdLrmA2wJqZtlT2CX0ywwhFLPdWE2lySWpdO6eybV2v3WHcVr1M8MjCikZin5ohTMSkBRfG6doGx76YNmCXqyKyR3F1yb0rNTiSOhvaFRn01je4fmbMYG6HBOZfCCNzTRoHZ1wmhS9WZ02mdHM3ZteGhXbSPpxWXdKFPfo6tUN4cKSZ6dszfNX6Zbgtp4SuAZbOg7CGc5kAsZdmlNxSu0Dtk18uLrojDqyqeqhB7iXNfiFxQ0YH2SpgZmZ44FndIa0ZuNpPPAZhq9cZk2wBQHImacRaloBfooJQFfJHEbIKtelO2bdxR6E8cmuB9sXYn326iKExyHh4M9pWaRl0O3aIyM0OG +Provides: libmpeu.so.0 = set:mdtcdod9FPZ4ZKHTHzW5wcLM70135zxS6ME1CRwtPj8Zbc1RLorz6HngAJuNvaYwcQMdhbK1Z21IU27m4BPZdW8IgAnWj2J4lNhy7PopTRqcD63uHWR8Goo3hH49L60q1YocuWT0tNj2qdFO878lVJ3j9RVGQX9A9sZqw6E56ob15XayNdgzJnu00wv4twZEQRktYIMffzX22yXYnFP1fnD9vxNGdUHaLkZ2n8j2g7i34Viwr3jA5Zf2wQAdGuCGHld8sumszXqMrE6xkVE8OzdcwDdXPSuVOpFlombsJg8e4UtQrC0qPD5ZIrp2rZiunNqh6fe4Qb3m18ZHOWZ1MZiwu0g05he47f5akUH9kY1GDIZLIOA097IiGrgVXa8KBTof6viozIXa9d30iGEPcldVMLosEORXs9D2oGWZ0c94o0Z4KqOAX46LrPzAidfCfnbhYaSJaxSgUgBYzjOjVZK4Lk7pvd8Hl8rjq3LjTE51ET2AjpzZ3eAe3QZ5Z6ZzDu6iIiMSBiR938phKPaehIRYX4sQffI11jZsnUgJ8KR Provides: libmct = 2.8.3-alt1 --- libmct-debuginfo-2.8.3-alt1.i586.rpm.repo 2014-06-05 05:18:41.000000000 +0000 +++ libmct-debuginfo-2.8.3-alt1.i586.rpm.hasher 2018-11-12 08:11:58.433117331 +0000 @@ -61,6 +61,5 @@ Requires: libmct = 2.8.3-alt1 -Requires: /usr/lib/debug/usr/lib/openmpi/lib/libmpi_f77.so.1.debug -Requires: /usr/lib/debug/usr/lib/openmpi/lib/libmpi_f90.so.1.debug +Requires: /usr/lib/debug/usr/lib/openmpi/lib/libmpi_mpifh.so.20.debug Requires: debug(libc.so.6) -Requires: debug(libgfortran.so.3) +Requires: debug(libgfortran.so.4) Requires: debug(libm.so.6)