Searched refs:inxtup (Results 1 – 2 of 2) sorted by relevance
23466 static logical inxtup[24]; in make1bar_() local23524 inxtup[commvl_1.ivx - 1] = FALSE_; in make1bar_()23566 inxtup[commvl_1.ivx - 1] = TRUE_; in make1bar_()23660 if (! inxtup[commvl_1.ivx - 1]) { in make1bar_()23666 inxtup[commvl_1.ivx - 1] = TRUE_; in make1bar_()23706 } else if (inxtup[commvl_1.ivx - 1]) { in make1bar_()23710 inxtup[commvl_1.ivx - 1] = FALSE_; in make1bar_()
15241 * infbmx(nm),lowdot,inxtup(nm),drawbm15304 inxtup(ivx) = .false.15337 inxtup(ivx) = .true.15408 if (.not.inxtup(ivx)) then15414 inxtup(ivx) = .true.15446 else if (inxtup(ivx)) then15450 inxtup(ivx) = .false.