Artifact 51fb965f2cac334feeb7477f35ebf4b07625fff250c3f7a9cda8d9a37ac6b60f:


PROCEDURE zero_vector(VAR x : StateVector;
			  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 ]