#!/bin/sh
# Copyright (c) 2002-09 Peter Guntert. All rights reserved.

# Identify system type
# PG, 8-2-1997

system=`(uname) 2>/dev/null`
hosttype=${HOSTTYPE:-generic}
system=${system:-$hosttype}

case $system in
SunOS)           echo sun;;
AIX)             echo ibm;;
OSF1)            echo alpha;;
IRIX | IRIX64)   echo sgi;;
HP-UX)           echo hp;;
ConvexOS)        echo convex;;
SUPER-UX)        echo nec;;
#Linux)           if [ "$PGI" ]; then echo pgi; else echo intel; fi;;
#Linux)           if [ "`uname -m`" = "ia64" ]; then echo intel-efc; else echo intel; fi;;
Linux)           echo intel;;
Darwin)          echo apple;;
CYGWIN*)         echo g95;;
*)               echo unknown;;
esac
