File |
Line number |
Procedure |
Code |
./pkg/ctrl/ctrl_pack.F |
144 |
CTRL_PACK |
ictrlgrad = 1 |
./pkg/ctrl/ctrl_pack.F |
153 |
CTRL_PACK |
ictrlgrad = 2 |
./pkg/ctrl/ctrl_pack.F |
211 |
CTRL_PACK |
& cunit, ivartype, fname_theta(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
220 |
CTRL_PACK |
& cunit, ivartype, fname_salt(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
230 |
CTRL_PACK |
& cunit, ivartype, fname_hflux(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
240 |
CTRL_PACK |
& cunit, ivartype, fname_sflux(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
250 |
CTRL_PACK |
& cunit, ivartype, fname_tauu(ictrlgrad), "maskCtrlW", |
./pkg/ctrl/ctrl_pack.F |
260 |
CTRL_PACK |
& cunit, ivartype, fname_tauv(ictrlgrad), "maskCtrlS", |
./pkg/ctrl/ctrl_pack.F |
269 |
CTRL_PACK |
& cunit, ivartype, fname_atemp(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
278 |
CTRL_PACK |
& cunit, ivartype, fname_aqh(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
287 |
CTRL_PACK |
& cunit, ivartype, fname_uwind(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
296 |
CTRL_PACK |
& cunit, ivartype, fname_vwind(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
305 |
CTRL_PACK |
& cunit, ivartype, fname_obcsn(ictrlgrad), "maskobcsn", |
./pkg/ctrl/ctrl_pack.F |
314 |
CTRL_PACK |
& cunit, ivartype, fname_obcss(ictrlgrad), "maskobcss", |
./pkg/ctrl/ctrl_pack.F |
323 |
CTRL_PACK |
& cunit, ivartype, fname_obcsw(ictrlgrad), "maskobcsw", |
./pkg/ctrl/ctrl_pack.F |
332 |
CTRL_PACK |
& cunit, ivartype, fname_obcse(ictrlgrad), "maskobcse", |
./pkg/ctrl/ctrl_pack.F |
341 |
CTRL_PACK |
& cunit, ivartype, fname_diffkr(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
350 |
CTRL_PACK |
& cunit, ivartype, fname_kapgm(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
359 |
CTRL_PACK |
& cunit, ivartype, fname_tr1(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
368 |
CTRL_PACK |
& cunit, ivartype, fname_sst(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
377 |
CTRL_PACK |
& cunit, ivartype, fname_sss(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
387 |
CTRL_PACK |
& cunit, ivartype, fname_hfacc(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
391 |
CTRL_PACK |
& cunit, ivartype, fname_hfacc(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
401 |
CTRL_PACK |
& cunit, ivartype, fname_efluxy(ictrlgrad), "maskCtrlS", |
./pkg/ctrl/ctrl_pack.F |
410 |
CTRL_PACK |
& cunit, ivartype, fname_efluxp(ictrlgrad), "maskhFacV", |
./pkg/ctrl/ctrl_pack.F |
419 |
CTRL_PACK |
& cunit, ivartype, fname_bottomdrag(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
428 |
CTRL_PACK |
& cunit, ivartype, fname_edtaux(ictrlgrad), "maskCtrlW", |
./pkg/ctrl/ctrl_pack.F |
437 |
CTRL_PACK |
& cunit, ivartype, fname_edtauy(ictrlgrad), "maskCtrlS", |
./pkg/ctrl/ctrl_pack.F |
446 |
CTRL_PACK |
& cunit, ivartype, fname_uvel(ictrlgrad), "maskCtrlW", |
./pkg/ctrl/ctrl_pack.F |
455 |
CTRL_PACK |
& cunit, ivartype, fname_vvel(ictrlgrad), "maskCtrlS", |
./pkg/ctrl/ctrl_pack.F |
464 |
CTRL_PACK |
& cunit, ivartype, fname_etan(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
473 |
CTRL_PACK |
& cunit, ivartype, fname_relaxsst(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
482 |
CTRL_PACK |
& cunit, ivartype, fname_relaxsss(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_pack.F |
80 |
CTRL_PACK |
integer ictrlgrad |
./pkg/ctrl/ctrl_unpack.F |
155 |
CTRL_UNPACK |
ictrlgrad = 1 |
./pkg/ctrl/ctrl_unpack.F |
163 |
CTRL_UNPACK |
ictrlgrad = 2 |
./pkg/ctrl/ctrl_unpack.F |
303 |
CTRL_UNPACK |
& fname_theta(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
312 |
CTRL_UNPACK |
& fname_salt(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
322 |
CTRL_UNPACK |
& fname_hflux(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
332 |
CTRL_UNPACK |
& fname_sflux(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
342 |
CTRL_UNPACK |
& fname_tauu(ictrlgrad), "maskCtrlW", |
./pkg/ctrl/ctrl_unpack.F |
352 |
CTRL_UNPACK |
& fname_tauv(ictrlgrad), "maskCtrlS", |
./pkg/ctrl/ctrl_unpack.F |
361 |
CTRL_UNPACK |
& fname_atemp(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
370 |
CTRL_UNPACK |
& fname_aqh(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
379 |
CTRL_UNPACK |
& fname_uwind(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
388 |
CTRL_UNPACK |
& fname_vwind(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
397 |
CTRL_UNPACK |
& cunit, ivartype, fname_obcsn(ictrlgrad), "maskobcsn", |
./pkg/ctrl/ctrl_unpack.F |
406 |
CTRL_UNPACK |
& cunit, ivartype, fname_obcss(ictrlgrad), "maskobcss", |
./pkg/ctrl/ctrl_unpack.F |
415 |
CTRL_UNPACK |
& cunit, ivartype, fname_obcsw(ictrlgrad), "maskobcsw", |
./pkg/ctrl/ctrl_unpack.F |
424 |
CTRL_UNPACK |
& cunit, ivartype, fname_obcse(ictrlgrad), "maskobcse", |
./pkg/ctrl/ctrl_unpack.F |
433 |
CTRL_UNPACK |
& fname_diffkr(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
442 |
CTRL_UNPACK |
& fname_kapgm(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
451 |
CTRL_UNPACK |
& fname_tr1(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
460 |
CTRL_UNPACK |
& fname_sst(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
469 |
CTRL_UNPACK |
& fname_sss(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
479 |
CTRL_UNPACK |
& fname_hfacc(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
483 |
CTRL_UNPACK |
& fname_hfacc(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
493 |
CTRL_UNPACK |
& fname_efluxy(ictrlgrad), "maskCtrlS", |
./pkg/ctrl/ctrl_unpack.F |
502 |
CTRL_UNPACK |
& fname_efluxp(ictrlgrad), "maskhFacV", |
./pkg/ctrl/ctrl_unpack.F |
511 |
CTRL_UNPACK |
& fname_bottomdrag(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
520 |
CTRL_UNPACK |
& fname_edtaux(ictrlgrad), "maskCtrlW", |
./pkg/ctrl/ctrl_unpack.F |
529 |
CTRL_UNPACK |
& fname_edtauy(ictrlgrad), "maskCtrlS", |
./pkg/ctrl/ctrl_unpack.F |
538 |
CTRL_UNPACK |
& fname_uvel(ictrlgrad), "maskCtrlW", |
./pkg/ctrl/ctrl_unpack.F |
547 |
CTRL_UNPACK |
& fname_vvel(ictrlgrad), "maskCtrlS", |
./pkg/ctrl/ctrl_unpack.F |
556 |
CTRL_UNPACK |
& fname_etan(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
565 |
CTRL_UNPACK |
& fname_relaxsst(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
574 |
CTRL_UNPACK |
& fname_relaxsss(ictrlgrad), "maskCtrlC", |
./pkg/ctrl/ctrl_unpack.F |
74 |
CTRL_UNPACK |
integer ictrlgrad |