Hello,
The definitive correction would be to put IF(NPLEO.GT.0) THEN ... ENDIF around the call to PROXIM in WAC.f, I did this but it still did not work.
Actually there is another thing to correct : the dictionary of Tomawac gives by default 10 SPECTRUM PRINTOUT POINTS with coordinates = 0. (keywords ABSCISSAE OF SPECTRUM PRINTOUT POINTS and following, this is no longer possible as the subroutine PROXIM may complain that they are not in the domain. The default values of abscissae and ordinates must be removed. In fact I discovered that test cases had points with given values that were not 0. and that were out of the domain, so, independently of parallelism, I think it is better to secure this.
Regards,
Jean-Michel Hervouet