SUBROUTINE local_system( command )

!-------------------------------------------------------------------------------!
! Actual revisions:
! -----------------
! 
!
! Former revisions:
! -----------------
! $Log: local_system.f90,v $
! Revision 1.4  2003/03/16 09:40:33  raasch
! Two underscores (_) are placed in front of all define-strings
!
! Revision 1.3  2001/01/22 07:25:35  raasch
! Comments translated into English
!
! Revision 1.2  1998/07/16 06:51:19  raasch
! cpp-Direktiven fuer t3ej2 und t3ej5 erweitert
!
! Revision 1.1  1997/09/03 06:27:27  raasch
! Initial revision
!
!
! Description:
! ------------
! System calls for different operating systems
!-------------------------------------------------------------------------------!

    CHARACTER (LEN=*) ::  command

#if defined( __t3eb ) || defined( __t3eh ) || defined( __t3ej2 ) || defined( __t3ej5 )
    CALL ISHELL( command )
#else
    CALL SYSTEM( command )
#endif

 END SUBROUTINE local_system