data specification using string , nat alink = mklink(. .pino : nat;. .name : string) ; variables alink : alink; end data specification