https://github.com/zoziha/progress-bar
A simple progress bar module that is typically used to display the time integration process.
https://github.com/zoziha/progress-bar
fortran fortran-package-manager progress-bar
Last synced: 2 months ago
JSON representation
A simple progress bar module that is typically used to display the time integration process.
- Host: GitHub
- URL: https://github.com/zoziha/progress-bar
- Owner: zoziha
- License: mit
- Created: 2023-06-22T14:39:02.000Z (almost 2 years ago)
- Default Branch: main
- Last Pushed: 2024-02-14T08:45:22.000Z (about 1 year ago)
- Last Synced: 2024-12-30T09:37:08.431Z (4 months ago)
- Topics: fortran, fortran-package-manager, progress-bar
- Language: Fortran
- Homepage:
- Size: 8.79 KB
- Stars: 7
- Watchers: 1
- Forks: 1
- Open Issues: 0
-
Metadata Files:
- Readme: README.md
- License: LICENSE
Awesome Lists containing this project
README
# Simple Progress Bar
[](LICENSE)
A simple progress bar module that is typically used to display the time integration process.
## Usage
Only FPM is supported, other build systems can copy source files (`./src/progress_bar.F90`, [`timer/src/timer.F90`][1]) directly,
and `ifort` and `gfortran` compilers are tested.
To use `progress-bar` within your `fpm` project, add the following lines to your `fpm.toml` file:
```toml
[dependencies]
progress-bar = { git="https://github.com/zoziha/progress-bar" }
```
[1]: https://github.com/zoziha/timer/blob/main/src/timer.F90
## Example
```sh
> fpm run --example --all # run the example
```
```fortran
program example_progress_bar
use progress_bar_module, only: progress_bar
implicit none
integer :: i
do i = 1, 10
call sleep(1)
call progress_bar(i*100, 500, advance=.false.)
end do
call progress_bar(1000, 500, .true.)
do i = 1, 10
call sleep(1)
call progress_bar(i*50, 500, .false.)
end do
print *, ""
do i = 1, 10
call sleep(1)
call progress_bar(i*100, 500, .true.)
end do
end program example_progress_bar
!> [********************] 1000/500 [200%] (0/s, eta: 00:00:00)
!> [********************] 500/500 [100%] (49/s, eta: 00:00:00)
!> [****----------------] 100/500 [20%] (0/s, eta: 00:00:00)
!> [********------------] 200/500 [40%] (98/s, eta: 00:00:03)
!> [************--------] 300/500 [60%] (99/s, eta: 00:00:02)
!> [****************----] 400/500 [80%] (98/s, eta: 00:00:01)
!> [********************] 500/500 [100%] (100/s, eta: 00:00:00)
!> [********************] 600/500 [120%] (98/s, eta: 00:00:00)
!> [********************] 700/500 [140%] (99/s, eta: 00:00:00)
!> [********************] 800/500 [160%] (98/s, eta: 00:00:00)
!> [********************] 900/500 [180%] (98/s, eta: 00:00:00)
!> [********************] 1000/500 [200%] (100/s, eta: 00:00:00)
```
Note: The iterative speed solving aspect is problematic in terms of marginalization details,
but `progess_bar` is sufficient for now.