progress_bar Subroutine

public subroutine progress_bar(i, n, nsteps)

prints a progress bar for loops to screen

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: i

position of progress bar, e.g. loop index

integer, intent(in) :: n

final index of loop

integer, intent(in) :: nsteps

number of steps at which a single 'bar' is printed