# Holy Porn test file
husl
  porn x = 6
  porn y = 9
  porn sum = creampie(x, y)
  sexy("6 + 9 = " + sum)

  porn product = gangbang(x, y)
  sexy("6 * 9 = " + product)

  porn diff = cuckold(100, 30)
  sexy("100 - 30 = " + diff)

  porn result = smut(10, 2)
  sexy("10 / 2 = " + result)

  erect sum == 15: {
    sexy("addition works. NICE.")
  } limp: {
    sexy("addition is broken. the system is miserable.")
  }

  sexy("random naughty number: ")
  sexy(naughty())

  wet i 3: {
    sexy("loop iteration " + i)
  }

  naked greet(times): {
    wet j times: {
      sexy("hello from holy porn! iteration " + j)
    }
  }

  greet(2)

  sexy("prostate status: " + prostate())
bonk