Require Class/basicCurveVectors

basicCurveVectors Subclass CurveVectors {
  Var "domain {[basicCurveVectors get domain]}"
  Method <Domain> {domain} {set [var domain] $domain}
  ClassVar "Domain-template {{[basicCurveVectors get domain]}}"

  ClassVar {script-templates {Domain}}

  Method ScriptBegin {} {
    Parent ScriptBegin
    set [var domain] [Parent get domain]
  }
}

CurveVectors Register
