File |
Line number |
Procedure |
Code |
./pkg/profiles/profiles_readvector.F |
28 |
PROFILES_READVECTOR |
integer irec, fNb, myThid,err,varid1,tmpprofno |
./pkg/profiles/profiles_readvector.F |
44 |
PROFILES_READVECTOR |
err = NF_INQ_DIMLEN(fiddata(fNb,bi,bj), varid1, tmpprofno) |
./pkg/profiles/profiles_readvector.F |
49 |
PROFILES_READVECTOR |
profiles_maxind_buff(bi,bj)=min(tmpprofno,irec+500) |
./pkg/profiles/profiles_readvector.F |
57 |
PROFILES_READVECTOR |
profiles_maxind_buff(bi,bj)=min(tmpprofno,irec+999) |
./pkg/profiles/profiles_readvector.F |
63 |
PROFILES_READVECTOR |
& irec, profNo(fNb,bi,bj), tmpprofno |