include file: ENTCNST 7
*IF DEF,A05_2A,OR,DEF,A05_2C,OR,DEF,A05_3B,OR,DEF,A05_3C                   AJX1F405.127    
      REAL AE1,AE2,       ! COEFFICIENTS USED IN CALCULATION               ENTCNST.3      
     *     ENTCOEF,       ! OF ENTRAINMENT RATE                            API2F400.404    
     *     SH_FAC                                                          API2F400.405    
C                                                                          API2F400.406    
      PARAMETER(AE1=1.0,AE2=1.5)                                           ENTCNST.5      
      PARAMETER (ENTCOEF = 3.0,SH_FAC=1.0)                                 API2F400.407    
C                                                                          ENTCNST.7      
*ENDIF                                                                     ENTCNST.8