More FORD comments

example/la_folia.f90

@@ -4,8 +4,8 @@
 ! Vincent Magnin, 2024-06-05
 ! Last modifications: 2024-06-23
 
-! An example on the classical Portuguese/Spanish theme of La Folia
-! https://en.wikipedia.org/wiki/Folia
+!> An example on the classical Portuguese/Spanish theme of La Folia
+!> https://en.wikipedia.org/wiki/Folia
 program la_folia
     use MIDI_file_class
     use music
@@ -125,8 +125,8 @@ program la_folia
 
 contains
 
-    ! Receives a string with an encoded chords, and returns its fundamental,
-    ! the type of chord and its encoded value
+    !> Receives a string with an encoded chords, and returns its fundamental,
+    !> the type of chord and its encoded value
     subroutine analyze(string, note, chord_type, note_value)
         character(*), intent(in) :: string
         character(3), intent(out) :: note, chord_type, note_value

src/MIDI_file_class.f90

@@ -4,6 +4,7 @@
 ! Vincent Magnin
 ! Last modifications: 2024-06-22
 
+!> Contains the main class you need to create a MIDI file.
 module MIDI_file_class
     use, intrinsic :: iso_fortran_env, only: int8, int16, int32, error_unit
     use utilities, only: checked_int8, checked_int16, checked_int32
@@ -18,6 +19,7 @@ module MIDI_file_class
     integer, parameter :: ON  = 144     ! z'90'
     integer, parameter :: OFF = 128     ! z'80'
 
+    !> The main class you need to create a MIDI file.
     type MIDI_file
         character(len=:), private, allocatable :: filename
         ! Output unit and file status:
@@ -233,7 +235,7 @@ subroutine delta_time(self, ticks)
         call self%write_variable_length_quantity(checked_int32(ticks))
     end subroutine
 
-
+    !> Closes the MIDI file.
     subroutine close(self)
         class(MIDI_file), intent(inout) :: self
 

src/utilities.f90

@@ -4,6 +4,7 @@
 ! Vincent Magnin
 ! Last modifications: 2024-06-14
 
+!> Functions to check the bounds of int8, int16, int32 values.
 module utilities
     use, intrinsic :: iso_fortran_env, only: int8, int16, int32, error_unit