File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_fillnegs.F |
183 |
TRACER_FILL |
undef = getcon('UNDEF') |
./pkg/fizhi/fizhi_fillnegs.F |
203 |
TRACER_FILL |
array(3) = -undef |
./pkg/fizhi/fizhi_fillnegs.F |
208 |
TRACER_FILL |
array(4) = -undef |
./pkg/fizhi/fizhi_fillnegs.F |
213 |
TRACER_FILL |
array(5) = -undef |
./pkg/fizhi/fizhi_fillnegs.F |
218 |
TRACER_FILL |
array(6) = -undef |
./pkg/fizhi/fizhi_fillnegs.F |
92 |
TRACER_FILL |
_RL pi,a,getcon,undef |
./pkg/fizhi/fizhi_swrad.F |
107 |
SWRIO |
undef = getcon('UNDEF') |
./pkg/fizhi/fizhi_swrad.F |
44 |
SWRIO |
_RL getcon,grav,cp,undef |
./pkg/fizhi/fizhi_swrad.F |
497 |
SWRIO |
if( tstrip(i).lt.0.0 ) tstrip(i) = undef |
./pkg/fizhi/fizhi_swrad.F |
499 |
SWRIO |
tstrip(i) = undef |
./pkg/fizhi/fizhi_swrad.F |
514 |
SWRIO |
if( albedo(i,j).ne.undef ) then |
./pkg/fizhi/fizhi_turb.F |
1037 |
TURBIO |
if( stq2m(i).ne.undef ) then |
./pkg/fizhi/fizhi_turb.F |
1040 |
TURBIO |
tmpstrip(i) = undef |
./pkg/fizhi/fizhi_turb.F |
1060 |
TURBIO |
if( stq10m(i).ne.undef ) then |
./pkg/fizhi/fizhi_turb.F |
1063 |
TURBIO |
tmpstrip(i) = undef |
./pkg/fizhi/fizhi_turb.F |
1271 |
TRBFLX |
4 irun,nlev,nltop,NYMD,NHMS,grav,cp,rgas,faceps,virtcon,undef, |
./pkg/fizhi/fizhi_turb.F |
1334 |
TRBFLX |
_RL grav,cp,rgas,faceps,virtcon,undef |
./pkg/fizhi/fizhi_turb.F |
1770 |
TRBFLX |
2 cp,rgas,undef, |
./pkg/fizhi/fizhi_turb.F |
2324 |
SFCFLX |
5 cp,rgas,undef, |
./pkg/fizhi/fizhi_turb.F |
2372 |
SFCFLX |
_RL aitr,cp,rgas,undef |
./pkg/fizhi/fizhi_turb.F |
248 |
TURBIO |
_RL heatw,undef,timstp,delttrb,dttrb,ra |
./pkg/fizhi/fizhi_turb.F |
281 |
TURBIO |
undef = getcon('UNDEF') |
./pkg/fizhi/fizhi_turb.F |
599 |
TURBIO |
5 undef,dshdthg,dshdshg,dthdthg,dthdshg,eturb,dedqa,dedtc, |
./pkg/fizhi/fizhi_utils.F |
625 |
PASTE2GRD |
_RL undef,getcon |
./pkg/fizhi/fizhi_utils.F |
632 |
PASTE2GRD |
undef = getcon('UNDEF') |
./pkg/fizhi/fizhi_utils.F |
635 |
PASTE2GRD |
if( a(indx(i+offset-1),L).eq.undef .or. b(i,L).eq.undef ) then |
./pkg/fizhi/fizhi_utils.F |
636 |
PASTE2GRD |
a(indx(i+offset-1),L) = undef |
./pkg/fizhi/update_ocean_exports.F |
182 |
GETSICE |
_RL fac1, fac2, lat0, lon0, timebc1, timebc2, timemod, undef |
./pkg/fizhi/update_ocean_exports.F |
194 |
GETSICE |
save imbc,jmbc,lat0,lon0,ndatebc,undef |
./pkg/fizhi/update_ocean_exports.F |
241 |
GETSICE |
. ndatebc, nymdbc, nhmsbc, undef, error) |
./pkg/fizhi/update_ocean_exports.F |
292 |
GETSICE |
. ' Undefined value = ',undef |
./pkg/fizhi/update_ocean_exports.F |
443 |
GETSST |
_RL fac1, fac2, lat0, lon0, timebc1, timebc2, timemod, undef |
./pkg/fizhi/update_ocean_exports.F |
455 |
GETSST |
save imbc,jmbc,lat0,lon0,ndatebc,undef |
./pkg/fizhi/update_ocean_exports.F |
501 |
GETSST |
. ndatebc, nymdbc, nhmsbc, undef, error) |
./pkg/fizhi/update_ocean_exports.F |
552 |
GETSST |
. ' Undefined value = ',undef |
./pkg/fizhi/update_ocean_exports.F |
674 |
BCHEADER |
. nymdbc, nhmsbc, undef, error) |
./pkg/fizhi/update_ocean_exports.F |
707 |
BCHEADER |
_RL lat0,lon0,undef |
./pkg/fizhi/update_ocean_exports.F |
737 |
BCHEADER |
undef = undef_32 |
./pkg/diagnostics/diag_vegtile_fill.F |
158 |
DIAG_VEGTILE_FILL |
IF ( field(ivt,k).EQ.undef ) THEN |
./pkg/diagnostics/diag_vegtile_fill.F |
159 |
DIAG_VEGTILE_FILL |
qdiag(i,j,kd,bi,bj) = undef |
./pkg/diagnostics/diag_vegtile_fill.F |
160 |
DIAG_VEGTILE_FILL |
ELSEIF ( qdiag(i,j,kd,bi,bj).NE.undef ) THEN |
./pkg/diagnostics/diag_vegtile_fill.F |
240 |
DIAG_VEGTILE_FILL |
IF ( field(ivt,k).EQ.undef ) THEN |
./pkg/diagnostics/diag_vegtile_fill.F |
241 |
DIAG_VEGTILE_FILL |
gridField(ij,k) = undef |
./pkg/diagnostics/diag_vegtile_fill.F |
65 |
DIAG_VEGTILE_FILL |
_RL undef |
./pkg/diagnostics/diag_vegtile_fill.F |
82 |
DIAG_VEGTILE_FILL |
undef = UNSET_RL |
./pkg/diagnostics/diag_vegtile_fill.F |
84 |
DIAG_VEGTILE_FILL |
IF ( check ) undef = getcon('UNDEF') |
./pkg/diagnostics/diagnostics_interp_p2p.F |
110 |
DIAGNOSTICS_INTERP_P2P |
IF ( qinp(i,1).NE.undef .AND. |
./pkg/diagnostics/diagnostics_interp_p2p.F |
111 |
DIAGNOSTICS_INTERP_P2P |
& qinp(i,2).NE.undef ) THEN |
./pkg/diagnostics/diagnostics_interp_p2p.F |
113 |
DIAGNOSTICS_INTERP_P2P |
ELSEIF ( qinp(i,1).NE.undef ) THEN |
./pkg/diagnostics/diagnostics_interp_p2p.F |
124 |
DIAGNOSTICS_INTERP_P2P |
IF ( qinp(i,lm) .NE.undef .AND. |
./pkg/diagnostics/diagnostics_interp_p2p.F |
125 |
DIAGNOSTICS_INTERP_P2P |
& qinp(i,lm-1).NE.undef ) THEN |
./pkg/diagnostics/diagnostics_interp_p2p.F |
127 |
DIAGNOSTICS_INTERP_P2P |
ELSEIF ( qinp(i,lm) .NE.undef ) THEN |
./pkg/diagnostics/diagnostics_interp_p2p.F |
13 |
DIAGNOSTICS_INTERP_P2P |
I undef, pInc,ijm,lm, myThid ) |
./pkg/diagnostics/diagnostics_interp_p2p.F |
153 |
DIAGNOSTICS_INTERP_P2P |
IF ( qinp(i,L) .NE.undef .AND. |
./pkg/diagnostics/diagnostics_interp_p2p.F |
154 |
DIAGNOSTICS_INTERP_P2P |
& qinp(i,L+1).NE.undef ) THEN |
./pkg/diagnostics/diagnostics_interp_p2p.F |
156 |
DIAGNOSTICS_INTERP_P2P |
ELSEIF ( qinp(i,L+1).NE.undef .AND. temp.GE.0.5 ) THEN |
./pkg/diagnostics/diagnostics_interp_p2p.F |
158 |
DIAGNOSTICS_INTERP_P2P |
ELSEIF ( qinp(i,L) .NE.undef .AND. temp.LE.0.5 ) THEN |
./pkg/diagnostics/diagnostics_interp_p2p.F |
173 |
DIAGNOSTICS_INTERP_P2P |
IF ( qinp(i,lm) .NE.undef .AND. |
./pkg/diagnostics/diagnostics_interp_p2p.F |
174 |
DIAGNOSTICS_INTERP_P2P |
& qinp(i,lm-1).NE.undef ) THEN |
./pkg/diagnostics/diagnostics_interp_p2p.F |
176 |
DIAGNOSTICS_INTERP_P2P |
ELSEIF ( qinp(i,lm) .NE.undef ) THEN |
./pkg/diagnostics/diagnostics_interp_p2p.F |
187 |
DIAGNOSTICS_INTERP_P2P |
IF ( qinp(i,1).NE.undef .AND. |
./pkg/diagnostics/diagnostics_interp_p2p.F |
188 |
DIAGNOSTICS_INTERP_P2P |
& qinp(i,2).NE.undef ) THEN |
./pkg/diagnostics/diagnostics_interp_p2p.F |
190 |
DIAGNOSTICS_INTERP_P2P |
ELSEIF ( qinp(i,1).NE.undef ) THEN |
./pkg/diagnostics/diagnostics_interp_p2p.F |
52 |
DIAGNOSTICS_INTERP_P2P |
_RL undef |
./pkg/diagnostics/diagnostics_interp_p2p.F |
68 |
DIAGNOSTICS_INTERP_P2P |
qprs(i) = undef |
./pkg/diagnostics/diagnostics_interp_p2p.F |
90 |
DIAGNOSTICS_INTERP_P2P |
IF ( qinp(i,L) .NE.undef .AND. |
./pkg/diagnostics/diagnostics_interp_p2p.F |
91 |
DIAGNOSTICS_INTERP_P2P |
& qinp(i,L+1).NE.undef ) THEN |
./pkg/diagnostics/diagnostics_interp_p2p.F |
93 |
DIAGNOSTICS_INTERP_P2P |
ELSEIF ( qinp(i,L+1).NE.undef .AND. temp.GE.0.5 ) THEN |
./pkg/diagnostics/diagnostics_interp_p2p.F |
95 |
DIAGNOSTICS_INTERP_P2P |
ELSEIF ( qinp(i,L) .NE.undef .AND. temp.LE.0.5 ) THEN |
./pkg/diagnostics/diagnostics_sum_levels.F |
14 |
DIAGNOSTICS_SUM_LEVELS |
I undef, |
./pkg/diagnostics/diagnostics_sum_levels.F |
48 |
DIAGNOSTICS_SUM_LEVELS |
_RL undef |
./pkg/diagnostics/diagstats_global.F |
13 |
DIAGSTATS_GLOBAL |
I undef, nLev, jReg, |
./pkg/diagnostics/diagstats_global.F |
175 |
DIAGSTATS_GLOBAL |
qtmp1(i,k) = undef |
./pkg/diagnostics/diagstats_global.F |
195 |
DIAGSTATS_GLOBAL |
qtmp1(i,k) = undef |
./pkg/diagnostics/diagstats_global.F |
199 |
DIAGSTATS_GLOBAL |
qtmp1(i,k) = undef |
./pkg/diagnostics/diagstats_global.F |
35 |
DIAGSTATS_GLOBAL |
_RL undef |
./pkg/diagnostics/diagstats_output.F |
53 |
DIAGSTATS_OUTPUT |
_RL undef |
./pkg/diagnostics/diagstats_output.F |
61 |
DIAGSTATS_OUTPUT |
undef = UNSET_RL |
./pkg/diagnostics/diagstats_output.F |
63 |
DIAGSTATS_OUTPUT |
IF ( useFIZHI ) undef = getcon('UNDEF') |
./pkg/diagnostics/diagstats_output.F |
86 |
DIAGSTATS_OUTPUT |
I undef, nLev, j, |