Artifact c982d1d9364070ec9e65eb68638359b9128e7f02a2116a96db762ff016dc3f8f:
- Executable file mtt/bin/trans/p/zero_input.p — part of check-in [af3953deae] at 2021-03-01 11:39:42 on branch master — Cleanup repository after cvs2git conversion. (user: jeff@gridfinity.com, size: 133) [annotate] [blame] [check-ins using] [more...]
- Executable file mttroot/mtt/bin/trans/p/zero_input.p — part of check-in [5f1e8a3807] at 2000-12-28 12:02:48 on branch origin/master — Initial revision (user: gawthrop@users.sourceforge.net, size: 133) [annotate] [blame] [check-ins using]
PROCEDURE zero_input(VAR x : InputVector; N : INTEGER); VAR i : INTEGER; BEGIN FOR i:=1 TO N DO x[i] := 0.0; END;