MOM6
mom_coms::assignment(=) Interface Reference

Detailed Description

Definition at line 74 of file MOM_coms.F90.

Private functions

subroutine efp_assign (EFP1, EFP2)
 

Functions and subroutines

◆ efp_assign()

subroutine mom_coms::assignment(=)::efp_assign ( type(efp_type), intent(out)  EFP1,
type(efp_type), intent(in)  EFP2 
)
private

Definition at line 571 of file MOM_coms.F90.

571  type(efp_type), intent(out) :: efp1
572  type(efp_type), intent(in) :: efp2
573  integer i
574  ! This subroutine assigns all components of the extended fixed point type
575  ! variable on the RHS (EFP2) to the components of the variable on the LHS
576  ! (EFP1).
577 
578  do i=1,ni ; efp1%v(i) = efp2%v(i) ; enddo

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