ALLOCATE_V_FIELD_2DX Subroutine

  1. korc_fields.f90
  2. korc_fields
  3. ALLOCATE_V_FIELD_2DX

public subroutine ALLOCATE_V_FIELD_2DX(F, dims)

@brief Subroutine that allocates the cartesian components of an axisymmetric field.

@param[in,out] F Vector field to be allocated. @param[in] dims Dimension of the mesh containing the field data.

Arguments

Type IntentOptional AttributesName
type(V_FIELD_2DX), intent(inout) :: F
integer, intent(in), DIMENSION(3):: dims

Called by

proc~~allocate_v_field_2dx~~CalledByGraph proc~allocate_v_field_2dx ALLOCATE_V_FIELD_2DX proc~allocate_2d_fields_arrays ALLOCATE_2D_FIELDS_ARRAYS proc~allocate_2d_fields_arrays->proc~allocate_v_field_2dx proc~initialize_fields initialize_fields proc~initialize_fields->proc~allocate_2d_fields_arrays program~main main program~main->proc~initialize_fields

Contents

Source Code

ALLOCATE_V_FIELD_2DX

Source Code

  subroutine ALLOCATE_V_FIELD_2DX(F,dims)
    TYPE(V_FIELD_2DX), INTENT(INOUT)    :: F
    INTEGER, DIMENSION(3), INTENT(IN)  :: dims

    ALLOCATE(F%X(dims(1),dims(3)))
    ALLOCATE(F%Y(dims(1),dims(3)))
    ALLOCATE(F%Z(dims(1),dims(3)))
  end subroutine ALLOCATE_V_FIELD_2DX