Artifact c982d1d9364070ec9e65eb68638359b9128e7f02a2116a96db762ff016dc3f8f:


PROCEDURE zero_input(VAR x : InputVector;
			 N : INTEGER);
VAR i : INTEGER;
   
BEGIN
   FOR i:=1 TO N DO
      x[i] := 0.0;
END;




MTT: Model Transformation Tools
GitHub | SourceHut | Sourceforge | Fossil RSS ]