PROGRAM AntennaTest
  USE Path_Utils,      ONLY: iMAXPATH 
  IMPLICIT NONE
  CHARACTER(iMAXPATH) :: cAntPath
  CALL GET_COMMAND_ARGUMENT(1, cAntPath)
END PROGRAM AntennaTest