Davinci fusion - Melting glass effect

{
	Tools = ordered() {
		sMerge1 = sMerge {
			Inputs = {
				Input1 = Input {
					SourceOp = "se1",
					Source = "Output",
				},
				Input3 = Input {
					SourceOp = "se2",
					Source = "Output",
				}
			},
			ViewInfo = OperatorInfo { Pos = { 550, -148.5 } },
		},
		sRender1 = sRender {
			Inputs = {
				GlobalOut = Input { Value = 124, },
				Width = Input { Value = 1920, },
				Height = Input { Value = 1080, },
				UseFrameFormatSettings = Input { Value = 1, },
				["Gamut.SLogVersion"] = Input { Value = FuID { "SLog2" }, },
				Input = Input {
					SourceOp = "sMerge1",
					Source = "Output",
				}
			},
			ViewInfo = OperatorInfo { Pos = { 550, -115.5 } },
		},
		se2 = sEllipse {
			NameSet = true,
			SourceOp = "se1",
			Inputs = {
				LayersNest = Input {
				},
				["Translate.X"] = Input {
					SourceOp = "se2XOffset",
					Source = "Value",
				},
				Height = Input { Expression = "Width", },
				CommentsNest = Input {
				},
				FrameRenderScriptNest = Input {
				},
				StartRenderScripts = Input {
				},
				EndRenderScripts = Input {
				}
			},
			ViewInfo = OperatorInfo { Pos = { 550, -181.5 } },
		},
		se2XOffset = BezierSpline {
			SplineColor = { Red = 250, Green = 59, Blue = 49 },
			CtrlWZoom = false,
			NameSet = true,
			KeyFrames = {
				[0] = { 0.3, RH = { 8.33333333333333, 0.2 }, Flags = { Linear = true } },
				[25] = { 0, LH = { 16.6666666666667, 0.1 }, RH = { 33.3333333333333, 0.1 }, Flags = { Linear = true } },
				[50] = { 0.3, LH = { 41.6666666666667, 0.2 }, Flags = { Linear = true } }
			}
		},
		Merge1 = Merge {
			Inputs = {
				Blend = Input {
					SourceOp = "Merge1Blend",
					Source = "Value",
				},
				Background = Input {
					SourceOp = "sRender1",
					Source = "Output",
				},
				Foreground = Input {
					SourceOp = "sRender1_1",
					Source = "Output",
				},
				PerformDepthMerge = Input { Value = 0, }
			},
			ViewInfo = OperatorInfo { Pos = { 550, -82.5 } },
		},
		Merge1Blend = BezierSpline {
			SplineColor = { Red = 205, Green = 205, Blue = 205 },
			CtrlWZoom = false,
			NameSet = true,
			KeyFrames = {
				[25] = { 0, RH = { 25.3333333333333, 0.333333333333333 }, Flags = { Linear = true } },
				[26] = { 1, LH = { 25.6666666666667, 0.666666666666667 }, Flags = { Linear = true } }
			}
		},
		sRender1_1 = sRender {
			Inputs = {
				GlobalOut = Input { Value = 124, },
				Width = Input { Value = 1920, },
				Height = Input { Value = 1080, },
				UseFrameFormatSettings = Input { Value = 1, },
				["Gamut.SLogVersion"] = Input { Value = FuID { "SLog2" }, },
				Input = Input {
					SourceOp = "sRectangle1",
					Source = "Output",
				}
			},
			ViewInfo = OperatorInfo { Pos = { 550, -49.5 } },
		},
		se1 = sEllipse {
			NameSet = true,
			Inputs = {
				Width = Input { Value = 0.15, },
				Height = Input {
					Value = 0.15,
					Expression = "Width",
				}
			},
			ViewInfo = OperatorInfo { Pos = { 660, -148.5 } },
		},
		Transform1 = Transform {
			Inputs = {
				Center = Input { Value = { 0.424, 0.5 }, },
				Input = Input {
					SourceOp = "Bitmap1",
					Source = "Mask",
				}
			},
			ViewInfo = OperatorInfo { Pos = { 715, -82.5 } },
		},
		Bitmap1 = BitmapMask {
			CtrlWZoom = false,
			Inputs = {
				Filter = Input { Value = FuID { "Fast Gaussian" }, },
				MaskWidth = Input { Value = 1920, },
				MaskHeight = Input { Value = 1080, },
				PixelAspect = Input { Value = { 1, 1 }, },
				UseFrameFormatSettings = Input { Value = 1, },
				ClippingMode = Input { Value = FuID { "None" }, },
				Image = Input {
					SourceOp = "Blur1",
					Source = "Output",
				},
				Low = Input { Value = 0.464, },
				High = Input { Value = 0.468, }
			},
			ViewInfo = OperatorInfo { Pos = { 715, -49.5 } },
		},
		sRectangle1 = sRectangle {
			Inputs = {
				["Translate.X"] = Input {
					Value = 0.018,
					Expression = "Width/2",
				},
				Width = Input {
					Value = 0.036,
					Expression = "se2.Translate.X-se1.Translate.X",
				},
				Height = Input {
					Value = 0.15,
					Expression = "se1.Width",
				}
			},
			ViewInfo = OperatorInfo { Pos = { 550, -16.5 } },
		},
		Blur1 = Blur {
			Inputs = {
				Filter = Input { Value = FuID { "Fast Gaussian" }, },
				XBlurSize = Input { Value = 20.3, },
				Input = Input {
					SourceOp = "Merge1",
					Source = "Output",
				}
			},
			ViewInfo = OperatorInfo { Pos = { 715, -16.5 } },
		},
		Displace1 = Displace {
			Inputs = {
				Center = Input { Value = { 0.568, 0.5 }, },
				RefractionStrength = Input { Value = 0.315, },
				LightPower = Input { Value = 10.33, },
				LightAngle = Input {
					SourceOp = "AnimCurves1",
					Source = "Value",
				},
				Foreground = Input {
					SourceOp = "Blur2",
					Source = "Output",
				}
			},
			ViewInfo = OperatorInfo { Pos = { 935, -82.5 } },
		},
		AnimCurves1 = LUTLookup {
			CtrlWZoom = false,
			Inputs = {
				Lookup = Input {
					SourceOp = "AnimCurves1Lookup",
					Source = "Value",
				},
				Scale = Input { Value = 180, }
			},
		},
		AnimCurves1Lookup = LUTBezier {
			KeyColorSplines = {
				[0] = {
					[0] = { 0, RH = { 0.333333333333333, 0.333333333333333 }, Flags = { Linear = true } },
					[1] = { 1, LH = { 0.666666666666667, 0.666666666666667 }, Flags = { Linear = true } }
				}
			},
			SplineColor = { Red = 255, Green = 0, Blue = 0 },
			NameSet = true,
		},
		Blur2 = Blur {
			Inputs = {
				Filter = Input { Value = FuID { "Fast Gaussian" }, },
				XBlurSize = Input { Value = 4.3, },
				Input = Input {
					SourceOp = "Transform1",
					Source = "Output",
				}
			},
			ViewInfo = OperatorInfo { Pos = { 825, -82.5 } },
		}
	}
}