Fortran, как убрать лишнюю переменную

В си это достижимо при помощи исключающего или (xor)

a=a^b;
b=a^b;
a=a^b;

Какой именно Фортран?

Если используется Фортран 90 и выше, то вот так, например:

if a(i)>a(j) then

a(/(i,j)/) = a(/(j,i)/)

endif

a=a+b
b=a-b
a=a-b

В фортране самое главное - не писать комментариев, чтобы не нарушать общий стиль. Люблю этот язык.