rotate Interface

public interface rotate

Contents


Module Procedures

public function rotate_orb(in_orb, rot_angle) result(out_orb)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: in_orb
real(kind=dp), intent(in) :: rot_angle

Return Value integer

public function rotate_vec(in_vec, rot_angle) result(out_vec)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: in_vec(3)
real(kind=dp), intent(in) :: rot_angle

Return Value integer, (3)