---

Manual Reference Pages  - edit_distance (3m_strings)

---

NAME

edit_distance(3f) - [M_strings:DESCRIBE] returns a naive edit distance using the Levenshtein distance algorithm (LICENSE:PD)

CONTENTS

Synopsis
Description
Examples
Author
License

SYNOPSIS

pure elemental function edit_distance(str1,str2) result (distance)

    character(len=*),intent(in)   :: str1, str2
    integer :: distance

DESCRIPTION

The Levenshtein distance function returns how many edits (deletions, insertions, transposition) are required to turn one string into another.

EXAMPLES

Sample Program:

   program demo_edit_distance
   use M_strings, only : edit_distance
      write(*,*)edit_distance(’kittens’,’sitting’)==3
      write(*,*)edit_distance(’geek’,’gesek’)==1
      write(*,*)edit_distance(’Saturday’,’Sunday’)==3
   end program demo_edit_distance

Expected output

    > T
    > T
    > T

AUTHOR

John S. Urban

LICENSE

Public Domain

---

Nemo Release 3.1

edit_distance (3m_strings)

January 10, 2025

Generated by manServer 1.08 from cea2e66b-7787-4963-bf34-8cd9ec56d11b using man macros.