!7

p-substance {
  BufferedImage bi = newBufferedImage(200, 200, Color.white);
  fillTetragon(bi, 20, 5, 40, 5, 30, 100, 10, 100, Color.red);
  showImage(bi);
}