GetFileRoot:

--------------------------------------------------------------------------
   Get the root name of a file (without the .xxx)
--------------------------------------------------------------------------
   Form:
   r = GetFileRoot( s )
--------------------------------------------------------------------------

   ------
   Inputs
   ------
   s             (1,:)   Filename or cell array of filenames

   -------
   Outputs
   -------
   r             (1,:)   Filename or cell array of filenames

--------------------------------------------------------------------------