1 |
|
C $Header$ |
2 |
|
C $Name$ |
3 |
|
|
4 |
C---------------------------------------- |
C---------------------------------------- |
5 |
C subroutine profiles_readvector |
C subroutine profiles_readvector |
6 |
C---------------------------------------- |
C---------------------------------------- |
7 |
CADJ SUBROUTINE profiles_readvector INPUT = 1,2,3,4,6,7,8 |
CADJ SUBROUTINE profiles_readvector INPUT = 1,2,3,4,6,7,8 |
8 |
CADJ SUBROUTINE profiles_readvector DEPEND = 1,2,3,4,6,7 |
CADJ SUBROUTINE profiles_readvector DEPEND = 1,2,3,4,6,7 |
9 |
CADJ SUBROUTINE profiles_readvector OUTPUT = 5 |
CADJ SUBROUTINE profiles_readvector OUTPUT = 5 |
10 |
|
|
11 |
|
CADJ SUBROUTINE NF_OPEN INPUT = |
12 |
|
CADJ SUBROUTINE NF_CLOSE INPUT = |