scale_meshfield_base Module Reference

module FElib / Data / base More...

Data Types
type	meshfield1d
type	meshfield2d
type	meshfield3d
type	meshfield3dlist
type	meshfieldbase
interface	meshfieldbase_get_localmeshfield

Functions/Subroutines
subroutine	meshfield1d_init (this, varname, units, mesh, data_type)

Detailed Description

module FElib / Data / base

Description

A module for managing field data with FEM

Author

Yuta Kawai, Team SCALE

Function/Subroutine Documentation

meshfield1d_init()

subroutine scale_meshfield_base::meshfield1d_init	(	class(meshfield1d), intent(inout)	this,
		character(len=*), intent(in)	varname,
		character(len=*), intent(in)	units,
		class(meshbase1d), intent(in), target	mesh,
		integer, intent(in), optional	data_type )

Definition at line 115 of file scale_meshfield_base.F90.

    implicit none
    class(MeshField1D), intent(inout) :: this
    character(len=*), intent(in) :: varname
    character(len=*), intent(in) :: units    
    class(MeshBase1D), target, intent(in) :: mesh
    integer, intent(in), optional :: data_type
 
    integer :: n
    !-----------------------------------------------------------------------------
    
    this%varname = varname
    this%unit    = units
    this%mesh => mesh
    this%hist_id    = -1
    this%monitor_id = -1
    
    allocate( this%local(mesh%LOCAL_MESH_NUM) )  
    do n=1, mesh%LOCAL_MESH_NUM
      call this%local(n)%Init( mesh%lcmesh_list(n), data_type )
    end do
 
    return