我正在尝试使用Fortan90验证目录是否存在.在我发现的各种网站上:
logical :: dir_e
inquire(file='./docs/.', exist=dir_e)
if ( dir_e ) then
write(*,*) "dir exists!"
else
! workaround: it calls an extern program...
call system('mkdir docs')
end if
Run Code Online (Sandbox Code Playgroud)
但是,inquire返回False目录是否存在,如果我执行此代码两次,我收到一条错误消息
无法制作dir,文件已经存在
如果我使用:
inquire(file='./docs/test', exist=dir_e)
Run Code Online (Sandbox Code Playgroud)
使用现有文件测试,inquire返回true.
如何检查目录的存在?我正在使用ubuntu 11.04和ifort编译器.
我有一个课程,包括enum:
class appearance{
// ... stuff ...
enum color {BLUE, RED, GREEN};
};
Run Code Online (Sandbox Code Playgroud)
我想附加部分命名空间(with using),以便我可以BLUE简单地引用as 的值BLUE,而不是appearance::BLUE.与此同时,我想保持enum在内class{},因为我认为这是最自然的.我曾尝试各种组合namespace和using,但无济于事.
有什么建议 ???