MOM6
mom_coms::operator(-) Interface Reference

Detailed Description

Definition at line 73 of file MOM_coms.F90.

Private functions

type(efp_type) function efp_minus (EFP1, EFP2)
 

Functions and subroutines

◆ efp_minus()

type(efp_type) function mom_coms::operator(-)::efp_minus ( type(efp_type), intent(in)  EFP1,
type(efp_type), intent(in)  EFP2 
)
private

Definition at line 561 of file MOM_coms.F90.

561  type(efp_type) :: efp_minus
562  type(efp_type), intent(in) :: efp1, efp2
563  integer :: i
564 
565  do i=1,ni ; efp_minus%v(i) = -1*efp2%v(i) ; enddo
566 
567  call increment_ints(efp_minus%v(:), efp1%v(:))

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