1969-12-06 /decus_20tap1_198111/01/decus/20-0009/func11.for 1969-12-06 /decuslib20-01/01/decus/20-0009/func11.for