MODULE synthp_module
!==============================================================================
! SYNSPEC 光谱合成参数模块
! 原始文件：SYNTHP.FOR
! 
! 包含光谱合成相关的频率和交叉截面参数
!==============================================================================

    USE params_module
    IMPLICIT NONE
    
    !==========================================================================
    ! 公共变量块 - 频率 (FREQSY)
    !==========================================================================
    REAL(dp) :: FREQ(MFREQ), W(MFREQ), WLAM(MFREQ)
    REAL(dp) :: FRX1(MFREQ), FRX2(MFREQ), BNUE(MFREQ)
    REAL(dp) :: FRQOBS(MFREQ), WLOBS(MFREQ)
    REAL(dp) :: FREQC(MFREQC), WLAMC(MFREQC)
    INTEGER :: IJCINT(MFREQ)
    
    !==========================================================================
    ! 公共变量块 - 平均截面 (CRSAVG)
    !==========================================================================
    REAL(dp) :: FRECR(MCROSS,MFCRA), CROSR(MCROSS,MFCRA)
    REAL(dp) :: CRMX(MCROSS)
    INTEGER :: NFCR(MCROSS), IASV
    
    !==========================================================================
    ! 公共变量块 - 平均 Q (CRSAVQ)
    !==========================================================================
    REAL(dp) :: FRECQ(MPHOT,MFCRA), QHOT(MPHOT,MFCRA)
    REAL(dp) :: AQHT(MPHOT), EQHT(MPHOT), GQHT(MPHOT)
    REAL(dp) :: CRMY(MPHOT)
    INTEGER :: NFQHT(MPHOT), NQHT
    
END MODULE synthp_module