Searched refs:my_atm3 (Results 1 – 2 of 2) sorted by relevance
3383 my_atm3 = array(i) (51:54)3386 CALL compress(my_atm3, .TRUE.)3394 my_atm3 = array(i) (51:54)3397 CALL compress(my_atm3, .TRUE.)3405 my_atm3 = array(i) (51:54)3409 CALL compress(my_atm3, .TRUE.)3418 my_atm3 = array(i) (51:54)3422 CALL compress(my_atm3, .TRUE.)3426 … ((atm1 == my_atm1) .AND. (atm2 == my_atm3) .AND. (atm3 == my_atm4) .AND. (atm4 == my_atm3)) .OR. &3436 my_atm3 = array(i) (51:54)[all …]