CameraFlight Derived Type

type, private :: CameraFlight

A camera flight (see the module documentation): from camera start (in view from's frame) to camera finish (in view to's).


Inherits

type~~cameraflight~~InheritsGraph type~cameraflight CameraFlight type~view View type~cameraflight->type~view from, to type~referenceframe ReferenceFrame type~view->type~referenceframe root, frame, lookat type~referenceframe->type~referenceframe follow_frame_ c_ptr c_ptr type~referenceframe->c_ptr light_node, light_switch, node_, contents_node, axis_node, axis_label_node, axis_arrow, axis_text, name_label_node, name_text type~framepointer FramePointer type~referenceframe->type~framepointer children, parents type~trajectoryfollower TrajectoryFollower type~referenceframe->type~trajectoryfollower follower_ type~framepointer->type~referenceframe p type~datasource DataSource type~trajectoryfollower->type~datasource sources_ type~trajectorypointer TrajectoryPointer type~trajectoryfollower->type~trajectorypointer trajs type~trajectory Trajectory type~trajectorypointer->type~trajectory p

Inherited by

type~~cameraflight~~InheritedByGraph type~cameraflight CameraFlight type~windowproxy WindowProxy type~windowproxy->type~cameraflight flight

Components

Type Visibility Attributes Name Initial
logical, public :: active = .false.

flying

real(kind=wp), public :: duration = 0.0_wp

s

real(kind=wp), public :: finish(3,3) = 0.0_wp

(columns: eye, center, up)

type(View), public, pointer :: from => null()

the views flown from and to

real(kind=wp), public :: start(3,3) = 0.0_wp

(columns: eye, center, up)

real(kind=wp), public :: started = 0.0_wp

the window's wall time at the start (s; window_wall)

type(View), public, pointer :: to => null()

the views flown from and to


Source Code

    type :: CameraFlight
        logical :: active = .false.                         !! flying
        type(View), pointer :: from => null(), to => null()  !! the views flown from and to
        real(wp) :: start(3,3) = 0.0_wp, finish(3,3) = 0.0_wp   !! (columns: eye, center, up)
        real(wp) :: started = 0.0_wp                        !! the window's wall time at the start (s; window_wall)
        real(wp) :: duration = 0.0_wp                       !! s
    end type CameraFlight