Searched refs:cwrferm (Results 1 – 2 of 2) sorted by relevance
15236 logical cwrferm15237 common /comcwrf/ cwrferm(nm)15321 cwrferm(ivx) = .false.15806 logical cwrferm,drawbm15807 common /comcwrf/ cwrferm(nm)16874 if (isacc .and. .not.cwrferm(ivx)) then16882 cwrferm(ivx) = .true.17504 if (.not.cwrferm(ivx)) then17527 cwrferm(ivx) = .false.
733 logical cwrferm[24]; member23548 comcwrf_1.cwrferm[commvl_1.ivx - 1] = FALSE_; in make1bar_()25967 if (isacc && ! comcwrf_1.cwrferm[commvl_1.ivx - 1]) { in make2bar_()25977 comcwrf_1.cwrferm[commvl_1.ivx - 1] = TRUE_; in make2bar_()26935 if (! comcwrf_1.cwrferm[commvl_1.ivx - 1]) { in make2bar_()26975 comcwrf_1.cwrferm[commvl_1.ivx - 1] = FALSE_; in make2bar_()