| File |
Line number |
Procedure |
Code |
|
./pkg/rw/write_local_rl.F |
10 |
WRITE_LOCAL_RL |
I pref, suff, nNr, field, |
|
./pkg/rw/write_local_rl.F |
35 |
WRITE_LOCAL_RL |
INTEGER nNr |
|
./pkg/rw/write_local_rl.F |
36 |
WRITE_LOCAL_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNr) |
|
./pkg/rw/write_local_rl.F |
85 |
WRITE_LOCAL_RL |
I fType, nNr, 1, nNr, field, dummyRS, |
|
./pkg/rw/write_local_rl.F |
90 |
WRITE_LOCAL_RL |
I fType, nNr, field, dummyRS, |
|
./pkg/rw/write_local_rs.F |
10 |
WRITE_LOCAL_RS |
I pref, suff, nNr, field, |
|
./pkg/rw/write_local_rs.F |
35 |
WRITE_LOCAL_RS |
INTEGER nNr |
|
./pkg/rw/write_local_rs.F |
36 |
WRITE_LOCAL_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNr) |
|
./pkg/rw/write_local_rs.F |
85 |
WRITE_LOCAL_RS |
I fType, nNr, 1, nNr, dummyRL, field, |
|
./pkg/rw/write_local_rs.F |
90 |
WRITE_LOCAL_RS |
I fType, nNr, dummyRL, field, |
|
./pkg/aim_v23/aim_write_local.F |
10 |
AIM_WRITE_LOCAL |
I pref, suff, nNr, field, |
|
./pkg/aim_v23/aim_write_local.F |
38 |
AIM_WRITE_LOCAL |
INTEGER nNr |
|
./pkg/aim_v23/aim_write_local.F |
39 |
AIM_WRITE_LOCAL |
_RL field(sNx,sNy,nNr) |
|
./pkg/aim_v23/aim_write_local.F |
58 |
AIM_WRITE_LOCAL |
IF ( nNr.LT.1 .OR. nNr.GT.Nr ) THEN |
|
./pkg/aim_v23/aim_write_local.F |
65 |
AIM_WRITE_LOCAL |
& 'AIM_WRITE_LOCAL: 3rd dim.(field)=',nNr,' has to be <',Nr |
|
./pkg/aim_v23/aim_write_local.F |
71 |
AIM_WRITE_LOCAL |
IF (nNr.EQ.Nr) THEN |
|
./pkg/aim_v23/aim_write_local.F |
83 |
AIM_WRITE_LOCAL |
DO k=1,nNr |
|
./pkg/aim_v23/aim_write_local.F |
93 |
AIM_WRITE_LOCAL |
CALL WRITE_LOCAL_RL( pref, suff, nNr, tmpFld, |
|
./pkg/aim_v23/aim_write_phys.F |
102 |
AIM_WRITE_PHYS |
nLoc = nNr |
|
./pkg/aim_v23/aim_write_phys.F |
103 |
AIM_WRITE_PHYS |
IF ( kLev.GE.1 .AND. kLev.LE.nNr ) THEN |
|
./pkg/aim_v23/aim_write_phys.F |
10 |
AIM_WRITE_PHYS |
I pref, suff, nNr, field, |
|
./pkg/aim_v23/aim_write_phys.F |
110 |
AIM_WRITE_PHYS |
ELSEIF (nNr.EQ.Nr) THEN |
|
./pkg/aim_v23/aim_write_phys.F |
122 |
AIM_WRITE_PHYS |
DO k=1,nNr |
|
./pkg/aim_v23/aim_write_phys.F |
41 |
AIM_WRITE_PHYS |
INTEGER nNr |
|
./pkg/aim_v23/aim_write_phys.F |
42 |
AIM_WRITE_PHYS |
_RL field(sNx,sNy,nNr,MAX_NO_THREADS) |
|
./pkg/aim_v23/aim_write_phys.F |
78 |
AIM_WRITE_PHYS |
IF ( nNr.LT.1 .OR. nNr.GT.Nr ) THEN |
|
./pkg/aim_v23/aim_write_phys.F |
85 |
AIM_WRITE_PHYS |
& 'AIM_WRITE_PHYS: 3rd dim.(field)=',nNr,' has to be <',Nr |
|
./pkg/aim_v23/aim_write_phys.F |
88 |
AIM_WRITE_PHYS |
ELSEIF ( kLev.NE.0 .AND. kLev.GT.nNr ) THEN |
|
./pkg/aim_v23/aim_write_phys.F |
96 |
AIM_WRITE_PHYS |
& ' out of bounds (dim=', nNr,' )' |