* installing *source* package ‘BTSR’ ...
** this is package ‘BTSR’ version ‘1.1.0’
** package ‘BTSR’ successfully unpacked and MD5 sums checked
** using staged installation
** libs
using C compiler: ‘clang version 22.1.8 (https://github.com/llvm/llvm-project ca7933e47d3a3451d81e72ac174dcb5aa28b59d1)’
using Fortran compiler: ‘flang version 22.1.8 (https://github.com/llvm/llvm-project ca7933e47d3a3451d81e72ac174dcb5aa28b59d1)’
make[1]: Entering directory '/data/gannet/ripley/R/packages/tests-clang/BTSR/src'
flang-22 -fpic -O2 -pedantic -c DLtest.f90 -o DLtest.o
flang-22 -fpic -O2 -pedantic -c 00_lbfgsb.f90 -o 00_lbfgsb.o
flang-22 -fpic -O2 -pedantic -c 00_lib_utils.f90 -o 00_lib_utils.o
./00_lib_utils.f90:35:38: warning: overflow on multiplication [-Wfolding-exception]
real(dp), parameter :: infinity = 2*huge(1.0d0) ! Infinity
^^^^^^^^^^^^^
flang-22 -fpic -O2 -pedantic -c 01_distrib.f90 -o 01_distrib.o
./01_distrib.f90:246:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
mu => par(1)
^^^^^^^^^^^^
./01_distrib.f90:243:26: Declaration of 'mu'
real(dp), pointer :: mu, nu
^^
./01_distrib.f90:246:5: because: 'par' is an INTENT(IN) dummy argument
mu => par(1)
^^^^^^^^^^^^
./01_distrib.f90:242:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:247:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
nu => par(2)
^^^^^^^^^^^^
./01_distrib.f90:243:30: Declaration of 'nu'
real(dp), pointer :: mu, nu
^^
./01_distrib.f90:247:5: because: 'par' is an INTENT(IN) dummy argument
nu => par(2)
^^^^^^^^^^^^
./01_distrib.f90:242:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:272:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
mu => par(1)
^^^^^^^^^^^^
./01_distrib.f90:269:29: Declaration of 'mu'
real(dp), pointer :: mu, nu
^^
./01_distrib.f90:272:5: because: 'par' is an INTENT(IN) dummy argument
mu => par(1)
^^^^^^^^^^^^
./01_distrib.f90:268:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:273:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
nu => par(2)
^^^^^^^^^^^^
./01_distrib.f90:269:33: Declaration of 'nu'
real(dp), pointer :: mu, nu
^^
./01_distrib.f90:273:5: because: 'par' is an INTENT(IN) dummy argument
nu => par(2)
^^^^^^^^^^^^
./01_distrib.f90:268:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:291:35: warning: Any pointer associated with TARGET dummy argument 'par=' during this call will not be associated with the value of '[REAL(8)::mu(int(t,kind=8)),nu(int(t,kind=8))]' afterwards [-Wnon-target-passed-to-target]
sll = sll + dbeta(y(t), 2, [mu(t), nu(t)], 1)
^^^^^^^^^^^^^^
./01_distrib.f90:425:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
mu => par(1)
^^^^^^^^^^^^^
./01_distrib.f90:422:29: Declaration of 'mu'
real(dp), pointer :: mu, nu, a, b, rho
^^
./01_distrib.f90:425:5: because: 'par' is an INTENT(IN) dummy argument
mu => par(1)
^^^^^^^^^^^^^
./01_distrib.f90:421:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:426:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
nu => par(2)
^^^^^^^^^^^^^
./01_distrib.f90:422:33: Declaration of 'nu'
real(dp), pointer :: mu, nu, a, b, rho
^^
./01_distrib.f90:426:5: because: 'par' is an INTENT(IN) dummy argument
nu => par(2)
^^^^^^^^^^^^^
./01_distrib.f90:421:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:427:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
rho => par(3)
^^^^^^^^^^^^^
./01_distrib.f90:422:43: Declaration of 'rho'
real(dp), pointer :: mu, nu, a, b, rho
^^^
./01_distrib.f90:427:5: because: 'par' is an INTENT(IN) dummy argument
rho => par(3)
^^^^^^^^^^^^^
./01_distrib.f90:421:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:428:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
a => par(4)
^^^^^^^^^^^^^
./01_distrib.f90:422:37: Declaration of 'a'
real(dp), pointer :: mu, nu, a, b, rho
^
./01_distrib.f90:428:5: because: 'par' is an INTENT(IN) dummy argument
a => par(4)
^^^^^^^^^^^^^
./01_distrib.f90:421:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:429:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
b => par(5)
^^^^^^^^^^^^^
./01_distrib.f90:422:40: Declaration of 'b'
real(dp), pointer :: mu, nu, a, b, rho
^
./01_distrib.f90:429:5: because: 'par' is an INTENT(IN) dummy argument
b => par(5)
^^^^^^^^^^^^^
./01_distrib.f90:421:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:461:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
mu => par(1)
^^^^^^^^^^^^^
./01_distrib.f90:457:29: Declaration of 'mu'
real(dp), pointer :: mu, nu, a, b, rho
^^
./01_distrib.f90:461:5: because: 'par' is an INTENT(IN) dummy argument
mu => par(1)
^^^^^^^^^^^^^
./01_distrib.f90:456:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:462:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
nu => par(2)
^^^^^^^^^^^^^
./01_distrib.f90:457:33: Declaration of 'nu'
real(dp), pointer :: mu, nu, a, b, rho
^^
./01_distrib.f90:462:5: because: 'par' is an INTENT(IN) dummy argument
nu => par(2)
^^^^^^^^^^^^^
./01_distrib.f90:456:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:463:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
rho => par(3)
^^^^^^^^^^^^^
./01_distrib.f90:457:43: Declaration of 'rho'
real(dp), pointer :: mu, nu, a, b, rho
^^^
./01_distrib.f90:463:5: because: 'par' is an INTENT(IN) dummy argument
rho => par(3)
^^^^^^^^^^^^^
./01_distrib.f90:456:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:464:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
a => par(4)
^^^^^^^^^^^^^
./01_distrib.f90:457:37: Declaration of 'a'
real(dp), pointer :: mu, nu, a, b, rho
^
./01_distrib.f90:464:5: because: 'par' is an INTENT(IN) dummy argument
a => par(4)
^^^^^^^^^^^^^
./01_distrib.f90:456:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:465:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
b => par(5)
^^^^^^^^^^^^^
./01_distrib.f90:457:40: Declaration of 'b'
real(dp), pointer :: mu, nu, a, b, rho
^
./01_distrib.f90:465:5: because: 'par' is an INTENT(IN) dummy argument
b => par(5)
^^^^^^^^^^^^^
./01_distrib.f90:456:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:511:35: warning: Any pointer associated with TARGET dummy argument 'par=' during this call will not be associated with the value of '[REAL(8)::mu(int(t,kind=8)),nu(int(t,kind=8)),argsd%par,argsd%lower,argsd%upper]' afterwards [-Wnon-target-passed-to-target]
sll = sll + dkuma(y(t), 5, [mu(t), nu(t), argsD%par, argsD%lower, argsD%upper], 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./01_distrib.f90:652:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
mu => par(1)
^^^^^^^^^^^^
./01_distrib.f90:649:26: Declaration of 'mu'
real(dp), pointer :: mu, nu
^^
./01_distrib.f90:652:5: because: 'par' is an INTENT(IN) dummy argument
mu => par(1)
^^^^^^^^^^^^
./01_distrib.f90:648:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:653:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
nu => par(2)
^^^^^^^^^^^^
./01_distrib.f90:649:30: Declaration of 'nu'
real(dp), pointer :: mu, nu
^^
./01_distrib.f90:653:5: because: 'par' is an INTENT(IN) dummy argument
nu => par(2)
^^^^^^^^^^^^
./01_distrib.f90:648:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:681:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
mu => par(1)
^^^^^^^^^^^^
./01_distrib.f90:678:29: Declaration of 'mu'
real(dp), pointer :: mu, nu
^^
./01_distrib.f90:681:5: because: 'par' is an INTENT(IN) dummy argument
mu => par(1)
^^^^^^^^^^^^
./01_distrib.f90:677:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:682:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
nu => par(2)
^^^^^^^^^^^^
./01_distrib.f90:678:33: Declaration of 'nu'
real(dp), pointer :: mu, nu
^^
./01_distrib.f90:682:5: because: 'par' is an INTENT(IN) dummy argument
nu => par(2)
^^^^^^^^^^^^
./01_distrib.f90:677:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:700:37: warning: Any pointer associated with TARGET dummy argument 'par=' during this call will not be associated with the value of '[REAL(8)::mu(int(t,kind=8)),nu(int(t,kind=8))]' afterwards [-Wnon-target-passed-to-target]
sll = sll + d_gamma(y(t), 2, [mu(t), nu(t)], 1)
^^^^^^^^^^^^^^
./01_distrib.f90:797:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
mu => par(1)
^^^^^^^^^^^^^
./01_distrib.f90:794:29: Declaration of 'mu'
real(dp), pointer :: mu, nu, rho
^^
./01_distrib.f90:797:5: because: 'par' is an INTENT(IN) dummy argument
mu => par(1)
^^^^^^^^^^^^^
./01_distrib.f90:793:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:798:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
nu => par(2)
^^^^^^^^^^^^^
./01_distrib.f90:794:33: Declaration of 'nu'
real(dp), pointer :: mu, nu, rho
^^
./01_distrib.f90:798:5: because: 'par' is an INTENT(IN) dummy argument
nu => par(2)
^^^^^^^^^^^^^
./01_distrib.f90:793:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:799:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
rho => par(3)
^^^^^^^^^^^^^
./01_distrib.f90:794:37: Declaration of 'rho'
real(dp), pointer :: mu, nu, rho
^^^
./01_distrib.f90:799:5: because: 'par' is an INTENT(IN) dummy argument
rho => par(3)
^^^^^^^^^^^^^
./01_distrib.f90:793:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:830:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
mu => par(1)
^^^^^^^^^^^^^
./01_distrib.f90:827:29: Declaration of 'mu'
real(dp), pointer :: mu, nu, rho
^^
./01_distrib.f90:830:5: because: 'par' is an INTENT(IN) dummy argument
mu => par(1)
^^^^^^^^^^^^^
./01_distrib.f90:826:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:831:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
nu => par(2)
^^^^^^^^^^^^^
./01_distrib.f90:827:33: Declaration of 'nu'
real(dp), pointer :: mu, nu, rho
^^
./01_distrib.f90:831:5: because: 'par' is an INTENT(IN) dummy argument
nu => par(2)
^^^^^^^^^^^^^
./01_distrib.f90:826:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:832:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
rho => par(3)
^^^^^^^^^^^^^
./01_distrib.f90:827:37: Declaration of 'rho'
real(dp), pointer :: mu, nu, rho
^^^
./01_distrib.f90:832:5: because: 'par' is an INTENT(IN) dummy argument
rho => par(3)
^^^^^^^^^^^^^
./01_distrib.f90:826:37: Declaration of 'par'
real(dp), target, intent(in) :: par(npar)
^^^
./01_distrib.f90:855:33: warning: Any pointer associated with TARGET dummy argument 'par=' during this call will not be associated with the value of '[REAL(8)::mu(int(t,kind=8)),nu(int(t,kind=8)),argsd%par]' afterwards [-Wnon-target-passed-to-target]
sll = sll + duw(y(t), 3, [mu(t), nu(t), argsD%par], 1)
^^^^^^^^^^^^^^^^^^^^^^^^^
./01_distrib.f90:1016:36: warning: Any pointer associated with TARGET dummy argument 'par=' during this call will not be associated with the value of '[REAL(8)::mu(int(t,kind=8))]' afterwards [-Wnon-target-passed-to-target]
sll = sll + dmatsu(y(t), 1, [mu(t)], 1)
^^^^^^^
./01_distrib.f90:1159:33: warning: Any pointer associated with TARGET dummy argument 'par=' during this call will not be associated with the value of '[REAL(8)::mu(int(t,kind=8))]' afterwards [-Wnon-target-passed-to-target]
sll = sll + dul(y(t), 1, [mu(t)], 1)
^^^^^^^
flang-22 -fpic -O2 -pedantic -c 02_main.f90 -o 02_main.o
flang-22 -fpic -O2 -pedantic -c 03_alloc.f90 -o 03_alloc.o
flang-22 -fpic -O2 -pedantic -c 03_Nelder.f90 -o 03_Nelder.o
./03_alloc.f90:196:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
nreg => order(1)
^^^^^^^^^^^^^^^^
./03_alloc.f90:183:29: Declaration of 'nreg'
integer, pointer :: nreg, p, q, inf
^^^^
./03_alloc.f90:196:5: because: 'order' is an INTENT(IN) dummy argument
nreg => order(1)
^^^^^^^^^^^^^^^^
./03_alloc.f90:182:37: Declaration of 'order'
integer, target, intent(in) :: order(4), nfix(6)
^^^^^
./03_alloc.f90:197:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
p => order(2)
^^^^^^^^^^^^^^^^
./03_alloc.f90:183:35: Declaration of 'p'
integer, pointer :: nreg, p, q, inf
^
./03_alloc.f90:197:5: because: 'order' is an INTENT(IN) dummy argument
p => order(2)
^^^^^^^^^^^^^^^^
./03_alloc.f90:182:37: Declaration of 'order'
integer, target, intent(in) :: order(4), nfix(6)
^^^^^
./03_alloc.f90:198:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
q => order(3)
^^^^^^^^^^^^^^^^
./03_alloc.f90:183:38: Declaration of 'q'
integer, pointer :: nreg, p, q, inf
^
./03_alloc.f90:198:5: because: 'order' is an INTENT(IN) dummy argument
q => order(3)
^^^^^^^^^^^^^^^^
./03_alloc.f90:182:37: Declaration of 'order'
integer, target, intent(in) :: order(4), nfix(6)
^^^^^
./03_alloc.f90:199:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
inf => order(4)
^^^^^^^^^^^^^^^^
./03_alloc.f90:183:41: Declaration of 'inf'
integer, pointer :: nreg, p, q, inf
^^^
./03_alloc.f90:199:5: because: 'order' is an INTENT(IN) dummy argument
inf => order(4)
^^^^^^^^^^^^^^^^
./03_alloc.f90:182:37: Declaration of 'order'
integer, target, intent(in) :: order(4), nfix(6)
^^^^^
./03_alloc.f90:200:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
fixa => nfix(1)
^^^^^^^^^^^^^^^^
./03_alloc.f90:184:29: Declaration of 'fixa'
integer, pointer :: fixa, fixb, fixar, fixma, fixd, fixl
^^^^
./03_alloc.f90:200:5: because: 'nfix' is an INTENT(IN) dummy argument
fixa => nfix(1)
^^^^^^^^^^^^^^^^
./03_alloc.f90:182:47: Declaration of 'nfix'
integer, target, intent(in) :: order(4), nfix(6)
^^^^
./03_alloc.f90:201:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
fixb => nfix(2)
^^^^^^^^^^^^^^^^
./03_alloc.f90:184:35: Declaration of 'fixb'
integer, pointer :: fixa, fixb, fixar, fixma, fixd, fixl
^^^^
./03_alloc.f90:201:5: because: 'nfix' is an INTENT(IN) dummy argument
fixb => nfix(2)
^^^^^^^^^^^^^^^^
./03_alloc.f90:182:47: Declaration of 'nfix'
integer, target, intent(in) :: order(4), nfix(6)
^^^^
./03_alloc.f90:202:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
fixar => nfix(3)
^^^^^^^^^^^^^^^^
./03_alloc.f90:184:41: Declaration of 'fixar'
integer, pointer :: fixa, fixb, fixar, fixma, fixd, fixl
^^^^^
./03_alloc.f90:202:5: because: 'nfix' is an INTENT(IN) dummy argument
fixar => nfix(3)
^^^^^^^^^^^^^^^^
./03_alloc.f90:182:47: Declaration of 'nfix'
integer, target, intent(in) :: order(4), nfix(6)
^^^^
./03_alloc.f90:203:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
fixma => nfix(4)
^^^^^^^^^^^^^^^^
./03_alloc.f90:184:48: Declaration of 'fixma'
integer, pointer :: fixa, fixb, fixar, fixma, fixd, fixl
^^^^^
./03_alloc.f90:203:5: because: 'nfix' is an INTENT(IN) dummy argument
fixma => nfix(4)
^^^^^^^^^^^^^^^^
./03_alloc.f90:182:47: Declaration of 'nfix'
integer, target, intent(in) :: order(4), nfix(6)
^^^^
./03_alloc.f90:204:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
fixd => nfix(5)
^^^^^^^^^^^^^^^^
./03_alloc.f90:184:55: Declaration of 'fixd'
integer, pointer :: fixa, fixb, fixar, fixma, fixd, fixl
^^^^
./03_alloc.f90:204:5: because: 'nfix' is an INTENT(IN) dummy argument
fixd => nfix(5)
^^^^^^^^^^^^^^^^
./03_alloc.f90:182:47: Declaration of 'nfix'
integer, target, intent(in) :: order(4), nfix(6)
^^^^
./03_alloc.f90:205:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
fixl => nfix(6)
^^^^^^^^^^^^^^^^
./03_alloc.f90:184:61: Declaration of 'fixl'
integer, pointer :: fixa, fixb, fixar, fixma, fixd, fixl
^^^^
./03_alloc.f90:205:5: because: 'nfix' is an INTENT(IN) dummy argument
fixl => nfix(6)
^^^^^^^^^^^^^^^^
./03_alloc.f90:182:47: Declaration of 'nfix'
integer, target, intent(in) :: order(4), nfix(6)
^^^^
./03_alloc.f90:327:40: warning: Any pointer associated with TARGET dummy argument 'order=' during this call must not be used afterwards, as 'order(int(part,kind=8),::1_8)' is not a target [-Wnon-target-passed-to-target]
call allocate_model_part(model, order(part,:), xreg, xstart(part,1:max(1, order(part,1))), &
^^^^^^^^^^^^^
./03_alloc.f90:328:27: warning: Any pointer associated with TARGET dummy argument 'nfix=' during this call must not be used afterwards, as 'nfix(int(part,kind=8),::1_8)' is not a target [-Wnon-target-passed-to-target]
xregar(part), nfix(part,:), alpha(part), flagsb(part, 1:ib), fvbeta(part, 1:ib), &
^^^^^^^^^^^^
flang-22 -fpic -O2 -pedantic -c 04_base.f90 -o 04_base.o
./04_base.f90:265:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
a => args%lower ! lower bound for x
^^^^^^^^^^^^^^^
./04_base.f90:263:26: Declaration of 'a'
real(dp), pointer :: a, b, ctt, power
^
./04_base.f90:265:5: because: 'args' is an INTENT(IN) dummy argument
a => args%lower ! lower bound for x
^^^^^^^^^^^^^^^
./04_base.f90:260:43: Declaration of 'args'
type(argslink), target, intent(in) :: args
^^^^
./04_base.f90:266:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
b => args%upper ! upper bound for x
^^^^^^^^^^^^^^^
./04_base.f90:263:29: Declaration of 'b'
real(dp), pointer :: a, b, ctt, power
^
./04_base.f90:266:5: because: 'args' is an INTENT(IN) dummy argument
b => args%upper ! upper bound for x
^^^^^^^^^^^^^^^
./04_base.f90:260:43: Declaration of 'args'
type(argslink), target, intent(in) :: args
^^^^
./04_base.f90:267:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
ctt => args%par(1)
^^^^^^^^^^^^^^^^^^
./04_base.f90:263:32: Declaration of 'ctt'
real(dp), pointer :: a, b, ctt, power
^^^
./04_base.f90:267:5: because: 'args' is an INTENT(IN) dummy argument
ctt => args%par(1)
^^^^^^^^^^^^^^^^^^
./04_base.f90:260:43: Declaration of 'args'
type(argslink), target, intent(in) :: args
^^^^
./04_base.f90:268:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
power => args%par(2)
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:263:37: Declaration of 'power'
real(dp), pointer :: a, b, ctt, power
^^^^^
./04_base.f90:268:5: because: 'args' is an INTENT(IN) dummy argument
power => args%par(2)
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:260:43: Declaration of 'args'
type(argslink), target, intent(in) :: args
^^^^
./04_base.f90:324:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
a => args%lower ! lower bound for x
^^^^^^^^^^^^^^^
./04_base.f90:322:26: Declaration of 'a'
real(dp), pointer :: a, b, ctt, power
^
./04_base.f90:324:5: because: 'args' is an INTENT(IN) dummy argument
a => args%lower ! lower bound for x
^^^^^^^^^^^^^^^
./04_base.f90:319:43: Declaration of 'args'
type(argslink), target, intent(in) :: args
^^^^
./04_base.f90:325:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
b => args%upper ! upper bound for x
^^^^^^^^^^^^^^^
./04_base.f90:322:29: Declaration of 'b'
real(dp), pointer :: a, b, ctt, power
^
./04_base.f90:325:5: because: 'args' is an INTENT(IN) dummy argument
b => args%upper ! upper bound for x
^^^^^^^^^^^^^^^
./04_base.f90:319:43: Declaration of 'args'
type(argslink), target, intent(in) :: args
^^^^
./04_base.f90:326:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
ctt => args%par(1)
^^^^^^^^^^^^^^^^^^
./04_base.f90:322:32: Declaration of 'ctt'
real(dp), pointer :: a, b, ctt, power
^^^
./04_base.f90:326:5: because: 'args' is an INTENT(IN) dummy argument
ctt => args%par(1)
^^^^^^^^^^^^^^^^^^
./04_base.f90:319:43: Declaration of 'args'
type(argslink), target, intent(in) :: args
^^^^
./04_base.f90:327:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
power => args%par(2)
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:322:37: Declaration of 'power'
real(dp), pointer :: a, b, ctt, power
^^^^^
./04_base.f90:327:5: because: 'args' is an INTENT(IN) dummy argument
power => args%par(2)
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:319:43: Declaration of 'args'
type(argslink), target, intent(in) :: args
^^^^
./04_base.f90:575:32: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'argslg(1_8)' is not a target [-Wnon-target-passed-to-target]
mu(t) = linkinv(eta(t), argsLg(1))
^^^^^^^^^
./04_base.f90:672:33: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'argslg(2_8)' is not a target [-Wnon-target-passed-to-target]
gwt(t) = linkinv(eta(t), argsLg(2)) ! g(wt) = g21^{-1}(eta)
^^^^^^^^^
./04_base.f90:673:32: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'argslg(1_8)' is not a target [-Wnon-target-passed-to-target]
wt(t) = linkinv(gwt(t), argsLg(1)) ! wt = g^{-1}(g(wt))
^^^^^^^^^
./04_base.f90:762:38: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'model%pt(1_8)%linkg(2_8)' is not a target [-Wnon-target-passed-to-target]
muhat(t) = linkinv(etahat(t), model%pt(1)%linkg(2))
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:857:38: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'model%pt(2_8)%linkg(2_8)' is not a target [-Wnon-target-passed-to-target]
gwhat(t) = linkinv(etahat(t), model%pt(2)%linkg(2))
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:859:36: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'model%pt(2_8)%linkg(1_8)' is not a target [-Wnon-target-passed-to-target]
what(t) = linkinv(gwhat(t), model%pt(2)%linkg(1))
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:893:42: warning: Any pointer associated with TARGET dummy argument 'forecast=' during this call must not be used afterwards, as 'forecast(::1_8,1_8:2_8:1_8)' is not a target [-Wnon-target-passed-to-target]
call mu_forecast(model, nnew, xnew1, forecast(:, 1:2))
^^^^^^^^^^^^^^^^
./04_base.f90:894:42: warning: Any pointer associated with TARGET dummy argument 'forecast=' during this call must not be used afterwards, as 'forecast(::1_8,3_8:5_8:1_8)' is not a target [-Wnon-target-passed-to-target]
call nu_forecast(model, nnew, xnew2, forecast(:, 3:5))
^^^^^^^^^^^^^^^^
./04_base.f90:1239:17: warning: Value of local variable 'drdeta' is never used [-Wunused-variable]
real(dp) :: drdeta
^^^^^^
./04_base.f90:1241:17: warning: Value of local variable 'j' is never used [-Wunused-variable]
integer :: j, k, t
^
./04_base.f90:1241:20: warning: Value of local variable 'k' is never used [-Wunused-variable]
integer :: j, k, t
^
./04_base.f90:1253:46: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'model%pt(2_8)%linkg(4_8)' is not a target [-Wnon-target-passed-to-target]
dgdr(t) = diflink(model%cts(1)%et(t), model%pt(2)%linkg(4))
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1259:48: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'model%pt(2_8)%linkg(3_8)' is not a target [-Wnon-target-passed-to-target]
dgg(t) = diflink(model%cts(2)%gw(t), model%pt(2)%linkg(3))
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1260:57: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'model%pt(2_8)%linkg(2_8)' is not a target [-Wnon-target-passed-to-target]
dgg(t) = dgg(t) / diflink(model%cts(2)%gw(t), model%pt(2)%linkg(2))
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1333:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
n => model%n
^^^^^^^^^^^^^^
./04_base.f90:1324:28: Declaration of 'n'
integer, pointer :: m, n, inf
^
./04_base.f90:1333:5: because: 'model' is an INTENT(IN) dummy argument
n => model%n
^^^^^^^^^^^^^^
./04_base.f90:1319:44: Declaration of 'model'
type(argsModel), target, intent(in) :: model
^^^^^
./04_base.f90:1334:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
m => model%m
^^^^^^^^^^^^^^
./04_base.f90:1324:25: Declaration of 'm'
integer, pointer :: m, n, inf
^
./04_base.f90:1334:5: because: 'model' is an INTENT(IN) dummy argument
m => model%m
^^^^^^^^^^^^^^
./04_base.f90:1319:44: Declaration of 'model'
type(argsModel), target, intent(in) :: model
^^^^^
./04_base.f90:1335:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
inf => model%pt(2)%inf
^^^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1324:31: Declaration of 'inf'
integer, pointer :: m, n, inf
^^^
./04_base.f90:1335:5: because: 'model' is an INTENT(IN) dummy argument
inf => model%pt(2)%inf
^^^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1319:44: Declaration of 'model'
type(argsModel), target, intent(in) :: model
^^^^^
./04_base.f90:1357:8: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
dalpha2 => model%SI%deta(2, 2)%dalpha(:, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1325:26: Declaration of 'dalpha2'
real(dp), pointer :: dalpha2(:), dd2(:), dlambda2(:)
^^^^^^^
./04_base.f90:1357:8: because: 'model' is an INTENT(IN) dummy argument
dalpha2 => model%SI%deta(2, 2)%dalpha(:, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1319:44: Declaration of 'model'
type(argsModel), target, intent(in) :: model
^^^^^
./04_base.f90:1372:8: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
dbeta2 => model%SI%deta(2, 2)%dbeta
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1326:26: Declaration of 'dbeta2'
real(dp), pointer :: dbeta2(:,:), dar2(:,:), dma2(:,:)
^^^^^^
./04_base.f90:1372:8: because: 'model' is an INTENT(IN) dummy argument
dbeta2 => model%SI%deta(2, 2)%dbeta
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1319:44: Declaration of 'model'
type(argsModel), target, intent(in) :: model
^^^^^
./04_base.f90:1393:8: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
dar2 => model%SI%deta(2, 2)%dar
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1326:39: Declaration of 'dar2'
real(dp), pointer :: dbeta2(:,:), dar2(:,:), dma2(:,:)
^^^^
./04_base.f90:1393:8: because: 'model' is an INTENT(IN) dummy argument
dar2 => model%SI%deta(2, 2)%dar
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1319:44: Declaration of 'model'
type(argsModel), target, intent(in) :: model
^^^^^
./04_base.f90:1416:8: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
dma2 => model%SI%deta(2, 2)%dma
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1326:50: Declaration of 'dma2'
real(dp), pointer :: dbeta2(:,:), dar2(:,:), dma2(:,:)
^^^^
./04_base.f90:1416:8: because: 'model' is an INTENT(IN) dummy argument
dma2 => model%SI%deta(2, 2)%dma
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1319:44: Declaration of 'model'
type(argsModel), target, intent(in) :: model
^^^^^
./04_base.f90:1441:8: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
dd2 => model%SI%deta(2, 2)%dd(:, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1325:38: Declaration of 'dd2'
real(dp), pointer :: dalpha2(:), dd2(:), dlambda2(:)
^^^
./04_base.f90:1441:8: because: 'model' is an INTENT(IN) dummy argument
dd2 => model%SI%deta(2, 2)%dd(:, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1319:44: Declaration of 'model'
type(argsModel), target, intent(in) :: model
^^^^^
./04_base.f90:1464:8: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
dlambda2 => model%SI%deta(2, 2)%dlambda(:, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1325:46: Declaration of 'dlambda2'
real(dp), pointer :: dalpha2(:), dd2(:), dlambda2(:)
^^^^^^^^
./04_base.f90:1464:8: because: 'model' is an INTENT(IN) dummy argument
dlambda2 => model%SI%deta(2, 2)%dlambda(:, 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./04_base.f90:1319:44: Declaration of 'model'
type(argsModel), target, intent(in) :: model
^^^^^
./04_base.f90:1618:56: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'argsl(2_8)' is not a target [-Wnon-target-passed-to-target]
if (skip(1) == 0) T1(i) = 1.d0 / diflink(mu(i), argsL(2)) ! g_11'(mu)
^^^^^^^^
./04_base.f90:1620:30: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'argsl(4_8)' is not a target [-Wnon-target-passed-to-target]
a = diflink(nu(i), argsL(4)) ! g'(nu)
^^^^^^^^
./04_base.f90:1621:32: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'argsl(5_8)' is not a target [-Wnon-target-passed-to-target]
b = diflink(gnut(i), argsL(5)) ! g_21'(gnut)
^^^^^^^^
./04_base.f90:1945:21: warning: Any pointer associated with TARGET dummy argument 'model=' during this call must not be used afterwards, as 'model' is not a target [-Wnon-target-passed-to-target]
call deta1_drho(model, vc1)
^^^^^
./04_base.f90:1949:24: warning: Any pointer associated with TARGET dummy argument 'model=' during this call must not be used afterwards, as 'model' is not a target [-Wnon-target-passed-to-target]
call deta2_dlambda(model)
^^^^^
./04_base.f90:2317:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
iprint => cf1(1)
^^^^^^^^^^^^^^^^
./04_base.f90:2304:32: Declaration of 'iprint'
integer, pointer :: iprint, maxit
^^^^^^
./04_base.f90:2317:5: because: 'cf1' is an INTENT(IN) dummy argument
iprint => cf1(1)
^^^^^^^^^^^^^^^^
./04_base.f90:2303:39: Declaration of 'cf1'
integer, target, intent(in) :: cf1(3)
^^^
./04_base.f90:2318:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
maxit => cf1(2)
^^^^^^^^^^^^^^^^
./04_base.f90:2304:40: Declaration of 'maxit'
integer, pointer :: iprint, maxit
^^^^^
./04_base.f90:2318:5: because: 'cf1' is an INTENT(IN) dummy argument
maxit => cf1(2)
^^^^^^^^^^^^^^^^
./04_base.f90:2303:39: Declaration of 'cf1'
integer, target, intent(in) :: cf1(3)
^^^
./04_base.f90:2319:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
stopcr => cf2(1)
^^^^^^^^^^^^^^^^
./04_base.f90:2310:32: Declaration of 'stopcr'
real(dp), pointer :: stopcr
^^^^^^
./04_base.f90:2319:5: because: 'cf2' is an INTENT(IN) dummy argument
stopcr => cf2(1)
^^^^^^^^^^^^^^^^
./04_base.f90:2309:37: Declaration of 'cf2'
real(dp), target, intent(in) :: cf2(nc2)
^^^
./04_base.f90:2419:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
iprint => cf1(1)
^^^^^^^^^^^^^^^^
./04_base.f90:2399:32: Declaration of 'iprint'
integer, pointer :: iprint, maxit
^^^^^^
./04_base.f90:2419:5: because: 'cf1' is an INTENT(IN) dummy argument
iprint => cf1(1)
^^^^^^^^^^^^^^^^
./04_base.f90:2398:39: Declaration of 'cf1'
integer, target, intent(in) :: cf1(3)
^^^
./04_base.f90:2420:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
maxit => cf1(2)
^^^^^^^^^^^^^^^^
./04_base.f90:2399:40: Declaration of 'maxit'
integer, pointer :: iprint, maxit
^^^^^
./04_base.f90:2420:5: because: 'cf1' is an INTENT(IN) dummy argument
maxit => cf1(2)
^^^^^^^^^^^^^^^^
./04_base.f90:2398:39: Declaration of 'cf1'
integer, target, intent(in) :: cf1(3)
^^^
./04_base.f90:2421:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
factr => cf2(1)
^^^^^^^^^^^^^^^^
./04_base.f90:2403:32: Declaration of 'factr'
real(dp), pointer :: factr, pgtol
^^^^^
./04_base.f90:2421:5: because: 'cf2' is an INTENT(IN) dummy argument
factr => cf2(1)
^^^^^^^^^^^^^^^^
./04_base.f90:2402:37: Declaration of 'cf2'
real(dp), target, intent(in) :: cf2(nc2)
^^^
./04_base.f90:2422:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
pgtol => cf2(2)
^^^^^^^^^^^^^^^^
./04_base.f90:2403:39: Declaration of 'pgtol'
real(dp), pointer :: factr, pgtol
^^^^^
./04_base.f90:2422:5: because: 'cf2' is an INTENT(IN) dummy argument
pgtol => cf2(2)
^^^^^^^^^^^^^^^^
./04_base.f90:2402:37: Declaration of 'cf2'
real(dp), target, intent(in) :: cf2(nc2)
^^^
./04_base.f90:3207:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
sco => extras(1)
^^^^^^^^^^^^^^^^^^
./04_base.f90:3192:30: Declaration of 'sco'
integer, pointer :: sco, info, extra
^^^
./04_base.f90:3207:5: because: 'extras' is an INTENT(IN) dummy argument
sco => extras(1)
^^^^^^^^^^^^^^^^^^
./04_base.f90:3191:37: Declaration of 'extras'
integer, target, intent(in) :: extras(3)
^^^^^^
./04_base.f90:3208:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
info => extras(2)
^^^^^^^^^^^^^^^^^^
./04_base.f90:3192:35: Declaration of 'info'
integer, pointer :: sco, info, extra
^^^^
./04_base.f90:3208:5: because: 'extras' is an INTENT(IN) dummy argument
info => extras(2)
^^^^^^^^^^^^^^^^^^
./04_base.f90:3191:37: Declaration of 'extras'
integer, target, intent(in) :: extras(3)
^^^^^^
./04_base.f90:3209:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
extra => extras(3)
^^^^^^^^^^^^^^^^^^
./04_base.f90:3192:41: Declaration of 'extra'
integer, pointer :: sco, info, extra
^^^^^
./04_base.f90:3209:5: because: 'extras' is an INTENT(IN) dummy argument
extra => extras(3)
^^^^^^^^^^^^^^^^^^
./04_base.f90:3191:37: Declaration of 'extras'
integer, target, intent(in) :: extras(3)
^^^^^^
./04_base.f90:3364:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
ystart => tstart(1)
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:3328:26: Declaration of 'ystart'
real(dp), pointer :: ystart, e2start, vtstart
^^^^^^
./04_base.f90:3364:5: because: 'tstart' is an INTENT(IN) dummy argument
ystart => tstart(1)
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:3324:40: Declaration of 'tstart'
real(dp), target, intent(in) :: tstart(3)
^^^^^^
./04_base.f90:3365:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
vtstart => tstart(2)
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:3328:43: Declaration of 'vtstart'
real(dp), pointer :: ystart, e2start, vtstart
^^^^^^^
./04_base.f90:3365:5: because: 'tstart' is an INTENT(IN) dummy argument
vtstart => tstart(2)
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:3324:40: Declaration of 'tstart'
real(dp), target, intent(in) :: tstart(3)
^^^^^^
./04_base.f90:3366:5: warning: Pointer target is not a definable variable [-Wpointer-to-undefinable]
e2start => tstart(3)
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:3328:34: Declaration of 'e2start'
real(dp), pointer :: ystart, e2start, vtstart
^^^^^^^
./04_base.f90:3366:5: because: 'tstart' is an INTENT(IN) dummy argument
e2start => tstart(3)
^^^^^^^^^^^^^^^^^^^^
./04_base.f90:3324:40: Declaration of 'tstart'
real(dp), target, intent(in) :: tstart(3)
^^^^^^
./04_base.f90:3495:33: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'argslg(int(i_mu,kind=8))' is not a target [-Wnon-target-passed-to-target]
mu(t) = linkinv(eta1(t), argsLg(i_mu))
^^^^^^^^^^^^
./04_base.f90:3529:37: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'argslg(int(i_gnu,kind=8))' is not a target [-Wnon-target-passed-to-target]
gnu(t) = linkinv(eta2(t), argsLg(i_gnu))
^^^^^^^^^^^^^
./04_base.f90:3530:35: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'argslg(int(i_nu,kind=8))' is not a target [-Wnon-target-passed-to-target]
nu(t) = linkinv(gnu(t), argsLg(i_nu))
^^^^^^^^^^^^
./04_base.f90:3548:36: warning: Any pointer associated with TARGET dummy argument 'par=' during this call will not be associated with the value of '[REAL(8)::mu(int(t,kind=8)),nu(int(t,kind=8)),pdist]' afterwards [-Wnon-target-passed-to-target]
yt(t) = rdist%rdist(np + 2, [mu(t), nu(t), pdist])
^^^^^^^^^^^^^^^^^^^^^
flang-22 -fpic -O2 -pedantic -c 05_barc.f90 -o 05_barc.o
flang-22 -fpic -O2 -pedantic -c 05_generic.f90 -o 05_generic.o
./05_generic.f90:48:31: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'args' is not a target [-Wnon-target-passed-to-target]
x(i) = linkinv(gx(i), args)
^^^^
./05_generic.f90:53:34: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'args' is not a target [-Wnon-target-passed-to-target]
dlink(i) = diflink(x(i), args)
^^^^
./05_generic.f90:122:72: warning: Any pointer associated with TARGET dummy argument 'order=' during this call must not be used afterwards, as 'order' is not a target [-Wnon-target-passed-to-target]
call sim_model(rdist, length(2), length(1), np, pdist, onlymu(code), order, xregar, alpha, beta, &
^^^^^
./05_generic.f90:123:64: warning: Any pointer associated with TARGET dummy argument 'tstart=' during this call must not be used afterwards, as 'tstart' is not a target [-Wnon-target-passed-to-target]
ar, ma, d, lambda, link, lconfig, xreg1, xreg2, xstart, tstart, ts, rev)
^^^^^^
./05_generic.f90:123:72: warning: Any pointer associated with TARGET dummy argument 'ts=' during this call must not be used afterwards, as 'ts' is not a target [-Wnon-target-passed-to-target]
ar, ma, d, lambda, link, lconfig, xreg1, xreg2, xstart, tstart, ts, rev)
^^
./05_generic.f90:250:51: warning: Any pointer associated with TARGET dummy argument 'ts=' during this call must not be used afterwards, as 'ts(::1_8,4_8:10_8:1_8)' is not a target [-Wnon-target-passed-to-target]
call final_model(model, sum(npar), par, length, ts(:,4:10), order(:,1), xnew1, xnew2, &
^^^^^^^^^^
./05_generic.f90:251:35: warning: Any pointer associated with TARGET dummy argument 'extras=' during this call must not be used afterwards, as 'extras(3_8:5_8:1_8)' is not a target [-Wnon-target-passed-to-target]
forecast, order(:,4), sll, extras(3:5), U, K, nd, Dg, T, E, h)
^^^^^^^^^^^
./05_generic.f90:347:20: warning: Any pointer associated with TARGET dummy argument 'loglik=' during this call must not be used afterwards, as 'loglik' is not a target [-Wnon-target-passed-to-target]
call optim%optim(loglik, model, sum(npar), par, nbd, bounds, sll, U, cf, nc2, cf2, neval, conv)
^^^^^^
./05_generic.f90:347:72: warning: Any pointer associated with TARGET dummy argument 'cf1=' during this call must not be used afterwards, as 'cf' is not a target [-Wnon-target-passed-to-target]
call optim%optim(loglik, model, sum(npar), par, nbd, bounds, sll, U, cf, nc2, cf2, neval, conv)
^^
./05_generic.f90:347:81: warning: Any pointer associated with TARGET dummy argument 'cf2=' during this call must not be used afterwards, as 'cf2' is not a target [-Wnon-target-passed-to-target]
call optim%optim(loglik, model, sum(npar), par, nbd, bounds, sll, U, cf, nc2, cf2, neval, conv)
^^^
./05_generic.f90:351:51: warning: Any pointer associated with TARGET dummy argument 'ts=' during this call must not be used afterwards, as 'ts(::1_8,4_8:10_8:1_8)' is not a target [-Wnon-target-passed-to-target]
call final_model(model, sum(npar), par, length, ts(:,4:10), order(:,1), xnew1, xnew2, &
^^^^^^^^^^
./05_generic.f90:352:35: warning: Any pointer associated with TARGET dummy argument 'extras=' during this call must not be used afterwards, as 'extras(3_8:5_8:1_8)' is not a target [-Wnon-target-passed-to-target]
forecast, order(:,4), sll, extras(3:5), U, K, nd, Dg, T, E, h)
^^^^^^^^^^^
./05_barc.f90:153:54: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'model%pt(1_8)%linkg(2_8)' is not a target [-Wnon-target-passed-to-target]
model%cts(1)%w(1) = linkinv(model%cts(1)%eta(1), model%pt(1)%linkg(2))
^^^^^^^^^^^^^^^^^^^^
./05_barc.f90:169:57: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'model%pt(1_8)%linkg(2_8)' is not a target [-Wnon-target-passed-to-target]
model%cts(1)%w(t) = linkinv(model%cts(1)%eta(t), model%pt(1)%linkg(2))
^^^^^^^^^^^^^^^^^^^^
./05_barc.f90:235:38: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'model%pt(1_8)%linkg(2_8)' is not a target [-Wnon-target-passed-to-target]
muhat(t) = linkinv(etahat(t), model%pt(1)%linkg(2))
^^^^^^^^^^^^^^^^^^^^
./05_barc.f90:238:47: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'model%pt(1_8)%linkg(3_8)' is not a target [-Wnon-target-passed-to-target]
gy(model%n + t) = linkinv(muhat(t), model%pt(1)%linkg(3))
^^^^^^^^^^^^^^^^^^^^
./05_barc.f90:276:17: warning: Value of uninitialized local variable 'xreg2' is used but never defined [-Wused-undefined-variable]
real(dp) :: xreg2(n, max(1, order(2, 1)))
^^^^^
./05_barc.f90:560:27: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'argsl(1_8)' is not a target [-Wnon-target-passed-to-target]
mu(1) = linkinv(eta(1), argsL(1))
^^^^^^^^
./05_barc.f90:566:26: warning: Any pointer associated with TARGET dummy argument 'par=' during this call will not be associated with the value of '[REAL(8)::mu(1_8),nu]' afterwards [-Wnon-target-passed-to-target]
yt(1) = rdist%rdist(2, [mu(1), nu])
^^^^^^^^^^^
./05_barc.f90:604:30: warning: Any pointer associated with TARGET dummy argument 'args=' during this call must not be used afterwards, as 'argsl(1_8)' is not a target [-Wnon-target-passed-to-target]
mu(t) = linkinv(eta(t), argsL(1))
^^^^^^^^
./05_barc.f90:612:29: warning: Any pointer associated with TARGET dummy argument 'par=' during this call will not be associated with the value of '[REAL(8)::mu(int(t,kind=8)),nu]' afterwards [-Wnon-target-passed-to-target]
yt(t) = rdist%rdist(2, [mu(t), nu])
^^^^^^^^^^^
./05_barc.f90:692:52: warning: Any pointer associated with TARGET dummy argument 'forecast=' during this call must not be used afterwards, as 'forecast' is not a target [-Wnon-target-passed-to-target]
call mu_forecast_barc(model, length(2), xnew, forecast)
^^^^^^^^
./05_barc.f90:757:20: warning: Any pointer associated with TARGET dummy argument 'loglik=' during this call must not be used afterwards, as 'loglik' is not a target [-Wnon-target-passed-to-target]
call optim%optim(loglik, model, sum(npar), par, nbd, bounds, sll, U, cf, nc2, cf2, neval, conv)
^^^^^^
./05_barc.f90:757:72: warning: Any pointer associated with TARGET dummy argument 'cf1=' during this call must not be used afterwards, as 'cf' is not a target [-Wnon-target-passed-to-target]
call optim%optim(loglik, model, sum(npar), par, nbd, bounds, sll, U, cf, nc2, cf2, neval, conv)
^^
./05_barc.f90:757:81: warning: Any pointer associated with TARGET dummy argument 'cf2=' during this call must not be used afterwards, as 'cf2' is not a target [-Wnon-target-passed-to-target]
call optim%optim(loglik, model, sum(npar), par, nbd, bounds, sll, U, cf, nc2, cf2, neval, conv)
^^^
./05_barc.f90:774:52: warning: Any pointer associated with TARGET dummy argument 'forecast=' during this call must not be used afterwards, as 'forecast' is not a target [-Wnon-target-passed-to-target]
call mu_forecast_barc(model, length(2), xnew, forecast)
^^^^^^^^
./05_barc.f90:821:49: warning: Any pointer associated with TARGET dummy argument 'forecast=' during this call must not be used afterwards, as 'forecast' is not a target [-Wnon-target-passed-to-target]
call mu_forecast_barc(model, length(2), xnew, forecast)
^^^^^^^^
clang-22 -std=gnu23 -I"/data/gannet/ripley/R/R-clang/include" -DNDEBUG -isystem /usr/local/clang22/include -I/usr/local/clang/include -fpic -O3 -Wall -pedantic -Wp,-D_FORTIFY_SOURCE=3 -c BTSR_init.c -o BTSR_init.o
clang-22 -std=gnu23 -shared -L/usr/local/clang/lib64 -L/usr/local/clang22/lib -L/usr/local/clang22/lib/x86_64-unknown-linux-gnu -L/usr/local/lib64 -o BTSR.so DLtest.o 00_lbfgsb.o 00_lib_utils.o 01_distrib.o 02_main.o 03_alloc.o 03_Nelder.o 04_base.o 05_barc.o 05_generic.o BTSR_init.o -L/data/gannet/ripley/R/R-clang/lib -lRlapack -L/data/gannet/ripley/R/R-clang/lib -lRblas -lflang_rt.runtime -lm -lflang_rt.runtime -lm
make[1]: Leaving directory '/data/gannet/ripley/R/packages/tests-clang/BTSR/src'
make[1]: Entering directory '/data/gannet/ripley/R/packages/tests-clang/BTSR/src'
make[1]: Leaving directory '/data/gannet/ripley/R/packages/tests-clang/BTSR/src'
installing to /data/gannet/ripley/R/packages/tests-clang/BTSR.Rcheck/00LOCK-BTSR/00new/BTSR/libs
** R
** 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 (BTSR)