Hello,
Yes, there is now an obsolete section in your subroutine condim.f, just remove the lines :
IF(NPLINT.GE.2) THEN
CALL OV( 'X=C ' , Z((NPLINT-1)*NPOIN2+1 : NPLINT*NPOIN2),
* Z, Z, COTINT , NPOIN2)
ENDIF
which are useless. The reference plane no longer exists, it was a plane with given elevation COTINT, but now all planes can be given with prescribed elevation, it is more general.
With best regards,
Jean-Michel Hervouet