| File |
Line number |
Procedure |
Code |
|
./pkg/profiles/profiles.h |
116 |
NO PROCEDURE |
& profiles_minind_buff, profiles_maxind_buff, profiles_curfile_buff |
|
./pkg/profiles/profiles.h |
48 |
NO PROCEDURE |
integer profiles_minind_buff(nsx,nsy) |
|
./pkg/profiles/profiles_readvector.F |
125 |
PROFILES_READVECTOR |
& (k,irec-profiles_minind_buff(bi,bj)+1,-vNb,bi,bj) |
|
./pkg/profiles/profiles_readvector.F |
131 |
PROFILES_READVECTOR |
& (k,irec-profiles_minind_buff(bi,bj)+1,vNb,bi,bj) |
|
./pkg/profiles/profiles_readvector.F |
45 |
PROFILES_READVECTOR |
if ( (irec.LT.profiles_minind_buff(bi,bj)).OR. |
|
./pkg/profiles/profiles_readvector.F |
53 |
PROFILES_READVECTOR |
profiles_minind_buff(bi,bj)=max(1,irec-500+1) |
|
./pkg/profiles/profiles_readvector.F |
55 |
PROFILES_READVECTOR |
elseif (irec.LT.profiles_minind_buff(bi,bj)) then |
|
./pkg/profiles/profiles_readvector.F |
57 |
PROFILES_READVECTOR |
profiles_minind_buff(bi,bj)=max(1,irec-999) |
|
./pkg/profiles/profiles_readvector.F |
61 |
PROFILES_READVECTOR |
profiles_minind_buff(bi,bj)=irec |
|
./pkg/profiles/profiles_readvector.F |
69 |
PROFILES_READVECTOR |
& profiles_minind_buff(bi,bj), profiles_maxind_buff(bi,bj), |
|
./pkg/profiles/profiles_readvector.F |
77 |
PROFILES_READVECTOR |
vec_start(2)=profiles_minind_buff(bi,bj) |
|
./pkg/profiles/profiles_readvector.F |
80 |
PROFILES_READVECTOR |
& profiles_maxind_buff(bi,bj)-profiles_minind_buff(bi,bj)+1 |