C+ C NAME: C cFilePath C PURPOSE: C Platform-independent construction of file name C CATEGORY: C Portability C CALLING SEQUENCE: character*256 function cFilePath(cRootDir,nSub,cSub,cFile) C CALLS: C iFilePath C PROCEDURE: C The length of the function is set equal to the value of C parameter FIL__LENGTH in href=filparts=.h C MODIFICATION HISTORY: C JUN-2004, Paul Hick (UCSD/CASS; pphick@ucsd.edu) C- character cRootDir*(*) integer nSub character cSub(*)*(*) character cFile*(*) I = iFilePath(cRootDir,nSub,cSub,cFile,cFilePath) return end