From 302b768a84b064681dda1a005022831e96341a68 Mon Sep 17 00:00:00 2001 From: Jeff Ator Date: Wed, 4 Sep 2024 16:36:52 +0000 Subject: [PATCH] testing removal of extraneous Doxygen @fn directives --- src/bufr_interface.F90 | 5 ----- 1 file changed, 5 deletions(-) diff --git a/src/bufr_interface.F90 b/src/bufr_interface.F90 index f8ae2449..f3760de6 100644 --- a/src/bufr_interface.F90 +++ b/src/bufr_interface.F90 @@ -12,7 +12,6 @@ module bufr_interface interface - !> @fn bufr_interface::cobfl_c::cobfl_c(bfl, io) !> Open a new file for reading or writing BUFR messages via a C language interface. !> !> Wraps cobfl() function. @@ -27,7 +26,6 @@ subroutine cobfl_c( bfl, io ) bind(C, name='cobfl') character(kind=c_char), intent(in), value :: io end subroutine cobfl_c - !> @fn bufr_interface::crbmg_c::crbmg_c(bmg, mxmb, nmb, iret) !> Read the next BUFR message from the file that was opened via the most recent call !> to subroutine cobfl_c() with io = 'r'. !> @@ -47,7 +45,6 @@ subroutine crbmg_c( bmg, mxmb, nmb, iret ) bind(C, name='crbmg') integer(c_int), intent(out) :: nmb, iret end subroutine crbmg_c - !> @fn bufr_interface::cwbmg_c::cwbmg_c(bmg, nmb, iret) !> Write a BUFR message to the file that was opened via the most recent call !> to subroutine cobfl_c() with io = 'w'. !> @@ -65,7 +62,6 @@ subroutine cwbmg_c( bmg, nmb, iret ) bind(C, name='cwbmg') integer(c_int), intent(out) :: iret end subroutine cwbmg_c - !> @fn bufr_interface::ccbfl_c::ccbfl_c() !> Close all files that were opened via previous calls to subroutine cobfl_c(). !> !> Wraps ccbfl() function. @@ -75,7 +71,6 @@ subroutine ccbfl_c() bind(C, name='ccbfl') use iso_c_binding end subroutine ccbfl_c - !> @fn bufr_interface::dlloctbf_c::dlloctbf_c() !> Free all memory allocated via inittbf_c(). !> !> Wraps dlloctbf() function.