Museum

Home

Lab Overview

Retrotechnology Articles

Online Manuals

⇒ sign(3F) — svr3 — mips UMIPS RISC/os 5.01

Media Vault

Software Library

Restoration Projects

Artifacts Sought



SIGN(3F-SVR3)       RISC/os Reference Manual        SIGN(3F-SVR3)



NAME
     sign, isign, dsign - Fortran transfer-of-sign intrinsic
          function

SYNOPSIS
     integer i, j, k
     real r1, r2, r3
     double precision dp1, dp2, dp3

     k = isign(i, j)
     k = sign(i, j)

     r3 = sign(r1, r2)

     dp3 = dsign(dp1, dp2)
     dp3 = sign(dp1, dp2)

DESCRIPTION
     isign returns the magnitude of its first argument with the
     sign of its second argument.  sign and dsign are its real
     and double-precision counterparts, respectively.  The gen-
     eric version is sign and will devolve to the appropriate
     type depending on its arguments.
































                        Printed 11/19/92                   Page 1



Typewritten Software • bear@typewritten.org • Edmonds, WA 98026