you can reuse it, even rename it in the parameter line and use it for something else.
Code:
Function S($Anothername)

$ = substr($anothername,1,1)

$s = $ + $ + $

End Function