Fortran中判断某个文件存在的函数是什么？

独孤

判断是否存在某个文件的函数是什么？查询了两日也没有什么收获，哪位高手告知一下？

也就是用fortran实现这句话：
if exist stop del stop

谢谢了！

zhoulon

这个语句哪里是fortran的语句呀，这个是dos语句呀。

独孤

我是想用fortran语句实现这个DOS语句的功能，也就是判断stop这个文件是否存在，如果存在则删除

zhoulon

有没有stop可以设置一个逻辑变量来进行判断，至于能不能删除stop文件不太清楚，至少fortran77好像不可以的，我用的for77，for90和95没有用过，不太清楚。

zhoulon

1. 
   
2.       logical filflg
   
3. 
   
4.       inquire(file='stop',exist=filflg)
   
5.       if (filflg) then
   
6.       open(16,file='stop',form='unformatted',status='delete')
   
7.       close(16)
   
8.       endif
   
9.      

复制代码

这个代码可以完成你说的功能

独孤

谢谢总版主。
同时有人告知了另外一种写法，如下。这仅仅是删除文件的代码：
open(11,file="END")
close (11, STATUS = 'DELETE')

来simwe的fepg版块好几个月了，才疏学浅，每次来这里都是提问问题。版主热肠古道，无论什么问题都尽力帮忙，在此赞一下！ 同时希望大家能够发扬版主的精神，活跃FEPG版块的人气！

zhoulon

呵呵，谢谢夸奖，希望大家都能将看家本领拿出来与大家一块交流提高。