2015-02-20 00:35:01 -05:00
|
|
|
PROGRAM CREATION
|
2013-04-10 16:57:12 -07:00
|
|
|
OPEN (UNIT=5, FILE="output.txt", STATUS="NEW") ! Current directory
|
|
|
|
|
CLOSE (UNIT=5)
|
|
|
|
|
OPEN (UNIT=5, FILE="/output.txt", STATUS="NEW") ! Root directory
|
|
|
|
|
CLOSE (UNIT=5)
|
2015-02-20 00:35:01 -05:00
|
|
|
|
|
|
|
|
!Directories (Use System from GNU Fortran Compiler)
|
|
|
|
|
! -- Added by Anant Dixit, November 2014
|
|
|
|
|
call system("mkdir docs/")
|
|
|
|
|
call system("mkdir ~/docs/")
|
|
|
|
|
|
|
|
|
|
END PROGRAM
|
