c****************************************************************
program Clean
.
.
.
character version*(*)
parameter(version='Clean: version 1.0 26-jan-90')
.
.
.
call output(version)
This gives a version and the date when the task CLEAN was last modified.
Additionally, this version identification should be included
in any history generated by the task.