I have trouble using the Fortran subroutine fits2alms. I get the following error message:
error #6285: There is no matching specific subroutine for this generic subroutine call. [FITS2ALMS]
Here's my piece of code:
Code: Select all
USE healpix_types
USE fitstools
IMPLICIT NONE
INTEGER :: nalms
CHARACTER(len=80) :: header
real(dp), DIMENSION(:,:,:), ALLOCATABLE :: w0_alms
lmax=2*nside
nalms=(lmax+1)*(lmax+2)/2
ALLOCATE(w0_alms(1:nalms,1:4,1:1))
CALL fits2alms('w_lm.fits', nalms, w0_alms, 3, header, 80, 1)