  
  [1X7 [33X[0;0YRecords[133X[101X
  
  
  [1X7.1 [33X[0;0YFunctions for records[133X[101X
  
  [1X7.1-1 AssignGlobals[101X
  
  [33X[1;0Y[29X[2XAssignGlobals[102X( [3Xrec[103X ) [32X function[133X
  
  [33X[0;0YThis function has been transferred from package [5XRCWA[105X.[133X
  
  [33X[0;0YIt  assigns  the  record components of [3Xrec[103X to global variables with the same
  names.[133X
  
  [4X[32X  Example  [32X[104X
    [4X[28X[128X[104X
    [4X[25Xgap>[125X [27Xr := rec( a := 1, b := 2, c := 3 );;                                      [127X[104X
    [4X[25Xgap>[125X [27XAssignGlobals( r );[127X[104X
    [4X[28XThe following global variables have been assigned:[128X[104X
    [4X[28X[ "a", "b", "c" ][128X[104X
    [4X[25Xgap>[125X [27X[a,b,c];[127X[104X
    [4X[28X[ 1, 2, 3 ][128X[104X
    [4X[28X[128X[104X
  [4X[32X[104X
  
