> integer :: dirid > integer :: jdirent > integer :: pxferr > > call pxfopendir (mydir, len (mydir), dirid, pxferr) This assumes that the directory id can fit in an integer, which might be an issue for 64bit platforms, isn't it? FX