<!-- Author: David -->
<!-- When in the cave -->
me.Cry<to>(GOD)
me.Voice.StateCaseFor<Mercy>(GOD)
me.PourOut<Complaint>(GOD)
me.Tell<Troubles>(GOD)

when (me.Spirit.Faint())
    GOD.Know(me.Path)

me.Friends => nil
me.Refuge => None
People.Where<CareFor>(me.Life) => EmptySet

me.Cry<to>(GOD)
me.Refuge = GOD

me.Request(GOD.Hear(me.Cry()))
me.Is(Low) => true

because (me.Persecutors.Strength > me.Strength)
    me.Request(GOD.DeliverFrom<Persecutors>(me))

when (GOD.FreeFrom<Prison>(me))
    me.Praise(GOD.Name)

because (GOD.Good<to>(me))
    RighteousPeople.GatherRound(me)