Go to the source code of this file.
Functions/Subroutines | |
| subroutine | lecdon (F1, NAME1, MODE1, F2, NAME2, MODE2, F3, NAME3, MODE3, NPOIN2, NDON, FFORMAT, INDIC, CHDON, TEXTE, TROUVE) |
Function/Subroutine Documentation
◆ lecdon()
| subroutine lecdon | ( | double precision, dimension(npoin2), intent(inout) | F1, |
| character(len=32), intent(in) | NAME1, | ||
| integer, intent(in) | MODE1, | ||
| double precision, dimension(npoin2), intent(inout) | F2, | ||
| character(len=32), intent(in) | NAME2, | ||
| integer, intent(in) | MODE2, | ||
| double precision, dimension(npoin2), intent(inout) | F3, | ||
| character(len=32), intent(in) | NAME3, | ||
| integer, intent(in) | MODE3, | ||
| integer, intent(in) | NPOIN2, | ||
| integer, intent(in) | NDON, | ||
| character(len=8), intent(in) | FFORMAT, | ||
| integer, intent(in) | INDIC, | ||
| character(len=7), intent(in) | CHDON, | ||
| character(len=32), dimension(30), intent(inout) | TEXTE, | ||
| logical, dimension(3), intent(inout) | TROUVE | ||
| ) |
- Parameters
-
[in] ndon CHDON Name of the variable read from the data file [out] F1 First variable to read [out] F2 Second variable to read [out] F3 Third variable to read [in] INDIC File format [in] MODE1 Mode: 0= do not read 1= READ IF PRESENT [in] MODE2 Like mode1 for second variable [in] MODE3 Like mode1 for third variable [in] NAME1 Name of first variable [in] NAME2 Name of second variable [in] NAME3 Name of third variable [in] NDON Logical unit number of tha data file [in] NPOIN2 Number of points in 2d mesh [in,out] TEXTE Name of variables in the serafin file [in,out] TROUVE 3 logical, will say if variables have been found [in] X Abscissae of points in the mesh [in] Y Ordinates of points in the mesh [in] npoin2 CHDON Name of the variable read from the data file [out] F1 First variable to read [out] F2 Second variable to read [out] F3 Third variable to read [in] INDIC File format [in] MODE1 Mode: 0= do not read 1= READ IF PRESENT [in] MODE2 Like mode1 for second variable [in] MODE3 Like mode1 for third variable [in] NAME1 Name of first variable [in] NAME2 Name of second variable [in] NAME3 Name of third variable [in] NDON Logical unit number of tha data file [in] NPOIN2 Number of points in 2d mesh [in,out] TEXTE Name of variables in the serafin file [in,out] TROUVE 3 logical, will say if variables have been found [in] X Abscissae of points in the mesh [in] Y Ordinates of points in the mesh [in] indic CHDON Name of the variable read from the data file [out] F1 First variable to read [out] F2 Second variable to read [out] F3 Third variable to read [in] INDIC File format [in] MODE1 Mode: 0= do not read 1= READ IF PRESENT [in] MODE2 Like mode1 for second variable [in] MODE3 Like mode1 for third variable [in] NAME1 Name of first variable [in] NAME2 Name of second variable [in] NAME3 Name of third variable [in] NDON Logical unit number of tha data file [in] NPOIN2 Number of points in 2d mesh [in,out] TEXTE Name of variables in the serafin file [in,out] TROUVE 3 logical, will say if variables have been found [in] X Abscissae of points in the mesh [in] Y Ordinates of points in the mesh
Definition at line 8 of file lecdon.f.
Here is the call graph for this function: Here is the caller graph for this function: