mom_checksums::chk_sum_msg Interface Reference

Detailed Description

Definition at line 73 of file MOM_checksums.F90.

Private functions
subroutine	chk_sum_msg1 (fmsg, bc0, mesg)
subroutine	chk_sum_msg2 (fmsg, bc0, bcSW, mesg)
subroutine	chk_sum_msg3 (fmsg, aMean, aMin, aMax, mesg)
subroutine	chk_sum_msg5 (fmsg, bc0, bcSW, bcSE, bcNW, bcNE, mesg)

Functions and subroutines

chk_sum_msg1()

subroutine mom_checksums::chk_sum_msg::chk_sum_msg1 ( character(len=*), intent(in)  fmsg, integer, intent(in)  bc0, character(len=*), intent(in)  mesg  )

private

Definition at line 1403 of file MOM_checksums.F90.

  character(len=*), intent(in) :: fmsg, mesg
  integer,          intent(in) :: bc0
  if (is_root_pe()) write(0,'(A,1(A,I10,X),A)') fmsg," c=",bc0,trim(mesg)

chk_sum_msg2()

subroutine mom_checksums::chk_sum_msg::chk_sum_msg2 ( character(len=*), intent(in)  fmsg, integer, intent(in)  bc0, integer, intent(in)  bcSW, character(len=*), intent(in)  mesg  )

private

Definition at line 1447 of file MOM_checksums.F90.

  character(len=*), intent(in) :: fmsg, mesg
  integer,          intent(in) :: bc0,bcsw
  if (is_root_pe()) write(0,'(A,2(A,I9,1X),A)') &
     fmsg," c=",bc0,"s/w=",bcsw,trim(mesg)

chk_sum_msg3()

subroutine mom_checksums::chk_sum_msg::chk_sum_msg3 ( character(len=*), intent(in)  fmsg, real, intent(in)  aMean, real, intent(in)  aMin, real, intent(in)  aMax, character(len=*), intent(in)  mesg  )

private

Definition at line 1456 of file MOM_checksums.F90.

  character(len=*), intent(in) :: fmsg, mesg
  real,             intent(in) :: amean,amin,amax
  if (is_root_pe()) write(0,'(A,3(A,ES25.16,1X),A)') &
     fmsg," mean=",amean,"min=",amin,"max=",amax,trim(mesg)

chk_sum_msg5()

subroutine mom_checksums::chk_sum_msg::chk_sum_msg5 ( character(len=*), intent(in)  fmsg, integer, intent(in)  bc0, integer, intent(in)  bcSW, integer, intent(in)  bcSE, integer, intent(in)  bcNW, integer, intent(in)  bcNE, character(len=*), intent(in)  mesg  )

private

Definition at line 1411 of file MOM_checksums.F90.

  character(len=*), intent(in) :: fmsg, mesg
  integer,          intent(in) :: bc0,bcsw,bcse,bcnw,bcne
  if (is_root_pe()) write(0,'(A,5(A,I10,1X),A)') &
     fmsg," c=",bc0,"sw=",bcsw,"se=",bcse,"nw=",bcnw,"ne=",bcne,trim(mesg)

---

The documentation for this interface was generated from the following file:

• /home/adcroft/GitHub/workspace/Gaea-stats-MOM6-examples/MOM6-examples/src/MOM6/src/framework/MOM_checksums.F90