File |
Line number |
Procedure |
Code |
./pkg/shelfice/shelfice_cost_shifwflx.F |
131 |
SHELFICE_COST_SHIFWFLX |
write(fnamefld(1:80),'(2a,i10.10)') |
./pkg/shelfice/shelfice_cost_shifwflx.F |
139 |
SHELFICE_COST_SHIFWFLX |
& fnamefld, tmpfld2d, irec, doglobalread, |
./pkg/shelfice/shelfice_cost_shifwflx.F |
77 |
SHELFICE_COST_SHIFWFLX |
character*(80) fnamefld |
./pkg/ctrl/ctrl_cost_gen.F |
112 |
CTRL_COST_GEN2D |
character*(80) fnamefld |
./pkg/ctrl/ctrl_cost_gen.F |
141 |
CTRL_COST_GEN2D |
write(fnamefld(1:80),'(2a,i10.10)') |
./pkg/ctrl/ctrl_cost_gen.F |
170 |
CTRL_COST_GEN2D |
& fnamefld, tmpfld2d, irec, doglobalread, |
./pkg/ctrl/ctrl_cost_gen.F |
173 |
CTRL_COST_GEN2D |
CALL READ_REC_XY_RL( fnamefld, tmpfld2d, iRec, 1, myThid ) |
./pkg/ctrl/ctrl_cost_gen.F |
216 |
CTRL_COST_GEN2D |
& fnamefld, tmpfld2d, irec, doglobalread, |
./pkg/ctrl/ctrl_cost_gen.F |
219 |
CTRL_COST_GEN2D |
CALL READ_REC_XY_RL( fnamefld, tmpfld2d, iRec, 1, myThid ) |
./pkg/ctrl/ctrl_cost_gen.F |
274 |
CTRL_COST_GEN2D |
& fnamefld, tmpfld2d, irec, doglobalread, |
./pkg/ctrl/ctrl_cost_gen.F |
277 |
CTRL_COST_GEN2D |
CALL READ_REC_XY_RL( fnamefld, tmpfld2d, iRec, 1, myThid ) |
./pkg/ctrl/ctrl_cost_gen.F |
338 |
CTRL_COST_GEN2D |
& fnamefld, tmpfld2d, irec, doglobalread, |
./pkg/ctrl/ctrl_cost_gen.F |
341 |
CTRL_COST_GEN2D |
CALL READ_REC_XY_RL( fnamefld, tmpfld2d, iRec, 1, myThid ) |
./pkg/ctrl/ctrl_cost_gen.F |
471 |
CTRL_COST_GEN3D |
character*(80) fnamefld |
./pkg/ctrl/ctrl_cost_gen.F |
495 |
CTRL_COST_GEN3D |
write(fnamefld(1:80),'(2a,i10.10)') |
./pkg/ctrl/ctrl_cost_gen.F |
510 |
CTRL_COST_GEN3D |
call ACTIVE_READ_XYZ( fnamefld, tmpfld3d, irec, doglobalread, |
./pkg/ctrl/ctrl_cost_gen.F |
514 |
CTRL_COST_GEN3D |
CALL READ_REC_XYZ_RL( fnamefld, tmpfld3d, iRec, 1, myThid ) |
./pkg/ecco/cost_obcse.F |
100 |
COST_OBCSE |
character*(80) fnamefld |
./pkg/ecco/cost_obcse.F |
150 |
COST_OBCSE |
write(fnamefld(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_obcse.F |
157 |
COST_OBCSE |
call ACTIVE_READ_YZ( fnamefld, tmpfield, irec, doglobalread, |
./pkg/ecco/cost_obcsn.F |
148 |
COST_OBCSN |
write(fnamefld(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_obcsn.F |
155 |
COST_OBCSN |
call ACTIVE_READ_XZ( fnamefld, tmpfield, irec, doglobalread, |
./pkg/ecco/cost_obcsn.F |
98 |
COST_OBCSN |
character*(80) fnamefld |
./pkg/ecco/cost_obcss.F |
148 |
COST_OBCSS |
write(fnamefld(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_obcss.F |
155 |
COST_OBCSS |
call ACTIVE_READ_XZ( fnamefld, tmpfield, irec, doglobalread, |
./pkg/ecco/cost_obcss.F |
98 |
COST_OBCSS |
character*(80) fnamefld |
./pkg/ecco/cost_obcsw.F |
148 |
COST_OBCSW |
write(fnamefld(1:80),'(2a,i10.10)') |
./pkg/ecco/cost_obcsw.F |
155 |
COST_OBCSW |
call ACTIVE_READ_YZ( fnamefld, tmpfield, irec, doglobalread, |
./pkg/ecco/cost_obcsw.F |
98 |
COST_OBCSW |
character*(80) fnamefld |