Lines Matching refs:lvresult
12 logical :: lrg, lrw, lrv, lrc, lvresult variable
219 lvresult = .true.
251 lvresult = lvresult .and. (array(i) .ge. 5)
254 if (lrg .neqv. lvresult) call abort
255 if (lrw .neqv. lvresult) call abort
256 if (lrv .neqv. lvresult) call abort
257 if (lrc .neqv. lvresult) call abort
267 lvresult = .false.
299 lvresult = lvresult .or. (array(i) .ge. 5)
302 if (lrg .neqv. lvresult) call abort
303 if (lrw .neqv. lvresult) call abort
304 if (lrv .neqv. lvresult) call abort
305 if (lrc .neqv. lvresult) call abort
315 lvresult = .true.
347 lvresult = lvresult .eqv. (array(i) .ge. 5)
350 if (lrg .neqv. lvresult) call abort
351 if (lrw .neqv. lvresult) call abort
352 if (lrv .neqv. lvresult) call abort
353 if (lrc .neqv. lvresult) call abort
363 lvresult = .true.
395 lvresult = lvresult .neqv. (array(i) .ge. 5)
398 if (lrg .neqv. lvresult) call abort
399 if (lrw .neqv. lvresult) call abort
400 if (lrv .neqv. lvresult) call abort
401 if (lrc .neqv. lvresult) call abort