| File |
Line number |
Procedure |
Code |
|
./model/inc/SIZE.h |
4 |
NO PROCEDURE |
These lines are here to deliberately cause a compile-time error. |
|
./model/inc/SIZE.h |
6 |
NO PROCEDURE |
as an error then it means you have not placed your configuration |
|
./pkg/fizhi/update_ocean_exports.F |
174 |
GETSICE |
logical found, error |
|
./pkg/fizhi/update_ocean_exports.F |
182 |
GETSICE |
data error /.false./ |
|
./pkg/fizhi/update_ocean_exports.F |
224 |
GETSICE |
. ndatebc, nymdbc, nhmsbc, undef, error) |
|
./pkg/fizhi/update_ocean_exports.F |
229 |
GETSICE |
if (.not.error .and. cname.ne.'SICE') then |
|
./pkg/fizhi/update_ocean_exports.F |
231 |
GETSICE |
error = .true. |
|
./pkg/fizhi/update_ocean_exports.F |
235 |
GETSICE |
if(.not.error.and.imbc*jmbc.ne.xsize*ysize)then |
|
./pkg/fizhi/update_ocean_exports.F |
239 |
GETSICE |
error = .true. |
|
./pkg/fizhi/update_ocean_exports.F |
244 |
GETSICE |
if (.not.error .and. iyear.ne.iyearbc .and. iyearbc.ne.0) then |
|
./pkg/fizhi/update_ocean_exports.F |
248 |
GETSICE |
error = .true. |
|
./pkg/fizhi/update_ocean_exports.F |
251 |
GETSICE |
if (.not.error) then |
|
./pkg/fizhi/update_ocean_exports.F |
426 |
GETSST |
logical found, error |
|
./pkg/fizhi/update_ocean_exports.F |
434 |
GETSST |
data error /.false./ |
|
./pkg/fizhi/update_ocean_exports.F |
475 |
GETSST |
. ndatebc, nymdbc, nhmsbc, undef, error) |
|
./pkg/fizhi/update_ocean_exports.F |
480 |
GETSST |
if (.not.error .and. cname.ne.'SST') then |
|
./pkg/fizhi/update_ocean_exports.F |
482 |
GETSST |
error = .true. |
|
./pkg/fizhi/update_ocean_exports.F |
486 |
GETSST |
if(.not.error.and.imbc*jmbc.ne.xsize*ysize)then |
|
./pkg/fizhi/update_ocean_exports.F |
490 |
GETSST |
error = .true. |
|
./pkg/fizhi/update_ocean_exports.F |
495 |
GETSST |
if (.not.error .and. iyear.ne.iyearbc .and. iyearbc.ne.0) then |
|
./pkg/fizhi/update_ocean_exports.F |
499 |
GETSST |
error = .true. |
|
./pkg/fizhi/update_ocean_exports.F |
502 |
GETSST |
if (.not.error) then |
|
./pkg/fizhi/update_ocean_exports.F |
538 |
GETSST |
if( error ) call MY_EXIT (101) |
|
./pkg/fizhi/update_ocean_exports.F |
648 |
BCHEADER |
. nymdbc, nhmsbc, undef, error) |
|
./pkg/fizhi/update_ocean_exports.F |
682 |
BCHEADER |
logical error |
|
./pkg/fizhi/update_ocean_exports.F |
726 |
BCHEADER |
error = .true. |