include file: wrf_auxinput1out.inc 1,77 !STARTOFREGISTRYGENERATEDINCLUDE 'inc/wrf_auxinput1out.inc' ! ! WARNING This file is generated automatically by use_registry ! using the data base in the file named Registry. ! Do not edit. Your changes to this file will be lost. ! IF ( grid%dyn_opt .EQ. dyn_em ) THEN CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'U' , & ! Data Name grid%em_u_2 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XZY' , & ! MemoryOrder 'X' , & ! Stagger 'west_east_stag' , & ! Dimname 1 'bottom_top' , & ! Dimname 2 'south_north' , & ! Dimname 3 'x-wind component' , & ! Desc 'm s{-1}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field U memorder XZY' , & ! Debug message ids , ide , kds , (kde-1) , jds , (jde-1) , & ims , ime , kms , kme , jms , jme , & ips , MIN( ide, ipe ) , kps , MIN( (kde-1), kpe ) , jps , MIN( (jde-1), jpe ) , & ierr ) END IF IF ( grid%dyn_opt .EQ. dyn_em ) THEN CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'V' , & ! Data Name grid%em_v_2 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XZY' , & ! MemoryOrder 'Y' , & ! Stagger 'west_east' , & ! Dimname 1 'bottom_top' , & ! Dimname 2 'south_north_stag' , & ! Dimname 3 'y-wind component' , & ! Desc 'm s{-1}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field V memorder XZY' , & ! Debug message ids , (ide-1) , kds , (kde-1) , jds , jde , & ims , ime , kms , kme , jms , jme , & ips , MIN( (ide-1), ipe ) , kps , MIN( (kde-1), kpe ) , jps , MIN( jde, jpe ) , & ierr ) END IF IF ( grid%dyn_opt .EQ. dyn_em ) THEN CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'T' , & ! Data Name grid%em_t_2 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XZY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'bottom_top' , & ! Dimname 2 'south_north' , & ! Dimname 3 'perturbation potential temperature (theta-t0)' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field T memorder XZY' , & ! Debug message ids , (ide-1) , kds , (kde-1) , jds , (jde-1) , & ims , ime , kms , kme , jms , jme , & ips , MIN( (ide-1), ipe ) , kps , MIN( (kde-1), kpe ) , jps , MIN( (jde-1), jpe ) , & ierr ) END IF IF ( grid%dyn_opt .EQ. dyn_em ) THEN CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'MU0' , & ! Data Name grid%em_mu0 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'initial dry mass in column' , & ! Desc 'pascals' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field MU0 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) END IF IF ( grid%dyn_opt .EQ. dyn_em ) THEN CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'ZNW' , & ! Data Name grid%em_znw , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'Z' , & ! MemoryOrder 'Z' , & ! Stagger 'bottom_top_stag' , & ! Dimname 1 '' , & ! Dimname 2 '' , & ! Dimname 3 'eta values on full (w) levels' , & ! Desc 'dimensionless' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field ZNW memorder Z' , & ! Debug message kds , kde , 1 , 1 , 1 , 1 , & kms , kme , 1 , 1 , 1 , 1 , & kps , MIN( kde, kpe ) , 1 , 1 , 1 , 1 , & ierr ) END IF IF ( P_qv .GE. PARAM_FIRST_SCALAR ) THEN CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'QVAPOR' , & ! Data Name grid%moist_2(ims,kms,jms,P_qv) , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XZY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'bottom_top' , & ! Dimname 2 'south_north' , & ! Dimname 3 '-' , & ! Desc '-' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field QVAPOR memorder XZY' , & ! Debug message ids , (ide-1) , kds , (kde-1) , jds , (jde-1) , & ims , ime , kms , kme , jms , jme , & ips , MIN( (ide-1), ipe ) , kps , MIN( (kde-1), kpe ) , jps , MIN( (jde-1), jpe ) , & ierr ) END IF IF ( P_qc .GE. PARAM_FIRST_SCALAR ) THEN CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'QCLOUD' , & ! Data Name grid%moist_2(ims,kms,jms,P_qc) , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XZY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'bottom_top' , & ! Dimname 2 'south_north' , & ! Dimname 3 '-' , & ! Desc '-' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field QCLOUD memorder XZY' , & ! Debug message ids , (ide-1) , kds , (kde-1) , jds , (jde-1) , & ims , ime , kms , kme , jms , jme , & ips , MIN( (ide-1), ipe ) , kps , MIN( (kde-1), kpe ) , jps , MIN( (jde-1), jpe ) , & ierr ) END IF IF ( P_qr .GE. PARAM_FIRST_SCALAR ) THEN CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'QRAIN' , & ! Data Name grid%moist_2(ims,kms,jms,P_qr) , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XZY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'bottom_top' , & ! Dimname 2 'south_north' , & ! Dimname 3 '-' , & ! Desc '-' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field QRAIN memorder XZY' , & ! Debug message ids , (ide-1) , kds , (kde-1) , jds , (jde-1) , & ims , ime , kms , kme , jms , jme , & ips , MIN( (ide-1), ipe ) , kps , MIN( (kde-1), kpe ) , jps , MIN( (jde-1), jpe ) , & ierr ) END IF IF ( P_qi .GE. PARAM_FIRST_SCALAR ) THEN CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'QICE' , & ! Data Name grid%moist_2(ims,kms,jms,P_qi) , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XZY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'bottom_top' , & ! Dimname 2 'south_north' , & ! Dimname 3 '-' , & ! Desc '-' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field QICE memorder XZY' , & ! Debug message ids , (ide-1) , kds , (kde-1) , jds , (jde-1) , & ims , ime , kms , kme , jms , jme , & ips , MIN( (ide-1), ipe ) , kps , MIN( (kde-1), kpe ) , jps , MIN( (jde-1), jpe ) , & ierr ) END IF IF ( P_qs .GE. PARAM_FIRST_SCALAR ) THEN CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'QSNOW' , & ! Data Name grid%moist_2(ims,kms,jms,P_qs) , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XZY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'bottom_top' , & ! Dimname 2 'south_north' , & ! Dimname 3 '-' , & ! Desc '-' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field QSNOW memorder XZY' , & ! Debug message ids , (ide-1) , kds , (kde-1) , jds , (jde-1) , & ims , ime , kms , kme , jms , jme , & ips , MIN( (ide-1), ipe ) , kps , MIN( (kde-1), kpe ) , jps , MIN( (jde-1), jpe ) , & ierr ) END IF IF ( P_qg .GE. PARAM_FIRST_SCALAR ) THEN CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'QGRAUP' , & ! Data Name grid%moist_2(ims,kms,jms,P_qg) , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XZY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'bottom_top' , & ! Dimname 2 'south_north' , & ! Dimname 3 '-' , & ! Desc '-' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field QGRAUP memorder XZY' , & ! Debug message ids , (ide-1) , kds , (kde-1) , jds , (jde-1) , & ims , ime , kms , kme , jms , jme , & ips , MIN( (ide-1), ipe ) , kps , MIN( (kde-1), kpe ) , jps , MIN( (jde-1), jpe ) , & ierr ) END IF CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SM000010' , & ! Data Name grid%sm000010 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL MOISTURE' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SM000010 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SM010040 ' , & ! Data Name grid%sm010040 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL MOISTURE' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SM010040 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SM040100 ' , & ! Data Name grid%sm040100 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL MOISTURE' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SM040100 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SM100200 ' , & ! Data Name grid%sm100200 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL MOISTURE' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SM100200 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SM010200' , & ! Data Name grid%sm010200 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL MOISTURE' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SM010200 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILM000' , & ! Data Name grid%soilm000 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL MOISTURE' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILM000 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILM005' , & ! Data Name grid%soilm005 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL MOISTURE' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILM005 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILM020' , & ! Data Name grid%soilm020 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL MOISTURE' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILM020 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILM040' , & ! Data Name grid%soilm040 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL MOISTURE' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILM040 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILM160' , & ! Data Name grid%soilm160 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL MOISTURE' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILM160 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILM300' , & ! Data Name grid%soilm300 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL MOISTURE' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILM300 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SW000010' , & ! Data Name grid%sw000010 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL LIQUID' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SW000010 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SW010040' , & ! Data Name grid%sw010040 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL LIQUID' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SW010040 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SW040100' , & ! Data Name grid%sw040100 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL LIQUID' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SW040100 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SW100200' , & ! Data Name grid%sw100200 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL LIQUID' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SW100200 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SW010200' , & ! Data Name grid%sw010200 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL LIQUID' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SW010200 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILW000' , & ! Data Name grid%soilw000 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL LIQUID' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILW000 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILW005' , & ! Data Name grid%soilw005 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL LIQUID' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILW005 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILW020' , & ! Data Name grid%soilw020 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL LIQUID' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILW020 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILW040' , & ! Data Name grid%soilw040 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL LIQUID' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILW040 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILW160' , & ! Data Name grid%soilw160 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL LIQUID' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILW160 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILW300' , & ! Data Name grid%soilw300 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL LIQUID' , & ! Desc 'm{3) m{-3}' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILW300 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'ST000010' , & ! Data Name grid%st000010 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL TEMPERATURE' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field ST000010 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'ST010040' , & ! Data Name grid%st010040 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL TEMPERATURE' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field ST010040 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'ST040100' , & ! Data Name grid%st040100 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL TEMPERATURE' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field ST040100 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'ST100200' , & ! Data Name grid%st100200 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL TEMPERATURE' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field ST100200 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'ST010200' , & ! Data Name grid%st010200 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL TEMPERATURE' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field ST010200 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILT000' , & ! Data Name grid%soilt000 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL TEMPERATURE' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILT000 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILT005' , & ! Data Name grid%soilt005 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL TEMPERATURE' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILT005 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILT020' , & ! Data Name grid%soilt020 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL TEMPERATURE' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILT020 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILT040' , & ! Data Name grid%soilt040 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL TEMPERATURE' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILT040 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILT160' , & ! Data Name grid%soilt160 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL TEMPERATURE' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILT160 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILT300' , & ! Data Name grid%soilt300 , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAYER SOIL TEMPERATURE' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILT300 memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'LANDMASK' , & ! Data Name grid%landmask , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LAND MASK' , & ! Desc 'flag' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field LANDMASK memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'TOPOSTDV' , & ! Data Name grid%topostdv , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'ELEVATION STD DEV' , & ! Desc 'm' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field TOPOSTDV memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'TOPOSLPX' , & ! Data Name grid%toposlpx , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'ELEVATION X SLOPE' , & ! Desc '' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field TOPOSLPX memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'TOPOSLPY' , & ! Data Name grid%toposlpy , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'ELEVATION Y SLOPE' , & ! Desc '' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field TOPOSLPY memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SHDMAX' , & ! Data Name grid%shdmax , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'ANNUAL MAX VEG FRAC' , & ! Desc 'fraction' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SHDMAX memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SHDMIN' , & ! Data Name grid%shdmin , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'ANNUAL MIN VEG FRAC' , & ! Desc 'fraction' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SHDMIN memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SNOALB' , & ! Data Name grid%snoalb , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'ANNUAL MAX SNOW ALBEDO' , & ! Desc 'fraction' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SNOALB memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SLOPECAT' , & ! Data Name grid%slopecat , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'SLOPE CATEGORY' , & ! Desc 'flag' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SLOPECAT memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILHGT' , & ! Data Name grid%toposoil , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'ELEVATION OF LSM DATA' , & ! Desc 'm' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILHGT memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'LANDUSEF' , & ! Data Name grid%landusef , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XZY' , & ! MemoryOrder 'Z' , & ! Stagger 'west_east' , & ! Dimname 1 'land_cat_stag' , & ! Dimname 2 'south_north' , & ! Dimname 3 'LANDUSE FRACTION' , & ! Desc 'fraction' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field LANDUSEF memorder XZY' , & ! Debug message ids , (ide-1) , 1 , config_flags%num_land_cat , jds , (jde-1) , & ims , ime , 1 , config_flags%num_land_cat , jms , jme , & ips , MIN( (ide-1), ipe ) , 1 , config_flags%num_land_cat , jps , MIN( (jde-1), jpe ) , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILCTOP' , & ! Data Name grid%soilctop , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XZY' , & ! MemoryOrder 'Z' , & ! Stagger 'west_east' , & ! Dimname 1 'soil_cat_stag' , & ! Dimname 2 'south_north' , & ! Dimname 3 'SOIL CAT FRACTION (TOP)' , & ! Desc 'fraction' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILCTOP memorder XZY' , & ! Debug message ids , (ide-1) , 1 , config_flags%num_soil_cat , jds , (jde-1) , & ims , ime , 1 , config_flags%num_soil_cat , jms , jme , & ips , MIN( (ide-1), ipe ) , 1 , config_flags%num_soil_cat , jps , MIN( (jde-1), jpe ) , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILCBOT' , & ! Data Name grid%soilcbot , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XZY' , & ! MemoryOrder 'Z' , & ! Stagger 'west_east' , & ! Dimname 1 'soil_cat_stag' , & ! Dimname 2 'south_north' , & ! Dimname 3 'SOIL CAT FRACTION (BOTTOM)' , & ! Desc 'fraction' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILCBOT memorder XZY' , & ! Debug message ids , (ide-1) , 1 , config_flags%num_soil_cat , jds , (jde-1) , & ims , ime , 1 , config_flags%num_soil_cat , jms , jme , & ips , MIN( (ide-1), ipe ) , 1 , config_flags%num_soil_cat , jps , MIN( (jde-1), jpe ) , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SOILCAT' , & ! Data Name grid%soilcat , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'SOIL CAT DOMINANT TYPE' , & ! Desc 'category' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SOILCAT memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'VEGCAT' , & ! Data Name grid%vegcat , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'VEGETATION CAT DOMINANT TYPE' , & ! Desc 'category' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field VEGCAT memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'XICE' , & ! Data Name grid%xice , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'SEA ICE' , & ! Desc '' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field XICE memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'VEGFRA' , & ! Data Name grid%vegfra , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'VEGETATION FRACTION' , & ! Desc '' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field VEGFRA memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SNOW' , & ! Data Name grid%snow , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'SNOW WATER EQUIVALENT' , & ! Desc '' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SNOW memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SNOWH' , & ! Data Name grid%snowh , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'PHYSICAL SNOW DEPTH' , & ! Desc '' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SNOWH memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'CANWAT' , & ! Data Name grid%canwat , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'CANOPY WATER' , & ! Desc '' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field CANWAT memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SST' , & ! Data Name grid%sst , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'SEA SURFACE TEMPERATURE' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SST memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'MAPFAC_M' , & ! Data Name grid%msft , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'Map scale factor on mass grid' , & ! Desc 'dimensionless' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field MAPFAC_M memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'MAPFAC_U' , & ! Data Name grid%msfu , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder 'X' , & ! Stagger 'west_east_stag' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'Map scale factor on u-grid' , & ! Desc 'dimensionless' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field MAPFAC_U memorder XY' , & ! Debug message ids , ide , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( ide, ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'MAPFAC_V' , & ! Data Name grid%msfv , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder 'Y' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north_stag' , & ! Dimname 2 '' , & ! Dimname 3 'Map scale factor on v-grid' , & ! Desc 'dimensionless' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field MAPFAC_V memorder XY' , & ! Debug message ids , (ide-1) , jds , jde , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( jde, jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'F' , & ! Data Name grid%f , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'Coriolis sine latitude term' , & ! Desc '' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field F memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'E' , & ! Data Name grid%e , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'Coriolis cosine latitude term' , & ! Desc '' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field E memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'SINALPHA' , & ! Data Name grid%sina , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'Local sine of map rotation' , & ! Desc 'dimensionless' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field SINALPHA memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'COSALPHA' , & ! Data Name grid%cosa , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'Local cosine of map rotation' , & ! Desc 'dimensionless' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field COSALPHA memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'HGT' , & ! Data Name grid%ht , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'Terrain Height' , & ! Desc 'm' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field HGT memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'TSK' , & ! Data Name grid%tsk , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'SURFACE SKIN TEMPERATURE' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field TSK memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'XLAT' , & ! Data Name grid%xlat , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LATITUDE, SOUTH IS NEGATIVE' , & ! Desc 'degree' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field XLAT memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'XLONG' , & ! Data Name grid%xlong , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'LONGITUDE, WEST IS NEGATIVE' , & ! Desc 'degree' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field XLONG memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'ALBBCK' , & ! Data Name grid%albbck , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'BACKGROUND ALBEDO' , & ! Desc 'NA' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field ALBBCK memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) CALL wrf_ext_write_field
( & fid , & ! DataHandle current_date(1:19) , & ! DateStr 'TMN' , & ! Data Name grid%tmn , & ! Field WRF_real , & ! FieldType grid%communicator , & ! Comm grid%iocommunicator , & ! Comm grid%domdesc , & ! Comm grid%bdy_mask , & ! bdy_mask dryrun , & ! flag 'XY' , & ! MemoryOrder '' , & ! Stagger 'west_east' , & ! Dimname 1 'south_north' , & ! Dimname 2 '' , & ! Dimname 3 'SOIL TEMPERATURE AT LOWER BOUNDARY' , & ! Desc 'K' , & ! Units 'inc/wrf_auxinput1out.inc ext_write_field TMN memorder XY' , & ! Debug message ids , (ide-1) , jds , (jde-1) , 1 , 1 , & ims , ime , jms , jme , 1 , 1 , & ips , MIN( (ide-1), ipe ) , jps , MIN( (jde-1), jpe ) , 1 , 1 , & ierr ) !ENDOFREGISTRYGENERATEDINCLUDE