SSG00


【機能】

    3点で囲まれる角の反時計回りの角度を求める(3D)


【使用形式】

    CALL  SSG00(XO,YO,XS,YS,XE,YE,IDR,TH,IR)


【引数説明】

    [INPUT]
        XO, YO  : 原点座標        
        XS, YS  : 始点座標        
        XE, YE  : 終点座標        
        IDR     : 角度の単位の指定
                    0 ; ディグリー
                    1 ; ラジアン  

    [OUTPUT]                      
        TH        : 角度                                      
                      IDR=0のとき、0°≦TH<360°             
                      IDR=1のとき、0≦TH<2π                 
        IR        : リターンフラグ                            
                      0 ; 正常終了                            
                     -1 ; 入力エラー(原点と終点が同一の場合)

【機能説明】

    ・原点に対して、始点終点ではさまれた角の、始点から終点への
      反時計回りの角度を求める。
    ・角度をディグリーで出力するか、ラジアンで出力するかを選択
      する。
    ・始点と原点が同一座標の場合は、原点と終点を結ぶ方向のX軸
      とのなす角度を求める。