%mathpiper,def="GeoGebraPoint"
//Retract("GeoGebraPoint",*);

10 # GeoGebraPoint(name_IsString, x_IsNumber, y_IsNumber)  <--
[
    Local(command);
    
    command := PatchString("<?Write(ToAtom(name));?>=(<?Write(x);?>,<?Write(y);?>)");
    
    JavaCall(geogebra,"evalCommand",command);
];

%/mathpiper

    %output,preserve="false"
      Result: True
.   %/output


