Searched refs:isxtup (Results 1 – 2 of 2) sorted by relevance
23214 static logical isxtup; in logbeam_() local23248 isxtup = FALSE_; in logbeam_()23260 } else if (! isxtup) { in logbeam_()23271 isxtup = TRUE_; in logbeam_()23274 } else if (isxtup && all_1.nodur[commvl_1.ivx + iip * 24 - 25] > 0) { in logbeam_()23311 isxtup = FALSE_; in logbeam_()
15033 logical beamon,firstgulp,figbass,figchk,isfig,isxtup,btest,15058 isxtup = .false.15067 else if (.not.isxtup) then15075 isxtup = .true.15078 else if (isxtup .and. nodur(ivx,iip).gt.0) then15103 isxtup = .false.