link loadfuncpp procedure main() total := loadfuncpp("./iterate2.so", "iexample") write( total(g, [1,2,3,4,5]) ) end procedure g(ls[]) suspend !ls end