* installing *source* package ‘AMIAS’ ... ** package ‘AMIAS’ successfully unpacked and MD5 sums checked ** using staged installation ** libs make[1]: Entering directory '/data/gannet/ripley/R/packages/tests-LTO/AMIAS/src' gfortran -fno-optimize-sibling-calls -fpic -g -O2 -mtune=native -Wall -pedantic -flto -c AMIAS.f90 -o AMIAS.o AMIAS.f90:160:2: 160 | if(adjust == 1 .and. T /= 1) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:788:2: 788 | tempITI(1:m) = tempvec(1:m) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:791:2: 791 | u(:,k)= tempITI | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:819:2: 819 | j = 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:821:2: 821 | tempITI(1:m-T) = tempvec(I(1:(m-T))) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1663:2: 1663 | integer, intent(in) :: adjust_max, T, delta, nvec | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1664:2: 1664 | integer, dimension(T), intent(in out) :: A | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1665:2: 1665 | real(kind = 8), dimension(nvec), intent(in) :: vu | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1666:2: 1666 | integer, dimension(nvec - T), intent(in out) :: I | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1669:2: 1669 | integer :: aj, sumA, sumI, k, j, tmp, tmp2, n_rm, mark, max_index, index | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1670:2: 1670 | real(kind = 8) :: max_num, random | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1680:2: 1680 | Alast = A | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1681:2: 1681 | I = 0 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1682:2: 1682 | dA = 0 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1683:2: 1683 | Akeep = 0 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1684:2: 1684 | existance = 0 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1685:2: 1685 | candidate = 0 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1686:2: 1686 | sumA = 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1687:2: 1687 | call qSortvec(A(1:T), T) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1688:2: 1688 | Akeep(1) = A(1) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1690:2: 1690 | Do k = 1, T-1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1692:2: 1692 | if(dA(k) > delta) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1693:2: 1693 | sumA = sumA + 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1694:2: 1694 | Akeep(sumA) = A(k+1) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1695:2: 1695 | end if | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1697:2: 1697 | aj = 0 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1700:2: 1700 | Do while(T-sumA /= 0 .and. aj < adjust_max) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1701:2: 1701 | Do k = 1, sumA | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1702:2: 1702 | max_num = -1.0 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1703:2: 1703 | max_index = Akeep(k) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1704:2: 1704 | tmp = Akeep(k) - delta | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1707:2: 1707 | if(tmp < 1) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1708:2: 1708 | tmp2 = 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1709:2: 1709 | else if(tmp > nvec) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1710:2: 1710 | tmp2 = nvec | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1711:2: 1711 | end if | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1712:2: 1712 | if(vu(tmp2) > max_num) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1713:2: 1713 | max_num = vu(tmp2) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1714:2: 1714 | max_index = tmp2 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1715:2: 1715 | end if | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1716:2: 1716 | tmp = tmp + 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1717:2: 1717 | end do | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1718:2: 1718 | Akeep(k) = max_index | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1720:2: 1720 | end do | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1722:2: 1722 | Do k = 1, sumA | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1723:2: 1723 | tmp = Akeep(k) - delta | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1724:2: 1724 | Do j = 1, 2*delta+1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1726:2: 1726 | if(tmp < 1) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1727:2: 1727 | tmp2 = 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1728:2: 1728 | else if(tmp > nvec) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1729:2: 1729 | tmp2 = nvec | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1730:2: 1730 | end if | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1731:2: 1731 | existance(tmp2) = 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1732:2: 1732 | tmp = tmp + 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1733:2: 1733 | end do | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1734:2: 1734 | end do | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1735:2: 1735 | sumI = 0 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1736:2: 1736 | candidate = 0 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1737:2: 1737 | Do k = 1, nvec | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1738:2: 1738 | if(existance(k) == 0) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1739:2: 1739 | sumI = sumI + 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1740:2: 1740 | candidate(sumI) = k | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1741:2: 1741 | end if | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1742:2: 1742 | end do | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1744:2: 1744 | n_rm = T - sumA | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1745:2: 1745 | mark = 0 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1746:2: 1746 | if(n_rm>0 .and. sumI>0) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1747:2: 1747 | Do k = 1, n_rm | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1748:2: 1748 | sumA = sumA + 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1749:2: 1749 | max_num = -1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1752:18: 1752 | max_num = vu(candidate(j)) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1753:2: 1753 | max_index = candidate(j) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1755:2: 1755 | end if | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1756:2: 1756 | end do | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1762:2: 1762 | Akeep(sumA) = max_index | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1763:2: 1763 | sumI = sumI - 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1764:2: 1764 | if(sumI == 0)then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1768:2: 1768 | Do j = 1, 2*delta+1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1770:2: 1770 | if(tmp < 1) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1771:2: 1771 | tmp2 = 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1772:2: 1772 | else if(tmp > nvec) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1773:2: 1773 | tmp2 = nvec | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1774:2: 1774 | end if | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1775:2: 1775 | existance(tmp2) = 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1776:2: 1776 | tmp = tmp + 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1777:2: 1777 | end do | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1778:2: 1778 | sumI = 0 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1779:2: 1779 | candidate = 0 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1780:2: 1780 | Do j = 1, nvec | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1781:2: 1781 | if(existance(j) == 0) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1782:2: 1782 | sumI = sumI + 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1783:2: 1783 | candidate(sumI) = j | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1784:2: 1784 | end if | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1785:2: 1785 | end do | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1786:2: 1786 | if(sumI == 0)then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1789:2: 1789 | end do | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1790:2: 1790 | if(sumA == T) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1791:2: 1791 | Do k = 1, T | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1792:2: 1792 | A(k) = Akeep(k) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1793:2: 1793 | end do | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1794:2: 1794 | end if | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1795:2: 1795 | end if | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1796:2: 1796 | call qSortvec(A(1:T), T) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1798:2: 1798 | endmark = .true. | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1799:2: 1799 | Do k = 1,T | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1811:2: 1811 | Akeep = 0 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1812:2: 1812 | Akeep(1) = A(1) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1813:2: 1813 | Do k = 1,T-1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1815:2: 1815 | if(dA(k) > delta) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1816:2: 1816 | sumA = sumA + 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1817:2: 1817 | Akeep(sumA) = A(k+1) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1818:2: 1818 | end if | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1821:2: 1821 | end do | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1822:2: 1822 | Do k = 1, nvec | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1826:26: 1826 | existance(A(k)) = 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1828:2: 1828 | sumI = 0 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1829:2: 1829 | Do k = 1, nvec | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1830:2: 1830 | if(existance(k) == 0) then | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1831:2: 1831 | sumI = sumI + 1 | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1832:19: 1832 | I(sumI) = k | 1 Warning: Nonconforming tab character at (1) [-Wtabs] AMIAS.f90:1670:34: 1670 | real(kind = 8) :: max_num, random | 1 Warning: Unused variable ‘random’ declared at (1) [-Wunused-variable] gcc -I"/data/gannet/ripley/R/LTO/include" -DNDEBUG -I/usr/local/include -fpic -g -O2 -Wall -pedantic -mtune=native -flto -c AMIAS_init.c -o AMIAS_init.o gcc -shared -g -O2 -Wall -pedantic -mtune=native -flto -fpic -L/usr/local/lib64 -o AMIAS.so AMIAS.o AMIAS_init.o -L/data/gannet/ripley/R/LTO/lib -lRlapack -L/data/gannet/ripley/R/LTO/lib -lRblas -lgfortran -lm -lquadmath -lgfortran -lm -lquadmath AMIAS_init.c:399:6: warning: type of ‘comdifusedl0_’ does not match original declaration [-Wlto-type-mismatch] 399 | void F77_SUB(comdifusedl0)( | ^ AMIAS.f90:1220: note: type mismatch in parameter 14 1220 | subroutine comdifusedl0(n,y,beta,alpha,u,T,rho,iter,itermax,gamma,v,Tw,rhow) | AMIAS.f90:1220: note: ‘comdifusedl0’ was previously declared here AMIAS.f90:1220: note: code may be misoptimized unless ‘-fno-strict-aliasing’ is used make[1]: Leaving directory '/data/gannet/ripley/R/packages/tests-LTO/AMIAS/src' installing to /data/gannet/ripley/R/packages/tests-LTO/Libs/AMIAS-lib/00LOCK-AMIAS/00new/AMIAS/libs ** R ** byte-compile and prepare package for lazy loading ** help *** installing help indices ** building package indices ** testing if installed package can be loaded from temporary location ** checking absolute paths in shared objects and dynamic libraries ** testing if installed package can be loaded from final location ** testing if installed package keeps a record of temporary installation path * DONE (AMIAS) Time 0:45.56, 23.27 + 1.13