Ever wanted to generated deeply nested do loops in Fortran?

No? Nevermind, maybe this is not the repository for you.

test_f90_loop.py is a python script which will generate nested loops in Fortran. It will generate "classical" nested do/enddo in f90code.F90 and also a do concurrent version in f90code_conc.F90.

nest_level sets the total number of loops, the majority of which will have 1 iteration.

In order to make it slightly less trivial, every k-th loop will have 2 trips instead of 1. Change two_level in the python code to choose k.

The resulting scripts have been tested by compiling with gfortran v10.3.0 up to a nest_level of 1024. It is not known what the maximum nest_level is for gfortran.

Note: Because of line length limits, and crazy levels of nesting, loop indentation defaults to false. do_indent can be set to true to turn this on.