Thank you.
----------------------><8-------------------------------------
g77 -fpic -g -O2 -c LDDPdensity.f -o LDDPdensity.o
LDDPdensity.f: In subroutine `lddpcdensity':
LDDPdensity.f:12:
& mcmc,nsave,seed,
1
LDDPdensity.f:226: (continued):
real*8 thetasave(nsave,p+p*(p+1)/2+3)
2
Invalid declaration of or reference to symbol `nsave' at (2) [initially seen
at (1)]
LDDPdensity.f:12:
& mcmc,nsave,seed,
1
LDDPdensity.f:236: (continued):
integer mcmc(3),nburn,nskip,nsave,ndisplay
2
Invalid declaration of or reference to symbol `nsave' at (2) [initially seen
at (1)]
LDDPdensity.f:9:
& cpo,thetasave,randsave,
1
LDDPdensity.f:291: (continued):
open(unit=1,file='dppackage1.out',status='unknown',
2
Invalid declaration of or reference to symbol `thetasave' at (2) [initially
seen at (1)]
LDDPdensity.f:9:
& cpo,thetasave,randsave,
1
LDDPdensity.f:291: (continued):
open(unit=1,file='dppackage1.out',status='unknown',
2
Invalid declaration of or reference to symbol `randsave' at (2) [initially
seen at (1)]
LDDPdensity.f:15:
& xtx,xtx2,xty,xty2,fs,fm,worksam,workcpo)
1
LDDPdensity.f:291: (continued):
open(unit=1,file='dppackage1.out',status='unknown',
2
Invalid declaration of or reference to symbol `worksam' at (2) [initially
seen at (1)]
LDDPdensity.f:430:
xty2=matmul(xtx2,mub)
^
Expression at (^) has incorrect data type or rank for its context
LDDPdensity.f:430: warning:
xty2=matmul(xtx2,mub)
^
Reference to unimplemented intrinsic `MATMUL' at (^) (assumed EXTERNAL)
LDDPdensity.f:430:
xty2=matmul(xtx2,mub)
^
Invalid declaration of or reference to symbol `matmul' at (^) [initially
seen at (^)]
LDDPdensity.f:458:
betam=matmul(xtx,xty)
^
Expression at (^) has incorrect data type or rank for its context
LDDPdensity.f:515:
xty=matmul(sbeta0i,m0)
^
Expression at (^) has incorrect data type or rank for its context
LDDPdensity.f:535:
xty=xty+matmul(xtx2,betawork)
^
Expression at (^) has incorrect data type or rank for its context
LDDPdensity.f:538:
betawork=matmul(xtx,xty)
^
Expression at (^) has incorrect data type or rank for its context
make: *** [LDDPdensity.o] Error 1
ERROR: compilation failed for package 'DPpackage'
----------------------><8-------------------------------------
Alexandre
------------------------------------------------------------------------