home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2002 November / SGI IRIX Base Documentation 2002 November.iso / usr / share / catman / p_man / cat3 / f90 / shape.z / shape
Encoding:
Text File  |  2002-10-03  |  1.5 KB  |  41 lines
  1. SHAPE(3I)                                             Last changed: 4-13-99
  2.  
  3.  
  4. NNAAMMEE
  5.      SSHHAAPPEE - Returns the shape of an array or a scalar
  6.  
  7. SSYYNNOOPPSSIISS
  8.      SSHHAAPPEE (([SSOOUURRCCEE==]_s_o_u_r_c_e))
  9.  
  10. IIMMPPLLEEMMEENNTTAATTIIOONN
  11.      UNICOS, UNICOS/mk, IRIX systems
  12.  
  13.      CF90, MIPSpro 7 Fortran 90
  14.  
  15. SSTTAANNDDAARRDDSS
  16.      Fortran
  17.  
  18. DDEESSCCRRIIPPTTIIOONN
  19.      The SSHHAAPPEE intrinsic function returns the shape of an array or a
  20.      scalar.  It accepts the following argument:
  21.  
  22.      _s_o_u_r_c_e    May be of any type.  It can be array valued or scalar.  It
  23.                must not be a pointer that is disassociated or an
  24.                allocatable array that is not allocated.  It must not be an
  25.                assumed-size array.
  26.  
  27.      SSHHAAPPEE is an inquiry function.  The name of this intrinsic cannot be
  28.      passed as an argument.
  29.  
  30. RREETTUURRNN VVAALLUUEESS
  31.      The result is a default integer array of rank 1 whose size is equal to
  32.      the rank of _s_o_u_r_c_e.  The value of the result is the shape of _s_o_u_r_c_e.
  33.  
  34. EEXXAAMMPPLLEESS
  35.      The value of SSHHAAPPEE((AA((22::55,, --11::11)))) is ((//44,, 33//)).  The value of SSHHAAPPEE((33))
  36.      is the rank -1 array of size 0.
  37.  
  38. SSEEEE AALLSSOO
  39.      _I_n_t_r_i_n_s_i_c _P_r_o_c_e_d_u_r_e_s _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l for the printed version of this
  40.      man page.
  41.