Continued fraction/Arithmetic/G(matrix ng, continued fraction n1, continued fraction n2): Difference between revisions
Continued fraction/Arithmetic/G(matrix ng, continued fraction n1, continued fraction n2) (view source)
Revision as of 13:49, 11 March 2023
, 1 year ago→{{header|Icon}}
Line 2,973:
procedure cf2string (cf, max_terms)
local s, i, done, term
static separators
initial {
separators := ["", ";", ","]
}
/max_terms := 20
Line 2,988 ⟶ 2,992:
done := YES
} else {
s ||:=
i +:= 1
}
Line 3,097 ⟶ 3,101:
if /cf then {
# Generate only "
source := create generate_constant (&null)
} else if type(cf) == "co-expression" then {
| |||