FunctionSpace { 
  // Magnetic vector potential a (b = curl a)
  { Name Hcurl_a_Mag_2D; Type Form1P;
    BasisFunction {
      // a = a  s
      //      e  e
      { Name se; NameOfCoef ae; Function BF_PerpendicularEdge;
        Support Region[{non_conducting, conducting, source}]; Entity NodesOf[ All ]; }
    }
    Constraint {
      { NameOfCoef ae; EntityType NodesOf;
        NameOfConstraint MagneticVectorPotential_2D; }
    }
  }
  // Gradient of Electric scalar potential (2D)
  { Name Hregion_u_Mag_2D; Type Form1P;
    BasisFunction {
      { Name sr; NameOfCoef ur; Function BF_RegionZ;
        Support Region[{conducting, source}]; Entity Region[{conducting, source}]; }
    }
    GlobalQuantity {
      { Name U; Type AliasOf       ; NameOfCoef ur; }
      { Name I; Type AssociatedWith; NameOfCoef ur; }
    }
    Constraint {
      { NameOfCoef U; EntityType Region;
        NameOfConstraint Voltage_2D; }
      { NameOfCoef I; EntityType Region;
        NameOfConstraint Current_2D; }
    }
  }
  
  { Name Hgrad_T; Type Form0; 
    BasisFunction { 
      { Name sn; NameOfCoef Tn; Function BF_Node; Support Tot_The; 
        Entity NodesOf[All]; } 
    } 
    Constraint { 
      { NameOfCoef Tn; EntityType NodesOf ; NameOfConstraint temperature; } 
    } 
  } 
}