4.7.3 SUBROUTINE ZUINPI(PHIIN, PHIOUT) : bring angle INto the interval 0 to PI

The polar angle PHIIN is set to the equivalent angle in 0 to pi (-PHIIN = PHIN, since that corresponds to a rotation around the polar axis).

ARGUMENTS:

INPUT :

    PHIIN : input angle.

OUTPUT :

    PHIOUT : output angle = PHIIN, but given in the interval 0-pi

IMPLICIT INPUTS:

    none.

IMPLICIT OUTPUTS:

    none.

CALLED BY :

any routine.

CALLED ROUTINE(S):

none

SIDE EFFECTS:

none.

AUTHORS:

M. Berggren, UFRJ

CREATION DATE:

11-APR-1995