* installing *source* package ‘gss’ ...
** package ‘gss’ successfully unpacked and MD5 sums checked
** using staged installation
** libs
using C compiler: ‘clang version 19.1.5’
using Fortran compiler: ‘flang-new version 19.1.5’
make[1]: Entering directory '/data/gannet/ripley/R/packages/tests-clang/gss/src'
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c cdennewton.f -o cdennewton.o
./cdennewton.f:103:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:102:7: previous reference to 'dset'
call dset (nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:131:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, xxwt(kk), vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:130:7: previous reference to 'daxpy'
call daxpy (nxis, xxwt(kk), muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:164:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:102:7: previous reference to 'dset'
call dset (nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:172:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis-rkv, 0.d0, cdnew(rkv+1), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:102:7: previous reference to 'dset'
call dset (nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:217:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (nqd, qdwt, 1, wt(1,kk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:169:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:270:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*nx, wtnew, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:169:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:287:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (nqd, qdwt, 1, wt(1,kk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:169:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:304:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #5: incompatible dummy data object shapes
call daxpy (nxis, -1.d0, mrs, 1, rs(1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:130:7: previous reference to 'daxpy'
call daxpy (nxis, xxwt(kk), muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:305:7: warning: Reference to the procedure 'dprmut' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object shapes
call dprmut (rs(1,i), nxis, jpvt, 0)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:170:7: previous reference to 'dprmut'
call dprmut (cdnew, nxis, jpvt, 0)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:307:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nxis, dsqrt(cnt(i)), rs(1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:233:7: previous reference to 'dscal'
call dscal (nxis, .5d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:309:7: warning: Reference to the procedure 'dtrsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dtrsl (v, nxis, nxis, rs(1,i), 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:171:7: previous reference to 'dtrsl'
call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:361:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nqd, 1.d0/dasum(nqd,wt(1,kk),1), wt(1,kk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:233:7: previous reference to 'dscal'
call dscal (nxis, .5d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:384:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:102:7: previous reference to 'dset'
call dset (nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:413:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, xxwt(kk), vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:130:7: previous reference to 'daxpy'
call daxpy (nxis, xxwt(kk), muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:441:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nqd, 1.d0/dasum(nqd,wtnew(1,kk),1), wtnew(1,kk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:233:7: previous reference to 'dscal'
call dscal (nxis, .5d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:465:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (nqd, qdwt, 1, wt(1,kk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:169:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:466:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nqd, 1.d0/dasum(nqd,wt(1,kk),1), wt(1,kk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:233:7: previous reference to 'dscal'
call dscal (nxis, .5d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:524:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*nx, wtnew, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:169:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:539:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (nqd, qdwt, 1, wt(1,kk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:169:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:540:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nqd, 1.d0/dasum(nqd,wt(1,kk),1), wt(1,kk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton.f:233:7: previous reference to 'dscal'
call dscal (nxis, .5d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c cdennewton10.f -o cdennewton10.o
./cdennewton10.f:126:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis, 0.d0, cd, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton10.f:94:7: previous reference to 'dset'
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton10.f:135:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nobs, 1.d0, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton10.f:94:7: previous reference to 'dset'
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton10.f:186:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis, 0.d0, cd, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton10.f:94:7: previous reference to 'dset'
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton10.f:195:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nobs, 1.d0, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton10.f:94:7: previous reference to 'dset'
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton10.f:249:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nxis, rs(i,1), nobs, wk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cdennewton10.f:99:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c copu2newton.f -o copu2newton.o
./copu2newton.f:208:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, -1.d0, vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:211:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, -dble (cnt1(i)), vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:245:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, -1.d0, vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:248:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, -dble (cnt2(i)), vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:293:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, -1.d0, vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:296:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, -dble (cnt3(i)), vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:302:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nxis*nxis, 1.d0/dble(nobs), v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:301:7: previous reference to 'dscal'
call dscal (nxis, 1.d0/dble(nobs), mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:341:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (nxis, muwk, 1, mut(1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:177:7: previous reference to 'dcopy'
call dcopy (nxis, mrs, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:343:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, twt(i), vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:376:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:178:7: previous reference to 'dset'
call dset(nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:384:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis-rkv, 0.d0, cdnew(rkv+1), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:178:7: previous reference to 'dset'
call dset(nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:482:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis, 0.d0, cd, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:178:7: previous reference to 'dset'
call dset(nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:483:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nqd*nqd, 1.d0, eta, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:178:7: previous reference to 'dset'
call dset(nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:484:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*n1, wt1, 1, eta1, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:177:7: previous reference to 'dcopy'
call dcopy (nxis, mrs, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:485:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*n2, wt2, 1, eta2, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:177:7: previous reference to 'dcopy'
call dcopy (nxis, mrs, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:572:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis, 0.d0, cd, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:178:7: previous reference to 'dset'
call dset(nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:573:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nqd*nqd, 1.d0, eta, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:178:7: previous reference to 'dset'
call dset(nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:574:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*n1, wt1, 1, eta1, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:177:7: previous reference to 'dcopy'
call dcopy (nxis, mrs, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:575:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*n2, wt2, 1, eta2, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:177:7: previous reference to 'dcopy'
call dcopy (nxis, mrs, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:627:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nxis, rs0(1,i), 1, muwk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:177:7: previous reference to 'dcopy'
call dcopy (nxis, mrs, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:629:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis, -1.d0, mut(1,tind(i)), 1, muwk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:631:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis, -1.d0, mut, 1, muwk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:640:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis-rkv, 0.d0, muwk(rkv+1), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:178:7: previous reference to 'dset'
call dset(nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:656:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis, -1.d0, mut(1,tind(n0+i)), 1, muwk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:658:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis, -1.d0, mut, 1, muwk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:667:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis-rkv, 0.d0, muwk(rkv+1), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:178:7: previous reference to 'dset'
call dset(nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:683:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis, -1.d0, mut(1,tind(n0+n1+i)), 1, muwk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:685:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis, -1.d0, mut, 1, muwk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:694:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis-rkv, 0.d0, muwk(rkv+1), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:178:7: previous reference to 'dset'
call dset(nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:721:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis, -1.d0, mut(1,tind(n0+n1+n2+i)), 1, muwk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:723:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis, -1.d0, mut, 1, muwk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:207:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:732:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis-rkv, 0.d0, muwk(rkv+1), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./copu2newton.f:178:7: previous reference to 'dset'
call dset(nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dchdc0.f -o dchdc0.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dcoef.f -o dcoef.o
./dcoef.f:26:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (n-2, q(n0+2,n0+1), ldq+1, twk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dcoef.f:19:7: previous reference to 'dcopy'
call dcopy (n-1, q(n0+1,n0+2), ldq+1, twk(1,2), 2)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dcoef.f:29:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (n0, 0.d0, c, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^
./dcoef.f:17:7: previous reference to 'dset'
call dset (n, 10.d0 ** nlaht, twk(2,1), 2)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dcoef.f:31:7: warning: Reference to the procedure 'dqrsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object shapes
call dqrsl (s, lds, nobs, nnull, qraux, c, c, dum, dum, dum, dum,
^
./dcoef.f:27:7: previous reference to 'dqrsl'
call dqrsl (q(n0+2,n0+1), ldq, n-1, n-2, twk, z(n0+2), z(n0+2), du
^
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dcore.f -o dcore.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dcrdr.f -o dcrdr.o
./dcrdr.f:24:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (n-2, q(n0+2,n0+1), ldq+1, wk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dcrdr.f:20:7: previous reference to 'dcopy'
call dcopy (nobs, r(1,j), 1, cr(1,j), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dcrdr.f:29:7: warning: Reference to the procedure 'dqrsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object shapes
call dqrsl (q(n0+2,n0+1), ldq, n-1, n-2, wk, cr(n0+2,j), dum, cr(n
^
./dcrdr.f:27:7: previous reference to 'dqrsl'
call dqrsl (s, lds, nobs, nnull, qraux, cr(1,j), dum, cr(1,j), dum
^
./dcrdr.f:48:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (n-2, q(n0+2,n0+1), ldq+1, wk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dcrdr.f:20:7: previous reference to 'dcopy'
call dcopy (nobs, r(1,j), 1, cr(1,j), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dcrdr.f:51:7: warning: Reference to the procedure 'dqrsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object shapes
call dqrsl (q(n0+2,n0+1), ldq, n-1, n-2, wk, cr(n0+2,j), cr(n0+2,j
^
./dcrdr.f:27:7: previous reference to 'dqrsl'
call dqrsl (s, lds, nobs, nnull, qraux, cr(1,j), dum, cr(1,j), dum
^
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c ddeev.f -o ddeev.o
./ddeev.f:15:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nq*nq, 0.d0, hes, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:14:7: previous reference to 'dset'
call dset (nq, 0.d0, gra, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:48:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (n-j-1, 0.d0, kwk(j+2,j,1), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:14:7: previous reference to 'dset'
call dset (nq, 0.d0, gra, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:81:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (n, 1.d0, work1, 1, t(2,1), 2)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:59:7: previous reference to 'daxpy'
call daxpy (n-j+1, -1.d0, kwk(j,j,i), 1, kwk(j,j,1), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:101:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (n, x, 1, work1, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:32:7: previous reference to 'dcopy'
call dcopy (n-j+1, q(j,j,i), 1, kwk(j,j,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:102:7: warning: Reference to the procedure 'dpbsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #5: incompatible dummy data object shapes
call dpbsl (t, 2, n, 1, work1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:94:7: previous reference to 'dpbsl'
call dpbsl (t, 2, n, 1, kwk(1,j,i))
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:104:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (n, work1, 1, work2, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:32:7: previous reference to 'dcopy'
call dcopy (n-j+1, q(j,j,i), 1, kwk(j,j,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:105:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (n, 2.d0, work2, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:33:7: previous reference to 'dscal'
call dscal (n-j+1, 10.d0 ** theta(i), kwk(j,j,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:107:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (n, x, 1, work2, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:32:7: previous reference to 'dcopy'
call dcopy (n-j+1, q(j,j,i), 1, kwk(j,j,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:129:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (n, kwk(1,j,i), 1, work1, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:32:7: previous reference to 'dcopy'
call dcopy (n-j+1, q(j,j,i), 1, kwk(j,j,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:130:7: warning: Reference to the procedure 'dpbsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #5: incompatible dummy data object shapes
call dpbsl (t, 2, n, 1, work1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:94:7: previous reference to 'dpbsl'
call dpbsl (t, 2, n, 1, kwk(1,j,i))
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:142:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (n, x, 1, work1, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:32:7: previous reference to 'dcopy'
call dcopy (n-j+1, q(j,j,i), 1, kwk(j,j,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:143:7: warning: Reference to the procedure 'dpbsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #5: incompatible dummy data object shapes
call dpbsl (t, 2, n, 1, work1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:94:7: previous reference to 'dpbsl'
call dpbsl (t, 2, n, 1, kwk(1,j,i))
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:182:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (n, x, 1, work1, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:32:7: previous reference to 'dcopy'
call dcopy (n-j+1, q(j,j,i), 1, kwk(j,j,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:183:7: warning: Reference to the procedure 'dpbsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #5: incompatible dummy data object shapes
call dpbsl (t, 2, n, 1, work1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:94:7: previous reference to 'dpbsl'
call dpbsl (t, 2, n, 1, kwk(1,j,i))
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:228:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (n, kwk(1,j,m), 1, work1, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:32:7: previous reference to 'dcopy'
call dcopy (n-j+1, q(j,j,i), 1, kwk(j,j,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:229:7: warning: Reference to the procedure 'dpbsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #5: incompatible dummy data object shapes
call dpbsl (t, 2, n, 1, work1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:94:7: previous reference to 'dpbsl'
call dpbsl (t, 2, n, 1, kwk(1,j,i))
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:264:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nq, dble (nobs), gra, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:33:7: previous reference to 'dscal'
call dscal (n-j+1, 10.d0 ** theta(i), kwk(j,j,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:277:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nq, 1.d0/dble (n), gra, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:33:7: previous reference to 'dscal'
call dscal (n-j+1, 10.d0 ** theta(i), kwk(j,j,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:290:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nq, 1.d0 / dble (nobs), gra, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./ddeev.f:33:7: previous reference to 'dscal'
call dscal (n-j+1, 10.d0 ** theta(i), kwk(j,j,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c deval.f -o deval.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dgold.f -o dgold.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dmcdc.f -o dmcdc.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dmudr0.f -o dmudr0.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dmudr1.f -o dmudr1.o
./dmudr1.f:139:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (n-2, qwk(n0+2,n0+1), ldqr+1, traux, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dmudr1.f:38:7: previous reference to 'dcopy'
call dcopy (nq, theta, 1, thewk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dmudr1.f:140:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (n, qwk(n0+1,n0+1), ldqr+1, twk(2,1), 2)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dmudr1.f:38:7: previous reference to 'dcopy'
call dcopy (nq, theta, 1, thewk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dmudr1.f:141:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (n-1, qwk(n0+1,n0+2), ldqr+1, twk(1,2), 2)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dmudr1.f:38:7: previous reference to 'dcopy'
call dcopy (nq, theta, 1, thewk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dmudr1.f:153:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nq, hes(1,i), 1, hes(1,iwk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dmudr1.f:38:7: previous reference to 'dcopy'
call dcopy (nq, theta, 1, thewk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dmudr1.f:164:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nq, hes(i,1), nq, hes(iwk,1), nq)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dmudr1.f:38:7: previous reference to 'dcopy'
call dcopy (nq, theta, 1, thewk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dmudr1.f:172:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (iwk-i, hes(i+1,i), 1, hes(i,i+1), nq)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dmudr1.f:38:7: previous reference to 'dcopy'
call dcopy (nq, theta, 1, thewk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dnewton.f -o dnewton.o
./dnewton.f:113:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset(nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:112:7: previous reference to 'dset'
call dset(nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:141:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, bwt(m), vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:140:7: previous reference to 'daxpy'
call daxpy (nxis, bwt(m), muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:174:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:112:7: previous reference to 'dset'
call dset(nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:182:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis-rkv, 0.d0, cdnew(rkv+1), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:112:7: previous reference to 'dset'
call dset(nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:244:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nt*nqd, qdwt, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:179:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:305:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*nt, wtnew, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:179:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:320:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nt*nqd, qdwt, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:179:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:346:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #5: incompatible dummy data object shapes
call daxpy (nxis, -1.d0, mrs, 1, rs(1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:140:7: previous reference to 'daxpy'
call daxpy (nxis, bwt(m), muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:347:7: warning: Reference to the procedure 'dprmut' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object shapes
call dprmut (rs(1,i), nxis, jpvt, 0)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:180:7: previous reference to 'dprmut'
call dprmut (cdnew, nxis, jpvt, 0)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:349:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nxis, dsqrt(cnt(i)), rs(1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:269:7: previous reference to 'dscal'
call dscal (nxis, .5d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:351:7: warning: Reference to the procedure 'dtrsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dtrsl (v, nxis, nxis, rs(1,i), 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:181:7: previous reference to 'dtrsl'
call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:353:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis-rkv, 0.d0, rs(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton.f:112:7: previous reference to 'dset'
call dset(nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dnewton10.f -o dnewton10.o
./dnewton10.f:136:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis, 0.d0, cd, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton10.f:99:7: previous reference to 'dset'
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton10.f:197:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis, 0.d0, cd, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton10.f:99:7: previous reference to 'dset'
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton10.f:261:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nxis, rs(i,1), nobs, wk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dnewton10.f:104:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dprmut.f -o dprmut.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dqrslm.f -o dqrslm.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c drkl.f -o drkl.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dset.f -o dset.o
./drkl.f:87:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset(nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./drkl.f:34:7: previous reference to 'dset'
call dset (nxis, 0.d0, mrs, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./drkl.f:115:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, bwt(m), vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./drkl.f:49:7: previous reference to 'daxpy'
call daxpy (nxis, bwt(m), muwk, 1, mrs, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./drkl.f:170:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nt*nqd, qdwt, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./drkl.f:129:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./drkl.f:235:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nt*nqd, wtnew, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./drkl.f:129:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./drkl.f:243:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nt*nqd, qdwt, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./drkl.f:129:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dsidr0.f -o dsidr0.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dsms.f -o dsms.o
./dsms.f:19:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (n, q(n0+1,j), 1, q(j,n0+1), ldq)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dsms.f:16:7: previous reference to 'dcopy'
call dcopy (n-2, q(n0+2,n0+1), ldq+1, wk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dsms.f:27:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (n-1, q(n0+1,n0+2), ldq+1, wk(1,2), 2)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dsms.f:16:7: previous reference to 'dcopy'
call dcopy (n-2, q(n0+2,n0+1), ldq+1, wk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dsms.f:74:7: warning: Reference to the procedure 'dtrsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dtrsl (s, lds, n0, wk, 01, info)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dsms.f:67:7: previous reference to 'dtrsl'
call dtrsl (s, lds, n0, sms(1,j), 01, info)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dsms.f:76:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (n0, wk, 1, sms(i,1), ldsms)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dsms.f:16:7: previous reference to 'dcopy'
call dcopy (n-2, q(n0+2,n0+1), ldq+1, wk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dsms.f:82:7: warning: Reference to the procedure 'dprmut' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object shapes
call dprmut (sms(1,j), n0, jpvt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dsms.f:75:7: previous reference to 'dprmut'
call dprmut (wk, n0, jpvt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dsms.f:88:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (n, q(j,n0+1), ldq, q(n0+1,j), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./dsms.f:16:7: previous reference to 'dcopy'
call dcopy (n-2, q(n0+2,n0+1), ldq+1, wk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dstup.f -o dstup.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dsytr.f -o dsytr.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c dtrev.f -o dtrev.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c gaussq.f -o gaussq.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c hzdaux.f -o hzdaux.o
./hzdaux.f:71:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:21:7: previous reference to 'dset'
call dset (nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:101:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis, 0.d0, mu0, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:21:7: previous reference to 'dset'
call dset (nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:131:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:21:7: previous reference to 'dset'
call dset (nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:155:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis, 1.d0, mu0, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:41:7: previous reference to 'daxpy'
call daxpy (nxis*nxis, 1.d0, vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:166:7: warning: Reference to the procedure 'dprmut' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object shapes
call dprmut (cdnew, nxis, jpvt, 0)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:84:7: previous reference to 'dprmut'
call dprmut (r(1,i), nxis, jpvt, 0)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:167:7: warning: Reference to the procedure 'dtrsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:85:7: previous reference to 'dtrsl'
call dtrsl (v, nxis, nxis, r(1,i), 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:168:7: warning: Reference to the procedure 'dtrsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:85:7: previous reference to 'dtrsl'
call dtrsl (v, nxis, nxis, r(1,i), 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:169:7: warning: Reference to the procedure 'dprmut' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object shapes
call dprmut (cdnew, nxis, jpvt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:84:7: previous reference to 'dprmut'
call dprmut (r(1,i), nxis, jpvt, 0)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:170:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis, 1.d0, cd, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:41:7: previous reference to 'daxpy'
call daxpy (nxis*nxis, 1.d0, vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:190:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis, 0.d0, cd, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:21:7: previous reference to 'dset'
call dset (nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:192:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*nx, qdwt, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:165:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:230:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*nx, wtnew, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:165:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:242:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis, 0.d0, cd, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:21:7: previous reference to 'dset'
call dset (nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:244:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*nx, qdwt, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:165:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:273:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset(nt, 0.d0, wtsum, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:21:7: previous reference to 'dset'
call dset (nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:344:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdaux.f:21:7: previous reference to 'dset'
call dset (nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c hzdnewton.f -o hzdnewton.o
./hzdnewton.f:87:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:86:7: previous reference to 'dset'
call dset (nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:109:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, 1.d0, vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:108:7: previous reference to 'daxpy'
call daxpy (nxis, 1.d0, muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:142:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:86:7: previous reference to 'dset'
call dset (nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:150:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis-rkv, 0.d0, cdnew(rkv+1), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:86:7: previous reference to 'dset'
call dset (nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:196:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*nx, qdwt, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:147:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:245:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*nx, wtnew, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:147:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:259:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*nx, qdwt, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:147:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:272:7: warning: Reference to the procedure 'dprmut' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object shapes
call dprmut (rs(1,i), nxis, jpvt, 0)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:148:7: previous reference to 'dprmut'
call dprmut (cdnew, nxis, jpvt, 0)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:274:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nxis, dsqrt(cnt(i)), rs(1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:208:7: previous reference to 'dscal'
call dscal (nxis, .5d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:276:7: warning: Reference to the procedure 'dtrsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dtrsl (v, nxis, nxis, rs(1,i), 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton.f:149:7: previous reference to 'dtrsl'
call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c hzdnewton10.f -o hzdnewton10.o
./hzdnewton10.f:118:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis, 0.d0, cd, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton10.f:87:7: previous reference to 'dset'
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton10.f:176:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis, 0.d0, cd, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton10.f:87:7: previous reference to 'dset'
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton10.f:201:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nxis, rs(i,1), nt, wk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./hzdnewton10.f:92:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang19/bin/clang -I"/data/gannet/ripley/R/R-clang/include" -DNDEBUG -isystem /usr/local/clang19/include -I/usr/local/clang/include -fpic -O3 -Wall -pedantic -Wp,-D_FORTIFY_SOURCE=3 -c init.c -o init.o
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c llrmnewton.f -o llrmnewton.o
./llrmnewton.f:103:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:102:7: previous reference to 'dset'
call dset (nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:131:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, xxwt(kk), vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:130:7: previous reference to 'daxpy'
call daxpy (nxis, xxwt(kk), muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:164:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:102:7: previous reference to 'dset'
call dset (nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:172:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis-rkv, 0.d0, cdnew(rkv+1), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:102:7: previous reference to 'dset'
call dset (nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:217:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (nqd, qdwt, 1, wt(1,kk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:169:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:277:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*nx, wtnew, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:169:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:294:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (nqd, qdwt, 1, wt(1,kk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:169:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:318:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #5: incompatible dummy data object shapes
call daxpy (nxis, -1.d0, mrs, 1, rs(1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:130:7: previous reference to 'daxpy'
call daxpy (nxis, xxwt(kk), muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:319:7: warning: Reference to the procedure 'dprmut' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object shapes
call dprmut (rs(1,i), nxis, jpvt, 0)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:170:7: previous reference to 'dprmut'
call dprmut (cdnew, nxis, jpvt, 0)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:321:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nxis, dsqrt(cnt(i)), rs(1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:240:7: previous reference to 'dscal'
call dscal (nxis, .5d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:323:7: warning: Reference to the procedure 'dtrsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dtrsl (v, nxis, nxis, rs(1,i), 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:171:7: previous reference to 'dtrsl'
call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:379:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:102:7: previous reference to 'dset'
call dset (nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:406:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, xxwt(kk), vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:130:7: previous reference to 'daxpy'
call daxpy (nxis, xxwt(kk), muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:427:7: warning: Reference to the procedure 'dchdc' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dchdc (v, nxis, nxis, vwk, jpvt, 1, rkv)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:155:7: previous reference to 'dchdc'
call dchdc (v, nxis, nxis, wk, jpvt, 1, rkv)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:436:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:102:7: previous reference to 'dset'
call dset (nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:460:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nqd, 1.d0/dasum(nqd,wt(1,kk),1), wt(1,kk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:240:7: previous reference to 'dscal'
call dscal (nxis, .5d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:483:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nxis*nxis, 0.d0, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:102:7: previous reference to 'dset'
call dset (nxis, 0.d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:512:7: warning: Reference to the procedure 'daxpy' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call daxpy (nxis*nxis, xxwt(kk), vwk, 1, v, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:130:7: previous reference to 'daxpy'
call daxpy (nxis, xxwt(kk), muwk, 1, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:540:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nqd, 1.d0/dasum(nqd,wtnew(1,kk),1), wtnew(1,kk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:240:7: previous reference to 'dscal'
call dscal (nxis, .5d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:570:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nqd, 1.d0/dasum(nqd,wt(1,kk),1), wt(1,kk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:240:7: previous reference to 'dscal'
call dscal (nxis, .5d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:628:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nqd*nx, wtnew, 1, wt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:169:7: previous reference to 'dcopy'
call dcopy (nxis, mu, 1, cdnew, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:649:7: warning: Reference to the procedure 'dscal' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dscal (nqd, 1.d0/dasum(nqd,wt(1,kk),1), wt(1,kk), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./llrmnewton.f:240:7: previous reference to 'dscal'
call dscal (nxis, .5d0, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang19/bin/flang-new -fpic -O2 -pedantic -c reg.f -o reg.o
./reg.f:66:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nn, sr(i,1), nobs, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:47:7: previous reference to 'dcopy'
call dcopy (nn, mu, 1, dc, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:87:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nxi, q, nxi+1, wk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:47:7: previous reference to 'dcopy'
call dcopy (nn, mu, 1, dc, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:113:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dcopy (nxi, wk, 1, q, nxi+1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:47:7: previous reference to 'dcopy'
call dcopy (nn, mu, 1, dc, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:135:7: warning: Reference to the procedure 'dcopy' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
call dcopy (nn, sr(i,1), nobs, mu, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:47:7: previous reference to 'dcopy'
call dcopy (nn, mu, 1, dc, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:161:7: warning: Reference to the procedure 'dprmut' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object shapes
call dprmut (r(1,i), nn, jpvt, 0)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:48:7: previous reference to 'dprmut'
call dprmut (dc, nn, jpvt, 0)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:162:7: warning: Reference to the procedure 'dtrsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dtrsl (v, nn, nn, r(1,i), 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:49:7: previous reference to 'dtrsl'
call dtrsl (v, nn, nn, dc, 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:166:7: warning: Reference to the procedure 'dtrsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dtrsl (v, nn, nn, r(1,i), 01, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:49:7: previous reference to 'dtrsl'
call dtrsl (v, nn, nn, dc, 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:167:7: warning: Reference to the procedure 'dprmut' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object shapes
call dprmut (r(1,i), nn, jpvt, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:48:7: previous reference to 'dprmut'
call dprmut (dc, nn, jpvt, 0)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:171:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nn*nnull, 0.d0, wk, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:43:7: previous reference to 'dset'
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:172:7: warning: Reference to the procedure 'dset' has an implicit interface that is distinct from another reference: incompatible dummy argument #3: incompatible dummy data object shapes
call dset (nnull, 1.d0, wk, nn+1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:43:7: previous reference to 'dset'
call dset (i-rkv-1, 0.d0, v(rkv+1,i), 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:175:7: warning: Reference to the procedure 'dtrsl' has an implicit interface that is distinct from another reference: incompatible dummy argument #4: incompatible dummy data object shapes
call dtrsl (v, nn, nn, wk(1,i), 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reg.f:49:7: previous reference to 'dtrsl'
call dtrsl (v, nn, nn, dc, 11, infowk)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang19/bin/clang -I"/data/gannet/ripley/R/R-clang/include" -DNDEBUG -isystem /usr/local/clang19/include -I/usr/local/clang/include -fpic -O3 -Wall -pedantic -Wp,-D_FORTIFY_SOURCE=3 -c smolyak.c -o smolyak.o
smolyak.c:182:10: warning: variable 'dummy' set but not used [-Wunused-but-set-variable]
182 | double dummy;
| ^
smolyak.c:420:10: warning: variable 'dummy' set but not used [-Wunused-but-set-variable]
420 | double dummy;
| ^
2 warnings generated.
/usr/local/clang19/bin/clang -shared -L/usr/local/clang/lib64 -L/usr/local/clang19/lib -L/usr/local/clang19/lib/x86_64-unknown-linux-gnu -L/usr/local/gcc14/lib64 -L/usr/local/lib64 -o gss.so cdennewton.o cdennewton10.o copu2newton.o dchdc0.o dcoef.o dcore.o dcrdr.o ddeev.o deval.o dgold.o dmcdc.o dmudr0.o dmudr1.o dnewton.o dnewton10.o dprmut.o dqrslm.o drkl.o dset.o dsidr0.o dsms.o dstup.o dsytr.o dtrev.o gaussq.o hzdaux.o hzdnewton.o hzdnewton10.o init.o llrmnewton.o reg.o smolyak.o -L/data/gannet/ripley/R/R-clang/lib -lRlapack -L/data/gannet/ripley/R/R-clang/lib -lRblas -lFortranRuntime -lFortranDecimal -lm -lFortranRuntime -lFortranDecimal -lm
make[1]: Leaving directory '/data/gannet/ripley/R/packages/tests-clang/gss/src'
make[1]: Entering directory '/data/gannet/ripley/R/packages/tests-clang/gss/src'
make[1]: Leaving directory '/data/gannet/ripley/R/packages/tests-clang/gss/src'
installing to /data/gannet/ripley/R/packages/tests-clang/gss.Rcheck/00LOCK-gss/00new/gss/libs
** R
** data
** inst
** 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 (gss)