FEDEM Solver  R8.0
Source code of the dynamics solver
Functions/Subroutines | Variables
prescribedmotionmodule Module Reference

Module with support for prescribed motions from file. More...

Functions/Subroutines

subroutine openmotionfile (fileName, pdNodes, ncmp, ierr)
 Opens the binary file with prescribed nodal displacements. More...
 
subroutine readmotionfile (ierr, lpu)
 Reads prescribed displacements for next time step from binary file. More...
 

Variables

integer, save pdisfile = -11111
 File handle for prescribed motion file. More...
 
real(dp), save nexttime = 0.0_dp
 Time for next update from file. More...
 
real(dp), dimension(:), allocatable, save pdispl
 Prescribed displacements from file. More...
 

Detailed Description

Module with support for prescribed motions from file.

This module contains an array with prescribed displacement values which are read from a binary file. Subroutines for opening and reading this file is also provided.

Author
Knut Morten Okstad
Date
8 Apr 2020

Function/Subroutine Documentation

◆ openmotionfile()

subroutine prescribedmotionmodule::openmotionfile ( character(len=*), intent(in)  fileName,
integer, dimension(:), intent(out), pointer  pdNodes,
integer, intent(out)  ncmp,
integer, intent(out)  ierr 
)

Opens the binary file with prescribed nodal displacements.

Parameters
[in]fileNameName of binary file with prescribed displacements
[out]pdNodesNode numbers for points with prescribed displacements
[out]ncmpNumber of displacement components per node on file
[out]ierrError flag
Here is the caller graph for this function:

◆ readmotionfile()

subroutine prescribedmotionmodule::readmotionfile ( integer, intent(out)  ierr,
integer, intent(in), optional  lpu 
)

Reads prescribed displacements for next time step from binary file.

Parameters
[out]ierrError flag
[in]lpuFile unit number for debug output of motions from file
Here is the caller graph for this function:

Variable Documentation

◆ nexttime

real(dp), save prescribedmotionmodule::nexttime = 0.0_dp

Time for next update from file.

◆ pdisfile

integer, save prescribedmotionmodule::pdisfile = -11111

File handle for prescribed motion file.

◆ pdispl

real(dp), dimension(:), allocatable, save prescribedmotionmodule::pdispl

Prescribed displacements from file.