(Proving Once And For All Time That Love Is Not Binary)
Definition of Variables:
X, PATH, JOHN, JOHNJOHN, MARSHA, MARSHAMARSHA, ALPHA, OMEGA
Initial Values:
SET X=0, SET PATH = 1, SET JOHN =.5, JOHNJOHN = 1000,
MARSHA =.5, MARSHAMARSHA = 1000
Program Start:
LOVE101: LET ALPHA = JOHN + MARSHA; John And Marsha Equals 1 means that the couple feels like they are united. However John's and Marsha's values range from 0 to 1.
LET OMEGA= JOHNJOHN - MARSHAMARSHA; John Without Marsha Equals 0 (and visa versa) means that the couple wants to stay together.
LOOP1: LET X= X+1
DOES ALPHA = 1, THEN CONTINUE, ELSE END
DOES OMEGA = O, THEN CONTINUE, ELSE END
FLIPFLOP: DOES PATH = 1, THEN CONTINUE, ELSE PATH2
PATH1: LET JOHN = FUNCTION (RANDOM NUMBER 0-1)
LET JOHNJOHN = FUNCTION (RANDOM NUMBER)
LET MARSHA = FUNCTION (MARSHA'S UNITARY CHOICE 0-1) *
LET MARSHAMARSHA = FUNCTION (MARSHAMARSHA's NULL CHOICE) *
FLIPFLOP1: SET PATH = 2
GO TO CHECKTIME
PATH2: LET MARSHA = FUNCTION (RANDOM NUMBER 0-1)
LET MARSHAMARSHA = FUNCTION (RANDOM NUMBER)
LET JOHN = FUNCTION (JOHN'S UNITARY CHOICE 0-1) *
LET JOHNJOHN = FUNCTION (JOHNJOHN'S NULL CHOICE) *
FLIPFLOP2: SET PATH = 1
CHECKTIME: DOES X = INFINITY** THEN END, ELSE GO TO LOVE101
END: FULL STOP
This poem has not been translated into any other language yet.
I would like to translate this poem
A compelling and creative mathemization of marriage. Very scholarly!