include file: ARGWVCP 15
C*    *COMMON* *COUPL* - PARAMETERS FOR COUPLING.                          ARGWVCP.2      
C                                                                          ARGWVCP.3      
     & BETAMAX, ZALP, ALPHA, XKAPPA, XNLEV,                                ARGWVCP.4      
C                                                                          ARGWVCP.5