Define global varables

[rgallier]

looks like this works:

Code:

EXPORT c,c₁,c₂;
EXPORT d,f;
EXPORT n;
EXPORT r,r₁,r₂,ρ;
EXPORT T₁,T₂,tk;
EXPORT α,δ,ε,ν,σ̛̛,ω,ф;
EXPORT τ,τ⒜,τ▿,τ⒰;
EXPORT γ,γ▵;

EXPORT global_vars()

BEGIN

INPUT({c,c₁,c₂});
INPUT({d,f});
INPUT({n});
INPUT({r,r₁,r₂,ρ});
INPUT({T₁,T₂,tk});
INPUT({α,δ,ε,ν,σ̛̛,ω,ф});
INPUT({τ,τ⒜,τ▿,τ⒰});
INPUT({γ,γ▵});
END;

Code:

EXPORT Solve()
BEGIN
EXPR(global_vars)


END;