let main (p: unit) : address = Current.self_address