! PR fortran/33500 subroutine whatever() logical(kind=1) :: l1, l2, l3 if ((l1 .and. l2) .neqv. l3) then l1 = .true. endif end
虫虫下载站 半导体技术网 电子研发网 源码地带 电源技术网 单片机技术网 医疗电子技术 嵌入式系统与单片机