File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_clockstuff.F |
49 |
SET_ALARM |
logical first,set |
./pkg/fizhi/fizhi_clockstuff.F |
50 |
SET_ALARM |
data first /.true./ |
./pkg/fizhi/fizhi_clockstuff.F |
54 |
SET_ALARM |
if(first) then |
./pkg/fizhi/fizhi_clockstuff.F |
97 |
SET_ALARM |
first = .false. |
./pkg/fizhi/fizhi_lwrad.F |
787 |
IRRAD |
logical first |
./pkg/fizhi/fizhi_lwrad.F |
788 |
IRRAD |
data first /.true./ |
./pkg/fizhi/fizhi_lwrad.F |
797 |
IRRAD |
if (first) then |
./pkg/fizhi/fizhi_lwrad.F |
865 |
IRRAD |
first=.false. |
./pkg/fizhi/fizhi_moist.F |
128 |
MOISTIO |
logical first |
./pkg/fizhi/fizhi_moist.F |
1396 |
RNDCLOUD |
logical first |
./pkg/fizhi/fizhi_moist.F |
1397 |
RNDCLOUD |
data first /.true./ |
./pkg/fizhi/fizhi_moist.F |
1406 |
RNDCLOUD |
if(first .and. myid.eq.1) print *,' NO RANDOM CLOUDS IN RAS ' |
./pkg/fizhi/fizhi_moist.F |
1424 |
RNDCLOUD |
elseif ( first.and.(iras.gt.1) .or. mcheck.eq.0 ) then |
./pkg/fizhi/fizhi_moist.F |
1455 |
RNDCLOUD |
first = .false. |
./pkg/fizhi/fizhi_moist.F |
203 |
MOISTIO |
if(first .and. myid.eq.1 .and. bi.eq.1 ) then |
./pkg/fizhi/fizhi_moist.F |
210 |
MOISTIO |
first = .false. |
./pkg/fizhi/fizhi_swrad.F |
122 |
SWRIO |
if (first .and. myid.eq.1 ) then |
./pkg/fizhi/fizhi_swrad.F |
129 |
SWRIO |
first = .false. |
./pkg/fizhi/fizhi_swrad.F |
98 |
SWRIO |
logical first |
./pkg/fizhi/fizhi_swrad.F |
99 |
SWRIO |
data first /.true./ |
./pkg/fizhi/update_ocean_exports.F |
119 |
GETSICE |
. sicebc1,sicebc2,first,nymdbc1,nymdbc2,nhmsbc1,nhmsbc2, |
./pkg/fizhi/update_ocean_exports.F |
172 |
GETSICE |
logical first |
./pkg/fizhi/update_ocean_exports.F |
220 |
GETSICE |
if (first) then |
./pkg/fizhi/update_ocean_exports.F |
226 |
GETSICE |
first = .false. |
./pkg/fizhi/update_ocean_exports.F |
380 |
GETSST |
. sstbc1,sstbc2,first,nymdbc1,nymdbc2,nhmsbc1,nhmsbc2, |
./pkg/fizhi/update_ocean_exports.F |
433 |
GETSST |
logical first |
./pkg/fizhi/update_ocean_exports.F |
480 |
GETSST |
if (first) then |
./pkg/fizhi/update_ocean_exports.F |
486 |
GETSST |
first = .false. |
./pkg/fizhi/update_ocean_exports.F |
50 |
UPDATE_OCEAN_EXPORTS |
logical first(nSx,nSy) |
./pkg/fizhi/update_ocean_exports.F |
53 |
UPDATE_OCEAN_EXPORTS |
data first/nSxnSy*.true./ |
./pkg/fizhi/update_ocean_exports.F |
91 |
UPDATE_OCEAN_EXPORTS |
. sst1,sst2,first(bi,bj),nymd1sst(bi,bj),nymd2sst(bi,bj), |
./pkg/fizhi/update_ocean_exports.F |
96 |
UPDATE_OCEAN_EXPORTS |
. sice1,sice2,first(bi,bj),nymd1sice(bi,bj),nymd2sice(bi,bj), |
./pkg/obcs/obcs_prescribe_read.F |
309 |
OBCS_PRESCRIBE_EXF_XZ |
logical first, changed |
./pkg/obcs/obcs_prescribe_read.F |
323 |
OBCS_PRESCRIBE_EXF_XZ |
O fac, first, changed, |
./pkg/obcs/obcs_prescribe_read.F |
336 |
OBCS_PRESCRIBE_EXF_XZ |
O fac, first, changed, |
./pkg/obcs/obcs_prescribe_read.F |
342 |
OBCS_PRESCRIBE_EXF_XZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
346 |
OBCS_PRESCRIBE_EXF_XZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
350 |
OBCS_PRESCRIBE_EXF_XZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
354 |
OBCS_PRESCRIBE_EXF_XZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
359 |
OBCS_PRESCRIBE_EXF_XZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
370 |
OBCS_PRESCRIBE_EXF_XZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
383 |
OBCS_PRESCRIBE_EXF_XZ |
O fac, first, changed, |
./pkg/obcs/obcs_prescribe_read.F |
396 |
OBCS_PRESCRIBE_EXF_XZ |
O fac, first, changed, |
./pkg/obcs/obcs_prescribe_read.F |
402 |
OBCS_PRESCRIBE_EXF_XZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
406 |
OBCS_PRESCRIBE_EXF_XZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
410 |
OBCS_PRESCRIBE_EXF_XZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
414 |
OBCS_PRESCRIBE_EXF_XZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
418 |
OBCS_PRESCRIBE_EXF_XZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
422 |
OBCS_PRESCRIBE_EXF_XZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
543 |
OBCS_PRESCRIBE_EXF_YZ |
logical first, changed |
./pkg/obcs/obcs_prescribe_read.F |
557 |
OBCS_PRESCRIBE_EXF_YZ |
O fac, first, changed, |
./pkg/obcs/obcs_prescribe_read.F |
570 |
OBCS_PRESCRIBE_EXF_YZ |
O fac, first, changed, |
./pkg/obcs/obcs_prescribe_read.F |
576 |
OBCS_PRESCRIBE_EXF_YZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
580 |
OBCS_PRESCRIBE_EXF_YZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
584 |
OBCS_PRESCRIBE_EXF_YZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
588 |
OBCS_PRESCRIBE_EXF_YZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
593 |
OBCS_PRESCRIBE_EXF_YZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
604 |
OBCS_PRESCRIBE_EXF_YZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
617 |
OBCS_PRESCRIBE_EXF_YZ |
O fac, first, changed, |
./pkg/obcs/obcs_prescribe_read.F |
630 |
OBCS_PRESCRIBE_EXF_YZ |
O fac, first, changed, |
./pkg/obcs/obcs_prescribe_read.F |
636 |
OBCS_PRESCRIBE_EXF_YZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
640 |
OBCS_PRESCRIBE_EXF_YZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
644 |
OBCS_PRESCRIBE_EXF_YZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
648 |
OBCS_PRESCRIBE_EXF_YZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
652 |
OBCS_PRESCRIBE_EXF_YZ |
I , fac, first, changed, useYearlyFields |
./pkg/obcs/obcs_prescribe_read.F |
656 |
OBCS_PRESCRIBE_EXF_YZ |
I , fac, first, changed, useYearlyFields |
./verification/OpenAD/code_oad_all/ctrl_pack.F |
158 |
CTRL_PACK |
if ( first ) then |
./verification/OpenAD/code_oad_all/ctrl_pack.F |
58 |
CTRL_PACK |
logical first |
./verification/OpenAD/code_oad_all/ctrl_pack.F |
7 |
CTRL_PACK |
subroutine CTRL_PACK( first, mythid ) |
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
119 |
GETSICE |
. sicebc1,sicebc2,first,nymdbc1,nymdbc2,nhmsbc1,nhmsbc2, |
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
172 |
GETSICE |
logical first |
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
192 |
GETSST |
. sstbc1,sstbc2,first,nymdbc1,nymdbc2,nhmsbc1,nhmsbc2, |
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
245 |
GETSST |
logical first |
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
50 |
UPDATE_OCEAN_EXPORTS |
logical first(nSx,nSy) |
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
53 |
UPDATE_OCEAN_EXPORTS |
data first/nSxnSy*.true./ |
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
91 |
UPDATE_OCEAN_EXPORTS |
. sst1,sst2,first(bi,bj),nymd1sst(bi,bj),nymd2sst(bi,bj), |
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
96 |
UPDATE_OCEAN_EXPORTS |
. sice1,sice2,first(bi,bj),nymd1sice(bi,bj),nymd2sice(bi,bj), |
./pkg/admtlm/admtlm_dsvd2model.F |
166 |
ADMTLM_DSVD2MODEL |
if ( first ) then |
./pkg/admtlm/admtlm_dsvd2model.F |
64 |
ADMTLM_DSVD2MODEL |
logical first |
./pkg/admtlm/admtlm_dsvd2model.F |
9 |
ADMTLM_DSVD2MODEL |
& first, postprocev, mythid ) |
./pkg/admtlm/admtlm_model2dsvd.F |
155 |
ADMTLM_MODEL2DSVD |
if ( first ) then |
./pkg/admtlm/admtlm_model2dsvd.F |
59 |
ADMTLM_MODEL2DSVD |
logical first |
./pkg/admtlm/admtlm_model2dsvd.F |
8 |
ADMTLM_MODEL2DSVD |
& first, preprocev, mythid ) |
./pkg/cal/cal_getmonthsrec.F |
126 |
CAL_GETMONTHSREC |
first = ((mytime - modelstart) .lt. 0.5*modelstep) |
./pkg/cal/cal_getmonthsrec.F |
128 |
CAL_GETMONTHSREC |
if ( first ) then |
./pkg/cal/cal_getmonthsrec.F |
199 |
CAL_GETMONTHSREC |
if ( (.not. first) .and. (prevcount .ne. count0) ) then |
./pkg/cal/cal_getmonthsrec.F |
41 |
CAL_GETMONTHSREC |
logical first |
./pkg/cal/cal_getmonthsrec.F |
7 |
CAL_GETMONTHSREC |
O fac, first, changed, |
./pkg/chronos/chronos.F |
41 |
SET_ALARM |
logical first,set |
./pkg/chronos/chronos.F |
42 |
SET_ALARM |
data first /.true./ |
./pkg/chronos/chronos.F |
51 |
SET_ALARM |
if(first) then |
./pkg/chronos/chronos.F |
94 |
SET_ALARM |
first = .false. |
./pkg/ctrl/ctrl_get_gen_rec.F |
124 |
CTRL_GET_GEN_REC |
first = ((mytime - modelstart) .lt. 0.5*modelstep) |
./pkg/ctrl/ctrl_get_gen_rec.F |
126 |
CTRL_GET_GEN_REC |
if ( first) then |
./pkg/ctrl/ctrl_get_gen_rec.F |
12 |
CTRL_GET_GEN_REC |
O first, |
./pkg/ctrl/ctrl_get_gen_rec.F |
168 |
CTRL_GET_GEN_REC |
& first, changed, fac |
./pkg/ctrl/ctrl_get_gen_rec.F |
51 |
CTRL_GET_GEN_REC |
logical first |
./pkg/ctrl/ctrl_getrec.F |
11 |
CTRL_GETREC |
O first, |
./pkg/ctrl/ctrl_getrec.F |
323 |
CTRL_GETREC |
first = ((mytime - modelstart) .lt. 0.5*modelstep) |
./pkg/ctrl/ctrl_getrec.F |
325 |
CTRL_GETREC |
if ( first) then |
./pkg/ctrl/ctrl_getrec.F |
371 |
CTRL_GETREC |
& first, changed, fac |
./pkg/ctrl/ctrl_getrec.F |
58 |
CTRL_GETREC |
logical first |
./pkg/ctrl/ctrl_pack.F |
158 |
CTRL_PACK |
if ( first ) then |
./pkg/ctrl/ctrl_pack.F |
58 |
CTRL_PACK |
logical first |
./pkg/ctrl/ctrl_pack.F |
7 |
CTRL_PACK |
subroutine CTRL_PACK( first, mythid ) |
./pkg/ctrl/ctrl_unpack.F |
168 |
CTRL_UNPACK |
if ( first ) then |
./pkg/ctrl/ctrl_unpack.F |
63 |
CTRL_UNPACK |
logical first |
./pkg/ctrl/ctrl_unpack.F |
8 |
CTRL_UNPACK |
subroutine CTRL_UNPACK( first, mythid ) |
./pkg/ecco/cost_atlantic.F |
112 |
COST_ATLANTIC |
O first, last, |
./pkg/ecco/cost_atlantic.F |
139 |
COST_ATLANTIC |
if (first) then |
./pkg/ecco/cost_atlantic.F |
64 |
COST_ATLANTIC |
logical first |
./pkg/ecco/cost_averagesfields.F |
132 |
COST_AVERAGESFIELDS |
O first, last, |
./pkg/ecco/cost_averagesfields.F |
160 |
COST_AVERAGESFIELDS |
& first, last, startofday, endofday, inday, |
./pkg/ecco/cost_averagesfields.F |
177 |
COST_AVERAGESFIELDS |
& first, last, startofmonth, endofmonth, inmonth, |
./pkg/ecco/cost_averagesfields.F |
184 |
COST_AVERAGESFIELDS |
& first, last, startofmonth, endofmonth, inmonth, |
./pkg/ecco/cost_averagesfields.F |
198 |
COST_AVERAGESFIELDS |
& first, last, startofday, endofday, inday, |
./pkg/ecco/cost_averagesfields.F |
214 |
COST_AVERAGESFIELDS |
& first, last, startofmonth, endofmonth, inmonth, |
./pkg/ecco/cost_averagesfields.F |
221 |
COST_AVERAGESFIELDS |
& first, last, startofmonth, endofmonth, inmonth, |
./pkg/ecco/cost_averagesfields.F |
230 |
COST_AVERAGESFIELDS |
& first, last, startofmonth, endofmonth, inmonth, |
./pkg/ecco/cost_averagesfields.F |
241 |
COST_AVERAGESFIELDS |
if (first.or.startofmonth) then |
./pkg/ecco/cost_averagesfields.F |
290 |
COST_AVERAGESFIELDS |
& .not. (first .or. startofmonth) .and. |
./pkg/ecco/cost_averagesfields.F |
315 |
COST_AVERAGESFIELDS |
if (first.or. startofmonth) then |
./pkg/ecco/cost_averagesfields.F |
359 |
COST_AVERAGESFIELDS |
else if ( .not. (first.or. startofmonth) .and. |
./pkg/ecco/cost_averagesfields.F |
383 |
COST_AVERAGESFIELDS |
& first, last, startofday, endofday, inday, |
./pkg/ecco/cost_averagesfields.F |
388 |
COST_AVERAGESFIELDS |
& first, last, startofday, endofday, inday, |
./pkg/ecco/cost_averagesfields.F |
409 |
COST_AVERAGESFIELDS |
& first, last, startofyear, endofyear, inyear, |
./pkg/ecco/cost_averagesfields.F |
423 |
COST_AVERAGESFIELDS |
& first, last, startofyear, endofyear, inyear, |
./pkg/ecco/cost_averagesfields.F |
433 |
COST_AVERAGESFIELDS |
& first, last, startofyear, endofyear, inyear, |
./pkg/ecco/cost_averagesfields.F |
442 |
COST_AVERAGESFIELDS |
& first, last, startofmonth, endofmonth, inmonth, |
./pkg/ecco/cost_averagesfields.F |
457 |
COST_AVERAGESFIELDS |
& first, last, startofday, endofday, inday, |
./pkg/ecco/cost_averagesfields.F |
468 |
COST_AVERAGESFIELDS |
& first, last, startofday, endofday, inday, |
./pkg/ecco/cost_averagesfields.F |
479 |
COST_AVERAGESFIELDS |
& first, last, startofday, endofday, inday, |
./pkg/ecco/cost_averagesfields.F |
495 |
COST_AVERAGESFIELDS |
& first, last, |
./pkg/ecco/cost_averagesfields.F |
523 |
COST_AVERAGESFIELDS |
if (first.or.startofday) |
./pkg/ecco/cost_averagesfields.F |
74 |
COST_AVERAGESFIELDS |
logical first |
./pkg/ecco/cost_averagesflags.F |
11 |
COST_AVERAGESFLAGS |
O first, |
./pkg/ecco/cost_averagesflags.F |
127 |
COST_AVERAGESFLAGS |
first = .true. |
./pkg/ecco/cost_averagesflags.F |
132 |
COST_AVERAGESFLAGS |
first = .false. |
./pkg/ecco/cost_averagesflags.F |
61 |
COST_AVERAGESFLAGS |
logical first |
./pkg/ecco/cost_averagesgeneric.F |
127 |
COST_AVERAGESGENERIC |
& .not. (first .or. startofloc) .and. |
./pkg/ecco/cost_averagesgeneric.F |
47 |
COST_AVERAGESGENERIC |
logical first |
./pkg/ecco/cost_averagesgeneric.F |
85 |
COST_AVERAGESGENERIC |
if (first .or. startofloc) then |
./pkg/ecco/cost_averagesgeneric.F |
9 |
COST_AVERAGESGENERIC |
& first, last, startofloc, endofloc, inloc, |
./pkg/ecco/cost_restore_averagesflags.F |
28 |
COST_RESTORE_AVERAGESFLAGS |
logical first |
./pkg/ecco/cost_restore_averagesflags.F |
7 |
COST_RESTORE_AVERAGESFLAGS |
& lcostrestart, first, last, |
./pkg/ecco/cost_store_averagesflags.F |
28 |
COST_STORE_AVERAGESFLAGS |
logical first |
./pkg/ecco/cost_store_averagesflags.F |
7 |
COST_STORE_AVERAGESFLAGS |
& lflag, first, last, |
./pkg/exf/exf_getffieldrec.F |
10 |
EXF_GETFFIELDREC |
O first, changed, |
./pkg/exf/exf_getffieldrec.F |
192 |
EXF_GETFFIELDREC |
& first, changed, fac |
./pkg/exf/exf_getffieldrec.F |
53 |
EXF_GETFFIELDREC |
logical first, changed |
./pkg/exf/exf_getffieldrec.F |
83 |
EXF_GETFFIELDREC |
first = ((mytime - modelstart) .lt. 0.5*modelstep) |
./pkg/exf/exf_getffieldrec.F |
90 |
EXF_GETFFIELDREC |
first = ((mytime - modelstart) .lt. 0.5*modelstep) |
./pkg/exf/exf_set_gen.F |
105 |
EXF_SET_GEN |
O fac, first, changed, |
./pkg/exf/exf_set_gen.F |
119 |
EXF_SET_GEN |
O , fac, first, changed |
./pkg/exf/exf_set_gen.F |
126 |
EXF_SET_GEN |
if ( first ) then |
./pkg/exf/exf_set_gen.F |
158 |
EXF_SET_GEN |
if (( first ) .or. ( changed )) then |
./pkg/exf/exf_set_gen.F |
80 |
EXF_SET_GEN |
logical first, changed |
./pkg/exf/exf_set_obcs.F |
123 |
EXF_SET_OBCS_YZ |
I fac, first, changed, useYearlyFields, obcs_period, |
./pkg/exf/exf_set_obcs.F |
156 |
EXF_SET_OBCS_YZ |
LOGICAL first, changed |
./pkg/exf/exf_set_obcs.F |
177 |
EXF_SET_OBCS_YZ |
IF ( first ) THEN |
./pkg/exf/exf_set_obcs.F |
189 |
EXF_SET_OBCS_YZ |
IF (( first ) .OR. ( changed )) THEN |
./pkg/exf/exf_set_obcs.F |
18 |
EXF_SET_OBCS_XZ |
I fac, first, changed, useYearlyFields, obcs_period, |
./pkg/exf/exf_set_obcs.F |
226 |
EXF_SET_OBCS_X |
I fac, first, changed, useYearlyFields, obcs_period, |
./pkg/exf/exf_set_obcs.F |
259 |
EXF_SET_OBCS_X |
LOGICAL first, changed |
./pkg/exf/exf_set_obcs.F |
279 |
EXF_SET_OBCS_X |
IF ( first ) THEN |
./pkg/exf/exf_set_obcs.F |
291 |
EXF_SET_OBCS_X |
IF (( first ) .OR. ( changed )) THEN |
./pkg/exf/exf_set_obcs.F |
326 |
EXF_SET_OBCS_Y |
I fac, first, changed, useYearlyFields, obcs_period, |
./pkg/exf/exf_set_obcs.F |
358 |
EXF_SET_OBCS_Y |
LOGICAL first, changed |
./pkg/exf/exf_set_obcs.F |
378 |
EXF_SET_OBCS_Y |
IF ( first ) THEN |
./pkg/exf/exf_set_obcs.F |
390 |
EXF_SET_OBCS_Y |
IF (( first ) .OR. ( changed )) THEN |
./pkg/exf/exf_set_obcs.F |
53 |
EXF_SET_OBCS_XZ |
LOGICAL first, changed |
./pkg/exf/exf_set_obcs.F |
74 |
EXF_SET_OBCS_XZ |
IF ( first ) THEN |
./pkg/exf/exf_set_obcs.F |
86 |
EXF_SET_OBCS_XZ |
IF (( first ) .OR. ( changed )) THEN |
./pkg/exf/exf_set_runoff.F |
101 |
EXF_SET_RUNOFF |
if ( first ) then |
./pkg/exf/exf_set_runoff.F |
120 |
EXF_SET_RUNOFF |
if (( first ) .or. ( changed )) then |
./pkg/exf/exf_set_runoff.F |
55 |
EXF_SET_RUNOFF |
logical first, changed |
./pkg/exf/exf_set_runoff.F |
80 |
EXF_SET_RUNOFF |
O fac, first, changed, |
./pkg/exf/exf_set_runoff.F |
94 |
EXF_SET_RUNOFF |
O , fac, first, changed |
./pkg/exf/exf_set_uv.F |
112 |
EXF_SET_UV |
O , fac, first, changed |
./pkg/exf/exf_set_uv.F |
117 |
EXF_SET_UV |
if ( first ) then |
./pkg/exf/exf_set_uv.F |
195 |
EXF_SET_UV |
if (( first ) .or. ( changed )) then |
./pkg/exf/exf_set_uv.F |
88 |
EXF_SET_UV |
logical first, changed |