iexch Subroutine

  1. util.f90
  2. iexch

subroutine iexch(i, j)

Arguments

Type IntentOptional AttributesName
integer :: i
integer :: j

Called by

proc~~iexch~~CalledByGraph proc~iexch iexch proc~filter_sd filter_SD proc~filter_sd->proc~iexch proc~qlcpd qlcpd proc~qlcpd->proc~iexch proc~update_l update_L proc~update_l->proc~iexch proc~glcpd glcpd proc~glcpd->proc~iexch

Contents

Source Code

iexch

Source Code

      subroutine iexch(i,j)
      k=i
      i=j
      j=k
      end subroutine iexch