Stacked via delete

hai,

I want to write a Skill code  stacked via delete  i used a skill code older posted in cadence site but i comes a *Error* axlGeoPointsEqual: too few arguments (2 expected, 1 given) - (Via)

I will attach the code below any one re correct the code send me back please.

axlCmdRegister("bbvias" 'RBG_replace_via_list ?cmdType "INTERACTIVE" )
defun( RBG_replace_via_list ( @optional v_ps )
prog( list(via_file l_loc t_padstk)
mypopup = axlUIPopupDefine( nil (list (list "Done" `dvl_Done)))
axlUIPopupSet( mypopup)

unless(v_ps
via_file = axlDMFileBrowse("ALLEGRO_TEXT" nil)
if(isFile(via_file) then
via_data = axlDMOpenFile("ALLEGRO_TEXT" via_file "r")

when(via_data
axlSetFindFilter(?enabled '(noall vias) ?onButtons '(vias))
while(l_via = lineread(via_data)
l_loc=nth(0 l_via)
axlClearSelSet()
axlSetFindFilter(?enabled list("noall", "vias", "invisible"), ?onButtons list("noall", "vias"))
axlAddSelectAll()
axlDeleteObject(setof(via, axlGetSelSet(), axlGeoPointsEqual(l_loc) && car(via ->startEnd) == "ETCH/TOP" && cadr(via ->startEnd) == "ETCH/L2"))

);end while
);end when
);end if
);end unless
);end prog


);end defun