Revision history [back]

The correct iplan function follows:

REAL     Pgen
REAL     Qgen
INTEGER  IER3

CALL MACDT2(1,'1','PQ',Pgen,Qgen,IER3)

Consider python for future coding.

The correct iplan function follows:

REAL     Pgen
REAL     Qgen
INTEGER  IER3
 ...
CALL MACDT2(1,'1','PQ',Pgen,Qgen,IER3)

Consider python for future coding.