# Test bed for function applications. # \\$ Id: test9.html,v 1.3 2007/11/28 09:10:32 weis Exp \\$ $(use "env9.ml") one = $(one) two = $(two) $(concat one "20h30") pad_l1 20h30 is 020h30, found $(pad_l1 "20h30") pad_l1r2 20h is 020h00, found $(pad_l1r2 "20h") pad_l2 0h30 is 000h30, found $(pad_l2 "0h30") pad_l2r2 0h is 000h00, found $(pad_l2r2 "0h") pad_r2 220h is 220h00, found $(pad_r2 "220h")