Program using gettype function