ALLOCATE_V_FIELD_3D Subroutine

  1. korc_fields.f90
  2. korc_fields
  3. ALLOCATE_V_FIELD_3D

private subroutine ALLOCATE_V_FIELD_3D(F, dims)

@brief Subroutine that allocates the cylindrical components of a 3-D 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_3D), intent(inout) :: F
integer, intent(in), DIMENSION(3):: dims

Called by

proc~~allocate_v_field_3d~~CalledByGraph proc~allocate_v_field_3d ALLOCATE_V_FIELD_3D proc~allocate_3d_fields_arrays ALLOCATE_3D_FIELDS_ARRAYS proc~allocate_3d_fields_arrays->proc~allocate_v_field_3d proc~initialize_fields initialize_fields proc~initialize_fields->proc~allocate_3d_fields_arrays program~main main program~main->proc~initialize_fields

Contents

Source Code

ALLOCATE_V_FIELD_3D

Source Code

  subroutine ALLOCATE_V_FIELD_3D(F,dims)
    TYPE(V_FIELD_3D), INTENT(INOUT)    :: F
    INTEGER, DIMENSION(3), INTENT(IN)  :: dims

    ALLOCATE(F%R(dims(1),dims(2),dims(3)))
    ALLOCATE(F%PHI(dims(1),dims(2),dims(3)))
    ALLOCATE(F%Z(dims(1),dims(2),dims(3)))
  end subroutine ALLOCATE_V_FIELD_3D