C++ to fortran

[jNU5fSEw]

how do you implement loops in fortran 77?

[z05DSL3A]

A few seconds googling:
The general form of the do loop is as follows:

do label var = expr1, expr2, expr3
statements
label continue

var is the loop variable (often called the loop index) which must be integer. expr1 specifies the initial value of var, expr2 is the terminating bound, and expr3 is the increment (step).

^{http://www.tat.physik.uni-tuebingen.de/~kley/lehre/ftn77/tutorial/loops.html}

[jNU5fSEw]

printf("THANK YOU!");