RosettaCodeData/Task/Tree-traversal/Fortran/tree-traversal-2.f
2023-07-01 13:44:08 -04:00

3 lines
67 B
Fortran

DO GASP = 1,MAXLEVEL
CALL TARZAN(1,HOW)
END DO