// "delayed-source-a.hac"
//	$Id: delayed-source-a.hac,v 1.3 2007/08/09 05:49:47 fang Exp $
// testing source-sink with extra source delay

import "bool-source.hac";
import "bool-sink.hac";

chan(bool) X;
bool_source_delay src<2, {true,false}, 25.0>(X);
// TODO: allow cast expressions preal(25)
bool_sink snk(X);


