~alexander/hs: Add Fun with type functions

Signed-off-by: Alexander Berntsen <alexander@plaimi.net>