out of boundary error if ddLPB and lmax=0

[mnottoli]

Commit 91c6f81
If I run a ddLPB calculation with lmax = 0 I get:

At line 4965 of file ddx_harmonics.f90
Fortran runtime error: Index '3' of dimension 1 of array 'src_m' above upper bound of 1