Mathematical model of a ten-hour experience of the dramatic episode just preceding mystical union. This episode has been given various names: purgation; refiner's fire; dark night of the soul; overcoming samskaras or samsaras or seals or knots or nafs; katharsis; etc.
- HeartOpenness(t) = HeartOpenness(t - dt) + (HeartUnfoldRate) * dt
INIT HeartOpenness = 5
- HeartUnfoldRate = (OpeningPressure-AveragePsychicStress)*((100-HeartOpenness)/100)/HeartAdjustTime
- KnotsInHeart(t) = KnotsInHeart(t - dt) + (- ForgivenessResponse) * dt
INIT KnotsInHeart = 12
- ForgivenessResponse = IF (PrayerQuality is greater than or equal to 100) THEN (1/DT) ELSE 0
- LongTermMemory1(t) = LongTermMemory1(t - dt) + (PrimaryInfoProcRate) * dt
INIT LongTermMemory1 = 0
- PrimaryInfoProcRate = IF (STMRetrieveAccuracy is less than or equal to 0.5) THEN (0) ELSE (ShortTermMemory*STMRetrieveAccuracy*RecodingFactor/STMRetentionTime)
- LongTermMemory2(t) = LongTermMemory2(t - dt) + (BackgroundInfPrRate) * dt
INIT LongTermMemory2 = 0
- BackgroundInfPrRate = InnerSensingRate-PrimaryInfoProcRate
- ShortTermMemory(t) = ShortTermMemory(t - dt) + (InnerSensingRate - BackgroundInfPrRate - PrimaryInfoProcRate) * dt
INIT ShortTermMemory = 7
- InnerSensingRate = 4200
- AdditionalOpenPress = 75
- AttentionalFocus = (WilledAttention+NaturalAttention)*.025
- AveragePsychicStress = SMTH1(PsychicStress,25)
- CognitAbilityFactor = 1
- InformationProcessingRate = IF (STMRetrieveAccuracy is less than or equal to 0.5) THEN BackgroundInfPrRate ELSE PrimaryInfoProcRate
- HeartAdjustTime = 240*HeartRigidityFactor
- KnotOriginInsight = .1*PrimaryInfoProcRate
- MaxBearableUnboundedness = 10/SealmentOfSoul
- NaturalAttention = TruenessOfMind + 36
- NormOpenPressure = 5
- OpeningPressure = NormOpenPressure + AdditionalOpenPress
- PrayerIntensity = FearDeathDueToKnot
- PrayerQuality = .5*(PrayerIntensity+PrayerTrueness)
- PrayerTrueness = KnotOriginInsight
- PsychicEnergyFactor = (100+HeartOpenness)/100
- Rapture = HeartOpenness
- Ratio = UnboundednessOfSoul/MaxBearableUnboundedness
- ReadinessForUnion = .00001/(STMRetentionTime-(1/600))^2
- RecodingFactor = (PsychicEnergyFactor*CognitAbilityFactor*((LongTermMemory1/140000)^(2/3)))+1
- STMRetentionTime = (4/60)/AttentionalFocus
- TruenessOfMind = 50/SMTH1(KnotsInHeart,1)
- WilledAttention = FearDeathDueToKnot
- FearDeathDueToKnot = GRAPH( (PsychicStress))
(0.00, 0.00), (10.0, 0.00), (20.0, 1.00), (30.0, 5.00), (40.0, 20.5), (50.0, 85.5), (60.0, 97.0), (70.0, 98.0), (80.0, 98.5),
(90.0, 99.0), (100, 99.5)
- HeartRigidityFactor = GRAPH(KnotsInHeart)
(0.00, 0.05), (1.20, 0.05), (2.40, 0.05), (3.60, 0.06), (4.80, 0.07), (6.00, 0.11), (7.20, 0.17), (8.40, 0.28), (9.60, 0.44),
(10.8, 0.67), (12.0, 1.00)
- PsychicStress = GRAPH(Ratio)
(0.00, 0.00), (0.1, 1.00), (0.2, 4.00), (0.3, 9.00), (0.4, 16.0), (0.5, 25.0), (0.6, 36.0), (0.7, 49.0), (0.8, 64.0), (0.9, 81.0),
(1, 100)
- SealmentOfSoul = GRAPH(KnotsInHeart)
(0.00, 0.0001), (1.20, 1.70), (2.40, 3.20), (3.60, 5.50), (4.80, 8.40), (6.00, 12.0), (7.20, 19.0), (8.40, 29.0), (9.60, 44.0),
(10.8, 66.0), (12.0, 100)
- STMRetrieveAccuracy = GRAPH(STMRetentionTime)
(0.00, 0.00), (0.00167, 0.00), (0.00333, 0.005), (0.005, 0.01), (0.00667, 0.02), (0.00833, 0.04), (0.01, 0.115),
(0.0117, 0.275), (0.0133, 0.47), (0.015, 0.61), (0.0167, 0.725), (0.0183, 0.8), (0.02, 0.84), (0.0217, 0.87), (0.0233, 0.895), (0.025, 0.92), (0.0267, 0.94), (0.0283, 0.955), (0.03, 0.965), (0.0317, 0.968), (0.0333, 0.971), (0.035, 0.974),
(0.0367, 0.977), (0.0383, 0.981), (0.04, 0.984), (0.0417, 0.987), (0.0433, 0.99), (0.045, 0.993), (0.0467, 0.996),
(0.0483, 0.999), (0.05, 1.00)
- UnboundednessOfSoul = GRAPH(HeartOpenness)
(0.00, 0.022), (10.0, 0.023), (20.0, 0.027), (30.0, 0.044), (40.0, 0.11), (50.0, 5.20), (60.0, 49.0), (70.0, 100), (80.0, 100), (90.0, 100), (100, 100)
Use a DT of .005 minutes.
Return to homepage.