Intel® Fortran Libraries Reference

2 Intel Fortran Libraries ReferenceYou can use wildcards to delete more than one file at a time. DELFILESQQ does not deletedirectories or system, hidden, or read-only files. Use this function with caution because it candelete many files at once. If a file is in use by another process (for example, if it is open in anotherprocess), it cannot be deleted.CompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS LIBSee Also: “FINDFILEQQ”ExampleUSE IFPORTUSE IFCOREINTEGER(4) len, countCHARACTER(80) fileCHARACTER(1) chWRITE(*,*) "Enter names of files to delete: "len = GETSTRQQ(file)IF (file(1:len) .EQ. '*.*') THENWRITE(*,*) "Are you sure (Y/N)?"ch = GETCHARQQ()IF ((ch .NE. 'Y') .AND. (ch .NE. 'y')) STOPEND IFcount = DELFILESQQ(file)WRITE(*,*) "Deleted ", count, " files."ENDDFLOATI, DFLOATJ, DFLOATKPortability Functions: Convert an integer to double-precision real type.Module: USE IFPORTSyntaxresult = DFLOATI (i)result = DFLOATJ (j)result = DFLOATK (k)i(Input) Must be of type INTEGER(2).2-48