these are roots courant numbers
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=wp), | intent(in) | :: | t | |||
| real(kind=wp), | intent(in) | :: | tout | |||
| real(kind=wp), | intent(in) | :: | tglowout | |||
| integer, | intent(in) | :: | flagglow | |||
| real(kind=wp), | intent(in) | :: | tcfl | |||
| real(kind=wp), | intent(in), | dimension(-1:,-1:,-1:,:) | :: | ns | ||
| real(kind=wp), | intent(in), | dimension(-1:,-1:,-1:,:) | :: | Ts | ||
| real(kind=wp), | intent(in), | dimension(-1:,-1:,-1:,:) | :: | vs1 | ||
| real(kind=wp), | intent(in), | dimension(-1:,-1:,-1:,:) | :: | vs2 | ||
| real(kind=wp), | intent(in), | dimension(-1:,-1:,-1:,:) | :: | vs3 | ||
| real(kind=wp), | intent(in), | dimension(-1:,-1:,-1:) | :: | B1 | ||
| real(kind=wp), | intent(in), | dimension(-1:,-1:,-1:) | :: | B2 | ||
| real(kind=wp), | intent(in), | dimension(-1:,-1:,-1:) | :: | B3 | ||
| type(curvmesh), | intent(in) | :: | x | |||
| integer, | intent(in) | :: | potsolve | |||
| real(kind=wp), | intent(out) | :: | dt |