wpoint problem

[mathieu]

I experienced a compiling problem with wpoints.F the error occurs with mp_gather.

The error is the following:

• the function mp_gather has input variables

  Amask(LBi:UBi,LBj:UBj)
  A(LBi:UBi,LBj:UBj,LBk:UBk)
  

i.e. 2 and 3 dimensional arrays.

• The call in wpoints is with

  rmask(LBi,LBj), rmask(LBi,LBj)
  

i.e., scalars.

If compiler options are of importance, it is

ifort -c  -ip -O2 wpoints.f90

[arango]

Okey. This one is easy. We just need to remove (LBi,LBj) from the all masking arrays arguments in the call to routine mp_gather in wpoints.F.