@verb #6119:":initialize" this none this rxdo #8084
@program #6119:":initialize" this none this
caller_perms():controls(this.owner) || raise(E_PERM)
this:reset()
if (`{lat, long} = args ! E_ARGS' != E_ARGS && typeof(lat) in {FLOAT, NUM} && typeof(long) in {FLOAT, NUM})
  this:set_latlong(lat, long)
  "this.lat = tofloat(lat);"
  "this.long = tofloat(long);"
elseif (`{easting, northing, centMer, iNorthing} = args ! E_ARGS' != E_ARGS)
  this:set_utm(easting, northing, centMer, iNorthing)
elseif (`{copy_src} = args ! E_ARGS' != E_ARGS && typeof(copy_src) == WAIF && copy_src.class == this.class)
  for x in (properties(this.class))
    if (x[1] == ":")
      if (typeof(copy_src.(x[2..$])) == WAIF)
        this.(x[2..$]) = copy_src.(x[2..$]).class:new(copy_src)
      else
        this.(x[2..$]) = copy_src.(x[2..$])
      endif
    endif
  endfor
else
  raise(E_INVARG)
endif
"Last modified by Lao-Tzu (#8084) on Tue Jan 15 06:40:23 2002 MST."
.