%external %routine analyse circuit (%integer a, b, c)
   select output (0)
   print string ("No Circuit analysis available at present")
   newline
   %stop
%end

%end %of %file