mom_coms::assignment(=) Interface Reference

Detailed Description

Copy the value of one extended-fixed-point number into another.

Definition at line 73 of file MOM_coms.F90.

Private functions
subroutine	efp_assign (EFP1, EFP2)
	Copy one extended-fixed-point number into another. More...

Functions and subroutines

efp_assign()

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

private

Copy one extended-fixed-point number into another.

Parameters

[out]	efp1	The recipient extended fixed point number
[in]	efp2	The source extended fixed point number

Definition at line 638 of file MOM_coms.F90.

  type(EFP_type), intent(out) :: EFP1 !< The recipient extended fixed point number
  type(EFP_type), intent(in)  :: EFP2 !< The source extended fixed point number
  integer i
  ! This subroutine assigns all components of the extended fixed point type
  ! variable on the RHS (EFP2) to the components of the variable on the LHS
  ! (EFP1).
 
  do i=1,ni ; efp1%v(i) = efp2%v(i) ; enddo

---

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

• /glade/work/altuntas/cesm.sandboxes/cesm2_2_alpha_X_mom/components/mom/MOM6/src/framework/MOM_coms.F90