Functions
function	generatePRRFile (filePath, targetName) s2p

	fprintf (prrFile, "%d", 50)

	fprintf (prrFile, "\n%g %g\n", real(S(a, b).remainder), imag(S(a, b).remainder))

	fprintf (prrFile, "%g %g", real(S(a, b).poles(1)), imag(S(a, b).poles(1)))

end	fprintf (prrFile, "\n%g %g", real(S(a, b).residues(1)), imag(S(a, b).residues(1)))

Variables
	freqSamples = s2p.Frequencies * 1e-9

	fitData = struct("poles", {}, "residues", {}, "remainder", {}, "proportional", {})

	S = repmat( fitData, s2p.NumPorts, s2p.NumPorts )

	prrFile = fopen( targetName, 'w' )

Find a complex rational model for freq domain data for	a

for	i

Function Documentation

◆ fprintf() [1/4]

fprintf	(	prrFile	,
		"%d"	,
		50
	)

◆ fprintf() [2/4]

fprintf	(	prrFile	,
		"%g %g"	,
		real(S(a, b).poles(1))	,
		imag(S(a, b).poles(1))
	)

◆ fprintf() [3/4]

end fprintf	(	prrFile	,
		"\n%g %g"	,
		real(S(a, b).residues(1))	,
		imag(S(a, b).residues(1))
	)

◆ fprintf() [4/4]

fprintf	(	prrFile	,
		"\n%g %g\n"	,
		real(S(a, b).remainder)	,
		imag(S(a, b).remainder)
	)

◆ generatePRRFile()

function generatePRRFile	(	filePath	,
		targetName
	)

Variable Documentation

◆ a

Find a complex rational model for freq domain data for a

Initial value:

= 1 : 1 : s2p.NumPorts
        for b = 1 : 1 : s2p.NumPorts
            [ S(a, b).poles, S(a, b).residues, S(a, b).remainder, S(a, b).proportional ] = findComplexRationalApproximation(freqSamples, squeeze(s2p.Parameters( a, b, : )) )