6 lines
No EOL
123 B
Fortran
6 lines
No EOL
123 B
Fortran
program batgen
|
|
open(unit=10,file='run1.bat',status='unknown')
|
|
do i=1,4
|
|
do j=1,4
|
|
do k=1,4
|
|
|