|
FEDEM Solver
R8.0
Source code of the dynamics solver
|
Data Types | |
| type | roadtype |
| interface | getptrtoid |
| interface | writeobject |
Functions/Subroutines | |
| subroutine | writeroadtype (road, io) |
| type(roadtype) function, pointer | getptrtoidroad (array, id) |
| subroutine | nullifyroad (road) |
| subroutine | deallocateroad (road) |
| subroutine | deallocateroads (roads) |
Variables | |
| character(len=13), dimension(2), parameter | roadtypes_p =(/ 'FUNCTION_ROAD', 'SURFACE_ROAD ' /) |
| integer, parameter | function_road_p = 1 |
| integer, parameter | surface_road_p = 2 |
| subroutine roadtypemodule::deallocateroad | ( | type(roadtype), intent(inout) | road | ) |
| subroutine roadtypemodule::deallocateroads | ( | type(roadtype), dimension(:), pointer | roads | ) |
| type(roadtype) function, pointer roadtypemodule::getptrtoidroad | ( | type(roadtype), dimension(:), intent(in), target | array, |
| integer, intent(in) | id | ||
| ) |
| subroutine roadtypemodule::nullifyroad | ( | type(roadtype), intent(out) | road | ) |
| subroutine roadtypemodule::writeroadtype | ( | type(roadtype), intent(in) | road, |
| integer, intent(in) | io | ||
| ) |
| integer, parameter roadtypemodule::function_road_p = 1 |
| character(len=13), dimension(2), parameter roadtypemodule::roadtypes_p =(/ 'FUNCTION_ROAD', 'SURFACE_ROAD ' /) |
| integer, parameter roadtypemodule::surface_road_p = 2 |