//-----------------------------------------------------------------------------
// test.vpl, created 2000-08-16 10:11
// 
//-----------------------------------------------------------------------------
INCLUDE rtcu.inc

//
// This program activates an output when two inputs are active

VAR_INPUT
  i1 : BOOL; | Input 1
  i2 : BOOL; | Input 2
END_VAR;

VAR_OUTPUT
  o1 : BOOL; | Output
END_VAR;

PROGRAM simple1;

BEGIN
  o1 := i1 AND i2;
END;


END_PROGRAM;