| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/OBCS_SEAICE.h |
21 |
NO PROCEDURE |
& seaiceSpongeThickness |
|
./pkg/obcs/OBCS_SEAICE.h |
22 |
NO PROCEDURE |
INTEGER seaiceSpongeThickness |
|
./pkg/obcs/obcs_readparms.F |
201 |
OBCS_READPARMS |
& seaiceSpongeThickness |
|
./pkg/obcs/obcs_readparms.F |
425 |
OBCS_READPARMS |
seaiceSpongeThickness = 0 |
|
./pkg/obcs/obcs_seaice_sponge.F |
112 |
OBCS_SEAICE_SPONGE_A |
DO isl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
116 |
OBCS_SEAICE_SPONGE_A |
& float(seaiceSpongeThickness-isl)*Arelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
118 |
OBCS_SEAICE_SPONGE_A |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
139 |
OBCS_SEAICE_SPONGE_A |
DO isl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
143 |
OBCS_SEAICE_SPONGE_A |
& float(seaiceSpongeThickness-isl)*Arelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
145 |
OBCS_SEAICE_SPONGE_A |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
206 |
OBCS_SEAICE_SPONGE_H |
IF ( useSeaiceSponge .AND. seaiceSpongeThickness.NE.0 ) THEN |
|
./pkg/obcs/obcs_seaice_sponge.F |
215 |
OBCS_SEAICE_SPONGE_H |
DO jsl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
219 |
OBCS_SEAICE_SPONGE_H |
& float(seaiceSpongeThickness-jsl)*Hrelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
221 |
OBCS_SEAICE_SPONGE_H |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
242 |
OBCS_SEAICE_SPONGE_H |
DO jsl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
246 |
OBCS_SEAICE_SPONGE_H |
& float(seaiceSpongeThickness-jsl)*Hrelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
248 |
OBCS_SEAICE_SPONGE_H |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
269 |
OBCS_SEAICE_SPONGE_H |
DO isl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
273 |
OBCS_SEAICE_SPONGE_H |
& float(seaiceSpongeThickness-isl)*Hrelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
275 |
OBCS_SEAICE_SPONGE_H |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
296 |
OBCS_SEAICE_SPONGE_H |
DO isl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
300 |
OBCS_SEAICE_SPONGE_H |
& float(seaiceSpongeThickness-isl)*Hrelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
302 |
OBCS_SEAICE_SPONGE_H |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
363 |
OBCS_SEAICE_SPONGE_SL |
IF ( useSeaiceSponge .AND. seaiceSpongeThickness.NE.0 ) THEN |
|
./pkg/obcs/obcs_seaice_sponge.F |
372 |
OBCS_SEAICE_SPONGE_SL |
DO jsl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
376 |
OBCS_SEAICE_SPONGE_SL |
& float(seaiceSpongeThickness-jsl)*SLrelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
378 |
OBCS_SEAICE_SPONGE_SL |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
399 |
OBCS_SEAICE_SPONGE_SL |
DO jsl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
403 |
OBCS_SEAICE_SPONGE_SL |
& float(seaiceSpongeThickness-jsl)*SLrelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
405 |
OBCS_SEAICE_SPONGE_SL |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
426 |
OBCS_SEAICE_SPONGE_SL |
DO isl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
430 |
OBCS_SEAICE_SPONGE_SL |
& float(seaiceSpongeThickness-isl)*SLrelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
432 |
OBCS_SEAICE_SPONGE_SL |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
453 |
OBCS_SEAICE_SPONGE_SL |
DO isl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
457 |
OBCS_SEAICE_SPONGE_SL |
& float(seaiceSpongeThickness-isl)*SLrelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
459 |
OBCS_SEAICE_SPONGE_SL |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
49 |
OBCS_SEAICE_SPONGE_A |
IF ( useSeaiceSponge .AND. seaiceSpongeThickness.NE.0 ) THEN |
|
./pkg/obcs/obcs_seaice_sponge.F |
520 |
OBCS_SEAICE_SPONGE_SN |
IF ( useSeaiceSponge .AND. seaiceSpongeThickness.NE.0 ) THEN |
|
./pkg/obcs/obcs_seaice_sponge.F |
529 |
OBCS_SEAICE_SPONGE_SN |
DO jsl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
533 |
OBCS_SEAICE_SPONGE_SN |
& float(seaiceSpongeThickness-jsl)*SNrelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
535 |
OBCS_SEAICE_SPONGE_SN |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
556 |
OBCS_SEAICE_SPONGE_SN |
DO jsl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
560 |
OBCS_SEAICE_SPONGE_SN |
& float(seaiceSpongeThickness-jsl)*SNrelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
562 |
OBCS_SEAICE_SPONGE_SN |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
583 |
OBCS_SEAICE_SPONGE_SN |
DO isl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
587 |
OBCS_SEAICE_SPONGE_SN |
& float(seaiceSpongeThickness-isl)*SNrelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
589 |
OBCS_SEAICE_SPONGE_SN |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
58 |
OBCS_SEAICE_SPONGE_A |
DO jsl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
610 |
OBCS_SEAICE_SPONGE_SN |
DO isl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
614 |
OBCS_SEAICE_SPONGE_SN |
& float(seaiceSpongeThickness-isl)*SNrelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
616 |
OBCS_SEAICE_SPONGE_SN |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
62 |
OBCS_SEAICE_SPONGE_A |
& float(seaiceSpongeThickness-jsl)*Arelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
64 |
OBCS_SEAICE_SPONGE_A |
& / float(seaiceSpongeThickness-1) |
|
./pkg/obcs/obcs_seaice_sponge.F |
85 |
OBCS_SEAICE_SPONGE_A |
DO jsl= 1,seaiceSpongeThickness |
|
./pkg/obcs/obcs_seaice_sponge.F |
89 |
OBCS_SEAICE_SPONGE_A |
& float(seaiceSpongeThickness-jsl)*Arelaxobcsbound |
|
./pkg/obcs/obcs_seaice_sponge.F |
91 |
OBCS_SEAICE_SPONGE_A |
& / float(seaiceSpongeThickness-1) |