!<title> strlen() in Fortran </title>
      Integer Function strlen( string )
      Byte string(0:*)


      integer DECC$STRLEN
      strlen=DECC$STRLEN(string)

      End