FUNCtion norh_gt_pmat, index

;+
; NAME:
;       norh_gt_pmat
;
; PURPOSE:
;       Return the 'P-matrix'
;
; CALLING SEQUENCE:
;       pmat=norh_gt_pmat(index)
;
; INPUTS:
;       index: index structure
;
; HISTORY:
;       Writtern 1998-09-17 TY
;       Modified 2000-04-19 TY based on V. Grechnev's suggestion
;-

return, index.norh.pmat

end