grad Subroutine

  1. filterSD.f90
  2. grad

subroutine grad(n, d, g, ws, lws, cstype)

Arguments

Type IntentOptional AttributesName
integer :: n
real :: d
real :: g
real :: ws
integer :: lws
character :: cstype(*)

Called by

proc~~grad~~CalledByGraph proc~grad grad proc~check check proc~check->proc~grad proc~checkg checkg proc~checkg->proc~grad proc~glcpd glcpd proc~glcpd->proc~grad

Contents

Common Blocks


Common Blocks

common /defaultc/

Type AttributesNameInitial
real :: ainfty
real :: ubd
integer :: mlp
integer :: mxf

common /functc/

Type AttributesNameInitial
real :: fxd
real :: alc
integer :: m
integer :: iph
integer :: last1
integer :: next1
integer :: nx
integer :: nx1
integer :: nal
integer :: nal1
integer :: naal
integer :: naal1
integer :: nxd
integer :: nxd1
integer :: ncx
integer :: ncx1
integer :: ncxd
integer :: ncxd1
integer :: nla1

common /maxac/

Type AttributesNameInitial
integer :: maxa