; Copyright (c) 1995,  Microstar Laboratories, Inc.
; All rights reserved.

RESET
PIPES P1,P2
VARIABLE REF=200,GRND
IDEF A 2
  SET IPIPE0 G 100
  SET IPIPE1 S0 100
  TIME 5000
  END
PDEF B
  AVERAGE (IP0, 100, P1)
  AVERAGE (IP1, 100, P2)
  PVALUE (P1, GRND)
  THERMO (P2, 1, 5000, 32767, GRND, $BINOUT, REF)
  END
START A, B
