COSMOS v7.655  COSMOSv7655
(AirShowerMC)
stand.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine stand
 

Function/Subroutine Documentation

◆ stand()

subroutine stand ( )

Definition at line 10 of file stand.f.

References a, h, o, and z.

Referenced by mnexcm().

10 *
11 * $Id: d506dp.inc,v 1.1.1.1 1996/03/07 14:31:32 mclareni Exp $
12 *
13 * $Log: d506dp.inc,v $
14 * Revision 1.1.1.1 1996/03/07 14:31:32 mclareni
15 * Minuit
16 *
17 *
18 *
19 *
20 * d506dp.inc
21 *
22 C ************ DOUBLE PRECISION VERSION *************
23  IMPLICIT DOUBLE PRECISION (a-h,o-z)
24 CC optional user-supplied subroutine is called whenever the
25 CC command "standard" appears.
26 CC
27  RETURN
nodes z
real(4), dimension(:), allocatable, save h
Definition: cNRLAtmos.f:28
struct ob o[NpMax]
Definition: Zprivate.h:34
real(4), save a
Definition: cNRLAtmos.f:20
Here is the caller graph for this function: