This module supports the program in the file example/learn-microphysics-procedures.f90.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real, | public, | parameter | :: | T(*) | = | [(real(i)/real(resolution), i=0, resolution)] | |
real, | public, | parameter | :: | p(*) | = | [(real(i)/real(resolution), i=0, resolution)] | |
real, | private, | parameter | :: | T_max | = | 307.610779 | |
real, | private, | parameter | :: | T_min | = | 236.352524 | |
integer, | private | :: | i | ||||
real, | private, | parameter | :: | p_max | = | 98596.7578 | |
real, | private, | parameter | :: | p_min | = | 29671.1348 | |
integer, | private, | parameter | :: | resolution | = | 10 |