ROMS
Loading...
Searching...
No Matches
mod_ncparam Module Reference

Functions/Subroutines

subroutine, public allocate_ncparam
 
subroutine, public deallocate_ncparam
 
subroutine, public initialize_ncparam
 

Variables

integer, parameter io_nf90 = 1
 
integer, parameter io_pio = 2
 
integer inp_lib
 
integer out_lib
 
integer, parameter mv = 1400
 
integer, parameter nv = 1400
 
integer, parameter ndimid = 33
 
integer, dimension(:), allocatable nxyp
 
integer, dimension(:), allocatable nxyr
 
integer, dimension(:), allocatable nxyu
 
integer, dimension(:), allocatable nxyv
 
integer, dimension(:), allocatable nwaterr
 
integer, dimension(:), allocatable nwateru
 
integer, dimension(:), allocatable nwaterv
 
integer, dimension(:), allocatable rilb
 
integer, dimension(:), allocatable riub
 
integer, dimension(:), allocatable rjlb
 
integer, dimension(:), allocatable rjub
 
real(r8), dimension(:), allocatable rxmin
 
real(r8), dimension(:), allocatable rxmax
 
real(r8), dimension(:), allocatable rymin
 
real(r8), dimension(:), allocatable rymax
 
integer, dimension(:), allocatable uilb
 
integer, dimension(:), allocatable uiub
 
integer, dimension(:), allocatable ujlb
 
integer, dimension(:), allocatable ujub
 
real(r8), dimension(:), allocatable uxmin
 
real(r8), dimension(:), allocatable uxmax
 
real(r8), dimension(:), allocatable uymin
 
real(r8), dimension(:), allocatable uymax
 
integer, dimension(:), allocatable vilb
 
integer, dimension(:), allocatable viub
 
integer, dimension(:), allocatable vjlb
 
integer, dimension(:), allocatable vjub
 
real(r8), dimension(:), allocatable vxmin
 
real(r8), dimension(:), allocatable vxmax
 
real(r8), dimension(:), allocatable vymin
 
real(r8), dimension(:), allocatable vymax
 
logical, dimension(:,:), allocatable aout
 
logical, dimension(:,:), allocatable dout
 
logical, dimension(:,:), allocatable hout
 
logical, dimension(:,:), allocatable qout
 
logical, dimension(:,:), allocatable sout
 
integer idxgrd = -1
 
integer idygrd = -2
 
integer idzgrd = -3
 
integer iddpth = -4
 
integer idglon = -5
 
integer idglat = -6
 
integer idsize = -7
 
integer idswim = -8
 
integer idwbio = -9
 
integer idwsin = -10
 
integer idangr
 
integer idbath
 
integer idbger
 
integer idbgth
 
integer idcfra
 
integer idcosw
 
integer idcos2
 
integer iddano
 
integer, dimension(2) iddiff
 
integer iddqdt
 
integer idempf
 
integer idevap
 
integer idfcor
 
integer idfsur
 
integer idfsud
 
integer idfsuh
 
integer, dimension(2) idghat
 
integer idgtnc
 
integer idjwty
 
integer idhbbl
 
integer idhsbl
 
integer idhzdz
 
integer idincr
 
integer idinno
 
integer idkhor
 
integer idkver
 
integer idlatp
 
integer idlatr
 
integer idlatu
 
integer idlatv
 
integer idldwn
 
integer idlonp
 
integer idlonr
 
integer idlonu
 
integer idlonv
 
integer idlhea
 
integer idlrad
 
integer idmadh
 
integer idmomi
 
integer idmomf
 
integer idmskp
 
integer idmskr
 
integer idmsku
 
integer idmskv
 
integer idmtke
 
integer idmtls
 
integer idm2nc
 
integer idm3nc
 
integer idnlmf
 
integer idnlmi
 
integer idnlmo
 
integer idnlmp
 
integer idnlmu
 
integer idnobs
 
integer idobsd
 
integer idobss
 
integer idobst
 
integer idobsx
 
integer idobsy
 
integer idobsz
 
integer idoday
 
integer idoerr
 
integer idolat
 
integer idolon
 
integer idomet
 
integer idopro
 
integer idotyp
 
integer idoval
 
integer idovel
 
integer idovil
 
integer idpair
 
integer idpbar
 
integer idpwet
 
integer idpmdx
 
integer idpndy
 
integer idpthr
 
integer idpthu
 
integer idpthv
 
integer idpthw
 
integer idqair
 
integer idrdir
 
integer idrepo
 
integer idrflg
 
integer idrtra
 
integer idruct
 
integer idru2d
 
integer idru3d
 
integer idrvct
 
integer idrv2d
 
integer idrv3d
 
integer idrxpo
 
integer idrvsh
 
integer idrwet
 
integer idrzet
 
integer idrain
 
integer idragl
 
integer idragq
 
integer idsdif
 
integer idsinw
 
integer idsin2
 
integer idsrad
 
integer idsshc
 
integer idsssc
 
integer idsstc
 
integer idshea
 
integer idswcw
 
integer idresi
 
integer idsfwf
 
integer idscor
 
integer idscou
 
integer idscov
 
integer idtlmo
 
integer idtair
 
integer idtdif
 
integer idtime
 
integer idtopo
 
integer idtref
 
integer idtper
 
integer idtvan
 
integer idtvma
 
integer idtvmi
 
integer idtvph
 
integer idtzam
 
integer idtzph
 
integer idu2da
 
integer idu2rs
 
integer idu3rs
 
integer idu2sd
 
integer idu3sd
 
integer iduads
 
integer iduair
 
integer iduaie
 
integer idubar
 
integer idubas
 
integer idubcl
 
integer idubcs
 
integer idubed
 
integer idubms
 
integer idubot
 
integer idubrs
 
integer idubtf
 
integer idubur
 
integer idubws
 
integer iduclm
 
integer idufx1
 
integer idufx2
 
integer idusms
 
integer idusue
 
integer idusur
 
integer idutlf
 
integer iduvel
 
integer iduvwc
 
integer iduwav
 
integer iduwet
 
integer idu2dd
 
integer idu2dh
 
integer idu2de
 
integer idu3dd
 
integer idu3dh
 
integer idu3de
 
integer idv2rs
 
integer idv3rs
 
integer idv2sd
 
integer idv3sd
 
integer idvads
 
integer idvair
 
integer idvain
 
integer idvbar
 
integer idvbas
 
integer idvbcl
 
integer idvbcs
 
integer idvbed
 
integer idvbms
 
integer idvbot
 
integer idvbrs
 
integer idvbtf
 
integer idvbvr
 
integer idvbws
 
integer idvclm
 
integer idvfx1
 
integer idvfx2
 
integer idvmls
 
integer idvmkk
 
integer idvmkp
 
integer idvsms
 
integer idvsun
 
integer idvsur
 
integer idvtlf
 
integer idvvel
 
integer idvvis
 
integer idvwav
 
integer idvwet
 
integer idv2dd
 
integer idv2dh
 
integer idv2dn
 
integer idv3dd
 
integer idv3dh
 
integer idv3dn
 
integer idw3sd
 
integer idw3st
 
integer idw2xx
 
integer idw2xy
 
integer idw2yy
 
integer idw3xx
 
integer idw3xy
 
integer idw3yy
 
integer idw3zx
 
integer idw3zy
 
integer idwads
 
integer idwamp
 
integer idwam2
 
integer idwbeh
 
integer idwbrk
 
integer idwdib
 
integer idwdif
 
integer idwdip
 
integer idwdir
 
integer idwdis
 
integer idwdiw
 
integer idwlen
 
integer idwlep
 
integer idwmsk
 
integer idworb
 
integer idwptp
 
integer idwpbt
 
integer idwqsp
 
integer idwrol
 
integer idwvds
 
integer idwvel
 
integer idwvqp
 
integer idwztw
 
integer idxgrp
 
integer idxgrr
 
integer idxgru
 
integer idxgrv
 
integer idygrp
 
integer idygrr
 
integer idygru
 
integer idygrv
 
integer idzobl
 
integer idzads
 
integer idztlf
 
integer id2dpv
 
integer id2drv
 
integer id3dpv
 
integer id3drv
 
integer last_varid
 
integer, dimension(:), allocatable idrtrc
 
integer, dimension(:), allocatable idsurt
 
integer, dimension(:), allocatable idtads
 
integer, dimension(:), allocatable idtbot
 
integer, dimension(:,:), allocatable idtbry
 
integer, dimension(:), allocatable idtclm
 
integer, dimension(:), allocatable idtnud
 
integer, dimension(:), allocatable idtsur
 
integer, dimension(:), allocatable idttlf
 
integer, dimension(4) idu2bc
 
integer, dimension(4) idu3bc
 
integer, dimension(4) idv2bc
 
integer, dimension(4) idv3bc
 
integer, dimension(4) idzbry
 
integer idu2av
 
integer idv2av
 
integer idzzav
 
integer idhuav
 
integer idhvav
 
integer iduuav
 
integer iduvav
 
integer idvvav
 
integer, dimension(:), allocatable ihutav
 
integer, dimension(:), allocatable ihvtav
 
integer, dimension(:), allocatable idttav
 
integer, dimension(:), allocatable idutav
 
integer, dimension(:), allocatable idvtav
 
integer, dimension(:,:), allocatable iddtrc
 
integer, dimension(:), allocatable iddu2d
 
integer, dimension(:), allocatable iddv2d
 
integer, dimension(:), allocatable iddu3d
 
integer, dimension(:), allocatable iddv3d
 
integer isfsur = 1
 
integer isubar = 2
 
integer isvbar = 3
 
integer isuvel = 4
 
integer isvvel = 5
 
integer iswvel
 
integer isradial = 0
 
integer isustr
 
integer isvstr
 
integer ismtke
 
integer, dimension(:), allocatable istsur
 
integer, dimension(:), allocatable istvar
 
integer, dimension(:), allocatable idbvar
 
integer, dimension(:), allocatable idsvar
 
integer, dimension(:), allocatable idsbry
 
integer isbp2d
 
integer isbr2d
 
integer isbu2d
 
integer isbv2d
 
integer isbp3d
 
integer isbr3d
 
integer isbu3d
 
integer isbv3d
 
integer isbw3d
 
integer, dimension(:,:), allocatable bryncid
 
integer, dimension(:,:), allocatable clmncid
 
integer, dimension(:,:), allocatable frcncid
 
type(file_desc_t), dimension(:,:), pointer brypiofile
 
type(file_desc_t), dimension(:,:), pointer clmpiofile
 
type(file_desc_t), dimension(:,:), pointer frcpiofile
 
integer, dimension(:), allocatable idefadj
 
integer, dimension(:), allocatable idefavg
 
integer, dimension(:), allocatable idefdia
 
integer, dimension(:), allocatable idefhis
 
integer, dimension(:), allocatable idefqck
 
integer, dimension(:), allocatable ideftlm
 
integer, dimension(:), allocatable idefxtr
 
integer, dimension(:), allocatable idtvar
 
integer, dimension(:), allocatable idtrcd
 
integer, dimension(:), allocatable idtrch
 
logical, dimension(:,:,:), allocatable linfo
 
integer, parameter maxlen = 160
 
integer, dimension(:,:,:), allocatable iinfo
 
real(dp), dimension(:,:,:), allocatable finfo
 
real(dp), dimension(:,:,:), allocatable fpoint
 
real(dp), dimension(:,:), allocatable fscale
 
real(dp), dimension(:,:,:), allocatable tintrp
 
real(dp), dimension(:,:,:), allocatable vtime
 
character(len=5) version = '4.3 '
 
character(len=40), dimension(mvvarnam
 
character(len=44) date_str
 
character(len=46), dimension(0:nvtname
 
character(len=maxlenhistory
 
character(len=maxlen), dimension(6, 0:nvvname
 
character(len=256), dimension(:,:), allocatable cinfo
 
type(my_vardesc), dimension(:,:,:), pointer dinfo
 
logical lanafile
 
character(len=256), dimension(39) ananame
 
character(len=80) git_rev
 
character(len=80) svn_rev
 
character(len=256) git_url
 
character(len=256) svn_url
 

Function/Subroutine Documentation

◆ allocate_ncparam()

subroutine, public mod_ncparam::allocate_ncparam

Definition at line 622 of file mod_ncparam.F.

623!
624!=======================================================================
625! !
626! This routine allocates several variables in the module that depend !
627! on the number of nested grids. !
628! !
629!=======================================================================
630!
631 USE mod_param
632!
633! Local variable declarations.
634!
635 integer :: ng
636!
637!-----------------------------------------------------------------------
638! Allocate variables.
639!-----------------------------------------------------------------------
640!
641 IF (.not.allocated(nxyp)) THEN
642 allocate ( nxyp(ngrids) )
643 dmem(1)=dmem(1)+real(ngrids,r8)
644 END IF
645 IF (.not.allocated(nxyr)) THEN
646 allocate ( nxyr(ngrids) )
647 dmem(1)=dmem(1)+real(ngrids,r8)
648 END IF
649 IF (.not.allocated(nxyu)) THEN
650 allocate ( nxyu(ngrids) )
651 dmem(1)=dmem(1)+real(ngrids,r8)
652 END IF
653 IF (.not.allocated(nxyv)) THEN
654 allocate ( nxyv(ngrids) )
655 dmem(1)=dmem(1)+real(ngrids,r8)
656 END IF
657
658 IF (.not.allocated(nwaterr)) THEN
659 allocate ( nwaterr(ngrids) )
660 dmem(1)=dmem(1)+real(ngrids,r8)
661 END IF
662 IF (.not.allocated(nwateru)) THEN
663 allocate ( nwateru(ngrids) )
664 dmem(1)=dmem(1)+real(ngrids,r8)
665 END IF
666 IF (.not.allocated(nwaterv)) THEN
667 allocate ( nwaterv(ngrids) )
668 dmem(1)=dmem(1)+real(ngrids,r8)
669 END IF
670
671 IF (.not.allocated(rilb)) THEN
672 allocate ( rilb(ngrids) )
673 dmem(1)=dmem(1)+real(ngrids,r8)
674 END IF
675 IF (.not.allocated(riub)) THEN
676 allocate ( riub(ngrids) )
677 dmem(1)=dmem(1)+real(ngrids,r8)
678 END IF
679 IF (.not.allocated(rjlb)) THEN
680 allocate ( rjlb(ngrids) )
681 dmem(1)=dmem(1)+real(ngrids,r8)
682 END IF
683 IF (.not.allocated(rjub)) THEN
684 allocate ( rjub(ngrids) )
685 dmem(1)=dmem(1)+real(ngrids,r8)
686 END IF
687
688 IF (.not.allocated(rxmin)) THEN
689 allocate ( rxmin(ngrids) )
690 dmem(1)=dmem(1)+real(ngrids,r8)
691 END IF
692 IF (.not.allocated(rxmax)) THEN
693 allocate ( rxmax(ngrids) )
694 dmem(1)=dmem(1)+real(ngrids,r8)
695 END IF
696 IF (.not.allocated(rymin)) THEN
697 allocate ( rymin(ngrids) )
698 dmem(1)=dmem(1)+real(ngrids,r8)
699 END IF
700 IF (.not.allocated(rymax)) THEN
701 allocate ( rymax(ngrids) )
702 dmem(1)=dmem(1)+real(ngrids,r8)
703 END IF
704
705 IF (.not.allocated(uilb)) THEN
706 allocate ( uilb(ngrids) )
707 dmem(1)=dmem(1)+real(ngrids,r8)
708 END IF
709 IF (.not.allocated(uiub)) THEN
710 allocate ( uiub(ngrids) )
711 dmem(1)=dmem(1)+real(ngrids,r8)
712 END IF
713 IF (.not.allocated(ujlb)) THEN
714 allocate ( ujlb(ngrids) )
715 dmem(1)=dmem(1)+real(ngrids,r8)
716 END IF
717 IF (.not.allocated(ujub)) THEN
718 allocate ( ujub(ngrids) )
719 dmem(1)=dmem(1)+real(ngrids,r8)
720 END IF
721
722 IF (.not.allocated(uxmin)) THEN
723 allocate ( uxmin(ngrids) )
724 dmem(1)=dmem(1)+real(ngrids,r8)
725 END IF
726 IF (.not.allocated(uxmax)) THEN
727 allocate ( uxmax(ngrids) )
728 dmem(1)=dmem(1)+real(ngrids,r8)
729 END IF
730 IF (.not.allocated(uymin)) THEN
731 allocate ( uymin(ngrids) )
732 dmem(1)=dmem(1)+real(ngrids,r8)
733 END IF
734 IF (.not.allocated(uymax)) THEN
735 allocate ( uymax(ngrids) )
736 dmem(1)=dmem(1)+real(ngrids,r8)
737 END IF
738
739 IF (.not.allocated(vilb)) THEN
740 allocate ( vilb(ngrids) )
741 dmem(1)=dmem(1)+real(ngrids,r8)
742 END IF
743 IF (.not.allocated(viub)) THEN
744 allocate ( viub(ngrids) )
745 dmem(1)=dmem(1)+real(ngrids,r8)
746 END IF
747 IF (.not.allocated(vjlb)) THEN
748 allocate ( vjlb(ngrids) )
749 dmem(1)=dmem(1)+real(ngrids,r8)
750 END IF
751 IF (.not.allocated(vjub)) THEN
752 allocate ( vjub(ngrids) )
753 dmem(1)=dmem(1)+real(ngrids,r8)
754 END IF
755
756 IF (.not.allocated(vxmin)) THEN
757 allocate ( vxmin(ngrids) )
758 dmem(1)=dmem(1)+real(ngrids,r8)
759 END IF
760 IF (.not.allocated(vxmax)) THEN
761 allocate ( vxmax(ngrids) )
762 dmem(1)=dmem(1)+real(ngrids,r8)
763 END IF
764 IF (.not.allocated(vymin)) THEN
765 allocate ( vymin(ngrids) )
766 dmem(1)=dmem(1)+real(ngrids,r8)
767 END IF
768 IF (.not.allocated(vymax)) THEN
769 allocate ( vymax(ngrids) )
770 dmem(1)=dmem(1)+real(ngrids,r8)
771 END IF
772
773 IF (.not.allocated(aout)) THEN
774 allocate ( aout(nv,ngrids) )
775 dmem(1)=dmem(1)+real(nv*ngrids,r8)
776 END IF
777 IF (.not.allocated(dout)) THEN
778 allocate ( dout(nv,ngrids) )
779 dmem(1)=dmem(1)+real(nv*ngrids,r8)
780 END IF
781 IF (.not.allocated(hout)) THEN
782 allocate ( hout(nv,ngrids) )
783 dmem(1)=dmem(1)+real(nv*ngrids,r8)
784 END IF
785 IF (.not.allocated(qout)) THEN
786 allocate ( qout(nv,ngrids) )
787 dmem(1)=dmem(1)+real(nv*ngrids,r8)
788 END IF
789 IF (.not.allocated(sout)) THEN
790 allocate ( sout(nv,ngrids) )
791 dmem(1)=dmem(1)+real(nv*ngrids,r8)
792 END IF
793
794 IF (.not.allocated(idrtrc)) THEN
795 allocate ( idrtrc(mt) )
796 dmem(1)=dmem(1)+real(mt,r8)
797 END IF
798 IF (.not.allocated(idsurt)) THEN
799 allocate ( idsurt(mt) )
800 dmem(1)=dmem(1)+real(mt,r8)
801 END IF
802 IF (.not.allocated(idtads)) THEN
803 allocate ( idtads(mt) )
804 dmem(1)=dmem(1)+real(mt,r8)
805 END IF
806 IF (.not.allocated(idtbot)) THEN
807 allocate ( idtbot(mt) )
808 dmem(1)=dmem(1)+real(mt,r8)
809 END IF
810 IF (.not.allocated(idtbry)) THEN
811 allocate ( idtbry(4,mt) )
812 dmem(1)=dmem(1)+4.0_r8*real(mt,r8)
813 END IF
814 IF (.not.allocated(idtclm)) THEN
815 allocate ( idtclm(mt) )
816 dmem(1)=dmem(1)+real(mt,r8)
817 END IF
818 IF (.not.allocated(idtnud)) THEN
819 allocate ( idtnud(mt) )
820 dmem(1)=dmem(1)+real(mt,r8)
821 END IF
822 IF (.not.allocated(idtsur)) THEN
823 allocate ( idtsur(mt) )
824 dmem(1)=dmem(1)+real(mt,r8)
825 END IF
826 IF (.not.allocated(idttlf)) THEN
827 allocate ( idttlf(mt) )
828 dmem(1)=dmem(1)+real(mt,r8)
829 END IF
830
831 IF (.not.allocated(ihutav)) THEN
832 allocate ( ihutav(mt) )
833 dmem(1)=dmem(1)+real(mt,r8)
834 END IF
835 IF (.not.allocated(ihvtav)) THEN
836 allocate ( ihvtav(mt) )
837 dmem(1)=dmem(1)+real(mt,r8)
838 END IF
839 IF (.not.allocated(idttav)) THEN
840 allocate ( idttav(mt) )
841 dmem(1)=dmem(1)+real(mt,r8)
842 END IF
843 IF (.not.allocated(idutav)) THEN
844 allocate ( idutav(mt) )
845 dmem(1)=dmem(1)+real(mt,r8)
846 END IF
847 IF (.not.allocated(idvtav)) THEN
848 allocate ( idvtav(mt) )
849 dmem(1)=dmem(1)+real(mt,r8)
850 END IF
851
852#ifdef DIAGNOSTICS
853 IF (.not.allocated(iddtrc)) THEN
854 allocate ( iddtrc(mt,ndt) )
855 dmem(1)=dmem(1)+real(mt*ndt,r8)
856 END IF
857 IF (.not.allocated(iddu2d)) THEN
858 allocate ( iddu2d(ndm2d) )
859 dmem(1)=dmem(1)+real(ndm2d,r8)
860 END IF
861 IF (.not.allocated(iddv2d)) THEN
862 allocate ( iddv2d(ndm2d) )
863 dmem(1)=dmem(1)+real(ndm2d,r8)
864 END IF
865 IF (.not.allocated(iddu3d)) THEN
866 allocate ( iddu3d(ndm3d) )
867 dmem(1)=dmem(1)+real(ndm3d,r8)
868 END IF
869 IF (.not.allocated(iddv3d)) THEN
870 allocate ( iddv3d(ndm3d) )
871 dmem(1)=dmem(1)+real(ndm3d,r8)
872 END IF
873#endif
874
875 IF (.not.allocated(istsur)) THEN
876 allocate ( istsur(mt) )
877 dmem(1)=dmem(1)+real(mt,r8)
878 END IF
879 IF (.not.allocated(istvar)) THEN
880 allocate ( istvar(mt) )
881 istvar=0
882 dmem(1)=dmem(1)+real(mt,r8)
883 END IF
884 IF (.not.allocated(idbvar)) THEN
885 allocate ( idbvar(nlbcvar) )
886 idbvar=0
887 dmem(1)=dmem(1)+real(nlbcvar,r8)
888 END IF
889 IF (.not.allocated(idsvar)) THEN
890 allocate ( idsvar(maxval(nsv)) )
891 idsvar=0
892 dmem(1)=dmem(1)+real(maxval(nsv),r8)
893 END IF
894 IF (.not.allocated(idsbry)) THEN
895 allocate ( idsbry(maxval(nsv)) )
896 idsbry=0
897 dmem(1)=dmem(1)+real(maxval(nsv),r8)
898 END IF
899
900 IF (.not.allocated(bryncid)) THEN
901 allocate ( bryncid(nv,ngrids) )
902 dmem(1)=dmem(1)+real(nv*ngrids,r8)
903 END IF
904 IF (.not.allocated(clmncid)) THEN
905 allocate ( clmncid(nv,ngrids) )
906 dmem(1)=dmem(1)+real(nv*ngrids,r8)
907 END IF
908 IF (.not.allocated(frcncid)) THEN
909 allocate ( frcncid(nv,ngrids) )
910 dmem(1)=dmem(1)+real(nv*ngrids,r8)
911 END IF
912
913#if defined PIO_LIB && defined DISTRIBUTE
914 IF (.not.associated(brypiofile)) THEN
915 allocate ( brypiofile(nv,ngrids) )
916 dmem(1)=dmem(1)+real(nv*ngrids,r8)
917 END IF
918 IF (.not.associated(clmpiofile)) THEN
919 allocate ( clmpiofile(nv,ngrids) )
920 dmem(1)=dmem(1)+real(nv*ngrids,r8)
921 END IF
922 IF (.not.associated(frcpiofile)) THEN
923 allocate ( frcpiofile(nv,ngrids) )
924 dmem(1)=dmem(1)+real(nv*ngrids,r8)
925 END IF
926#endif
927
928 IF (.not.allocated(idefadj)) THEN
929 allocate ( idefadj(ngrids) )
930 dmem(1)=dmem(1)+real(ngrids,r8)
931 END IF
932 IF (.not.allocated(idefavg)) THEN
933 allocate ( idefavg(ngrids) )
934 dmem(1)=dmem(1)+real(ngrids,r8)
935 END IF
936 IF (.not.allocated(idefdia)) THEN
937 allocate ( idefdia(ngrids) )
938 dmem(1)=dmem(1)+real(ngrids,r8)
939 END IF
940 IF (.not.allocated(idefhis)) THEN
941 allocate ( idefhis(ngrids) )
942 dmem(1)=dmem(1)+real(ngrids,r8)
943 END IF
944 IF (.not.allocated(idefqck)) THEN
945 allocate ( idefqck(ngrids) )
946 dmem(1)=dmem(1)+real(ngrids,r8)
947 END IF
948 IF (.not.allocated(ideftlm)) THEN
949 allocate ( ideftlm(ngrids) )
950 dmem(1)=dmem(1)+real(ngrids,r8)
951 END IF
952 IF (.not.allocated(idefxtr)) THEN
953 allocate ( idefxtr(ngrids) )
954 dmem(1)=dmem(1)+real(ngrids,r8)
955 END IF
956
957 IF (.not.allocated(idtvar)) THEN
958 allocate ( idtvar(mt) )
959 dmem(1)=dmem(1)+real(mt,r8)
960 END IF
961 IF (.not.allocated(idtrcd)) THEN
962 allocate ( idtrcd(nat) )
963 dmem(1)=dmem(1)+real(nat,r8)
964 END IF
965 IF (.not.allocated(idtrch)) THEN
966 allocate ( idtrch(nat) )
967 dmem(1)=dmem(1)+real(nat,r8)
968 END IF
969
970 IF (.not.allocated(linfo)) THEN
971 allocate ( linfo(6,nv,ngrids) )
972 dmem(1)=dmem(1)+6.0_r8*real(nv*ngrids,r8)
973 END IF
974
975 IF (.not.allocated(iinfo)) THEN
976 allocate ( iinfo(11,nv,ngrids) )
977 dmem(1)=dmem(1)+10.0_r8*real(nv*ngrids,r8)
978 END IF
979
980 IF (.not.allocated(finfo)) THEN
981 allocate ( finfo(10,nv,ngrids) )
982 dmem(1)=dmem(1)+10.0_r8*real(nv*ngrids,r8)
983 END IF
984 IF (.not.allocated(fpoint)) THEN
985 allocate ( fpoint(2,nv,ngrids) )
986 dmem(1)=dmem(1)+2.0_r8*real(nv*ngrids,r8)
987 END IF
988 IF (.not.allocated(fscale)) THEN
989 allocate ( fscale(nv,ngrids) )
990 dmem(1)=dmem(1)+real(nv*ngrids,r8)
991 END IF
992 IF (.not.allocated(tintrp)) THEN
993 allocate ( tintrp(2,nv,ngrids) )
994 dmem(1)=dmem(1)+2.0_r8*real(nv*ngrids,r8)
995 END IF
996
997#if defined SSH_TIDES || defined UV_TIDES
998 IF (.not.allocated(vtime)) THEN
999 allocate ( vtime(max(2,mtc),nv,ngrids) )
1000 dmem(1)=dmem(1)+real(max(2,mtc)*nv*ngrids,r8)
1001 END IF
1002#else
1003 IF (.not.allocated(vtime)) THEN
1004 allocate ( vtime(2,nv,ngrids) )
1005 dmem(1)=dmem(1)+real(nv*ngrids,r8)
1006 END IF
1007#endif
1008
1009 IF (.not.allocated(cinfo)) THEN
1010 allocate ( cinfo(nv,ngrids) )
1011 dmem(1)=dmem(1)+0.125_r8*256.0_r8*real(nv*ngrids,r8)
1012 END IF
1013
1014#if defined PIO_LIB && defined DISTRIBUTE
1015 IF (.not.associated(dinfo)) THEN
1016 allocate ( dinfo(2,nv,ngrids) )
1017 dmem(1)=dmem(1)+2.0_r8*real(nv*ngrids,r8)
1018 END IF
1019#endif
1020!
1021 RETURN
integer nat
Definition mod_param.F:499
integer, dimension(:), allocatable nsv
Definition mod_param.F:636
integer mtc
Definition mod_param.F:564
real(r8), dimension(:), allocatable dmem
Definition mod_param.F:137
integer nlbcvar
Definition mod_param.F:355
integer ndm3d
Definition mod_param.F:579
integer ngrids
Definition mod_param.F:113
integer ndt
Definition mod_param.F:574
integer mt
Definition mod_param.F:490
integer ndm2d
Definition mod_param.F:578

References aout, bryncid, brypiofile, cinfo, clmncid, clmpiofile, dinfo, mod_param::dmem, dout, finfo, fpoint, frcncid, frcpiofile, fscale, hout, idbvar, iddtrc, iddu2d, iddu3d, iddv2d, iddv3d, idefadj, idefavg, idefdia, idefhis, idefqck, ideftlm, idefxtr, idrtrc, idsbry, idsurt, idsvar, idtads, idtbot, idtbry, idtclm, idtnud, idtrcd, idtrch, idtsur, idttav, idttlf, idtvar, idutav, idvtav, ihutav, ihvtav, iinfo, istsur, istvar, linfo, mod_param::mt, mod_param::mtc, mod_param::nat, mod_param::ndm2d, mod_param::ndm3d, mod_param::ndt, mod_param::ngrids, mod_param::nlbcvar, mod_param::nsv, nv, nwaterr, nwateru, nwaterv, nxyp, nxyr, nxyu, nxyv, qout, rilb, riub, rjlb, rjub, rxmax, rxmin, rymax, rymin, sout, tintrp, uilb, uiub, ujlb, ujub, uxmax, uxmin, uymax, uymin, vilb, viub, vjlb, vjub, vtime, vxmax, vxmin, vymax, and vymin.

◆ deallocate_ncparam()

subroutine, public mod_ncparam::deallocate_ncparam

Definition at line 1024 of file mod_ncparam.F.

1025!
1026!=======================================================================
1027! !
1028! This routine deallocates variables in the module. !
1029! on the number of nested grids. !
1030! !
1031!=======================================================================
1032!
1033!-----------------------------------------------------------------------
1034! Deallocate variables in module.
1035!-----------------------------------------------------------------------
1036!
1037 IF (allocated(nxyp)) deallocate ( nxyp )
1038 IF (allocated(nxyr)) deallocate ( nxyr )
1039 IF (allocated(nxyu)) deallocate ( nxyu )
1040 IF (allocated(nxyv)) deallocate ( nxyv )
1041 IF (allocated(nwaterr)) deallocate ( nwaterr )
1042 IF (allocated(nwateru)) deallocate ( nwateru )
1043 IF (allocated(nwaterv)) deallocate ( nwaterv )
1044 IF (allocated(rilb)) deallocate ( rilb )
1045 IF (allocated(riub)) deallocate ( riub )
1046 IF (allocated(rjlb)) deallocate ( rjlb )
1047 IF (allocated(rjub)) deallocate ( rjub )
1048 IF (allocated(rxmin)) deallocate ( rxmin )
1049 IF (allocated(rxmax)) deallocate ( rxmax )
1050 IF (allocated(rymin)) deallocate ( rymin )
1051 IF (allocated(rymax)) deallocate ( rymax )
1052 IF (allocated(uilb)) deallocate ( uilb )
1053 IF (allocated(uiub)) deallocate ( uiub )
1054 IF (allocated(ujlb)) deallocate ( ujlb )
1055 IF (allocated(ujub)) deallocate ( ujub )
1056 IF (allocated(uxmin)) deallocate ( uxmin )
1057 IF (allocated(uxmax)) deallocate ( uxmax )
1058 IF (allocated(uymin)) deallocate ( uymin )
1059 IF (allocated(uymax)) deallocate ( uymax )
1060 IF (allocated(vilb)) deallocate ( vilb )
1061 IF (allocated(viub)) deallocate ( viub )
1062 IF (allocated(vjlb)) deallocate ( vjlb )
1063 IF (allocated(vjub)) deallocate ( vjub )
1064 IF (allocated(vxmin)) deallocate ( vxmin )
1065 IF (allocated(vxmax)) deallocate ( vxmax )
1066 IF (allocated(vymin)) deallocate ( vymin )
1067 IF (allocated(vymax)) deallocate ( vymax )
1068!
1069 IF (allocated(aout)) deallocate ( aout )
1070 IF (allocated(dout)) deallocate ( dout )
1071 IF (allocated(hout)) deallocate ( hout )
1072 IF (allocated(qout)) deallocate ( qout )
1073 IF (allocated(sout)) deallocate ( sout )
1074!
1075 IF (allocated(idrtrc)) deallocate ( idrtrc )
1076 IF (allocated(idsurt)) deallocate ( idsurt )
1077 IF (allocated(idtads)) deallocate ( idtads )
1078 IF (allocated(idtbot)) deallocate ( idtbot )
1079 IF (allocated(idtbry)) deallocate ( idtbry )
1080 IF (allocated(idtclm)) deallocate ( idtclm )
1081 IF (allocated(idtnud)) deallocate ( idtnud )
1082 IF (allocated(idtsur)) deallocate ( idtsur )
1083 IF (allocated(idttlf)) deallocate ( idttlf )
1084!
1085 IF (allocated(ihutav)) deallocate ( ihutav )
1086 IF (allocated(ihvtav)) deallocate ( ihvtav )
1087 IF (allocated(idttav)) deallocate ( idttav )
1088 IF (allocated(idutav)) deallocate ( idutav )
1089 IF (allocated(idvtav)) deallocate ( idvtav )
1090
1091#ifdef DIAGNOSTICS
1092!
1093 IF (allocated(iddtrc)) deallocate ( iddtrc )
1094 IF (allocated(iddu2d)) deallocate ( iddu2d )
1095 IF (allocated(iddv2d)) deallocate ( iddv2d )
1096 IF (allocated(iddu3d)) deallocate ( iddu3d )
1097 IF (allocated(iddv3d)) deallocate ( iddv3d )
1098#endif
1099!
1100 IF (allocated(istsur)) deallocate ( istsur )
1101 IF (allocated(istvar)) deallocate ( istvar )
1102 IF (allocated(idbvar)) deallocate ( idbvar )
1103 IF (allocated(idsvar)) deallocate ( idsvar )
1104 IF (allocated(idsbry)) deallocate ( idsbry )
1105!
1106 IF (allocated(bryncid)) deallocate ( bryncid )
1107 IF (allocated(clmncid)) deallocate ( clmncid )
1108 IF (allocated(frcncid)) deallocate ( frcncid )
1109
1110#if defined PIO_LIB && defined DISTRIBUTE
1111!
1112 IF (associated(brypiofile)) deallocate ( brypiofile )
1113 IF (associated(clmpiofile)) deallocate ( clmpiofile )
1114 IF (associated(frcpiofile)) deallocate ( frcpiofile )
1115#endif
1116!
1117 IF (allocated(idefadj)) deallocate ( idefadj )
1118 IF (allocated(idefavg)) deallocate ( idefavg )
1119 IF (allocated(idefdia)) deallocate ( idefdia )
1120 IF (allocated(idefhis)) deallocate ( idefhis )
1121 IF (allocated(idefqck)) deallocate ( idefqck )
1122 IF (allocated(ideftlm)) deallocate ( ideftlm )
1123 IF (allocated(idefxtr)) deallocate ( idefxtr )
1124!
1125 IF (allocated(idtvar)) deallocate ( idtvar )
1126 IF (allocated(idtrcd)) deallocate ( idtrcd )
1127 IF (allocated(idtrch)) deallocate ( idtrch )
1128!
1129 IF (allocated(linfo)) deallocate ( linfo )
1130 IF (allocated(iinfo)) deallocate ( iinfo )
1131 IF (allocated(finfo)) deallocate ( finfo )
1132 IF (allocated(fpoint)) deallocate ( fpoint )
1133 IF (allocated(fscale)) deallocate ( fscale )
1134 IF (allocated(tintrp)) deallocate ( tintrp )
1135 IF (allocated(vtime)) deallocate ( vtime )
1136 IF (allocated(cinfo)) deallocate ( cinfo )
1137
1138#if defined PIO_LIB && defined DISTRIBUTE
1139 IF (associated(dinfo)) deallocate ( dinfo )
1140#endif
1141!
1142 RETURN

References aout, bryncid, brypiofile, cinfo, clmncid, clmpiofile, dinfo, dout, finfo, fpoint, frcncid, frcpiofile, fscale, hout, idbvar, iddtrc, iddu2d, iddu3d, iddv2d, iddv3d, idefadj, idefavg, idefdia, idefhis, idefqck, ideftlm, idefxtr, idrtrc, idsbry, idsurt, idsvar, idtads, idtbot, idtbry, idtclm, idtnud, idtrcd, idtrch, idtsur, idttav, idttlf, idtvar, idutav, idvtav, ihutav, ihvtav, iinfo, istsur, istvar, linfo, nwaterr, nwateru, nwaterv, nxyp, nxyr, nxyu, nxyv, qout, rilb, riub, rjlb, rjub, rxmax, rxmin, rymax, rymin, sout, tintrp, uilb, uiub, ujlb, ujub, uxmax, uxmin, uymax, uymin, vilb, viub, vjlb, vjub, vtime, vxmax, vxmin, vymax, and vymin.

◆ initialize_ncparam()

subroutine, public mod_ncparam::initialize_ncparam

Definition at line 1145 of file mod_ncparam.F.

1146!
1147!=======================================================================
1148! !
1149! This routine initializes all variables in module "mod_ncparam" for !
1150! all nested grids. !
1151! !
1152!=======================================================================
1153!
1154 USE mod_parallel
1155#ifdef BIOLOGY
1156 USE mod_biology
1157#endif
1158#ifdef SEAICE
1159 USE mod_ice
1160#endif
1161 USE mod_iounits
1162 USE mod_scalars
1163#if defined SEDIMENT || defined BBL_MODEL
1164 USE mod_sediment
1165#endif
1166!
1167 USE get_metadata_mod, ONLY : io_metadata
1169!
1170! Local variable declarations.
1171!
1172 logical :: FirstPass, Ldone, load
1173!
1174#ifdef DISTRIBUTE
1175 integer :: Itile, Jtile
1176#endif
1177 integer :: Lvar, Ntiles, i, ic, ic_brylast, j, ng
1178 integer :: gtype, tile, varid
1179!
1180 real(dp), parameter :: spv = 0.0_dp
1181 real(dp) :: add_offset, scale
1182!
1183 character (len=MaxLen) :: string
1184 character (len=MaxLen), dimension(8) :: Vinfo
1185
1186 character (len=*), parameter :: MyFile = &
1187 & __FILE__//"initialize_ncparam"
1188!
1189!-----------------------------------------------------------------------
1190! Initialize several variables.
1191!-----------------------------------------------------------------------
1192!
1193! Initialize DOMAIN structure.
1194!
1195 DO ng=1,ngrids
1196 domain(ng) % Eastern_Edge = .false.
1197 domain(ng) % Western_Edge = .false.
1198 domain(ng) % Northern_Edge = .false.
1199 domain(ng) % Southern_Edge = .false.
1200
1201 domain(ng) % NorthEast_Corner = .false.
1202 domain(ng) % NorthWest_Corner = .false.
1203 domain(ng) % SouthEast_Corner = .false.
1204 domain(ng) % SouthWest_Corner = .false.
1205
1206 domain(ng) % NorthEast_Test = .false.
1207 domain(ng) % NorthWest_Test = .false.
1208 domain(ng) % SouthEast_Test = .false.
1209 domain(ng) % SouthWest_Test = .false.
1210
1211 domain(ng) % Xmin_psi = spv
1212 domain(ng) % Xmax_psi = spv
1213 domain(ng) % Ymin_psi = spv
1214 domain(ng) % Ymax_psi = spv
1215
1216 domain(ng) % Xmin_rho = spv
1217 domain(ng) % Xmax_rho = spv
1218 domain(ng) % Ymin_rho = spv
1219 domain(ng) % Ymax_rho = spv
1220
1221 domain(ng) % Xmin_u = spv
1222 domain(ng) % Xmax_u = spv
1223 domain(ng) % Ymin_u = spv
1224 domain(ng) % Ymax_u = spv
1225
1226 domain(ng) % Xmin_v = spv
1227 domain(ng) % Xmax_v = spv
1228 domain(ng) % Ymin_v = spv
1229 domain(ng) % Ymax_v = spv
1230 END DO
1231!
1232! Initialize NetCDF files creation flags.
1233!
1234 DO ng=1,ngrids
1235 idefadj(ng)=-1
1236 idefavg(ng)=-1
1237 idefdia(ng)=-1
1238 idefhis(ng)=-1
1239 idefqck(ng)=-1
1240 ideftlm(ng)=-1
1241 idefxtr(ng)=-1
1242 END DO
1243!
1244! Analytical files switch and names.
1245!
1246 lanafile=.true.
1247 DO i=1,SIZE(ananame)
1248 DO j=1,len(ananame(1))
1249 ananame(i)(j:j)=' '
1250 END DO
1251 END DO
1252
1253#ifdef BIOLOGY
1254!
1255! Biology model header names.
1256!
1257 DO i=1,4
1258 lbiofile(i)=.true.
1259 DO j=1,len(bioname(1))
1260 bioname(i)(j:j)=' '
1261 END DO
1262 END DO
1263#endif
1264!
1265! Set indices for state some state variables.
1266!
1267 ic=5
1268#ifdef SOLVE3D
1269 DO i=1,mt
1270 ic=ic+1
1271 istvar(i)=ic
1272 END DO
1273#endif
1274#if defined ADJUST_WSTRESS || defined FORCING_SV || \
1275 defined hessian_fsv || defined so_semi || \
1276 defined stochastic_opt
1277 ic=ic+1
1278 isustr=ic
1279 ic=ic+1
1280 isvstr=ic
1281#endif
1282#ifdef SOLVE3D
1283# if defined ADJUST_STFLUX || defined FORCING_SV || \
1284 defined hessian_fsv || defined so_semi || \
1285 defined stochastic_opt
1286 DO i=1,mt
1287 ic=ic+1
1288 istsur(i)=ic
1289 END DO
1290# endif
1291#endif
1292#ifdef WEC
1293 ic=ic+1
1294 isu2sd=ic
1295 ic=ic+1
1296 isv2sd=ic
1297# if defined SOLVE3D
1298 ic=ic+1
1299 isu3sd=ic
1300 ic=ic+1
1301 isv3sd=ic
1302# endif
1303#endif
1304#ifdef SOLVE3D
1305# if defined GLS_MIXING || defined MY25_MIXING
1306 ic=ic+1
1307 ismtke=ic
1308# endif
1309#endif
1310 ic_brylast=ic
1311#ifdef SOLVE3D
1312 ic=ic+1
1313 iswvel=ic ! no LBC index
1314#endif
1315!
1316! Set generic lateral boundary indices for LBC structure. Use the same
1317! values of the state variables at the same C-grid location. Generic
1318! indices are used for testing periodicity. The PSI-variables and
1319! W-variables are assigned the same value as the RHO-variables.
1320!
1321 isbp2d=isfsur ! 2D PSI-variables
1322 isbr2d=isfsur ! 2D RHO-variables
1323 isbu2d=isubar ! 2D U-variables
1324 isbv2d=isvbar ! 2D V-variables
1325#if defined SOLVE3D
1326 isbp3d=istvar(1) ! 3D PSI-variables
1327 isbr3d=istvar(1) ! 3D RHO-variables
1328 isbu3d=isuvel ! 3D U-variables
1329 isbv3d=isvvel ! 3D V-variables
1330 isbw3d=istvar(1) ! 3D W-variables
1331#endif
1332!
1333! Initialize IO information variables.
1334!
1335 DO ng=1,ngrids
1336 DO i=1,nv
1337 linfo(1,i,ng)=.false.
1338 linfo(2,i,ng)=.false.
1339 linfo(3,i,ng)=.false.
1340 linfo(4,i,ng)=.false.
1341 linfo(5,i,ng)=.false.
1342 linfo(6,i,ng)=.false.
1343 aout(i,ng)=.false.
1344 dout(i,ng)=.false.
1345 hout(i,ng)=.false.
1346 qout(i,ng)=.false.
1347 sout(i,ng)=.false.
1348 iinfo(1,i,ng)=0
1349 iinfo(2,i,ng)=-1
1350 iinfo(3,i,ng)=-1
1351 iinfo(4,i,ng)=0
1352 iinfo(5,i,ng)=0
1353 iinfo(6,i,ng)=0
1354 iinfo(7,i,ng)=0
1355 iinfo(8,i,ng)=2
1356 iinfo(9,i,ng)=0
1357 iinfo(10,i,ng)=0
1358 iinfo(11,i,ng)=0
1359 finfo(1,i,ng)=0.0_r8
1360 finfo(2,i,ng)=0.0_r8
1361 finfo(3,i,ng)=0.0_r8
1362 finfo(5,i,ng)=0.0_r8
1363 finfo(6,i,ng)=0.0_r8
1364 finfo(7,i,ng)=0.0_r8
1365 finfo(10,i,ng)=1.0_r8
1366#if defined PIO_LIB && defined DISTRIBUTE
1367 dinfo(1,i,ng)%vd%varID=-1
1368 dinfo(1,i,ng)%dkind=-1
1369 dinfo(1,i,ng)%gtype=0
1370 dinfo(2,i,ng)%vd%varID=-1
1371 dinfo(2,i,ng)%dkind=-1
1372 dinfo(2,i,ng)%gtype=0
1373#endif
1374 fscale(i,ng)=1.0_r8
1375 fpoint(1,i,ng)=0.0_r8
1376 fpoint(2,i,ng)=0.0_r8
1377 tintrp(1,i,ng)=0.0_dp
1378 tintrp(2,i,ng)=0.0_dp
1379 vtime(1,i,ng)=0.0_dp
1380 vtime(2,i,ng)=0.0_dp
1381 bryncid(i,ng)=-1
1382 clmncid(i,ng)=-1
1383 frcncid(i,ng)=-1
1384#if defined PIO_LIB && defined DISTRIBUTE
1385 brypiofile(i,ng)%fh=-1
1386 clmpiofile(i,ng)%fh=-1
1387 frcpiofile(i,ng)%fh=-1
1388#endif
1389 END DO
1390 END DO
1391!
1392! Set GIT and SVN Repository Root URL and revision. Their values are
1393! assigned in the 'makefile' to the CPPFLAGS macro.
1394!
1395#ifdef GIT_URL
1396 git_url=git_url
1397#else
1398 git_url='https://github.com/myroms/roms'
1399#endif
1400#ifdef GIT_REV
1401 git_rev=git_rev
1402#else
1403 git_rev=' '
1404#endif
1405!
1406#ifdef SVN_URL
1407 svn_url=svn_url
1408#else
1409 svn_url='https://myroms.org/svn/trunk'
1410#endif
1411#ifdef SVN_REV
1412 svn_rev=svn_rev
1413#else
1414 svn_rev=' '
1415#endif
1416!
1417!-----------------------------------------------------------------------
1418! Process ROMS Input/Output metadata file and define variables
1419! information arrays.
1420!-----------------------------------------------------------------------
1421!
1422 varid=0
1423 ldone=.false.
1424 firstpass=.true. ! initialize metadata processing
1425!
1426 metadata_loop : DO WHILE (.not.ldone)
1427!
1428! Load I/O metadata information.
1429!
1430 ldone = io_metadata(firstpass, vinfo, scale, add_offset)
1431 IF (founderror(exit_flag, noerror, __line__, myfile)) RETURN
1432 IF (ldone) EXIT
1433!
1434! Determine staggered C-grid variable.
1435!
1436 SELECT CASE (trim(adjustl(vinfo(7))))
1437 CASE ('p2dvar')
1438 gtype=p2dvar
1439 CASE ('r2dvar')
1440 gtype=r2dvar
1441 CASE ('u2dvar')
1442 gtype=u2dvar
1443 CASE ('v2dvar')
1444 gtype=v2dvar
1445 CASE ('p3dvar')
1446 gtype=p3dvar
1447 CASE ('r3dvar')
1448 gtype=r3dvar
1449 CASE ('u3dvar')
1450 gtype=u3dvar
1451 CASE ('v3dvar')
1452 gtype=v3dvar
1453 CASE ('w3dvar')
1454 gtype=w3dvar
1455 CASE ('b3dvar')
1456 gtype=b3dvar
1457#if defined ECOSIM && defined DIAGNOSTICS_BIO
1458 CASE ('l3dvar')
1459 gtype=l3dvar
1460 CASE ('l4dvar')
1461 gtype=l4dvar
1462#endif
1463#ifdef SPECTRAL_LIGHT
1464 CASE ('s3dvar')
1465 gtype=s3dvar
1466#endif
1467 CASE DEFAULT
1468 gtype=0
1469 END SELECT
1470!
1471! Assign identification indices.
1472!
1473 load=.true.
1474 varid=varid+1
1475 SELECT CASE (trim(adjustl(vinfo(8))))
1476 CASE ('idangR')
1477 idangr=varid
1478 CASE ('idbath')
1479 idbath=varid
1480 CASE ('idfcor')
1481 idfcor=varid
1482 CASE ('idtopo')
1483 idtopo=varid
1484 CASE ('idpmdx')
1485 idpmdx=varid
1486 CASE ('idpndy')
1487 idpndy=varid
1488 CASE ('idLonP')
1489 idlonp=varid
1490 CASE ('idLatP')
1491 idlatp=varid
1492 CASE ('idLonR')
1493 idlonr=varid
1494 CASE ('idLatR')
1495 idlatr=varid
1496 CASE ('idLonU')
1497 idlonu=varid
1498 CASE ('idLatU')
1499 idlatu=varid
1500 CASE ('idLonV')
1501 idlonv=varid
1502 CASE ('idLatV')
1503 idlatv=varid
1504 CASE ('idmskP')
1505 idmskp=varid
1506 CASE ('idmskR')
1507 idmskr=varid
1508 CASE ('idmskU')
1509 idmsku=varid
1510 CASE ('idmskV')
1511 idmskv=varid
1512 CASE ('idscoR')
1513 idscor=varid
1514 CASE ('idscoU')
1515 idscou=varid
1516 CASE ('idscoV')
1517 idscov=varid
1518 CASE ('idXgrP')
1519 idxgrp=varid
1520 CASE ('idYgrP')
1521 idygrp=varid
1522 CASE ('idXgrR')
1523 idxgrr=varid
1524 CASE ('idYgrR')
1525 idygrr=varid
1526 CASE ('idXgrU')
1527 idxgru=varid
1528 CASE ('idYgrU')
1529 idygru=varid
1530 CASE ('idXgrV')
1531 idxgrv=varid
1532 CASE ('idYgrV')
1533 idygrv=varid
1534 CASE ('idpthR')
1535 idpthr=varid
1536 CASE ('idpthU')
1537 idpthu=varid
1538 CASE ('idpthV')
1539 idpthv=varid
1540 CASE ('idpthW')
1541 idpthw=varid
1542 CASE ('idtime')
1543 idtime=varid
1544 CASE ('idFsur')
1545 idfsur=varid
1546 CASE ('idRzet')
1547 idrzet=varid
1548 CASE ('idUbar')
1549 idubar=varid
1550 CASE ('idu2dE')
1551 idu2de=varid
1552 CASE ('idRu2d')
1553 idru2d=varid
1554 CASE ('idVbar')
1555 idvbar=varid
1556 CASE ('idv2dN')
1557 idv2dn=varid
1558 CASE ('idRv2d')
1559 idrv2d=varid
1560 CASE ('idUsur')
1561 idusur=varid
1562 CASE ('idUsuE')
1563 idusue=varid
1564 CASE ('idUvel')
1565 iduvel=varid
1566 CASE ('idu3dE')
1567 idu3de=varid
1568 CASE ('idRu3d')
1569 idru3d=varid
1570 CASE ('idVsur')
1571 idvsur=varid
1572 CASE ('idVsuN')
1573 idvsun=varid
1574 CASE ('idVvel')
1575 idvvel=varid
1576 CASE ('idv3dN')
1577 idv3dn=varid
1578 CASE ('idRv3d')
1579 idrv3d=varid
1580 CASE ('idWvel')
1581 idwvel=varid
1582 CASE ('idOvil')
1583 idovil=varid
1584 CASE ('idOvel')
1585 idovel=varid
1586 CASE ('idDano')
1587 iddano=varid
1588 CASE ('idsurT(itemp)')
1589 idsurt(itemp)=varid
1590#ifdef SALINITY
1591 CASE ('idsurT(isalt)')
1592 idsurt(isalt)=varid
1593#endif
1594 CASE ('idTvar(itemp)')
1595 idtvar(itemp)=varid
1596#ifdef SALINITY
1597 CASE ('idTvar(isalt)')
1598 idtvar(isalt)=varid
1599#endif
1600 CASE ('idUsms')
1601 idusms=varid
1602 CASE ('idVsms')
1603 idvsms=varid
1604 CASE ('idUbms')
1605 idubms=varid
1606 CASE ('idVbms')
1607 idvbms=varid
1608 CASE ('idUbws')
1609 idubws=varid
1610 CASE ('idUbcs')
1611 idubcs=varid
1612 CASE ('idVbws')
1613 idvbws=varid
1614 CASE ('idVbcs')
1615 idvbcs=varid
1616 CASE ('idUVwc')
1617 iduvwc=varid
1618 CASE ('idTsur(itemp)')
1619 idtsur(itemp)=varid
1620 CASE ('iddQdT')
1621 iddqdt=varid
1622 CASE ('idsfwf')
1623 idsfwf=varid
1624#ifdef SALINITY
1625 CASE ('idTsur(isalt)')
1626 idtsur(isalt)=varid
1627#endif
1628 CASE ('idTbot(itemp)')
1629 idtbot(itemp)=varid
1630#ifdef SALINITY
1631 CASE ('idTbot(isalt)')
1632 idtbot(isalt)=varid
1633#endif
1634 CASE ('idGhat(itemp)')
1635 idghat(itemp)=varid
1636#ifdef SALINITY
1637 CASE ('idGhat(isalt)')
1638 idghat(isalt)=varid
1639#endif
1640 CASE ('idMtke')
1641 idmtke=varid
1642 CASE ('idMtls')
1643 idmtls=varid
1644 CASE ('idVvis')
1645 idvvis=varid
1646 CASE ('idTdif')
1647 idtdif=varid
1648 iddiff(itemp)=idtdif
1649#ifdef SALINITY
1650 CASE ('idSdif')
1651 idsdif=varid
1652 iddiff(isalt)=idsdif
1653#endif
1654 CASE ('idVmLS')
1655 idvmls=varid
1656 CASE ('idVmKK')
1657 idvmkk=varid
1658 CASE ('idVmKP')
1659 idvmkp=varid
1660 CASE ('idZbry(iwest)')
1661 idzbry(iwest)=varid
1662 CASE ('idZbry(ieast)')
1663 idzbry(ieast)=varid
1664 CASE ('idZbry(isouth)')
1665 idzbry(isouth)=varid
1666 CASE ('idZbry(inorth)')
1667 idzbry(inorth)=varid
1668 CASE ('idU2bc(iwest)')
1669 idu2bc(iwest)=varid
1670 CASE ('idU2bc(ieast)')
1671 idu2bc(ieast)=varid
1672 CASE ('idU2bc(isouth)')
1673 idu2bc(isouth)=varid
1674 CASE ('idU2bc(inorth)')
1675 idu2bc(inorth)=varid
1676 CASE ('idV2bc(iwest)')
1677 idv2bc(iwest)=varid
1678 CASE ('idV2bc(ieast)')
1679 idv2bc(ieast)=varid
1680 CASE ('idV2bc(isouth)')
1681 idv2bc(isouth)=varid
1682 CASE ('idV2bc(inorth)')
1683 idv2bc(inorth)=varid
1684 CASE ('idU3bc(iwest)')
1685 idu3bc(iwest)=varid
1686 CASE ('idU3bc(ieast)')
1687 idu3bc(ieast)=varid
1688 CASE ('idU3bc(isouth)')
1689 idu3bc(isouth)=varid
1690 CASE ('idU3bc(inorth)')
1691 idu3bc(inorth)=varid
1692 CASE ('idV3bc(iwest)')
1693 idv3bc(iwest)=varid
1694 CASE ('idV3bc(ieast)')
1695 idv3bc(ieast)=varid
1696 CASE ('idV3bc(isouth)')
1697 idv3bc(isouth)=varid
1698 CASE ('idV3bc(inorth)')
1699 idv3bc(inorth)=varid
1700 CASE ('idTbry(iwest,itemp)')
1701 idtbry(iwest,itemp)=varid
1702 CASE ('idTbry(ieast,itemp)')
1703 idtbry(ieast,itemp)=varid
1704 CASE ('idTbry(isouth,itemp)')
1705 idtbry(isouth,itemp)=varid
1706 CASE ('idTbry(inorth,itemp)')
1707 idtbry(inorth,itemp)=varid
1708#ifdef SALINITY
1709 CASE ('idTbry(iwest,isalt)')
1710 idtbry(iwest,isalt)=varid
1711 CASE ('idTbry(ieast,isalt)')
1712 idtbry(ieast,isalt)=varid
1713 CASE ('idTbry(isouth,isalt)')
1714 idtbry(isouth,isalt)=varid
1715 CASE ('idTbry(inorth,isalt)')
1716 idtbry(inorth,isalt)=varid
1717#endif
1718 CASE ('idPwet')
1719 idpwet=varid
1720 CASE ('idRwet')
1721 idrwet=varid
1722 CASE ('idUwet')
1723 iduwet=varid
1724 CASE ('idVwet')
1725 idvwet=varid
1726 CASE ('idPair')
1727 idpair=varid
1728 CASE ('idTair')
1729 idtair=varid
1730 CASE ('idQair')
1731 idqair=varid
1732 CASE ('idCfra')
1733 idcfra=varid
1734 CASE ('idSrad')
1735 idsrad=varid
1736 CASE ('idLdwn')
1737 idldwn=varid
1738 CASE ('idLrad')
1739 idlrad=varid
1740 CASE ('idLhea')
1741 idlhea=varid
1742 CASE ('idShea')
1743 idshea=varid
1744 CASE ('idrain')
1745 idrain=varid
1746 CASE ('idEmPf')
1747 idempf=varid
1748 CASE ('idevap')
1749 idevap=varid
1750 CASE ('idUair')
1751 iduair=varid
1752 CASE ('idVair')
1753 idvair=varid
1754 CASE ('idUaiE')
1755 iduaie=varid
1756 CASE ('idVaiN')
1757 idvain=varid
1758 CASE ('idWvds')
1759 idwvds=varid
1760 CASE ('idWvqp')
1761 idwvqp=varid
1762 CASE ('idUwav')
1763 iduwav=varid
1764 CASE ('idVwav')
1765 idvwav=varid
1766 CASE ('idWamp')
1767 idwamp=varid
1768 CASE ('idWam2')
1769 idwam2=varid
1770 CASE ('idWbrk')
1771 idwbrk=varid
1772 CASE ('idWdib')
1773 idwdib=varid
1774 CASE ('idWdif')
1775 idwdif=varid
1776 CASE ('idWdis')
1777 idwdis=varid
1778 CASE ('idWdir')
1779 idwdir=varid
1780 CASE ('idWdip')
1781 idwdip=varid
1782 CASE ('idWdiw')
1783 idwdiw=varid
1784 CASE ('idWztw')
1785 idwztw=varid
1786 CASE ('idWqsp')
1787 idwqsp=varid
1788 CASE ('idWbeh')
1789 idwbeh=varid
1790 CASE ('idWlen')
1791 idwlen=varid
1792 CASE ('idWlep')
1793 idwlep=varid
1794 CASE ('idWptp')
1795 idwptp=varid
1796 CASE ('idWpbt')
1797 idwpbt=varid
1798 CASE ('idWorb')
1799 idworb=varid
1800 CASE ('idWrol')
1801 idwrol=varid
1802 CASE ('idW2xx')
1803 idw2xx=varid
1804 CASE ('idW2xy')
1805 idw2xy=varid
1806 CASE ('idW2yy')
1807 idw2yy=varid
1808 CASE ('idW3xx')
1809 idw3xx=varid
1810 CASE ('idW3xy')
1811 idw3xy=varid
1812 CASE ('idW3yy')
1813 idw3yy=varid
1814 CASE ('idW3zx')
1815 idw3zx=varid
1816 CASE ('idW3zy')
1817 idw3zy=varid
1818 CASE ('idU2rs')
1819 idu2rs=varid
1820 CASE ('idV2rs')
1821 idv2rs=varid
1822 CASE ('idU2Sd')
1823 idu2sd=varid
1824 CASE ('idV2Sd')
1825 idv2sd=varid
1826 CASE ('idU3rs')
1827 idu3rs=varid
1828 CASE ('idV3rs')
1829 idv3rs=varid
1830 CASE ('idU3Sd')
1831 idu3sd=varid
1832 CASE ('idV3Sd')
1833 idv3sd=varid
1834 CASE ('idW3Sd')
1835 idw3sd=varid
1836 CASE ('idW3St')
1837 idw3st=varid
1838 CASE ('idTref')
1839 idtref=varid
1840 CASE ('idTper')
1841 idtper=varid
1842 CASE ('idTzam')
1843 idtzam=varid
1844 CASE ('idTzph')
1845 idtzph=varid
1846 CASE ('idTvph')
1847 idtvph=varid
1848 CASE ('idTvan')
1849 idtvan=varid
1850 CASE ('idTvma')
1851 idtvma=varid
1852 CASE ('idTvmi')
1853 idtvmi=varid
1854 CASE ('idRxpo')
1855 idrxpo=varid
1856 CASE ('idRepo')
1857 idrepo=varid
1858 CASE ('idRdir')
1859 idrdir=varid
1860 CASE ('idRvsh')
1861 idrvsh=varid
1862 CASE ('idRtra')
1863 idrtra=varid
1864 CASE ('idRflg')
1865 idrflg=varid
1866 CASE ('idRtrc(itemp)')
1867 idrtrc(itemp)=varid
1868#ifdef SALINITY
1869 CASE ('idRtrc(isalt)')
1870 idrtrc(isalt)=varid
1871#endif
1872 CASE ('idHsbl')
1873 idhsbl=varid
1874 CASE ('idHbbl')
1875 idhbbl=varid
1876 CASE ('idHzdz')
1877 idhzdz=varid
1878#ifdef UV_DRAG_GRID
1879 CASE ('idragL')
1880 idragl=varid
1881 CASE ('idragQ')
1882 idragq=varid
1883 CASE ('idZoBL')
1884 idzobl=varid
1885#endif
1886 CASE ('idUbot')
1887 idubot=varid
1888 CASE ('idVbot')
1889 idvbot=varid
1890 CASE ('idUbur')
1891 idubur=varid
1892 CASE ('idVbvr')
1893 idvbvr=varid
1894 CASE ('idUbrs')
1895 idubrs=varid
1896 CASE ('idVbrs')
1897 idvbrs=varid
1898 CASE ('idSSHc')
1899 idsshc=varid
1900 CASE ('idUbcl')
1901 idubcl=varid
1902 CASE ('idVbcl')
1903 idvbcl=varid
1904 CASE ('idUclm')
1905 iduclm=varid
1906 CASE ('idVclm')
1907 idvclm=varid
1908 CASE ('idSSSc')
1909 idsssc=varid
1910 CASE ('idSSTc')
1911 idsstc=varid
1912#if defined AD_SENSITIVITY || defined I4DVAR_ANA_SENSITIVITY || \
1913 defined opt_observations || defined sensitivity_4dvar || \
1914 defined so_semi
1915 CASE ('idZads')
1916 idzads=varid
1917 CASE ('idUbas')
1918 idubas=varid
1919 CASE ('idVbas')
1920 idvbas=varid
1921 CASE ('idUads')
1922 iduads=varid
1923 CASE ('idVads')
1924 idvads=varid
1925 CASE ('idTads(itemp)')
1926 idtads(itemp)=varid
1927# ifdef T_PASSIVE
1928 CASE ('idTads(inert(i))')
1929 load=.true.
1930# endif
1931# ifdef SALINITY
1932 CASE ('idTads(isalt)')
1933 idtads(isalt)=varid
1934# endif
1935 CASE ('idWads')
1936 idwads=varid
1937#endif
1938#ifdef WEAK_CONSTRAINT
1939 CASE ('idZtlf')
1940 idztlf=varid
1941 CASE ('idUbtf')
1942 idubtf=varid
1943 CASE ('idVbtf')
1944 idvbtf=varid
1945 CASE ('idUtlf')
1946 idutlf=varid
1947 CASE ('idVtlf')
1948 idvtlf=varid
1949 CASE ('idTtlf(itemp)')
1950 idttlf(itemp)=varid
1951# ifdef SALINITY
1952 CASE ('idTtlf(isalt)')
1953 idttlf(isalt)=varid
1954# endif
1955#endif
1956 CASE ('idM2nc')
1957 idm2nc=varid
1958 CASE ('idM3nc')
1959 idm3nc=varid
1960 CASE ('idgTnc')
1961 idgtnc=varid
1962#ifdef AVERAGES_DETIDE
1963 CASE ('idCosW')
1964 idcosw=varid
1965 CASE ('idCos2')
1966 idcos2=varid
1967 CASE ('idSinW')
1968 idsinw=varid
1969 CASE ('idSin2')
1970 idsin2=varid
1971 CASE ('idSWCW')
1972 idswcw=varid
1973 CASE ('idFsuD')
1974 idfsud=varid
1975 CASE ('idFsuH')
1976 idfsuh=varid
1977 CASE ('idu2dD')
1978 idu2dd=varid
1979 CASE ('idu2dH')
1980 idu2dh=varid
1981 CASE ('idv2dD')
1982 idv2dd=varid
1983 CASE ('idv2dH')
1984 idv2dh=varid
1985# ifdef SOLVE3D
1986 CASE ('idu3dD')
1987 idu3dd=varid
1988 CASE ('idu3dH')
1989 idu3dh=varid
1990 CASE ('idv3dD')
1991 idv3dd=varid
1992 CASE ('idv3dH')
1993 idv3dh=varid
1994 CASE ('idTrcD(itemp)')
1995 idtrcd(itemp)=varid
1996 CASE ('idTrcH(itemp)')
1997 idtrch(itemp)=varid
1998# ifdef SALINITY
1999 CASE ('idTrcD(isalt)')
2000 idtrcd(isalt)=varid
2001 CASE ('idTrcH(isalt)')
2002 idtrch(isalt)=varid
2003# endif
2004# endif
2005#endif
2006 CASE ('idU2av')
2007 idu2av=varid
2008 CASE ('idV2av')
2009 idv2av=varid
2010 CASE ('idZZav')
2011 idzzav=varid
2012#ifdef SOLVE3D
2013 CASE ('idTTav(itrc)')
2014 load=.true.
2015 CASE ('iHUTav(itrc)')
2016 load=.true.
2017 CASE ('iHVTav(itrc)')
2018 load=.true.
2019 CASE ('idUTav(itrc)')
2020 load=.true.
2021 CASE ('idVTav(itrc)')
2022 load=.true.
2023 CASE ('idHUav')
2024 idhuav=varid
2025 CASE ('idHVav')
2026 idhvav=varid
2027 CASE ('idUUav')
2028 iduuav=varid
2029 CASE ('idUVav')
2030 iduvav=varid
2031 CASE ('idVVav')
2032 idvvav=varid
2033#endif
2034#ifdef T_PASSIVE
2035 CASE ('idTvar(inert(i))')
2036 load=.true.
2037 CASE ('idTbry(iwest,inert(i))')
2038 load=.true.
2039 CASE ('idTbry(ieast,inert(i))')
2040 load=.true.
2041 CASE ('idTbry(isouth,inert(i))')
2042 load=.true.
2043 CASE ('idTbry(inorth,inert(i))')
2044 load=.true.
2045 CASE ('idRtrc(inert(i))')
2046 load=.true.
2047#endif
2048 CASE ('id2dPV')
2049 id2dpv=varid
2050 CASE ('id2dRV')
2051 id2drv=varid
2052 CASE ('id3dPV')
2053 id3dpv=varid
2054 CASE ('id3dRV')
2055 id3drv=varid
2056#ifdef DIAGNOSTICS_UV
2057 CASE ('idDu2d(M2pgrd)')
2058 iddu2d(m2pgrd)=varid
2059 CASE ('idDv2d(M2pgrd)')
2060 iddv2d(m2pgrd)=varid
2061 CASE ('idDu2d(M2sstr)')
2062 iddu2d(m2sstr)=varid
2063 CASE ('idDu2d(M2bstr)')
2064 iddu2d(m2bstr)=varid
2065 CASE ('idDv2d(M2sstr)')
2066 iddv2d(m2sstr)=varid
2067 CASE ('idDv2d(M2bstr)')
2068 iddv2d(m2bstr)=varid
2069 CASE ('idDu2d(M2rate)')
2070 iddu2d(m2rate)=varid
2071 CASE ('idDv2d(M2rate)')
2072 iddv2d(m2rate)=varid
2073# ifdef UV_ADV
2074 CASE ('idDu2d(M2xadv)')
2075 iddu2d(m2xadv)=varid
2076 CASE ('idDu2d(M2yadv)')
2077 iddu2d(m2yadv)=varid
2078 CASE ('idDu2d(M2hadv)')
2079 iddu2d(m2hadv)=varid
2080 CASE ('idDv2d(M2xadv)')
2081 iddv2d(m2xadv)=varid
2082 CASE ('idDv2d(M2yadv)')
2083 iddv2d(m2yadv)=varid
2084 CASE ('idDv2d(M2hadv)')
2085 iddv2d(m2hadv)=varid
2086# endif
2087# ifdef WEC_VF
2088 CASE ('idDu2d(M2hjvf)')
2089 iddu2d(m2hjvf)=varid
2090 CASE ('idDv2d(M2hjvf)')
2091 iddv2d(m2hjvf)=varid
2092 CASE ('idDu2d(M2kvrf)')
2093 iddu2d(m2kvrf)=varid
2094 CASE ('idDv2d(M2kvrf)')
2095 iddv2d(m2kvrf)=varid
2096# ifdef UV_COR
2097 CASE ('idDu2d(M2fsco)')
2098 iddu2d(m2fsco)=varid
2099 CASE ('idDv2d(M2fsco)')
2100 iddv2d(m2fsco)=varid
2101# endif
2102# ifdef BOTTOM_STREAMING
2103 CASE ('idDu2d(M2bstm)')
2104 iddu2d(m2bstm)=varid
2105 CASE ('idDv2d(M2bstm)')
2106 iddv2d(m2bstm)=varid
2107# endif
2108# ifdef SURFACE_STREAMING
2109 CASE ('idDu2d(M2sstm)')
2110 iddu2d(m2sstm)=varid
2111 CASE ('idDv2d(M2sstm)')
2112 iddv2d(m2sstm)=varid
2113# endif
2114 CASE ('idDu2d(M2wrol)')
2115 iddu2d(m2wrol)=varid
2116 CASE ('idDv2d(M2wrol)')
2117 iddv2d(m2wrol)=varid
2118 CASE ('idDu2d(M2wbrk)')
2119 iddu2d(m2wbrk)=varid
2120 CASE ('idDv2d(M2wbrk)')
2121 iddv2d(m2wbrk)=varid
2122 CASE ('idDu2d(M2zeta)')
2123 iddu2d(m2zeta)=varid
2124 CASE ('idDv2d(M2zeta)')
2125 iddv2d(m2zeta)=varid
2126 CASE ('idDu2d(M2zetw)')
2127 iddu2d(m2zetw)=varid
2128 CASE ('idDv2d(M2zetw)')
2129 iddv2d(m2zetw)=varid
2130 CASE ('idDu2d(M2zqsp)')
2131 iddu2d(m2zqsp)=varid
2132 CASE ('idDv2d(M2zqsp)')
2133 iddv2d(m2zqsp)=varid
2134 CASE ('idDu2d(M2zbeh)')
2135 iddu2d(m2zbeh)=varid
2136 CASE ('idDv2d(M2zbeh)')
2137 iddv2d(m2zbeh)=varid
2138# endif
2139# ifdef UV_COR
2140 CASE ('idDu2d(M2fcor)')
2141 iddu2d(m2fcor)=varid
2142 CASE ('idDv2d(M2fcor)')
2143 iddv2d(m2fcor)=varid
2144# endif
2145# if defined UV_VIS2 || defined UV_VIS4
2146 CASE ('idDu2d(M2hvis)')
2147 iddu2d(m2hvis)=varid
2148 CASE ('idDu2d(M2xvis)')
2149 iddu2d(m2xvis)=varid
2150 CASE ('idDu2d(M2yvis)')
2151 iddu2d(m2yvis)=varid
2152 CASE ('idDv2d(M2hvis)')
2153 iddv2d(m2hvis)=varid
2154 CASE ('idDv2d(M2xvis)')
2155 iddv2d(m2xvis)=varid
2156 CASE ('idDv2d(M2yvis)')
2157 iddv2d(m2yvis)=varid
2158# endif
2159# ifdef SOLVE3D
2160 CASE ('idDu3d(M3pgrd)')
2161 iddu3d(m3pgrd)=varid
2162 CASE ('idDv3d(M3pgrd)')
2163 iddv3d(m3pgrd)=varid
2164 CASE ('idDu3d(M3vvis)')
2165 iddu3d(m3vvis)=varid
2166 CASE ('idDv3d(M3vvis)')
2167 iddv3d(m3vvis)=varid
2168 CASE ('idDu3d(M3rate)')
2169 iddu3d(m3rate)=varid
2170 CASE ('idDv3d(M3rate)')
2171 iddv3d(m3rate)=varid
2172# ifdef UV_ADV
2173 CASE ('idDu3d(M3xadv)')
2174 iddu3d(m3xadv)=varid
2175 CASE ('idDu3d(M3yadv)')
2176 iddu3d(m3yadv)=varid
2177 CASE ('idDu3d(M3hadv)')
2178 iddu3d(m3hadv)=varid
2179 CASE ('idDv3d(M3xadv)')
2180 iddv3d(m3xadv)=varid
2181 CASE ('idDv3d(M3yadv)')
2182 iddv3d(m3yadv)=varid
2183 CASE ('idDv3d(M3hadv)')
2184 iddv3d(m3hadv)=varid
2185 CASE ('idDu3d(M3vadv)')
2186 iddu3d(m3vadv)=varid
2187 CASE ('idDv3d(M3vadv)')
2188 iddv3d(m3vadv)=varid
2189# endif
2190# ifdef WEC_VF
2191 CASE ('idDu3d(M3vjvf)')
2192 iddu3d(m3vjvf)=varid
2193 CASE ('idDv3d(M3vjvf)')
2194 iddv3d(m3vjvf)=varid
2195 CASE ('idDu3d(M3hjvf)')
2196 iddu3d(m3hjvf)=varid
2197 CASE ('idDv3d(M3hjvf)')
2198 iddv3d(m3hjvf)=varid
2199 CASE ('idDu3d(M3kvrf)')
2200 iddu3d(m3kvrf)=varid
2201 CASE ('idDv3d(M3kvrf)')
2202 iddv3d(m3kvrf)=varid
2203# ifdef UV_COR
2204 CASE ('idDu3d(M3fsco)')
2205 iddu3d(m3fsco)=varid
2206 CASE ('idDv3d(M3fsco)')
2207 iddv3d(m3fsco)=varid
2208# endif
2209# ifdef BOTTOM_STREAMING
2210 CASE ('idDu3d(M3bstm)')
2211 iddu3d(m3bstm)=varid
2212 CASE ('idDv3d(M3bstm)')
2213 iddv3d(m3bstm)=varid
2214# endif
2215# ifdef SURFACE_STREAMING
2216 CASE ('idDu3d(M3sstm)')
2217 iddu3d(m3sstm)=varid
2218 CASE ('idDv3d(M3sstm)')
2219 iddv3d(m3sstm)=varid
2220# endif
2221 CASE ('idDu3d(M3wrol)')
2222 iddu3d(m3wrol)=varid
2223 CASE ('idDv3d(M3wrol)')
2224 iddv3d(m3wrol)=varid
2225 CASE ('idDu3d(M3wbrk)')
2226 iddu3d(m3wbrk)=varid
2227 CASE ('idDv3d(M3wbrk)')
2228 iddv3d(m3wbrk)=varid
2229# endif
2230# ifdef UV_COR
2231 CASE ('idDu3d(M3fcor)')
2232 iddu3d(m3fcor)=varid
2233 CASE ('idDv3d(M3fcor)')
2234 iddv3d(m3fcor)=varid
2235# endif
2236# if defined UV_VIS2 || defined UV_VIS4
2237 CASE ('idDu3d(M3hvis)')
2238 iddu3d(m3hvis)=varid
2239 CASE ('idDu3d(M3xvis)')
2240 iddu3d(m3xvis)=varid
2241 CASE ('idDu3d(M3yvis)')
2242 iddu3d(m3yvis)=varid
2243 CASE ('idDv3d(M3hvis)')
2244 iddv3d(m3hvis)=varid
2245 CASE ('idDv3d(M3xvis)')
2246 iddv3d(m3xvis)=varid
2247 CASE ('idDv3d(M3yvis)')
2248 iddv3d(m3yvis)=varid
2249# endif
2250# endif
2251#endif
2252#ifdef DIAGNOSTICS_TS
2253 CASE ('idDtrc(iTrate)')
2254 load=.true.
2255 CASE ('idDtrc(iThadv)')
2256 load=.true.
2257 CASE ('idDtrc(iTxadv)')
2258 load=.true.
2259 CASE ('idDtrc(iTyadv)')
2260 load=.true.
2261 CASE ('idDtrc(iTvadv)')
2262 load=.true.
2263# if defined TS_DIF2 || defined TS_DIF4
2264 CASE ('idDtrc(iThdif)')
2265 load=.true.
2266 CASE ('idDtrc(iTxdif)')
2267 load=.true.
2268 CASE ('idDtrc(iTydif)')
2269 load=.true.
2270# if defined MIX_GEO_TS || defined MIX_ISO_TS
2271 CASE ('idDtrc(iTsdif)')
2272 load=.true.
2273# endif
2274# endif
2275 CASE ('idDtrc(iTvdif)')
2276 load=.true.
2277#endif
2278#if defined FORWARD_READ || defined FORWARD_WRITE
2279 CASE ('idRuct')
2280 idruct=varid
2281 CASE ('idRvct')
2282 idrvct=varid
2283 CASE ('idUfx1')
2284 idufx1=varid
2285 CASE ('idUfx2')
2286 idufx2=varid
2287 CASE ('idVfx1')
2288 idvfx1=varid
2289 CASE ('idVfx2')
2290 idvfx2=varid
2291#endif
2292#if defined FOUR_DVAR || defined VERIFICATION
2293 CASE ('idBgEr')
2294 idbger=varid
2295 CASE ('idBgTh')
2296 idbgth=varid
2297 CASE ('idIncr')
2298 idincr=varid
2299 CASE ('idInno')
2300 idinno=varid
2301 CASE ('idNLmf')
2302 idnlmf=varid
2303 CASE ('idNLmi')
2304 idnlmi=varid
2305 CASE ('idNLmo')
2306 idnlmo=varid
2307 CASE ('idNLmp')
2308 idnlmp=varid
2309 CASE ('idNLmu')
2310 idnlmu=varid
2311 CASE ('idNobs')
2312 idnobs=varid
2313 CASE ('idObsD')
2314 idobsd=varid
2315 CASE ('idObsS')
2316 idobss=varid
2317 CASE ('idObsT')
2318 idobst=varid
2319 CASE ('idObsX')
2320 idobsx=varid
2321 CASE ('idObsY')
2322 idobsy=varid
2323 CASE ('idObsZ')
2324 idobsz=varid
2325 CASE ('idOday')
2326 idoday=varid
2327 CASE ('idOerr')
2328 idoerr=varid
2329 CASE ('idOlat')
2330 idolat=varid
2331 CASE ('idOlon')
2332 idolon=varid
2333 CASE ('idOmet')
2334 idomet=varid
2335 CASE ('idOpro')
2336 idopro=varid
2337 CASE ('idOtyp')
2338 idotyp=varid
2339 CASE ('idOval')
2340 idoval=varid
2341 CASE ('idResi')
2342 idresi=varid
2343 CASE ('idKhor')
2344 idkhor=varid
2345 CASE ('idKver')
2346 idkver=varid
2347 CASE ('idTLmo')
2348 idtlmo=varid
2349 CASE ('idMOMi')
2350 idmomi=varid
2351 CASE ('idMOMf')
2352 idmomf=varid
2353#endif
2354
2355#ifdef SEAICE
2356# include <ice_var.h>
2357#endif
2358
2359#ifdef BIOLOGY
2360# if defined BIO_FENNEL
2361# include <fennel_var.h>
2362# elif defined ECOSIM
2363# include <ecosim_var.h>
2364# elif defined HYPOXIA_SRM
2365# include <hypoxia_srm_var.h>
2366# elif defined NEMURO
2367# include <nemuro_var.h>
2368# elif defined NPZD_FRANKS
2369# include <npzd_Franks_var.h>
2370# elif defined NPZD_POWELL
2371# include <npzd_Powell_var.h>
2372# elif defined NPZD_IRON
2373# include <npzd_iron_var.h>
2374# elif defined RED_TIDE
2375# include <red_tide_var.h>
2376# endif
2377#endif
2378
2379#if defined SEDIMENT || defined BBL_MODEL
2380# include <sediment_var.h>
2381#endif
2382
2383 CASE DEFAULT
2384 load=.false.
2385 END SELECT
2386!
2387! Load variable data into information arrays.
2388!
2389 IF (load) THEN
2390 load=.false.
2391 IF (varid.gt.mv) THEN
2392 WRITE (stdout,10) mv, varid
2393 stop
2394 END IF
2395 DO i=1,6
2396 vname(i,varid)=trim(adjustl(vinfo(i)))
2397 END DO
2398 DO ng=1,ngrids
2399 iinfo(1,varid,ng)=gtype
2400 fscale(varid,ng)=scale
2401 END DO
2402
2403#ifdef T_PASSIVE
2404!
2405! Adjust information for all inert passive tracers.
2406!
2407 SELECT CASE (trim(adjustl(vinfo(8))))
2408 CASE ('idTvar(inert(i))')
2409 IF (npt.gt.0) THEN
2410 varid=varid-1
2411# ifdef AGE_MEAN
2412 ic=0
2413 DO i=1,npt,2
2414 varid=varid+1
2415 ic=ic+1
2416 idtvar(inert(i))=varid
2417 DO ng=1,ngrids
2418 fscale(varid,ng)=scale
2419 iinfo(1,varid,ng)=gtype
2420 END DO
2421 WRITE (vname(1,varid),'(a,i2.2)') &
2422 & trim(adjustl(vinfo(1))), ic
2423 WRITE (vname(2,varid),'(a,a,i2.2)') &
2424 & trim(adjustl(vinfo(2))), ', type ', ic
2425 WRITE (vname(3,varid),'(a)') &
2426 & trim(adjustl(vinfo(3)))
2427 WRITE (vname(4,varid),'(a,i2.2)') &
2428 & trim(adjustl(vinfo(4))), ic
2429 WRITE (vname(5,varid),'(a)') &
2430 & trim(adjustl(vinfo(5)))
2431 WRITE (vname(6,varid),'(a,i2.2)') &
2432 & trim(adjustl(vinfo(6))), ic
2433 END DO
2434!
2435 ic=0
2436 DO i=2,npt,2
2437 varid=varid+1
2438 ic=ic+1
2439 idtvar(inert(i))=varid
2440 DO ng=1,ngrids
2441 fscale(varid,ng)=scale
2442 iinfo(1,varid,ng)=gtype
2443 END DO
2444 WRITE (vname(1,varid),'(a,i2.2,a)') &
2445 & trim(adjustl(vinfo(1))), ic, '_age'
2446 WRITE (vname(2,varid),'(a,i2.2)') &
2447 & 'age concentration, type ', ic
2448 WRITE (vname(3,varid),'(a)') &
2449 & 'second kilogram meter-3'
2450 WRITE (vname(4,varid),'(a,i2.2,a)') &
2451 & trim(adjustl(vinfo(4))), ic, '_age'
2452 WRITE (vname(5,varid),'(a)') &
2453 & trim(adjustl(vinfo(5)))
2454 WRITE (vname(6,varid),'(a,i2.2,a)') &
2455 & trim(adjustl(vinfo(6))), ic, '_age'
2456 END DO
2457# else
2458 DO i=1,npt
2459 varid=varid+1
2460 idtvar(inert(i))=varid
2461 DO ng=1,ngrids
2462 fscale(varid,ng)=scale
2463 iinfo(1,varid,ng)=gtype
2464 END DO
2465 WRITE (vname(1,varid),'(a,i2.2)') &
2466 & trim(adjustl(vinfo(1))), i
2467 WRITE (vname(2,varid),'(a,a,i2.2)') &
2468 & trim(adjustl(vinfo(2))), ', type ', i
2469 WRITE (vname(3,varid),'(a)') &
2470 & trim(adjustl(vinfo(3)))
2471 WRITE (vname(4,varid),'(a,i2.2)') &
2472 & trim(adjustl(vinfo(4))), i
2473 WRITE (vname(5,varid),'(a)') &
2474 & trim(adjustl(vinfo(5)))
2475 WRITE (vname(6,varid),'(a,i2.2)') &
2476 & trim(adjustl(vinfo(6))), i
2477 END DO
2478# endif
2479 END IF
2480
2481# if defined AD_SENSITIVITY || defined I4DVAR_ANA_SENSITIVITY || \
2482 defined opt_observations || defined sensitivity_4dvar || \
2483 defined so_semi
2484 CASE ('idTads(inert(i))')
2485 IF (npt.gt.0) THEN
2486 varid=varid-1
2487 DO i=1,npt
2488 varid=varid+1
2489 idtads(inert(i))=varid
2490 DO ng=1,ngrids
2491 fscale(varid,ng)=scale
2492 iinfo(1,varid,ng)=gtype
2493 END DO
2494 WRITE (vname(1,varid),'(a,i2.2)') &
2495 & trim(adjustl(vinfo(1))), i
2496 WRITE (vname(2,varid),'(a,a,i2.2)') &
2497 & trim(adjustl(vinfo(2))), ', type ', i
2498 WRITE (vname(3,varid),'(a)') &
2499 & trim(adjustl(vinfo(3)))
2500 WRITE (vname(4,varid),'(a,i2.2)') &
2501 & trim(adjustl(vinfo(4))), i
2502 WRITE (vname(5,varid),'(a)') &
2503 & trim(adjustl(vinfo(5)))
2504 WRITE (vname(6,varid),'(a,i2.2)') &
2505 & trim(adjustl(vinfo(6))), i
2506 END DO
2507 END IF
2508# endif
2509 CASE ('idTbry(iwest,inert(i))')
2510 IF (npt.gt.0) THEN
2511 varid=varid-1
2512 DO i=1,npt
2513 varid=varid+1
2514 idtbry(iwest,inert(i))=varid
2515 DO ng=1,ngrids
2516 fscale(varid,ng)=scale
2517 iinfo(1,varid,ng)=gtype
2518 END DO
2519 WRITE (vname(1,varid),'(a,i2.2)') &
2520 & trim(adjustl(vinfo(1))), i
2521 WRITE (vname(2,varid),'(a,a,i2.2)') &
2522 & trim(adjustl(vinfo(2))), ', type ', i
2523 WRITE (vname(3,varid),'(a)') &
2524 & trim(adjustl(vinfo(3)))
2525 WRITE (vname(4,varid),'(a,i2.2,a)') &
2526 & trim(adjustl(vinfo(1))), i, ' western_boundary'
2527 WRITE (vname(5,varid),'(a)') &
2528 & trim(adjustl(vinfo(5)))
2529 WRITE (vname(6,varid),'(a,i2.2)') &
2530 & trim(adjustl(vinfo(6))), i
2531 END DO
2532 END IF
2533 CASE ('idTbry(ieast,inert(i))')
2534 IF (npt.gt.0) THEN
2535 varid=varid-1
2536 DO i=1,npt
2537 varid=varid+1
2538 idtbry(ieast,inert(i))=varid
2539 DO ng=1,ngrids
2540 fscale(varid,ng)=scale
2541 iinfo(1,varid,ng)=gtype
2542 END DO
2543 WRITE (vname(1,varid),'(a,i2.2)') &
2544 & trim(adjustl(vinfo(1))), i
2545 WRITE (vname(2,varid),'(a,a,i2.2)') &
2546 & trim(adjustl(vinfo(2))), ', type ', i
2547 WRITE (vname(3,varid),'(a)') &
2548 & trim(adjustl(vinfo(3)))
2549 WRITE (vname(4,varid),'(a,i2.2,a)') &
2550 & trim(adjustl(vinfo(1))), i, ' eastern_boundary'
2551 WRITE (vname(5,varid),'(a)') &
2552 & trim(adjustl(vinfo(5)))
2553 WRITE (vname(6,varid),'(a,i2.2)') &
2554 & trim(adjustl(vinfo(6))), i
2555 END DO
2556 END IF
2557 CASE ('idTbry(isouth,inert(i))')
2558 IF (npt.gt.0) THEN
2559 varid=varid-1
2560 DO i=1,npt
2561 varid=varid+1
2562 idtbry(isouth,inert(i))=varid
2563 DO ng=1,ngrids
2564 fscale(varid,ng)=scale
2565 iinfo(1,varid,ng)=gtype
2566 END DO
2567 WRITE (vname(1,varid),'(a,i2.2)') &
2568 & trim(adjustl(vinfo(1))), i
2569 WRITE (vname(2,varid),'(a,a,i2.2)') &
2570 & trim(adjustl(vinfo(2))), ', type ', i
2571 WRITE (vname(3,varid),'(a)') &
2572 & trim(adjustl(vinfo(3)))
2573 WRITE (vname(4,varid),'(a,i2.2,a)') &
2574 & trim(adjustl(vinfo(1))), i, ' southern_boundary'
2575 WRITE (vname(5,varid),'(a)') &
2576 & trim(adjustl(vinfo(5)))
2577 WRITE (vname(6,varid),'(a,i2.2)') &
2578 & trim(adjustl(vinfo(6))), i
2579 END DO
2580 END IF
2581 CASE ('idTbry(inorth,inert(i))')
2582 IF (npt.gt.0) THEN
2583 varid=varid-1
2584 DO i=1,npt
2585 varid=varid+1
2586 idtbry(inorth,inert(i))=varid
2587 DO ng=1,ngrids
2588 fscale(varid,ng)=scale
2589 iinfo(1,varid,ng)=gtype
2590 END DO
2591 WRITE (vname(1,varid),'(a,i2.2)') &
2592 & trim(adjustl(vinfo(1))), i
2593 WRITE (vname(2,varid),'(a,a,i2.2)') &
2594 & trim(adjustl(vinfo(2))), ', type ', i
2595 WRITE (vname(3,varid),'(a)') &
2596 & trim(adjustl(vinfo(3)))
2597 WRITE (vname(4,varid),'(a,i2.2,a)') &
2598 & trim(adjustl(vinfo(1))), i, ' northern_boundary'
2599 WRITE (vname(5,varid),'(a)') &
2600 & trim(adjustl(vinfo(5)))
2601 WRITE (vname(6,varid),'(a,i2.2)') &
2602 & trim(adjustl(vinfo(6))), i
2603 END DO
2604 END IF
2605 CASE ('idRtrc(inert(i))')
2606 IF (npt.gt.0) THEN
2607 varid=varid-1
2608 DO i=1,npt
2609 varid=varid+1
2610 idrtrc(inert(i))=varid
2611 DO ng=1,ngrids
2612 fscale(varid,ng)=scale
2613 iinfo(1,varid,ng)=gtype
2614 END DO
2615 WRITE (vname(1,varid),'(a,i2.2)') &
2616 & trim(adjustl(vinfo(1))), i
2617 WRITE (vname(2,varid),'(a,a,i2.2)') &
2618 & trim(adjustl(vinfo(2))), ', type ', i
2619 WRITE (vname(3,varid),'(a)') &
2620 & trim(adjustl(vinfo(3)))
2621 WRITE (vname(4,varid),'(a,i2.2)') &
2622 & trim(adjustl(vinfo(4))), i
2623 WRITE (vname(5,varid),'(a)') &
2624 & trim(adjustl(vinfo(5)))
2625 WRITE (vname(6,varid),'(a,i2.2)') &
2626 & trim(adjustl(vinfo(6))), i
2627 END DO
2628 END IF
2629 END SELECT
2630#endif
2631#ifdef DIAGNOSTICS_TS
2632!
2633! Adjust information for tracer diagnostic variables. This needs to be
2634! done last because it needs all the tracers variable names.
2635!
2636 SELECT CASE (vinfo(1))
2637 CASE ('_rate')
2638 varid=varid-1
2639 DO i=1,mt
2640 varid=varid+1
2641 iddtrc(i,itrate)=varid
2642 DO ng=1,ngrids
2643 fscale(varid,ng)=scale
2644 iinfo(1,varid,ng)=gtype
2645 END DO
2646 WRITE (vname(1,varid),'(a,a)') &
2647 & trim(adjustl(vname(1,idtvar(i)))), &
2648 & trim(adjustl(vinfo(1)))
2649 WRITE (vname(2,varid),'(a,", ",a)') &
2650 & trim(adjustl(vname(2,idtvar(i)))), &
2651 & trim(adjustl(vinfo(2)))
2652 WRITE (vname(3,varid),'(a,1x,a)') &
2653 & trim(adjustl(vname(3,idtvar(i)))), &
2654 & trim(adjustl(vinfo(3)))
2655 WRITE (vname(4,varid),'(a,1x,a)') &
2656 & trim(adjustl(vname(1,idtvar(i)))), &
2657 & trim(adjustl(vinfo(4)))
2658 WRITE (vname(5,varid),'(a)') &
2659 & trim(adjustl(vinfo(5)))
2660 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
2661 & prefix='sea_water_', &
2662 & suffix=vinfo(6))
2663 END DO
2664 CASE ('_hadv')
2665 varid=varid-1
2666 DO i=1,mt
2667 varid=varid+1
2668 iddtrc(i,ithadv)=varid
2669 DO ng=1,ngrids
2670 fscale(varid,ng)=scale
2671 iinfo(1,varid,ng)=gtype
2672 END DO
2673 WRITE (vname(1,varid),'(a,a)') &
2674 & trim(adjustl(vname(1,idtvar(i)))), &
2675 & trim(adjustl(vinfo(1)))
2676 WRITE (vname(2,varid),'(a,", ",a)') &
2677 & trim(adjustl(vname(2,idtvar(i)))), &
2678 & trim(adjustl(vinfo(2)))
2679 WRITE (vname(3,varid),'(a,1x,a)') &
2680 & trim(adjustl(vname(3,idtvar(i)))), &
2681 & trim(adjustl(vinfo(3)))
2682 WRITE (vname(4,varid),'(a,1x,a)') &
2683 & trim(adjustl(vname(1,idtvar(i)))), &
2684 & trim(adjustl(vinfo(4)))
2685 WRITE (vname(5,varid),'(a)') &
2686 & trim(adjustl(vinfo(5)))
2687 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
2688 & prefix='sea_water_', &
2689 & suffix=vinfo(6))
2690 END DO
2691 CASE ('_xadv')
2692 varid=varid-1
2693 DO i=1,mt
2694 varid=varid+1
2695 iddtrc(i,itxadv)=varid
2696 DO ng=1,ngrids
2697 fscale(varid,ng)=scale
2698 iinfo(1,varid,ng)=gtype
2699 END DO
2700 WRITE (vname(1,varid),'(a,a)') &
2701 & trim(adjustl(vname(1,idtvar(i)))), &
2702 & trim(adjustl(vinfo(1)))
2703 WRITE (vname(2,varid),'(a,", ",a)') &
2704 & trim(adjustl(vname(2,idtvar(i)))), &
2705 & trim(adjustl(vinfo(2)))
2706 WRITE (vname(3,varid),'(a,1x,a)') &
2707 & trim(adjustl(vname(3,idtvar(i)))), &
2708 & trim(adjustl(vinfo(3)))
2709 WRITE (vname(4,varid),'(a,1x,a)') &
2710 & trim(adjustl(vname(1,idtvar(i)))), &
2711 & trim(adjustl(vinfo(4)))
2712 WRITE (vname(5,varid),'(a)') &
2713 & trim(adjustl(vinfo(5)))
2714 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
2715 & prefix='sea_water_', &
2716 & suffix=vinfo(6))
2717 END DO
2718 CASE ('_yadv')
2719 varid=varid-1
2720 DO i=1,mt
2721 varid=varid+1
2722 iddtrc(i,ityadv)=varid
2723 DO ng=1,ngrids
2724 fscale(varid,ng)=scale
2725 iinfo(1,varid,ng)=gtype
2726 END DO
2727 WRITE (vname(1,varid),'(a,a)') &
2728 & trim(adjustl(vname(1,idtvar(i)))), &
2729 & trim(adjustl(vinfo(1)))
2730 WRITE (vname(2,varid),'(a,", ",a)') &
2731 & trim(adjustl(vname(2,idtvar(i)))), &
2732 & trim(adjustl(vinfo(2)))
2733 WRITE (vname(3,varid),'(a,1x,a)') &
2734 & trim(adjustl(vname(3,idtvar(i)))), &
2735 & trim(adjustl(vinfo(3)))
2736 WRITE (vname(4,varid),'(a,1x,a)') &
2737 & trim(adjustl(vname(1,idtvar(i)))), &
2738 & trim(adjustl(vinfo(4)))
2739 WRITE (vname(5,varid),'(a)') &
2740 & trim(adjustl(vinfo(5)))
2741 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
2742 & prefix='sea_water_', &
2743 & suffix=vinfo(6))
2744 END DO
2745 CASE ('_vadv')
2746 varid=varid-1
2747 DO i=1,mt
2748 varid=varid+1
2749 iddtrc(i,itvadv)=varid
2750 DO ng=1,ngrids
2751 fscale(varid,ng)=scale
2752 iinfo(1,varid,ng)=gtype
2753 END DO
2754 WRITE (vname(1,varid),'(a,a)') &
2755 & trim(adjustl(vname(1,idtvar(i)))), &
2756 & trim(adjustl(vinfo(1)))
2757 WRITE (vname(2,varid),'(a,", ",a)') &
2758 & trim(adjustl(vname(2,idtvar(i)))), &
2759 & trim(adjustl(vinfo(2)))
2760 WRITE (vname(3,varid),'(a,1x,a)') &
2761 & trim(adjustl(vname(3,idtvar(i)))), &
2762 & trim(adjustl(vinfo(3)))
2763 WRITE (vname(4,varid),'(a,1x,a)') &
2764 & trim(adjustl(vname(1,idtvar(i)))), &
2765 & trim(adjustl(vinfo(4)))
2766 WRITE (vname(5,varid),'(a)') &
2767 & trim(adjustl(vinfo(5)))
2768 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
2769 & prefix='sea_water_', &
2770 & suffix=vinfo(6))
2771 END DO
2772# if defined TS_DIF2 || defined TS_DIF4
2773 CASE ('_hdiff')
2774 varid=varid-1
2775 DO i=1,mt
2776 varid=varid+1
2777 iddtrc(i,ithdif)=varid
2778 DO ng=1,ngrids
2779 fscale(varid,ng)=scale
2780 iinfo(1,varid,ng)=gtype
2781 END DO
2782 WRITE (vname(1,varid),'(a,a)') &
2783 & trim(adjustl(vname(1,idtvar(i)))), &
2784 & trim(adjustl(vinfo(1)))
2785 WRITE (vname(2,varid),'(a,", ",a)') &
2786 & trim(adjustl(vname(2,idtvar(i)))), &
2787 & trim(adjustl(vinfo(2)))
2788 WRITE (vname(3,varid),'(a,1x,a)') &
2789 & trim(adjustl(vname(3,idtvar(i)))), &
2790 & trim(adjustl(vinfo(3)))
2791 WRITE (vname(4,varid),'(a,1x,a)') &
2792 & trim(adjustl(vname(1,idtvar(i)))), &
2793 & trim(adjustl(vinfo(4)))
2794 WRITE (vname(5,varid),'(a)') &
2795 & trim(adjustl(vinfo(5)))
2796 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
2797 & prefix='sea_water_', &
2798 & suffix=vinfo(6))
2799 END DO
2800 CASE ('_xdiff')
2801 varid=varid-1
2802 DO i=1,mt
2803 varid=varid+1
2804 iddtrc(i,itxdif)=varid
2805 DO ng=1,ngrids
2806 fscale(varid,ng)=scale
2807 iinfo(1,varid,ng)=gtype
2808 END DO
2809 WRITE (vname(1,varid),'(a,a)') &
2810 & trim(adjustl(vname(1,idtvar(i)))), &
2811 & trim(adjustl(vinfo(1)))
2812 WRITE (vname(2,varid),'(a,", ",a)') &
2813 & trim(adjustl(vname(2,idtvar(i)))), &
2814 & trim(adjustl(vinfo(2)))
2815 WRITE (vname(3,varid),'(a,1x,a)') &
2816 & trim(adjustl(vname(3,idtvar(i)))), &
2817 & trim(adjustl(vinfo(3)))
2818 WRITE (vname(4,varid),'(a,1x,a)') &
2819 & trim(adjustl(vname(1,idtvar(i)))), &
2820 & trim(adjustl(vinfo(4)))
2821 WRITE (vname(5,varid),'(a)') &
2822 & trim(adjustl(vinfo(5)))
2823 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
2824 & prefix='sea_water_', &
2825 & suffix=vinfo(6))
2826 END DO
2827 CASE ('_ydiff')
2828 varid=varid-1
2829 DO i=1,mt
2830 varid=varid+1
2831 iddtrc(i,itydif)=varid
2832 DO ng=1,ngrids
2833 fscale(varid,ng)=scale
2834 iinfo(1,varid,ng)=gtype
2835 END DO
2836 WRITE (vname(1,varid),'(a,a)') &
2837 & trim(adjustl(vname(1,idtvar(i)))), &
2838 & trim(adjustl(vinfo(1)))
2839 WRITE (vname(2,varid),'(a,", ",a)') &
2840 & trim(adjustl(vname(2,idtvar(i)))), &
2841 & trim(adjustl(vinfo(2)))
2842 WRITE (vname(3,varid),'(a,1x,a)') &
2843 & trim(adjustl(vname(3,idtvar(i)))), &
2844 & trim(adjustl(vinfo(3)))
2845 WRITE (vname(4,varid),'(a,1x,a)') &
2846 & trim(adjustl(vname(1,idtvar(i)))), &
2847 & trim(adjustl(vinfo(4)))
2848 WRITE (vname(5,varid),'(a)') &
2849 & trim(adjustl(vinfo(5)))
2850 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
2851 & prefix='sea_water_', &
2852 & suffix=vinfo(6))
2853 END DO
2854# if defined MIX_GEO_TS || defined MIX_ISO_TS
2855 CASE ('_sdiff')
2856 varid=varid-1
2857 DO i=1,mt
2858 varid=varid+1
2859 iddtrc(i,itsdif)=varid
2860 DO ng=1,ngrids
2861 fscale(varid,ng)=scale
2862 iinfo(1,varid,ng)=gtype
2863 END DO
2864 WRITE (vname(1,varid),'(a,a)') &
2865 & trim(adjustl(vname(1,idtvar(i)))), &
2866 & trim(adjustl(vinfo(1)))
2867 WRITE (vname(2,varid),'(a,", ",a)') &
2868 & trim(adjustl(vname(2,idtvar(i)))), &
2869 & trim(adjustl(vinfo(2)))
2870 WRITE (vname(3,varid),'(a,1x,a)') &
2871 & trim(adjustl(vname(3,idtvar(i)))), &
2872 & trim(adjustl(vinfo(3)))
2873 WRITE (vname(4,varid),'(a,1x,a)') &
2874 & trim(adjustl(vname(1,idtvar(i)))), &
2875 & trim(adjustl(vinfo(4)))
2876 WRITE (vname(5,varid),'(a)') &
2877 & trim(adjustl(vinfo(5)))
2878 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
2879 & prefix='sea_water_', &
2880 & suffix=vinfo(6))
2881 END DO
2882# endif
2883# endif
2884 CASE ('_vdiff')
2885 varid=varid-1
2886 DO i=1,mt
2887 varid=varid+1
2888 iddtrc(i,itvdif)=varid
2889 DO ng=1,ngrids
2890 fscale(varid,ng)=scale
2891 iinfo(1,varid,ng)=gtype
2892 END DO
2893 WRITE (vname(1,varid),'(a,a)') &
2894 & trim(adjustl(vname(1,idtvar(i)))), &
2895 & trim(adjustl(vinfo(1)))
2896 WRITE (vname(2,varid),'(a,", ",a)') &
2897 & trim(adjustl(vname(2,idtvar(i)))), &
2898 & trim(adjustl(vinfo(2)))
2899 WRITE (vname(3,varid),'(a,1x,a)') &
2900 & trim(adjustl(vname(3,idtvar(i)))), &
2901 & trim(adjustl(vinfo(3)))
2902 WRITE (vname(4,varid),'(a,1x,a)') &
2903 & trim(adjustl(vname(1,idtvar(i)))), &
2904 & trim(adjustl(vinfo(4)))
2905 WRITE (vname(5,varid),'(a)') &
2906 & trim(adjustl(vinfo(5)))
2907 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
2908 & prefix='sea_water_', &
2909 & suffix=vinfo(6))
2910 END DO
2911 END SELECT
2912#endif
2913#if defined SOLVE3D && (defined AVERAGES || defined AD_AVERAGES)
2914!
2915! Determine metadata for quadratic tracer averages.
2916!
2917 SELECT CASE (vinfo(1))
2918 CASE ('tracer2')
2919 varid=varid-1
2920 DO i=1,mt
2921 varid=varid+1
2922 idttav(i)=varid
2923 DO ng=1,ngrids
2924 fscale(varid,ng)=scale
2925 iinfo(1,varid,ng)=gtype
2926 END DO
2927 WRITE (vname(1,varid),'(a,a)') &
2928 & trim(adjustl(vname(1,idtvar(i)))), '_2'
2929 WRITE (vname(2,varid),'(a,1x,a)') &
2930 & 'squared', &
2931 & trim(adjustl(vname(2,idtvar(i))))
2932 IF (trim(adjustl(vname(3,idtvar(i)))).eq. &
2933 & 'nondimensional') THEN
2934 WRITE (vname(3,varid),'(a)') &
2935 & trim(adjustl(vname(3,idtvar(i))))
2936 ELSE
2937 WRITE (vname(3,varid),'(a,a)') &
2938 & trim(adjustl(vname(3,idtvar(i)))), '2'
2939 END IF
2940 WRITE (vname(4,varid),'(a,1x,a)') &
2941 & trim(adjustl(vname(2,idtvar(i)))), &
2942 & trim(adjustl(vinfo(4)))
2943 WRITE (vname(5,varid),'(a)') &
2944 & trim(adjustl(vinfo(5)))
2945 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
2946 & prefix=vinfo(6), &
2947 & suffix='_in_sea_water')
2948 END DO
2949 CASE ('Huontracer')
2950 varid=varid-1
2951 DO i=1,mt
2952 varid=varid+1
2953 ihutav(i)=varid
2954 DO ng=1,ngrids
2955 fscale(varid,ng)=scale
2956 iinfo(1,varid,ng)=gtype
2957 END DO
2958 WRITE (vname(1,varid),'(a,a)') &
2959 & 'Huon_', trim(adjustl(vname(1,idtvar(i))))
2960 WRITE (vname(2,varid),'(a,1x,a)') &
2961 & trim(adjustl(vname(2,idtvar(i)))), &
2962 & 'u-volume flux'
2963 IF (trim(adjustl(vname(3,idtvar(i)))).eq. &
2964 & 'nondimensional') THEN
2965 WRITE (vname(3,varid),'(a)') &
2966 & 'meter3 second-1'
2967 ELSE
2968 WRITE (vname(3,varid),'(a,1x,a)') &
2969 & 'meter3 second-1', &
2970 & trim(adjustl(vname(3,idtvar(i))))
2971 END IF
2972 WRITE (vname(4,varid),'(a,1x,a)') &
2973 & trim(adjustl(vname(2,idtvar(i)))), &
2974 & trim(adjustl(vinfo(4)))
2975 WRITE (vname(5,varid),'(a)') &
2976 & trim(adjustl(vinfo(5)))
2977 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
2978 & prefix=vinfo(6))
2979 END DO
2980 CASE ('utracer')
2981 varid=varid-1
2982 DO i=1,mt
2983 varid=varid+1
2984 idutav(i)=varid
2985 DO ng=1,ngrids
2986 fscale(varid,ng)=scale
2987 iinfo(1,varid,ng)=gtype
2988 END DO
2989 WRITE (vname(1,varid),'(a,a)') &
2990 & 'u_', trim(adjustl(vname(1,idtvar(i))))
2991 WRITE (vname(2,varid),'(a,1x,a)') &
2992 & 'u-momentum times', &
2993 & trim(adjustl(vname(2,idtvar(i))))
2994 IF (trim(adjustl(vname(3,idtvar(i)))).eq. &
2995 & 'nondimensional') THEN
2996 WRITE (vname(3,varid),'(a)') &
2997 & 'meter second-1'
2998 ELSE
2999 WRITE (vname(3,varid),'(a,1x,a)') &
3000 & 'meter second-1', &
3001 & trim(adjustl(vname(3,idtvar(i))))
3002 END IF
3003 WRITE (vname(4,varid),'(a,1x,a)') &
3004 & trim(adjustl(vinfo(4))), &
3005 & trim(adjustl(vname(2,idtvar(i))))
3006 vname(5,varid)='ocean_time'
3007 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
3008 & prefix=vinfo(6), &
3009 & suffix='_in_sea_water')
3010 END DO
3011 CASE ('Hvomtracer')
3012 varid=varid-1
3013 DO i=1,mt
3014 varid=varid+1
3015 ihvtav(i)=varid
3016 DO ng=1,ngrids
3017 fscale(varid,ng)=scale
3018 iinfo(1,varid,ng)=gtype
3019 END DO
3020 WRITE (vname(1,varid),'(a,a)') &
3021 & 'Hvom_', trim(adjustl(vname(1,idtvar(i))))
3022 WRITE (vname(2,varid),'(a,1x,a)') &
3023 & trim(adjustl(vname(2,idtvar(i)))), &
3024 & 'v-volume flux'
3025 IF (trim(adjustl(vname(3,idtvar(i)))).eq. &
3026 & 'nondimensional') THEN
3027 WRITE (vname(3,varid),'(a)') &
3028 & 'meter3 second-1'
3029 ELSE
3030 WRITE (vname(3,varid),'(a,1x,a)') &
3031 & 'meter3 second-1', &
3032 & trim(adjustl(vname(3,idtvar(i))))
3033 END IF
3034 WRITE (vname(4,varid),'(a,1x,a)') &
3035 & trim(adjustl(vname(2,idtvar(i)))), &
3036 & trim(adjustl(vinfo(4)))
3037 WRITE (vname(5,varid),'(a)') &
3038 & trim(adjustl(vinfo(5)))
3039 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
3040 & prefix=vinfo(6))
3041 END DO
3042 CASE ('vtracer')
3043 varid=varid-1
3044 DO i=1,mt
3045 varid=varid+1
3046 idvtav(i)=varid
3047 DO ng=1,ngrids
3048 fscale(varid,ng)=scale
3049 iinfo(1,varid,ng)=gtype
3050 END DO
3051 WRITE (vname(1,varid),'(a,a)') &
3052 & 'v_', trim(adjustl(vname(1,idtvar(i))))
3053 WRITE (vname(2,varid),'(a,1x,a)') &
3054 & 'v-momentum times', &
3055 & trim(adjustl(vname(2,idtvar(i))))
3056 IF (trim(adjustl(vname(3,idtvar(i)))).eq. &
3057 & 'nondimensional') THEN
3058 WRITE (vname(3,varid),'(a)') &
3059 & 'meter second-1'
3060 ELSE
3061 WRITE (vname(3,varid),'(a,1x,a)') &
3062 & 'meter second-1', &
3063 & trim(adjustl(vname(3,idtvar(i))))
3064 END IF
3065 WRITE (vname(4,varid),'(a,1x,a)') &
3066 & trim(adjustl(vinfo(4))), &
3067 & trim(adjustl(vname(2,idtvar(i))))
3068 vname(5,varid)='ocean_time'
3069 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
3070 & prefix=vinfo(6), &
3071 & suffix='_in_sea_water')
3072 END DO
3073 END SELECT
3074#endif
3075 ELSE
3076 varid=varid-1
3077 END IF
3078 END DO metadata_loop
3079
3080#ifdef SOLVE3D
3081!
3082!-----------------------------------------------------------------------
3083! Set passive tracers surface flux metadata. The variable name is the
3084! same as the basic tracer but with the _sflux suffix.
3085!-----------------------------------------------------------------------
3086!
3087 DO i=nat+1,mt
3088 varid=varid+1
3089 IF (varid.gt.mv) THEN
3090 WRITE (stdout,10) mv, varid
3091 stop
3092 END IF
3093 idtsur(i)=varid
3094 DO ng=1,ngrids
3095 fscale(varid,ng)=1.0_r8
3096 iinfo(1,varid,ng)=r2dvar
3097 END DO
3098 WRITE (vname(1,varid),'(a,a)') &
3099 & trim(adjustl(vname(1,idtvar(i)))), '_sflux'
3100 WRITE (vname(2,varid),'(a,a)') &
3101 & trim(adjustl(vname(2,idtvar(i)))), ', surface flux'
3102 WRITE (vname(3,varid),'(a,1x,a)') &
3103 & trim(adjustl(vname(3,idtvar(i)))), 'meter second-1'
3104 WRITE (vname(4,varid),'(3a)') 'surface ', &
3105 & trim(adjustl(vname(2,idtvar(i)))), ' flux'
3106 WRITE (vname(5,varid),'(a)') &
3107 & trim(adjustl(vname(1,idtvar(i))))
3108 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
3109 & prefix='sea_surface_', &
3110 & suffix='_flux')
3111 END DO
3112!
3113!-----------------------------------------------------------------------
3114! Set passive model surface tracers metadata. The variable name is the
3115! same as the basic tracer but with the _sur suffix.
3116!-----------------------------------------------------------------------
3117!
3118 DO i=nat+1,mt
3119 varid=varid+1
3120 IF (varid.gt.mv) THEN
3121 WRITE (stdout,10) mv, varid
3122 stop
3123 END IF
3124 idsurt(i)=varid
3125 DO ng=1,ngrids
3126 fscale(varid,ng)=1.0_r8
3127 iinfo(1,varid,ng)=r2dvar
3128 END DO
3129 WRITE (vname(1,varid),'(a,a)') &
3130 & trim(adjustl(vname(1,idtvar(i)))), '_sur'
3131 WRITE (vname(2,varid),'(2a)') 'surface ', &
3132 & trim(adjustl(vname(2,idtvar(i))))
3133 WRITE (vname(3,varid),'(a)') &
3134 & trim(adjustl(vname(3,idtvar(i))))
3135 WRITE (vname(4,varid),'(a)') &
3136 & trim(vname(2,varid))
3137 WRITE (vname(5,varid),'(a)') &
3138 & trim(adjustl(vname(5,idtvar(i))))
3139 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
3140 & prefix='sea_surface_')
3141 END DO
3142#endif
3143#ifdef WEAK_CONSTRAINT
3144!
3145!-----------------------------------------------------------------------
3146! Set passive tracers impulse forcing. The metadata values are the
3147! same as the basic tracer but with different indices sinc they are
3148! used at the same time. This allows flexibility in the time
3149! interpolation.
3150!-----------------------------------------------------------------------
3151!
3152 DO i=nat+1,mt
3153 varid=varid+1
3154 IF (varid.gt.mv) THEN
3155 WRITE (stdout,10) mv, varid
3156 stop
3157 END IF
3158 idttlf(i)=varid
3159 DO ng=1,ngrids
3160 fscale(varid,ng)=1.0_r8
3161 iinfo(1,varid,ng)=r3dvar
3162 END DO
3163 WRITE (vname(1,varid),'(a)') &
3164 & trim(adjustl(vname(1,idtvar(i))))
3165 WRITE (vname(2,varid),'(a,a)') &
3166 & trim(adjustl(vname(2,idtvar(i)))), ' impulse forcing'
3167 WRITE (vname(3,varid),'(a)') &
3168 & trim(adjustl(vname(3,idtvar(i))))
3169 WRITE (vname(4,varid),'(a,a)') &
3170 & trim(adjustl(vname(2,idtvar(i)))), ' impulse'
3171 WRITE (vname(5,varid),'(a)') &
3172 & trim(adjustl(vname(5,idtvar(i))))
3173 CALL standardname (vname(6,varid), vname(2,idtvar(i)), &
3174 & prefix='sea_water_', &
3175 & suffix='_impulse')
3176 END DO
3177#endif
3178!
3179!-----------------------------------------------------------------------
3180! Set model state variables metadata indices.
3181!-----------------------------------------------------------------------
3182!
3183 idsvar(isfsur)=idfsur
3184 idsvar(isubar)=idubar
3185 idsvar(isvbar)=idvbar
3186#ifdef SOLVE3D
3187 idsvar(isuvel)=iduvel
3188 idsvar(isvvel)=idvvel
3189 DO i=1,mt
3190 idsvar(istvar(i))=idtvar(i)
3191 END DO
3192#endif
3193#if defined ADJUST_WSTRESS || defined FORCING_SV || \
3194 defined hessian_fsv || defined so_semi || \
3195 defined stochastic_opt
3196 idsvar(isustr)=idusms
3197 idsvar(isvstr)=idvsms
3198#endif
3199#ifdef SOLVE3D
3200# if defined ADJUST_STFLUX || defined FORCING_SV || \
3201 defined hessian_fsv || defined so_semi || \
3202 defined stochastic_opt
3203 DO i=1,mt
3204 idsvar(istsur(i))=idtsur(i)
3205 END DO
3206# endif
3207#endif
3208#ifdef WEC
3209 idsvar(isu2sd)=idu2sd
3210 idsvar(isv2sd)=idv2sd
3211# if defined SOLVE3D
3212 idsvar(isu3sd)=idu3sd
3213 idsvar(isv3sd)=idv3sd
3214# endif
3215#endif
3216#ifdef SOLVE3D
3217# if defined GLS_MIXING || defined MY25_MIXING
3218 idsvar(ismtke)=idmtke
3219# endif
3220 idsvar(iswvel)=idwvel
3221#endif
3222!
3223!-----------------------------------------------------------------------
3224! Set model lateral boundary variables index.
3225!-----------------------------------------------------------------------
3226!
3227 idbvar(isfsur)=idfsur
3228 idbvar(isubar)=idubar
3229 idbvar(isvbar)=idvbar
3230#ifdef SOLVE3D
3231 idbvar(isuvel)=iduvel
3232 idbvar(isvvel)=idvvel
3233 DO i=1,mt
3234 idbvar(istvar(i))=idtvar(i)
3235 END DO
3236# if defined GLS_MIXING || defined MY25_MIXING
3237 idbvar(ismtke)=idmtke
3238# endif
3239#endif
3240#ifdef WEC
3241 idbvar(isu2sd)=idu2sd
3242 idbvar(isv2sd)=idv2sd
3243# if defined SOLVE3D
3244 idbvar(isu3sd)=idu3sd
3245 idbvar(isv3sd)=idv3sd
3246# endif
3247#endif
3248#ifdef ICE_MODEL
3249!
3250! Set ice model state boundary indices. Currently, the last ice model
3251! LBC state variable is isVice=11.
3252!
3253 DO i=1,nices
3254 ibice(i)=i
3255 END DO
3256 ic=ic_brylast
3257 DO i=1,isvice
3258 ic=ic+1
3259 idbvar(ic)=isice(i)
3260 END DO
3261#endif
3262#ifdef ADJUST_BOUNDARY
3263!
3264!-----------------------------------------------------------------------
3265! If adjusting open boundaries, set metadata variables. The variable
3266! name is the same as the state variable but with the _obc suffix.
3267!-----------------------------------------------------------------------
3268!
3269 DO i=1,nlbcvar
3270 IF (idbvar(i).gt.0 ) THEN
3271 varid=varid+1
3272 IF (varid.gt.mv) THEN
3273 WRITE (stdout,10) mv, varid
3274 stop
3275 END IF
3276 idsbry(i)=varid
3277 DO ng=1,ngrids
3278 fscale(varid,ng)=1.0_r8
3279 iinfo(1,varid,ng)=0
3280 END DO
3281 WRITE (vname(1,varid),'(a,a)') &
3282 & trim(adjustl(vname(1,idsvar(i)))), '_obc'
3283 WRITE (vname(2,varid),'(a,a)') &
3284 & trim(adjustl(vname(2,idsvar(i)))), ', open boundaries'
3285 WRITE (vname(3,varid),'(a)') &
3286 & trim(adjustl(vname(3,idsvar(i))))
3287 WRITE (vname(4,varid),'(a,a)') &
3288 & trim(vname(1,varid)), ', scalar, series'
3289 WRITE (vname(5,varid),'(a)') &
3290 & trim(adjustl(vname(5,idsvar(i))))
3291 END IF
3292 END DO
3293#endif
3294!
3295! Save last variable ID counter used.
3296!
3297 last_varid=varid
3298 dmem(1)=dmem(1)+real(varid,r8)
3299!
3300 10 FORMAT (/,' MOD_NCPARAM - too small dimension ', &
3301 & 'parameter, MV = ',2i5,/,15x, &
3302 & 'change file mod_ncparam.F and recompile.')
3303!
3304 RETURN
logical function, public io_metadata(firstpass, vinfo, scale, offset)
integer, parameter isvice
Definition ice_mod.h:147
integer, dimension(nices) ibice
Definition ice_mod.h:162
integer, dimension(nices) isice
Definition ice_mod.h:135
integer, parameter nices
Definition ice_mod.h:130
integer stdout
integer m3vvis
integer m2fcor
integer ityadv
integer m3hadv
integer m3xadv
integer m2pgrd
integer, parameter iwest
integer m2xadv
integer m2yadv
integer itxdif
integer ithadv
integer itvadv
integer m3vadv
integer m3xvis
integer exit_flag
integer itrate
integer isalt
integer m2hvis
integer m3hvis
integer itemp
integer m3rate
integer, parameter isouth
integer m3yadv
integer itsdif
integer m3yvis
integer m2rate
integer itvdif
integer, dimension(:), pointer inert
integer m2yvis
integer m3fcor
integer m2sstr
integer, parameter ieast
integer m2hadv
integer itydif
integer, parameter inorth
integer m3pgrd
integer m2xvis
integer m2bstr
integer itxadv
integer noerror
integer ithdif
subroutine, public standardname(sname, variable, prefix, suffix)
Definition strings.F:299
logical function, public founderror(flag, noerr, line, routine)
Definition strings.F:52

References ananame, aout, bryncid, brypiofile, clmncid, clmpiofile, dinfo, dout, mod_scalars::exit_flag, finfo, strings_mod::founderror(), fpoint, frcncid, frcpiofile, fscale, git_rev, git_url, hout, mod_ice::ibice, id2dpv, id2drv, id3dpv, id3drv, idangr, idbath, idbger, idbgth, idbvar, idcfra, idcos2, idcosw, iddano, iddiff, iddqdt, iddtrc, iddu2d, iddu3d, iddv2d, iddv3d, idefadj, idefavg, idefdia, idefhis, idefqck, ideftlm, idefxtr, idempf, idevap, idfcor, idfsud, idfsuh, idfsur, idghat, idgtnc, idhbbl, idhsbl, idhuav, idhvav, idhzdz, idincr, idinno, idkhor, idkver, idlatp, idlatr, idlatu, idlatv, idldwn, idlhea, idlonp, idlonr, idlonu, idlonv, idlrad, idm2nc, idm3nc, idmomf, idmomi, idmskp, idmskr, idmsku, idmskv, idmtke, idmtls, idnlmf, idnlmi, idnlmo, idnlmp, idnlmu, idnobs, idobsd, idobss, idobst, idobsx, idobsy, idobsz, idoday, idoerr, idolat, idolon, idomet, idopro, idotyp, idoval, idovel, idovil, idpair, idpmdx, idpndy, idpthr, idpthu, idpthv, idpthw, idpwet, idqair, idragl, idragq, idrain, idrdir, idrepo, idresi, idrflg, idrtra, idrtrc, idru2d, idru3d, idruct, idrv2d, idrv3d, idrvct, idrvsh, idrwet, idrxpo, idrzet, idsbry, idscor, idscou, idscov, idsdif, idsfwf, idshea, idsin2, idsinw, idsrad, idsshc, idsssc, idsstc, idsurt, idsvar, idswcw, idtads, idtair, idtbot, idtbry, idtdif, idtime, idtlmo, idtopo, idtper, idtrcd, idtrch, idtref, idtsur, idttav, idttlf, idtvan, idtvar, idtvma, idtvmi, idtvph, idtzam, idtzph, idu2av, idu2bc, idu2dd, idu2de, idu2dh, idu2rs, idu2sd, idu3bc, idu3dd, idu3de, idu3dh, idu3rs, idu3sd, iduads, iduaie, iduair, idubar, idubas, idubcl, idubcs, idubms, idubot, idubrs, idubtf, idubur, idubws, iduclm, idufx1, idufx2, idusms, idusue, idusur, idutav, idutlf, iduuav, iduvav, iduvel, iduvwc, iduwav, iduwet, idv2av, idv2bc, idv2dd, idv2dh, idv2dn, idv2rs, idv2sd, idv3bc, idv3dd, idv3dh, idv3dn, idv3rs, idv3sd, idvads, idvain, idvair, idvbar, idvbas, idvbcl, idvbcs, idvbms, idvbot, idvbrs, idvbtf, idvbvr, idvbws, idvclm, idvfx1, idvfx2, idvmkk, idvmkp, idvmls, idvsms, idvsun, idvsur, idvtav, idvtlf, idvvav, idvvel, idvvis, idvwav, idvwet, idw2xx, idw2xy, idw2yy, idw3sd, idw3st, idw3xx, idw3xy, idw3yy, idw3zx, idw3zy, idwads, idwam2, idwamp, idwbeh, idwbrk, idwdib, idwdif, idwdip, idwdir, idwdis, idwdiw, idwlen, idwlep, idworb, idwpbt, idwptp, idwqsp, idwrol, idwvds, idwvel, idwvqp, idwztw, idxgrp, idxgrr, idxgru, idxgrv, idygrp, idygrr, idygru, idygrv, idzads, idzbry, idzobl, idztlf, idzzav, mod_scalars::ieast, ihutav, ihvtav, iinfo, mod_scalars::inert, mod_scalars::inorth, get_metadata_mod::io_metadata(), mod_scalars::isalt, isbp2d, isbp3d, isbr2d, isbr3d, isbu2d, isbu3d, isbv2d, isbv3d, isbw3d, isfsur, mod_ice::isice, ismtke, mod_scalars::isouth, istsur, istvar, isubar, isustr, isuvel, isvbar, mod_ice::isvice, isvstr, isvvel, iswvel, mod_scalars::itemp, mod_scalars::ithadv, mod_scalars::ithdif, mod_scalars::itrate, mod_scalars::itsdif, mod_scalars::itvadv, mod_scalars::itvdif, mod_scalars::itxadv, mod_scalars::itxdif, mod_scalars::ityadv, mod_scalars::itydif, mod_scalars::iwest, lanafile, last_varid, linfo, mod_scalars::m2bstr, mod_scalars::m2fcor, mod_scalars::m2hadv, mod_scalars::m2hvis, mod_scalars::m2pgrd, mod_scalars::m2rate, mod_scalars::m2sstr, mod_scalars::m2xadv, mod_scalars::m2xvis, mod_scalars::m2yadv, mod_scalars::m2yvis, mod_scalars::m3fcor, mod_scalars::m3hadv, mod_scalars::m3hvis, mod_scalars::m3pgrd, mod_scalars::m3rate, mod_scalars::m3vadv, mod_scalars::m3vvis, mod_scalars::m3xadv, mod_scalars::m3xvis, mod_scalars::m3yadv, mod_scalars::m3yvis, mv, mod_ice::nices, mod_scalars::noerror, nv, qout, sout, strings_mod::standardname(), mod_iounits::stdout, svn_rev, svn_url, tintrp, vname, and vtime.

Here is the call graph for this function:

Variable Documentation

◆ ananame

◆ aout

◆ bryncid

integer, dimension(:,:), allocatable mod_ncparam::bryncid

Definition at line 541 of file mod_ncparam.F.

541 integer, allocatable :: BRYncid(:,:)

Referenced by ad_get_data(), allocate_ncparam(), close_io_mod::close_inp(), deallocate_ncparam(), get_data(), initialize_ncparam(), rp_get_data(), and tl_get_data().

◆ brypiofile

type (file_desc_t), dimension(:,:), pointer mod_ncparam::brypiofile

Definition at line 551 of file mod_ncparam.F.

551 TYPE (File_desc_t), pointer :: BRYpioFile(:,:)

Referenced by ad_get_data(), allocate_ncparam(), deallocate_ncparam(), get_data(), initialize_ncparam(), rp_get_data(), and tl_get_data().

◆ cinfo

◆ clmncid

integer, dimension(:,:), allocatable mod_ncparam::clmncid

Definition at line 542 of file mod_ncparam.F.

542 integer, allocatable :: CLMncid(:,:)

Referenced by ad_get_data(), allocate_ncparam(), close_io_mod::close_inp(), deallocate_ncparam(), get_data(), initialize_ncparam(), rp_get_data(), and tl_get_data().

◆ clmpiofile

type (file_desc_t), dimension(:,:), pointer mod_ncparam::clmpiofile

Definition at line 552 of file mod_ncparam.F.

552 TYPE (File_desc_t), pointer :: CLMpioFile(:,:)

Referenced by ad_get_data(), allocate_ncparam(), deallocate_ncparam(), get_data(), initialize_ncparam(), rp_get_data(), and tl_get_data().

◆ date_str

character (len=44 ) mod_ncparam::date_str

◆ dinfo

type (my_vardesc), dimension(:,:,:), pointer mod_ncparam::dinfo

◆ dout

logical, dimension(:,:), allocatable mod_ncparam::dout

◆ finfo

◆ fpoint

◆ frcncid

integer, dimension(:,:), allocatable mod_ncparam::frcncid

◆ frcpiofile

type (file_desc_t), dimension(:,:), pointer mod_ncparam::frcpiofile

Definition at line 553 of file mod_ncparam.F.

553 TYPE (File_desc_t), pointer :: FRCpioFile(:,:)

Referenced by ad_get_data(), allocate_ncparam(), deallocate_ncparam(), get_data(), get_idata(), initialize_ncparam(), rp_get_data(), and tl_get_data().

◆ fscale

◆ git_rev

character (len=80 ) mod_ncparam::git_rev

Definition at line 617 of file mod_ncparam.F.

617 character (len=80 ) :: git_rev, svn_rev

Referenced by def_info_mod::def_info::def_info_nf90(), def_info_mod::def_info::def_info_pio(), initialize_ncparam(), and cmeps_roms_mod::roms_create().

◆ git_url

character (len=256) mod_ncparam::git_url

Definition at line 618 of file mod_ncparam.F.

618 character (len=256) :: git_url, svn_url

Referenced by def_info_mod::def_info::def_info_nf90(), def_info_mod::def_info::def_info_pio(), initialize_ncparam(), and cmeps_roms_mod::roms_create().

◆ history

character (len=maxlen) mod_ncparam::history

◆ hout

◆ id2dpv

◆ id2drv

◆ id3dpv

◆ id3drv

◆ idangr

integer mod_ncparam::idangr

◆ idbath

◆ idbger

integer mod_ncparam::idbger

◆ idbgth

integer mod_ncparam::idbgth

Definition at line 196 of file mod_ncparam.F.

196 integer :: idBgTh ! threshold for BQC check

Referenced by def_mod_mod::def_mod_nf90(), def_mod_mod::def_mod_pio(), initialize_ncparam(), obs_write_mod::obs_write_nf90(), and obs_write_mod::obs_write_pio().

◆ idbvar

integer, dimension(:), allocatable mod_ncparam::idbvar

◆ idcfra

integer mod_ncparam::idcfra

Definition at line 197 of file mod_ncparam.F.

197 integer :: idCfra ! cloud fraction

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idcos2

integer mod_ncparam::idcos2

Definition at line 199 of file mod_ncparam.F.

199 integer :: idCos2 ! COS(omega(k)*t)*COS(omega(l)*t)

Referenced by def_tides_mod::def_tides_nf90(), def_tides_mod::def_tides_pio(), get_idata(), initialize_ncparam(), wrt_tides_mod::wrt_tides_nf90(), and wrt_tides_mod::wrt_tides_pio().

◆ idcosw

integer mod_ncparam::idcosw

◆ iddano

◆ iddiff

integer, dimension(2) mod_ncparam::iddiff

◆ iddpth

integer mod_ncparam::iddpth = -4

◆ iddqdt

integer mod_ncparam::iddqdt

Definition at line 202 of file mod_ncparam.F.

202 integer :: iddQdT ! heat flux sensitivity to SST

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), inp_par_mod::inp_par(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ iddtrc

integer, dimension(:,:), allocatable mod_ncparam::iddtrc

◆ iddu2d

integer, dimension(:), allocatable mod_ncparam::iddu2d

◆ iddu3d

integer, dimension(:), allocatable mod_ncparam::iddu3d

◆ iddv2d

integer, dimension(:), allocatable mod_ncparam::iddv2d

◆ iddv3d

integer, dimension(:), allocatable mod_ncparam::iddv3d

◆ idefadj

integer, dimension(:), allocatable mod_ncparam::idefadj

Definition at line 558 of file mod_ncparam.F.

558 integer, allocatable :: idefADJ(:) ! adjoint file

Referenced by ad_output(), allocate_ncparam(), deallocate_ncparam(), i4dvar_mod::increment(), and initialize_ncparam().

◆ idefavg

integer, dimension(:), allocatable mod_ncparam::idefavg

◆ idefdia

integer, dimension(:), allocatable mod_ncparam::idefdia

Definition at line 560 of file mod_ncparam.F.

560 integer, allocatable :: idefDIA(:) ! diagnostics file

Referenced by allocate_ncparam(), rbl4dvar_mod::analysis(), i4dvar_mod::background(), deallocate_ncparam(), initialize_ncparam(), output(), and i4dvar_mod::posterior_analysis().

◆ idefhis

integer, dimension(:), allocatable mod_ncparam::idefhis

◆ idefqck

integer, dimension(:), allocatable mod_ncparam::idefqck

Definition at line 562 of file mod_ncparam.F.

562 integer, allocatable :: idefQCK(:) ! quicksave file

Referenced by allocate_ncparam(), rbl4dvar_mod::analysis_initialize(), deallocate_ncparam(), initialize_ncparam(), output(), and i4dvar_mod::posterior_analysis_initialize().

◆ ideftlm

integer, dimension(:), allocatable mod_ncparam::ideftlm

Definition at line 563 of file mod_ncparam.F.

563 integer, allocatable :: idefTLM(:) ! tangent file

Referenced by allocate_ncparam(), r4dvar_mod::analysis(), deallocate_ncparam(), i4dvar_mod::increment(), r4dvar_mod::increment(), initialize_ncparam(), rp_output(), and tl_output().

◆ idefxtr

integer, dimension(:), allocatable mod_ncparam::idefxtr

Definition at line 564 of file mod_ncparam.F.

564 integer, allocatable :: idefXTR(:) ! extraction file

Referenced by allocate_ncparam(), deallocate_ncparam(), initialize_ncparam(), and output().

◆ idempf

◆ idevap

◆ idfcor

integer mod_ncparam::idfcor

◆ idfsud

◆ idfsuh

integer mod_ncparam::idfsuh

Definition at line 208 of file mod_ncparam.F.

208 integer :: idFsuH ! free-surface tide harmonics

Referenced by def_tides_mod::def_tides_nf90(), def_tides_mod::def_tides_pio(), get_idata(), initialize_ncparam(), wrt_tides_mod::wrt_tides_nf90(), and wrt_tides_mod::wrt_tides_pio().

◆ idfsur

integer mod_ncparam::idfsur

Definition at line 206 of file mod_ncparam.F.

206 integer :: idFsur ! free-surface

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_nesting_mod::ad_fine2coarse(), ad_nesting_mod::ad_get_composite(), ad_get_data(), ad_pack_tile(), ad_nesting_mod::ad_put_composite(), ad_set_avg_mod::ad_set_avg_tile(), ad_set_data_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), mod_average::allocate_average(), analytical_mod::ana_nlminitial_tile(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), mod_average::deallocate_average(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_dai_mod::def_dai_nf90(), def_dai_mod::def_dai_pio(), def_diags_mod::def_diags_nf90(), def_diags_mod::def_diags_pio(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_mod_mod::def_mod_nf90(), def_mod_mod::def_mod_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_rst_mod::def_rst_nf90(), def_rst_mod::def_rst_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), nesting_mod::fine2coarse(), nesting_mod::get_composite(), get_data(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), mod_average::initialize_average(), initialize_ncparam(), dotproduct_mod::nl_dotproduct_tile(), normalization_mod::normalization_tile(), obs_write_mod::obs_write_nf90(), obs_write_mod::obs_write_pio(), nesting_mod::put_composite(), normalization_mod::randomization_tile(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_set_data_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), set_avg_mod::set_avg_tile(), set_data_tile(), state_join_mod::state_join_nf90(), state_join_mod::state_join_pio(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_nesting_mod::tl_fine2coarse(), tl_nesting_mod::tl_get_composite(), tl_get_data(), tl_nesting_mod::tl_put_composite(), tl_set_avg_mod::tl_set_avg_tile(), tl_set_data_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), wrt_avg_mod::wrt_avg_nf90(), wrt_avg_mod::wrt_avg_pio(), wrt_dai_mod::wrt_dai_nf90(), wrt_dai_mod::wrt_dai_pio(), wrt_diags_mod::wrt_diags_nf90(), wrt_diags_mod::wrt_diags_pio(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_ini_mod::wrt_ini_nf90(), wrt_ini_mod::wrt_ini_pio(), wrt_quick_mod::wrt_quick_nf90(), wrt_quick_mod::wrt_quick_pio(), wrt_rst_mod::wrt_rst_nf90(), wrt_rst_mod::wrt_rst_pio(), wrt_state_mod::wrt_state_nf90(), wrt_state_mod::wrt_state_pio(), wrt_station_mod::wrt_station_nf90(), and wrt_station_mod::wrt_station_pio().

◆ idghat

◆ idglat

integer mod_ncparam::idglat = -6

◆ idglon

integer mod_ncparam::idglon = -5

◆ idgtnc

integer mod_ncparam::idgtnc

Definition at line 210 of file mod_ncparam.F.

210 integer :: idgTnc ! generic tracer nudging coefficients

Referenced by get_nudgcoef_mod::get_nudgcoef_nf90(), get_nudgcoef_mod::get_nudgcoef_pio(), and initialize_ncparam().

◆ idhbbl

◆ idhsbl

◆ idhuav

◆ idhvav

◆ idhzdz

integer mod_ncparam::idhzdz

Definition at line 214 of file mod_ncparam.F.

214 integer :: idHzdz ! level thickness

Referenced by initialize_ncparam().

◆ idincr

◆ idinno

◆ idjwty

integer mod_ncparam::idjwty

Definition at line 211 of file mod_ncparam.F.

211 integer :: idJWTy ! Jerlov water type

◆ idkhor

integer mod_ncparam::idkhor

◆ idkver

integer mod_ncparam::idkver

◆ idlatp

integer mod_ncparam::idlatp

◆ idlatr

integer mod_ncparam::idlatr

◆ idlatu

integer mod_ncparam::idlatu

◆ idlatv

integer mod_ncparam::idlatv

◆ idldwn

integer mod_ncparam::idldwn

◆ idlhea

◆ idlonp

integer mod_ncparam::idlonp

◆ idlonr

integer mod_ncparam::idlonr

◆ idlonu

integer mod_ncparam::idlonu

◆ idlonv

integer mod_ncparam::idlonv

◆ idlrad

◆ idm2nc

integer mod_ncparam::idm2nc

Definition at line 239 of file mod_ncparam.F.

239 integer :: idM2nc ! 2D momentum nudging coefficients

Referenced by get_nudgcoef_mod::get_nudgcoef_nf90(), get_nudgcoef_mod::get_nudgcoef_pio(), and initialize_ncparam().

◆ idm3nc

integer mod_ncparam::idm3nc

Definition at line 240 of file mod_ncparam.F.

240 integer :: idM3nc ! 2D momentum nudging coefficients

Referenced by get_nudgcoef_mod::get_nudgcoef_nf90(), get_nudgcoef_mod::get_nudgcoef_pio(), and initialize_ncparam().

◆ idmadh

integer mod_ncparam::idmadh

Definition at line 230 of file mod_ncparam.F.

230 integer :: idMadH ! ADM interpolation weights

◆ idmomf

◆ idmomi

◆ idmskp

integer mod_ncparam::idmskp

◆ idmskr

integer mod_ncparam::idmskr

◆ idmsku

integer mod_ncparam::idmsku

◆ idmskv

integer mod_ncparam::idmskv

◆ idmtke

◆ idmtls

◆ idnlmf

integer mod_ncparam::idnlmf

◆ idnlmi

◆ idnlmo

◆ idnlmp

integer mod_ncparam::idnlmp

◆ idnlmu

◆ idnobs

◆ idobsd

◆ idobss

◆ idobst

◆ idobsx

◆ idobsy

◆ idobsz

◆ idoday

◆ idoerr

◆ idolat

integer mod_ncparam::idolat

◆ idolon

integer mod_ncparam::idolon

◆ idomet

◆ idopro

◆ idotyp

◆ idoval

◆ idovel

◆ idovil

integer mod_ncparam::idovil

Definition at line 262 of file mod_ncparam.F.

262 integer :: idOvil ! omega vertical velocity implicit

Referenced by def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), initialize_ncparam(), wrt_his_mod::wrt_his_nf90(), and wrt_his_mod::wrt_his_pio().

◆ idpair

◆ idpbar

integer mod_ncparam::idpbar

Definition at line 264 of file mod_ncparam.F.

264 integer :: idPbar ! streamfunction

◆ idpmdx

integer mod_ncparam::idpmdx

◆ idpndy

integer mod_ncparam::idpndy

◆ idpthr

◆ idpthu

◆ idpthv

◆ idpthw

◆ idpwet

◆ idqair

integer mod_ncparam::idqair

◆ idragl

◆ idragq

◆ idrain

◆ idrdir

integer mod_ncparam::idrdir

Definition at line 273 of file mod_ncparam.F.

273 integer :: idRdir ! river runoff direction

Referenced by ad_get_idata(), get_idata(), initialize_ncparam(), rp_get_idata(), and tl_get_idata().

◆ idrepo

integer mod_ncparam::idrepo

Definition at line 274 of file mod_ncparam.F.

274 integer :: idRepo ! river runoff ETA-positions

Referenced by ad_get_idata(), get_idata(), initialize_ncparam(), rp_get_idata(), and tl_get_idata().

◆ idresi

◆ idrflg

integer mod_ncparam::idrflg

Definition at line 275 of file mod_ncparam.F.

275 integer :: idRflg ! river runoff flag

Referenced by initialize_ncparam().

◆ idrtra

integer mod_ncparam::idrtra

Definition at line 276 of file mod_ncparam.F.

276 integer :: idRtra ! river runoff mass transport

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idrtrc

integer, dimension(:), allocatable mod_ncparam::idrtrc

Definition at line 446 of file mod_ncparam.F.

446 integer, allocatable :: idRtrc(:) ! river runoff for tracers

Referenced by ad_get_data(), ad_set_data_tile(), allocate_ncparam(), deallocate_ncparam(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idru2d

◆ idru3d

◆ idruct

◆ idrv2d

◆ idrv3d

◆ idrvct

◆ idrvsh

integer mod_ncparam::idrvsh

Definition at line 284 of file mod_ncparam.F.

284 integer :: idRvsh ! river runoff transport profile

Referenced by ad_get_idata(), get_idata(), initialize_ncparam(), rp_get_idata(), and tl_get_idata().

◆ idrwet

◆ idrxpo

integer mod_ncparam::idrxpo

Definition at line 283 of file mod_ncparam.F.

283 integer :: idRxpo ! river runoff XI-positions

Referenced by ad_get_idata(), mod_sources::allocate_sources(), get_idata(), initialize_ncparam(), rp_get_idata(), and tl_get_idata().

◆ idrzet

◆ idsbry

integer, dimension(:), allocatable mod_ncparam::idsbry

Definition at line 523 of file mod_ncparam.F.

523 integer, allocatable :: idSbry(:) ! state boundaries indices

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), allocate_ncparam(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), deallocate_ncparam(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), initialize_ncparam(), metrics_mod::metrics_tile(), normalization_mod::normalization_tile(), normalization_mod::randomization_tile(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_ini_mod::wrt_frc_ad_nf90(), wrt_ini_mod::wrt_frc_ad_pio(), wrt_ini_mod::wrt_frc_nf90(), wrt_ini_mod::wrt_frc_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_state_mod::wrt_state_nf90(), and wrt_state_mod::wrt_state_pio().

◆ idscor

integer mod_ncparam::idscor

◆ idscou

integer mod_ncparam::idscou

◆ idscov

integer mod_ncparam::idscov

◆ idsdif

integer mod_ncparam::idsdif

Definition at line 290 of file mod_ncparam.F.

290 integer :: idSdif ! vertical S-diffusion coefficient

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_set_avg_mod::ad_set_avg_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), mod_average::allocate_average(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), mod_average::deallocate_average(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_dai_mod::def_dai_nf90(), def_dai_mod::def_dai_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_rst_mod::def_rst_nf90(), def_rst_mod::def_rst_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), mod_average::initialize_average(), initialize_ncparam(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), set_avg_mod::set_avg_tile(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_set_avg_mod::tl_set_avg_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), wrt_avg_mod::wrt_avg_nf90(), wrt_avg_mod::wrt_avg_pio(), wrt_dai_mod::wrt_dai_nf90(), wrt_dai_mod::wrt_dai_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_ini_mod::wrt_ini_nf90(), wrt_ini_mod::wrt_ini_pio(), wrt_quick_mod::wrt_quick_nf90(), wrt_quick_mod::wrt_quick_pio(), wrt_rst_mod::wrt_rst_nf90(), wrt_rst_mod::wrt_rst_pio(), wrt_station_mod::wrt_station_nf90(), and wrt_station_mod::wrt_station_pio().

◆ idsfwf

integer mod_ncparam::idsfwf

Definition at line 300 of file mod_ncparam.F.

300 integer :: idsfwf ! surface freswater flux

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idshea

◆ idsin2

integer mod_ncparam::idsin2

Definition at line 292 of file mod_ncparam.F.

292 integer :: idSin2 ! SIN(omega(k)*t)*SIN(omega(l)*t)

Referenced by def_tides_mod::def_tides_nf90(), def_tides_mod::def_tides_pio(), get_idata(), initialize_ncparam(), wrt_tides_mod::wrt_tides_nf90(), and wrt_tides_mod::wrt_tides_pio().

◆ idsinw

integer mod_ncparam::idsinw

◆ idsize

integer mod_ncparam::idsize = -7

Definition at line 185 of file mod_ncparam.F.

185 integer :: idsize = -7 ! biological float size (length)

Referenced by def_floats_mod::def_floats_nf90(), def_floats_mod::def_floats_pio(), wrt_floats_mod::wrt_floats_nf90(), and wrt_floats_mod::wrt_floats_pio().

◆ idsrad

◆ idsshc

integer mod_ncparam::idsshc

Definition at line 294 of file mod_ncparam.F.

294 integer :: idSSHc ! SSH climatology

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idsssc

integer mod_ncparam::idsssc

Definition at line 295 of file mod_ncparam.F.

295 integer :: idSSSc ! SSS climatology

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idsstc

integer mod_ncparam::idsstc

Definition at line 296 of file mod_ncparam.F.

296 integer :: idSSTc ! SST climatology

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idsurt

integer, dimension(:), allocatable mod_ncparam::idsurt

◆ idsvar

◆ idswcw

integer mod_ncparam::idswcw

Definition at line 298 of file mod_ncparam.F.

298 integer :: idSWCW ! SIN(omega(k)*t)*COS(omega(l)*t)

Referenced by def_tides_mod::def_tides_nf90(), def_tides_mod::def_tides_pio(), get_idata(), initialize_ncparam(), wrt_tides_mod::wrt_tides_nf90(), and wrt_tides_mod::wrt_tides_pio().

◆ idswim

integer mod_ncparam::idswim = -8

Definition at line 186 of file mod_ncparam.F.

186 integer :: idswim = -8 ! biological float swimming time

Referenced by def_floats_mod::def_floats_nf90(), def_floats_mod::def_floats_pio(), wrt_floats_mod::wrt_floats_nf90(), and wrt_floats_mod::wrt_floats_pio().

◆ idtads

integer, dimension(:), allocatable mod_ncparam::idtads

Definition at line 448 of file mod_ncparam.F.

448 integer, allocatable :: idTads(:) ! tracers adjoint sentivity

Referenced by ad_get_data(), ad_set_data_tile(), allocate_ncparam(), deallocate_ncparam(), and initialize_ncparam().

◆ idtair

◆ idtbot

integer, dimension(:), allocatable mod_ncparam::idtbot

◆ idtbry

integer, dimension(:,:), allocatable mod_ncparam::idtbry

Definition at line 450 of file mod_ncparam.F.

450 integer, allocatable :: idTbry(:,:) ! tracers boundary

Referenced by ad_get_data(), ad_set_data_tile(), allocate_ncparam(), deallocate_ncparam(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idtclm

integer, dimension(:), allocatable mod_ncparam::idtclm

Definition at line 451 of file mod_ncparam.F.

451 integer, allocatable :: idTclm(:) ! tracers climatology

Referenced by ad_get_data(), ad_set_data_tile(), allocate_ncparam(), deallocate_ncparam(), get_data(), inp_par_mod::inp_par(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idtdif

integer mod_ncparam::idtdif

Definition at line 306 of file mod_ncparam.F.

306 integer :: idTdif ! vertical T-diffusion coefficient

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_set_avg_mod::ad_set_avg_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), mod_average::allocate_average(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), mod_average::deallocate_average(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_dai_mod::def_dai_nf90(), def_dai_mod::def_dai_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_rst_mod::def_rst_nf90(), def_rst_mod::def_rst_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), mod_average::initialize_average(), initialize_ncparam(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), set_avg_mod::set_avg_tile(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_set_avg_mod::tl_set_avg_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), wrt_avg_mod::wrt_avg_nf90(), wrt_avg_mod::wrt_avg_pio(), wrt_dai_mod::wrt_dai_nf90(), wrt_dai_mod::wrt_dai_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_ini_mod::wrt_ini_nf90(), wrt_ini_mod::wrt_ini_pio(), wrt_quick_mod::wrt_quick_nf90(), wrt_quick_mod::wrt_quick_pio(), wrt_rst_mod::wrt_rst_nf90(), wrt_rst_mod::wrt_rst_pio(), wrt_station_mod::wrt_station_nf90(), and wrt_station_mod::wrt_station_pio().

◆ idtime

integer mod_ncparam::idtime

Definition at line 307 of file mod_ncparam.F.

307 integer :: idtime ! ocean time

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), r4dvar_mod::analysis(), bbl_output_mod::bbl_def_nf90(), bbl_output_mod::bbl_def_pio(), bbl_output_mod::bbl_def_station_nf90(), bbl_output_mod::bbl_def_station_pio(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_dai_mod::def_dai_nf90(), def_dai_mod::def_dai_pio(), def_diags_mod::def_diags_nf90(), def_diags_mod::def_diags_pio(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_floats_mod::def_floats_nf90(), def_floats_mod::def_floats_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_impulse_mod::def_impulse_nf90(), def_impulse_mod::def_impulse_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_rst_mod::def_rst_nf90(), def_rst_mod::def_rst_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), def_tides_mod::def_tides_nf90(), def_tides_mod::def_tides_pio(), get_idata(), i4dvar_mod::increment(), r4dvar_mod::increment(), rbl4dvar_mod::increment(), initialize_ncparam(), normalization_mod::normalization_tile(), normalization_mod::randomization_tile(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), sediment_output_mod::sediment_def_nf90(), sediment_output_mod::sediment_def_pio(), sediment_output_mod::sediment_def_station_nf90(), sediment_output_mod::sediment_def_station_pio(), state_join_mod::state_join_nf90(), state_join_mod::state_join_pio(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), time_corr_mod::time_corr_nf90(), time_corr_mod::time_corr_pio(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), wrt_avg_mod::wrt_avg_nf90(), wrt_avg_mod::wrt_avg_pio(), wrt_dai_mod::wrt_dai_nf90(), wrt_dai_mod::wrt_dai_pio(), wrt_diags_mod::wrt_diags_nf90(), wrt_diags_mod::wrt_diags_pio(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_floats_mod::wrt_floats_nf90(), wrt_floats_mod::wrt_floats_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_impulse_mod::wrt_impulse_nf90(), wrt_impulse_mod::wrt_impulse_pio(), wrt_ini_mod::wrt_ini_nf90(), wrt_ini_mod::wrt_ini_pio(), wrt_quick_mod::wrt_quick_nf90(), wrt_quick_mod::wrt_quick_pio(), wrt_rst_mod::wrt_rst_nf90(), wrt_rst_mod::wrt_rst_pio(), wrt_state_mod::wrt_state_nf90(), wrt_state_mod::wrt_state_pio(), wrt_station_mod::wrt_station_nf90(), wrt_station_mod::wrt_station_pio(), wrt_tides_mod::wrt_tides_nf90(), and wrt_tides_mod::wrt_tides_pio().

◆ idtlmo

◆ idtnud

integer, dimension(:), allocatable mod_ncparam::idtnud

Definition at line 452 of file mod_ncparam.F.

452 integer, allocatable :: idTnud(:) ! tracers nudge coefficient

Referenced by allocate_ncparam(), deallocate_ncparam(), get_nudgcoef_mod::get_nudgcoef_nf90(), get_nudgcoef_mod::get_nudgcoef_pio(), and inp_par_mod::inp_par().

◆ idtopo

integer mod_ncparam::idtopo

◆ idtper

◆ idtrcd

◆ idtrch

integer, dimension(:), allocatable mod_ncparam::idtrch

◆ idtref

integer mod_ncparam::idtref

Definition at line 309 of file mod_ncparam.F.

309 integer :: idTref ! tidal reference date for zero phase

Referenced by initialize_ncparam().

◆ idtsur

integer, dimension(:), allocatable mod_ncparam::idtsur

Definition at line 453 of file mod_ncparam.F.

453 integer, allocatable :: idTsur(:) ! surface flux for tracers

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_get_data(), ad_pack_tile(), ad_set_avg_mod::ad_set_avg_tile(), ad_set_data_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), mod_average::allocate_average(), allocate_ncparam(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), mod_average::deallocate_average(), deallocate_ncparam(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), get_data(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), mod_average::initialize_average(), initialize_ncparam(), inp_par_mod::inp_par(), normalization_mod::normalization_tile(), normalization_mod::randomization_tile(), cmeps_roms_mod::roms_import(), esmf_roms_mod::roms_import(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_set_data_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), set_avg_mod::set_avg_tile(), set_data_tile(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_get_data(), tl_set_avg_mod::tl_set_avg_tile(), tl_set_data_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), wrt_avg_mod::wrt_avg_nf90(), wrt_avg_mod::wrt_avg_pio(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_ini_mod::wrt_frc_ad_nf90(), wrt_ini_mod::wrt_frc_ad_pio(), wrt_ini_mod::wrt_frc_nf90(), wrt_ini_mod::wrt_frc_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_quick_mod::wrt_quick_nf90(), wrt_quick_mod::wrt_quick_pio(), wrt_state_mod::wrt_state_nf90(), wrt_state_mod::wrt_state_pio(), wrt_station_mod::wrt_station_nf90(), and wrt_station_mod::wrt_station_pio().

◆ idttav

◆ idttlf

◆ idtvan

integer mod_ncparam::idtvan

Definition at line 311 of file mod_ncparam.F.

311 integer :: idTvan ! tidal current angle

Referenced by ad_get_idata(), get_idata(), initialize_ncparam(), rp_get_idata(), and tl_get_idata().

◆ idtvar

integer, dimension(:), allocatable mod_ncparam::idtvar

Definition at line 568 of file mod_ncparam.F.

568 integer, allocatable :: idTvar(:) ! tracers variables

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_nesting_mod::ad_fine2coarse(), ad_nesting_mod::ad_get_composite(), ad_get_data(), ad_nesting_mod::ad_get_refine(), ad_nesting_mod::ad_put_composite(), ad_set_avg_mod::ad_set_avg_tile(), ad_set_data_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), mod_average::allocate_average(), allocate_ncparam(), analytical_mod::ana_biology_tile(), analytical_mod::ana_nlminitial_tile(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), mod_average::deallocate_average(), deallocate_ncparam(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_dai_mod::def_dai_nf90(), def_dai_mod::def_dai_pio(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_floats_mod::def_floats_nf90(), def_floats_mod::def_floats_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_rst_mod::def_rst_nf90(), def_rst_mod::def_rst_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), nesting_mod::fine2coarse(), nesting_mod::get_composite(), get_data(), nesting_mod::get_refine(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), mod_average::initialize_average(), initialize_ncparam(), inp_par_mod::inp_par(), normalization_mod::normalization_tile(), nesting_mod::put_composite(), normalization_mod::randomization_tile(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_set_data_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), set_avg_mod::set_avg_tile(), set_data_tile(), state_join_mod::state_join_nf90(), state_join_mod::state_join_pio(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), tadv_mod::tadv_putatt::tadv_putatt_nf90(), tadv_mod::tadv_putatt::tadv_putatt_pio(), tadv_mod::tadv_report(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_nesting_mod::tl_fine2coarse(), tl_nesting_mod::tl_get_composite(), tl_get_data(), tl_nesting_mod::tl_get_refine(), tl_nesting_mod::tl_put_composite(), tl_set_avg_mod::tl_set_avg_tile(), tl_set_data_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), wrt_avg_mod::wrt_avg_nf90(), wrt_avg_mod::wrt_avg_pio(), wrt_dai_mod::wrt_dai_nf90(), wrt_dai_mod::wrt_dai_pio(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_floats_mod::wrt_floats_nf90(), wrt_floats_mod::wrt_floats_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_ini_mod::wrt_ini_nf90(), wrt_ini_mod::wrt_ini_pio(), wrt_quick_mod::wrt_quick_nf90(), wrt_quick_mod::wrt_quick_pio(), wrt_rst_mod::wrt_rst_nf90(), wrt_rst_mod::wrt_rst_pio(), wrt_state_mod::wrt_state_nf90(), wrt_state_mod::wrt_state_pio(), wrt_station_mod::wrt_station_nf90(), and wrt_station_mod::wrt_station_pio().

◆ idtvma

integer mod_ncparam::idtvma

Definition at line 312 of file mod_ncparam.F.

312 integer :: idTvma ! maximum tidal current

Referenced by ad_get_idata(), get_idata(), initialize_ncparam(), rp_get_idata(), and tl_get_idata().

◆ idtvmi

integer mod_ncparam::idtvmi

Definition at line 313 of file mod_ncparam.F.

313 integer :: idTvmi ! minimum tidal current

Referenced by ad_get_idata(), get_idata(), initialize_ncparam(), rp_get_idata(), and tl_get_idata().

◆ idtvph

integer mod_ncparam::idtvph

Definition at line 314 of file mod_ncparam.F.

314 integer :: idTvph ! tidal current phase

Referenced by ad_get_idata(), get_idata(), initialize_ncparam(), rp_get_idata(), and tl_get_idata().

◆ idtzam

integer mod_ncparam::idtzam

Definition at line 315 of file mod_ncparam.F.

315 integer :: idTzam ! tidal elevation amplitude

Referenced by ad_get_idata(), get_idata(), initialize_ncparam(), rp_get_idata(), and tl_get_idata().

◆ idtzph

integer mod_ncparam::idtzph

Definition at line 316 of file mod_ncparam.F.

316 integer :: idTzph ! tidal elevation phase

Referenced by ad_get_idata(), get_idata(), initialize_ncparam(), rp_get_idata(), and tl_get_idata().

◆ idu2av

◆ idu2bc

integer, dimension(4) mod_ncparam::idu2bc

Definition at line 458 of file mod_ncparam.F.

458 integer :: idU2bc(4) ! 2D U-velocity boundary conditions

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idu2da

integer mod_ncparam::idu2da

Definition at line 317 of file mod_ncparam.F.

317 integer :: idu2dA ! accumulated 2D U-velocity

◆ idu2dd

◆ idu2de

◆ idu2dh

integer mod_ncparam::idu2dh

Definition at line 348 of file mod_ncparam.F.

348 integer :: idu2dH ! 2D U-velocity tide harmonics

Referenced by def_tides_mod::def_tides_nf90(), def_tides_mod::def_tides_pio(), get_idata(), initialize_ncparam(), wrt_tides_mod::wrt_tides_nf90(), and wrt_tides_mod::wrt_tides_pio().

◆ idu2rs

integer mod_ncparam::idu2rs

Definition at line 318 of file mod_ncparam.F.

318 integer :: idU2rs ! 2D total U-radiation stress

Referenced by mod_average::allocate_average(), mod_average::deallocate_average(), mod_average::initialize_average(), initialize_ncparam(), and set_avg_mod::set_avg_tile().

◆ idu2sd

◆ idu3bc

integer, dimension(4) mod_ncparam::idu3bc

Definition at line 459 of file mod_ncparam.F.

459 integer :: idU3bc(4) ! 3D U-velocity boundary conditions

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idu3dd

◆ idu3de

◆ idu3dh

integer mod_ncparam::idu3dh

Definition at line 351 of file mod_ncparam.F.

351 integer :: idu3dH ! 3D U-velocity tide harmonics

Referenced by def_tides_mod::def_tides_nf90(), def_tides_mod::def_tides_pio(), get_idata(), initialize_ncparam(), wrt_tides_mod::wrt_tides_nf90(), and wrt_tides_mod::wrt_tides_pio().

◆ idu3rs

integer mod_ncparam::idu3rs

Definition at line 319 of file mod_ncparam.F.

319 integer :: idU3rs ! 3D total U-radiation stress

Referenced by mod_average::allocate_average(), mod_average::deallocate_average(), mod_average::initialize_average(), initialize_ncparam(), and set_avg_mod::set_avg_tile().

◆ idu3sd

◆ iduads

integer mod_ncparam::iduads

Definition at line 322 of file mod_ncparam.F.

322 integer :: idUads ! 3D U-velocity adjoint sensitivity

Referenced by ad_get_data(), ad_set_data_tile(), and initialize_ncparam().

◆ iduaie

◆ iduair

◆ idubar

integer mod_ncparam::idubar

Definition at line 325 of file mod_ncparam.F.

325 integer :: idUbar ! 2D U-velocity

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_nesting_mod::ad_fine2coarse(), ad_nesting_mod::ad_get_composite(), ad_get_data(), ad_nesting_mod::ad_get_refine(), ad_pack_tile(), ad_nesting_mod::ad_put_composite(), ad_set_avg_mod::ad_set_avg_tile(), ad_set_data_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), mod_average::allocate_average(), analytical_mod::ana_nlminitial_tile(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), mod_average::deallocate_average(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_dai_mod::def_dai_nf90(), def_dai_mod::def_dai_pio(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_rst_mod::def_rst_nf90(), def_rst_mod::def_rst_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), nesting_mod::fine2coarse(), nesting_mod::get_composite(), get_data(), nesting_mod::get_refine(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), mod_average::initialize_average(), initialize_ncparam(), normalization_mod::normalization_tile(), nesting_mod::put_composite(), normalization_mod::randomization_tile(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_set_data_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), set_avg_mod::set_avg_tile(), set_data_tile(), state_join_mod::state_join_nf90(), state_join_mod::state_join_pio(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_nesting_mod::tl_fine2coarse(), tl_nesting_mod::tl_get_composite(), tl_get_data(), tl_nesting_mod::tl_get_refine(), tl_nesting_mod::tl_put_composite(), tl_set_avg_mod::tl_set_avg_tile(), tl_set_data_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), wrt_avg_mod::wrt_avg_nf90(), wrt_avg_mod::wrt_avg_pio(), wrt_dai_mod::wrt_dai_nf90(), wrt_dai_mod::wrt_dai_pio(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_ini_mod::wrt_ini_nf90(), wrt_ini_mod::wrt_ini_pio(), wrt_quick_mod::wrt_quick_nf90(), wrt_quick_mod::wrt_quick_pio(), wrt_rst_mod::wrt_rst_nf90(), wrt_rst_mod::wrt_rst_pio(), wrt_state_mod::wrt_state_nf90(), wrt_state_mod::wrt_state_pio(), wrt_station_mod::wrt_station_nf90(), and wrt_station_mod::wrt_station_pio().

◆ idubas

integer mod_ncparam::idubas

Definition at line 326 of file mod_ncparam.F.

326 integer :: idUbas ! 2D U-velocity adjoint sensitivity

Referenced by ad_get_data(), ad_set_data_tile(), and initialize_ncparam().

◆ idubcl

integer mod_ncparam::idubcl

Definition at line 327 of file mod_ncparam.F.

327 integer :: idUbcl ! 2D U-velocity climatology

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idubcs

◆ idubed

integer mod_ncparam::idubed

Definition at line 329 of file mod_ncparam.F.

329 integer :: idUbed ! bed load U-direction

◆ idubms

◆ idubot

◆ idubrs

◆ idubtf

◆ idubur

◆ idubws

◆ iduclm

integer mod_ncparam::iduclm

Definition at line 336 of file mod_ncparam.F.

336 integer :: idUclm ! 3D U-velocity climatology

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idufx1

◆ idufx2

◆ idusms

integer mod_ncparam::idusms

Definition at line 339 of file mod_ncparam.F.

339 integer :: idUsms ! surface U-momentum stress

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_get_data(), ad_pack_tile(), ad_set_avg_mod::ad_set_avg_tile(), ad_set_data_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), mod_average::allocate_average(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), mod_average::deallocate_average(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), get_data(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), mod_average::initialize_average(), initialize_ncparam(), inp_par_mod::inp_par(), normalization_mod::normalization_tile(), normalization_mod::randomization_tile(), cmeps_roms_mod::roms_import(), esmf_roms_mod::roms_import(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_set_data_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), set_avg_mod::set_avg_tile(), set_data_tile(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_get_data(), tl_set_avg_mod::tl_set_avg_tile(), tl_set_data_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), wrt_avg_mod::wrt_avg_nf90(), wrt_avg_mod::wrt_avg_pio(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_ini_mod::wrt_frc_ad_nf90(), wrt_ini_mod::wrt_frc_ad_pio(), wrt_ini_mod::wrt_frc_nf90(), wrt_ini_mod::wrt_frc_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_quick_mod::wrt_quick_nf90(), wrt_quick_mod::wrt_quick_pio(), wrt_state_mod::wrt_state_nf90(), wrt_state_mod::wrt_state_pio(), wrt_station_mod::wrt_station_nf90(), and wrt_station_mod::wrt_station_pio().

◆ idusue

integer mod_ncparam::idusue

Definition at line 340 of file mod_ncparam.F.

340 integer :: idUsuE ! model surface eastward velocity

Referenced by def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), initialize_ncparam(), wrt_quick_mod::wrt_quick_nf90(), and wrt_quick_mod::wrt_quick_pio().

◆ idusur

integer mod_ncparam::idusur

◆ idutav

◆ idutlf

◆ iduuav

◆ iduvav

◆ iduvel

integer mod_ncparam::iduvel

Definition at line 343 of file mod_ncparam.F.

343 integer :: idUvel ! 3D U-velocity

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_nesting_mod::ad_fine2coarse(), ad_nesting_mod::ad_get_composite(), ad_get_data(), ad_nesting_mod::ad_get_refine(), ad_pack_tile(), ad_nesting_mod::ad_put_composite(), ad_set_avg_mod::ad_set_avg_tile(), ad_set_data_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), mod_average::allocate_average(), analytical_mod::ana_nlminitial_tile(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), mod_average::deallocate_average(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_dai_mod::def_dai_nf90(), def_dai_mod::def_dai_pio(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_rst_mod::def_rst_nf90(), def_rst_mod::def_rst_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), nesting_mod::fine2coarse(), nesting_mod::get_composite(), get_data(), nesting_mod::get_refine(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), mod_average::initialize_average(), initialize_ncparam(), normalization_mod::normalization_tile(), nesting_mod::put_composite(), normalization_mod::randomization_tile(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_set_data_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), set_avg_mod::set_avg_tile(), set_data_tile(), state_join_mod::state_join_nf90(), state_join_mod::state_join_pio(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_nesting_mod::tl_fine2coarse(), tl_nesting_mod::tl_get_composite(), tl_get_data(), tl_nesting_mod::tl_get_refine(), tl_nesting_mod::tl_put_composite(), tl_set_avg_mod::tl_set_avg_tile(), tl_set_data_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), wrt_avg_mod::wrt_avg_nf90(), wrt_avg_mod::wrt_avg_pio(), wrt_dai_mod::wrt_dai_nf90(), wrt_dai_mod::wrt_dai_pio(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_ini_mod::wrt_ini_nf90(), wrt_ini_mod::wrt_ini_pio(), wrt_quick_mod::wrt_quick_nf90(), wrt_quick_mod::wrt_quick_pio(), wrt_rst_mod::wrt_rst_nf90(), wrt_rst_mod::wrt_rst_pio(), wrt_state_mod::wrt_state_nf90(), wrt_state_mod::wrt_state_pio(), wrt_station_mod::wrt_station_nf90(), and wrt_station_mod::wrt_station_pio().

◆ iduvwc

◆ iduwav

◆ iduwet

◆ idv2av

◆ idv2bc

integer, dimension(4) mod_ncparam::idv2bc

Definition at line 460 of file mod_ncparam.F.

460 integer :: idV2bc(4) ! 2D V-velocity boundary conditions

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idv2dd

◆ idv2dh

integer mod_ncparam::idv2dh

Definition at line 386 of file mod_ncparam.F.

386 integer :: idv2dH ! 2D U-velocity tide harmonics

Referenced by def_tides_mod::def_tides_nf90(), def_tides_mod::def_tides_pio(), get_idata(), initialize_ncparam(), wrt_tides_mod::wrt_tides_nf90(), and wrt_tides_mod::wrt_tides_pio().

◆ idv2dn

◆ idv2rs

integer mod_ncparam::idv2rs

◆ idv2sd

◆ idv3bc

integer, dimension(4) mod_ncparam::idv3bc

Definition at line 461 of file mod_ncparam.F.

461 integer :: idV3bc(4) ! 3D V-velocity boundary conditions

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idv3dd

◆ idv3dh

integer mod_ncparam::idv3dh

Definition at line 389 of file mod_ncparam.F.

389 integer :: idv3dH ! 3D U-velocity tide harmonics

Referenced by def_tides_mod::def_tides_nf90(), def_tides_mod::def_tides_pio(), get_idata(), initialize_ncparam(), wrt_tides_mod::wrt_tides_nf90(), and wrt_tides_mod::wrt_tides_pio().

◆ idv3dn

◆ idv3rs

integer mod_ncparam::idv3rs

Definition at line 354 of file mod_ncparam.F.

354 integer :: idV3rs ! 3D total V-radiation stress

Referenced by mod_average::allocate_average(), mod_average::deallocate_average(), mod_average::initialize_average(), initialize_ncparam(), and set_avg_mod::set_avg_tile().

◆ idv3sd

◆ idvads

integer mod_ncparam::idvads

Definition at line 357 of file mod_ncparam.F.

357 integer :: idVads ! 3D V-velocity adjoint sensitivity

Referenced by ad_get_data(), ad_set_data_tile(), and initialize_ncparam().

◆ idvain

◆ idvair

◆ idvbar

integer mod_ncparam::idvbar

Definition at line 360 of file mod_ncparam.F.

360 integer :: idVbar ! 2D V-velocity

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_nesting_mod::ad_fine2coarse(), ad_nesting_mod::ad_get_composite(), ad_get_data(), ad_nesting_mod::ad_get_refine(), ad_pack_tile(), ad_nesting_mod::ad_put_composite(), ad_set_avg_mod::ad_set_avg_tile(), ad_set_data_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), mod_average::allocate_average(), analytical_mod::ana_nlminitial_tile(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), mod_average::deallocate_average(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_dai_mod::def_dai_nf90(), def_dai_mod::def_dai_pio(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_rst_mod::def_rst_nf90(), def_rst_mod::def_rst_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), nesting_mod::fine2coarse(), nesting_mod::get_composite(), get_data(), nesting_mod::get_refine(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), mod_average::initialize_average(), initialize_ncparam(), normalization_mod::normalization_tile(), nesting_mod::put_composite(), normalization_mod::randomization_tile(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_set_data_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), set_avg_mod::set_avg_tile(), set_data_tile(), state_join_mod::state_join_nf90(), state_join_mod::state_join_pio(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_nesting_mod::tl_fine2coarse(), tl_nesting_mod::tl_get_composite(), tl_get_data(), tl_nesting_mod::tl_get_refine(), tl_nesting_mod::tl_put_composite(), tl_set_avg_mod::tl_set_avg_tile(), tl_set_data_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), wrt_avg_mod::wrt_avg_nf90(), wrt_avg_mod::wrt_avg_pio(), wrt_dai_mod::wrt_dai_nf90(), wrt_dai_mod::wrt_dai_pio(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_ini_mod::wrt_ini_nf90(), wrt_ini_mod::wrt_ini_pio(), wrt_quick_mod::wrt_quick_nf90(), wrt_quick_mod::wrt_quick_pio(), wrt_rst_mod::wrt_rst_nf90(), wrt_rst_mod::wrt_rst_pio(), wrt_state_mod::wrt_state_nf90(), wrt_state_mod::wrt_state_pio(), wrt_station_mod::wrt_station_nf90(), and wrt_station_mod::wrt_station_pio().

◆ idvbas

integer mod_ncparam::idvbas

Definition at line 361 of file mod_ncparam.F.

361 integer :: idVbas ! 2D V-velocity adjoint sensitivity

Referenced by ad_get_data(), ad_set_data_tile(), and initialize_ncparam().

◆ idvbcl

integer mod_ncparam::idvbcl

Definition at line 362 of file mod_ncparam.F.

362 integer :: idVbcl ! 2D V-velocity climatology

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idvbcs

◆ idvbed

integer mod_ncparam::idvbed

Definition at line 364 of file mod_ncparam.F.

364 integer :: idVbed ! bed load V-direction

◆ idvbms

◆ idvbot

◆ idvbrs

◆ idvbtf

◆ idvbvr

◆ idvbws

◆ idvclm

integer mod_ncparam::idvclm

Definition at line 371 of file mod_ncparam.F.

371 integer :: idVclm ! 3D V-velocity climatology

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idvfx1

◆ idvfx2

◆ idvmkk

◆ idvmkp

◆ idvmls

◆ idvsms

integer mod_ncparam::idvsms

Definition at line 377 of file mod_ncparam.F.

377 integer :: idVsms ! surface V-momentum stress

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_get_data(), ad_pack_tile(), ad_set_avg_mod::ad_set_avg_tile(), ad_set_data_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), mod_average::allocate_average(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), mod_average::deallocate_average(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), get_data(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), mod_average::initialize_average(), initialize_ncparam(), inp_par_mod::inp_par(), normalization_mod::normalization_tile(), normalization_mod::randomization_tile(), cmeps_roms_mod::roms_import(), esmf_roms_mod::roms_import(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_set_data_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), set_avg_mod::set_avg_tile(), set_data_tile(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_get_data(), tl_set_avg_mod::tl_set_avg_tile(), tl_set_data_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), wrt_avg_mod::wrt_avg_nf90(), wrt_avg_mod::wrt_avg_pio(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_ini_mod::wrt_frc_ad_nf90(), wrt_ini_mod::wrt_frc_ad_pio(), wrt_ini_mod::wrt_frc_nf90(), wrt_ini_mod::wrt_frc_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_quick_mod::wrt_quick_nf90(), wrt_quick_mod::wrt_quick_pio(), wrt_state_mod::wrt_state_nf90(), wrt_state_mod::wrt_state_pio(), wrt_station_mod::wrt_station_nf90(), and wrt_station_mod::wrt_station_pio().

◆ idvsun

integer mod_ncparam::idvsun

Definition at line 378 of file mod_ncparam.F.

378 integer :: idVsuN ! model surface northward velocity

Referenced by def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), initialize_ncparam(), wrt_quick_mod::wrt_quick_nf90(), and wrt_quick_mod::wrt_quick_pio().

◆ idvsur

integer mod_ncparam::idvsur

◆ idvtav

◆ idvtlf

◆ idvvav

◆ idvvel

integer mod_ncparam::idvvel

Definition at line 381 of file mod_ncparam.F.

381 integer :: idVvel ! 3D V-velocity

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_nesting_mod::ad_fine2coarse(), ad_nesting_mod::ad_get_composite(), ad_get_data(), ad_nesting_mod::ad_get_refine(), ad_pack_tile(), ad_nesting_mod::ad_put_composite(), ad_set_avg_mod::ad_set_avg_tile(), ad_set_data_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), mod_average::allocate_average(), analytical_mod::ana_nlminitial_tile(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), mod_average::deallocate_average(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_dai_mod::def_dai_nf90(), def_dai_mod::def_dai_pio(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_rst_mod::def_rst_nf90(), def_rst_mod::def_rst_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), nesting_mod::fine2coarse(), nesting_mod::get_composite(), get_data(), nesting_mod::get_refine(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), mod_average::initialize_average(), initialize_ncparam(), normalization_mod::normalization_tile(), nesting_mod::put_composite(), normalization_mod::randomization_tile(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_set_data_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), set_avg_mod::set_avg_tile(), set_data_tile(), state_join_mod::state_join_nf90(), state_join_mod::state_join_pio(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_nesting_mod::tl_fine2coarse(), tl_nesting_mod::tl_get_composite(), tl_get_data(), tl_nesting_mod::tl_get_refine(), tl_nesting_mod::tl_put_composite(), tl_set_avg_mod::tl_set_avg_tile(), tl_set_data_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), wrt_avg_mod::wrt_avg_nf90(), wrt_avg_mod::wrt_avg_pio(), wrt_dai_mod::wrt_dai_nf90(), wrt_dai_mod::wrt_dai_pio(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_ini_mod::wrt_ini_nf90(), wrt_ini_mod::wrt_ini_pio(), wrt_quick_mod::wrt_quick_nf90(), wrt_quick_mod::wrt_quick_pio(), wrt_rst_mod::wrt_rst_nf90(), wrt_rst_mod::wrt_rst_pio(), wrt_state_mod::wrt_state_nf90(), wrt_state_mod::wrt_state_pio(), wrt_station_mod::wrt_station_nf90(), and wrt_station_mod::wrt_station_pio().

◆ idvvis

integer mod_ncparam::idvvis

Definition at line 382 of file mod_ncparam.F.

382 integer :: idVvis ! vertical viscosity coefficient

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_get_data(), ad_set_avg_mod::ad_set_avg_tile(), ad_set_data_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), mod_average::allocate_average(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), mod_average::deallocate_average(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_dai_mod::def_dai_nf90(), def_dai_mod::def_dai_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_rst_mod::def_rst_nf90(), def_rst_mod::def_rst_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), mod_average::initialize_average(), initialize_ncparam(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_set_data_tile(), set_avg_mod::set_avg_tile(), state_join_mod::state_join_nf90(), state_join_mod::state_join_pio(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_get_data(), tl_set_avg_mod::tl_set_avg_tile(), tl_set_data_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), wrt_avg_mod::wrt_avg_nf90(), wrt_avg_mod::wrt_avg_pio(), wrt_dai_mod::wrt_dai_nf90(), wrt_dai_mod::wrt_dai_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_ini_mod::wrt_ini_nf90(), wrt_ini_mod::wrt_ini_pio(), wrt_quick_mod::wrt_quick_nf90(), wrt_quick_mod::wrt_quick_pio(), wrt_rst_mod::wrt_rst_nf90(), wrt_rst_mod::wrt_rst_pio(), wrt_station_mod::wrt_station_nf90(), and wrt_station_mod::wrt_station_pio().

◆ idvwav

◆ idvwet

◆ idw2xx

integer mod_ncparam::idw2xx

Definition at line 393 of file mod_ncparam.F.

393 integer :: idW2xx ! 2D radiation stress, Sxx-component

Referenced by initialize_ncparam().

◆ idw2xy

integer mod_ncparam::idw2xy

Definition at line 394 of file mod_ncparam.F.

394 integer :: idW2xy ! 2D radiation stress, Sxy-component

Referenced by initialize_ncparam().

◆ idw2yy

integer mod_ncparam::idw2yy

Definition at line 395 of file mod_ncparam.F.

395 integer :: idW2yy ! 2D radiation stress, Syy-component

Referenced by initialize_ncparam().

◆ idw3sd

integer mod_ncparam::idw3sd

Definition at line 391 of file mod_ncparam.F.

391 integer :: idW3Sd ! 3D W-Stokes omega drift velocity

Referenced by mod_average::allocate_average(), mod_average::deallocate_average(), mod_average::initialize_average(), initialize_ncparam(), and set_avg_mod::set_avg_tile().

◆ idw3st

integer mod_ncparam::idw3st

Definition at line 392 of file mod_ncparam.F.

392 integer :: idW3St ! 3D W-Stokes vertical drift velocity

Referenced by mod_average::allocate_average(), mod_average::deallocate_average(), mod_average::initialize_average(), initialize_ncparam(), and set_avg_mod::set_avg_tile().

◆ idw3xx

integer mod_ncparam::idw3xx

Definition at line 396 of file mod_ncparam.F.

396 integer :: idW3xx ! 3D radiation stress, Sxx-component

Referenced by initialize_ncparam().

◆ idw3xy

integer mod_ncparam::idw3xy

Definition at line 397 of file mod_ncparam.F.

397 integer :: idW3xy ! 3D radiation stress, Sxy-component

Referenced by initialize_ncparam().

◆ idw3yy

integer mod_ncparam::idw3yy

Definition at line 398 of file mod_ncparam.F.

398 integer :: idW3yy ! 3D radiation stress, Syy-component

Referenced by initialize_ncparam().

◆ idw3zx

integer mod_ncparam::idw3zx

Definition at line 399 of file mod_ncparam.F.

399 integer :: idW3zx ! 3D radiation stress, Szx-component

Referenced by initialize_ncparam().

◆ idw3zy

integer mod_ncparam::idw3zy

Definition at line 400 of file mod_ncparam.F.

400 integer :: idW3zy ! 3D radiation stress, Szy-component

Referenced by initialize_ncparam().

◆ idwads

integer mod_ncparam::idwads

Definition at line 401 of file mod_ncparam.F.

401 integer :: idWads ! 3D W-velocity adjoint sensitivity

Referenced by ad_get_data(), ad_set_data_tile(), and initialize_ncparam().

◆ idwam2

◆ idwamp

◆ idwbeh

integer mod_ncparam::idwbeh

◆ idwbio

integer mod_ncparam::idwbio = -9

Definition at line 187 of file mod_ncparam.F.

187 integer :: idwbio = -9 ! biological float w-velocity

Referenced by def_floats_mod::def_floats_nf90(), def_floats_mod::def_floats_pio(), wrt_floats_mod::wrt_floats_nf90(), and wrt_floats_mod::wrt_floats_pio().

◆ idwbrk

◆ idwdib

integer mod_ncparam::idwdib

Definition at line 406 of file mod_ncparam.F.

406 integer :: idWdib ! wave dissipation from surface breaking

Referenced by mod_average::allocate_average(), mod_average::deallocate_average(), get_data(), mod_average::initialize_average(), initialize_ncparam(), set_avg_mod::set_avg_tile(), and set_data_tile().

◆ idwdif

integer mod_ncparam::idwdif

Definition at line 407 of file mod_ncparam.F.

407 integer :: idWdif ! wave dissipation from bottom friction

Referenced by mod_average::allocate_average(), mod_average::deallocate_average(), mod_average::initialize_average(), initialize_ncparam(), and set_avg_mod::set_avg_tile().

◆ idwdip

◆ idwdir

◆ idwdis

◆ idwdiw

integer mod_ncparam::idwdiw

◆ idwlen

◆ idwlep

◆ idwmsk

integer mod_ncparam::idwmsk

Definition at line 414 of file mod_ncparam.F.

414 integer :: idWmsk ! wet-dry mask

◆ idworb

◆ idwpbt

◆ idwptp

◆ idwqsp

integer mod_ncparam::idwqsp

Definition at line 418 of file mod_ncparam.F.

418 integer :: idWqsp ! wec quasi-static pressure

Referenced by mod_average::allocate_average(), mod_average::deallocate_average(), mod_average::initialize_average(), initialize_ncparam(), and set_avg_mod::set_avg_tile().

◆ idwrol

integer mod_ncparam::idwrol

Definition at line 419 of file mod_ncparam.F.

419 integer :: idWrol ! wave roller action density

Referenced by mod_average::allocate_average(), mod_average::deallocate_average(), mod_average::initialize_average(), initialize_ncparam(), and set_avg_mod::set_avg_tile().

◆ idwsin

integer mod_ncparam::idwsin = -10

Definition at line 188 of file mod_ncparam.F.

188 integer :: idwsin = -10 ! biological float sinking velocity

Referenced by def_floats_mod::def_floats_nf90(), def_floats_mod::def_floats_pio(), wrt_floats_mod::wrt_floats_nf90(), and wrt_floats_mod::wrt_floats_pio().

◆ idwvds

◆ idwvel

◆ idwvqp

◆ idwztw

integer mod_ncparam::idwztw

Definition at line 423 of file mod_ncparam.F.

423 integer :: idWztw ! wec quasi-static sea level adjustment

Referenced by mod_average::allocate_average(), mod_average::deallocate_average(), mod_average::initialize_average(), initialize_ncparam(), and set_avg_mod::set_avg_tile().

◆ idxgrd

integer mod_ncparam::idxgrd = -1

Definition at line 174 of file mod_ncparam.F.

174 integer :: idXgrd = -1 ! XI-grid position

Referenced by def_floats_mod::def_floats_nf90(), def_floats_mod::def_floats_pio(), wrt_floats_mod::wrt_floats_nf90(), and wrt_floats_mod::wrt_floats_pio().

◆ idxgrp

integer mod_ncparam::idxgrp

◆ idxgrr

integer mod_ncparam::idxgrr

◆ idxgru

integer mod_ncparam::idxgru

◆ idxgrv

integer mod_ncparam::idxgrv

◆ idygrd

integer mod_ncparam::idygrd = -2

Definition at line 175 of file mod_ncparam.F.

175 integer :: idYgrd = -2 ! ETA-grid position

Referenced by def_floats_mod::def_floats_nf90(), def_floats_mod::def_floats_pio(), wrt_floats_mod::wrt_floats_nf90(), and wrt_floats_mod::wrt_floats_pio().

◆ idygrp

integer mod_ncparam::idygrp

◆ idygrr

integer mod_ncparam::idygrr

◆ idygru

integer mod_ncparam::idygru

◆ idygrv

integer mod_ncparam::idygrv

◆ idzads

integer mod_ncparam::idzads

Definition at line 433 of file mod_ncparam.F.

433 integer :: idZads ! Free-surface adjoint sensitivity

Referenced by ad_get_data(), ad_set_data_tile(), and initialize_ncparam().

◆ idzbry

integer, dimension(4) mod_ncparam::idzbry

Definition at line 462 of file mod_ncparam.F.

462 integer :: idZbry(4) ! free-surface boundary conditions

Referenced by ad_get_data(), ad_set_data_tile(), get_data(), initialize_ncparam(), rp_get_data(), rp_set_data_tile(), set_data_tile(), tl_get_data(), and tl_set_data_tile().

◆ idzgrd

integer mod_ncparam::idzgrd = -3

Definition at line 176 of file mod_ncparam.F.

176 integer :: idZgrd = -3 ! S-grid position

Referenced by def_floats_mod::def_floats_nf90(), def_floats_mod::def_floats_pio(), wrt_floats_mod::wrt_floats_nf90(), and wrt_floats_mod::wrt_floats_pio().

◆ idzobl

◆ idztlf

◆ idzzav

◆ ihutav

◆ ihvtav

◆ iinfo

integer, dimension(:,:,:), allocatable mod_ncparam::iinfo

Definition at line 578 of file mod_ncparam.F.

578 integer, allocatable :: Iinfo(:,:,:)

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_set_data_tile(), allocate_ncparam(), bbl_output_mod::bbl_def_nf90(), bbl_output_mod::bbl_def_pio(), check_multifile(), deallocate_ncparam(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_dai_mod::def_dai_nf90(), def_dai_mod::def_dai_pio(), def_diags_mod::def_diags_nf90(), def_diags_mod::def_diags_pio(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_impulse_mod::def_impulse_nf90(), def_impulse_mod::def_impulse_pio(), def_info_mod::def_info::def_info_nf90(), def_info_mod::def_info::def_info_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_rst_mod::def_rst_nf90(), def_rst_mod::def_rst_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), def_tides_mod::def_tides_nf90(), def_tides_mod::def_tides_pio(), get_2dfld_nf90(), get_2dfld_pio(), get_2dfldr_nf90(), get_2dfldr_pio(), get_3dfld_nf90(), get_3dfld_pio(), get_3dfldr_nf90(), get_3dfldr_pio(), get_ngfld_nf90(), get_ngfld_pio(), get_ngfldr_nf90(), get_ngfldr_pio(), initialize_ncparam(), inp_par_mod::inp_par(), inquiry_mod::inquiry::inquiry_nf90(), inquiry_mod::inquiry::inquiry_pio(), cmeps_roms_mod::roms_import(), esmf_roms_mod::roms_import(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_set_data_tile(), sediment_output_mod::sediment_def_nf90(), sediment_output_mod::sediment_def_pio(), set_2dfld_mod::set_2dfld_tile(), set_2dfldr_mod::set_2dfldr_tile(), set_3dfld_mod::set_3dfld_tile(), set_3dfldr_mod::set_3dfldr_tile(), set_data_tile(), set_ngfld(), set_ngfldr(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_set_data_tile(), normalization_mod::wrt_norm2d_nf90(), and normalization_mod::wrt_norm3d_nf90().

◆ inp_lib

integer mod_ncparam::inp_lib

Definition at line 98 of file mod_ncparam.F.

98 integer :: inp_lib ! input NetCDF library

◆ io_nf90

integer, parameter mod_ncparam::io_nf90 = 1

Definition at line 95 of file mod_ncparam.F.

95 integer, parameter :: io_nf90 = 1 ! standard NetCDF-3, NetCDF-4

Referenced by ad_def_his_mod::ad_def_his(), ad_pack_tile(), ad_wrt_his_mod::ad_wrt_his(), mod_sources::allocate_sources(), mod_tides::allocate_tides(), r4dvar_mod::analysis(), rbl4dvar_mod::analysis(), rbl4dvar_mod::analysis_initialize(), i4dvar_mod::background(), rbl4dvar_mod::background(), i4dvar_mod::background_initialize(), cgradient_mod::cg_read_cgradient(), congrad_mod::cg_read_congrad(), rpcg_lanczos_mod::cg_read_rpcg(), cgradient_mod::cg_write_cgradient(), congrad_mod::cg_write_congrad(), rpcg_lanczos_mod::cg_write_rpcg(), check_file(), close_io_mod::close_file(), close_io_mod::close_out(), comp_jb0_mod::comp_jb0_tile(), def_avg_mod::def_avg(), def_dai_mod::def_dai(), def_diags_mod::def_diags(), def_error_mod::def_error(), def_floats_mod::def_floats(), def_gst_mod::def_gst(), def_hessian_mod::def_hessian(), def_his_mod::def_his(), def_impulse_mod::def_impulse(), def_ini_mod::def_ini(), def_lanczos_mod::def_lanczos(), def_mod_mod::def_mod(), def_norm_mod::def_norm(), def_quick_mod::def_quick(), def_rst_mod::def_rst(), def_state_mod::def_state(), def_station_mod::def_station(), def_tides_mod::def_tides(), edit_multifile(), get_2dfld(), get_2dfldr(), get_3dfld(), get_3dfldr(), get_grid_mod::get_grid(), get_gst_mod::get_gst(), get_idata(), get_ngfld(), get_ngfldr(), get_nudgcoef_mod::get_nudgcoef(), get_state_mod::get_state(), get_wetdry_mod::get_wetdry(), cgradient_mod::hessian_evecs(), i4dvar_mod::increment(), r4dvar_mod::increment(), rbl4dvar_mod::increment(), ini_lanczos_mod::ini_lanczos_tile(), mod_fourdvar::initialize_fourdvar(), inp_par_mod::inp_par(), normalization_mod::normalization_tile(), obs_initial_mod::obs_initial(), obs_read_mod::obs_read(), obs_write_mod::obs_write(), i4dvar_mod::posterior_analysis(), i4dvar_mod::posterior_analysis_initialize(), posterior_mod::posterior_eofs(), rbl4dvar_mod::posterior_error(), posterior_mod::posterior_tile(), cgradient_mod::precond(), normalization_mod::randomization_tile(), roms_kernel_mod::roms_run(), rp_def_ini_mod::rp_def_ini(), rp_wrt_ini_mod::rp_wrt_ini(), state_join_mod::state_join(), state_read_mod::state_read(), stats_modobs_mod::stats_modobs(), time_corr_mod::time_corr(), tl_def_his_mod::tl_def_his(), tl_def_ini_mod::tl_def_ini(), inner2state_mod::tl_inner2state_tile(), tl_wrt_his_mod::tl_wrt_his(), tl_wrt_ini_mod::tl_wrt_ini(), wrt_aug_imp_mod::wrt_aug_imp(), wrt_avg_mod::wrt_avg(), wrt_dai_mod::wrt_dai(), wrt_diags_mod::wrt_diags(), wrt_error_mod::wrt_error(), wrt_evolved_mod::wrt_evolved(), wrt_floats_mod::wrt_floats(), wrt_ini_mod::wrt_frc(), wrt_ini_mod::wrt_frc_ad(), wrt_gst_mod::wrt_gst(), wrt_hessian_mod::wrt_hessian(), wrt_his_mod::wrt_his(), wrt_impulse_mod::wrt_impulse(), wrt_ini_mod::wrt_ini(), wrt_quick_mod::wrt_quick(), wrt_rst_mod::wrt_rst(), wrt_state_mod::wrt_state(), wrt_station_mod::wrt_station(), and wrt_tides_mod::wrt_tides().

◆ io_pio

integer, parameter mod_ncparam::io_pio = 2

Definition at line 96 of file mod_ncparam.F.

96 integer, parameter :: io_pio = 2 ! Parallel-IO, SCORPIO

Referenced by ad_def_his_mod::ad_def_his(), ad_pack_tile(), ad_wrt_his_mod::ad_wrt_his(), mod_sources::allocate_sources(), mod_tides::allocate_tides(), r4dvar_mod::analysis(), rbl4dvar_mod::analysis(), rbl4dvar_mod::analysis_initialize(), i4dvar_mod::background(), rbl4dvar_mod::background(), i4dvar_mod::background_initialize(), cgradient_mod::cg_read_cgradient(), congrad_mod::cg_read_congrad(), rpcg_lanczos_mod::cg_read_rpcg(), cgradient_mod::cg_write_cgradient(), congrad_mod::cg_write_congrad(), rpcg_lanczos_mod::cg_write_rpcg(), check_file(), close_io_mod::close_file(), close_io_mod::close_out(), comp_jb0_mod::comp_jb0_tile(), def_avg_mod::def_avg(), def_dai_mod::def_dai(), def_diags_mod::def_diags(), def_error_mod::def_error(), def_floats_mod::def_floats(), def_gst_mod::def_gst(), def_hessian_mod::def_hessian(), def_his_mod::def_his(), def_impulse_mod::def_impulse(), def_ini_mod::def_ini(), def_lanczos_mod::def_lanczos(), def_mod_mod::def_mod(), def_norm_mod::def_norm(), def_quick_mod::def_quick(), def_rst_mod::def_rst(), def_state_mod::def_state(), def_station_mod::def_station(), def_tides_mod::def_tides(), edit_multifile(), get_2dfld(), get_2dfldr(), get_3dfld(), get_3dfldr(), get_grid_mod::get_grid(), get_gst_mod::get_gst(), get_idata(), get_ngfld(), get_ngfldr(), get_nudgcoef_mod::get_nudgcoef(), get_state_mod::get_state(), get_wetdry_mod::get_wetdry(), cgradient_mod::hessian_evecs(), i4dvar_mod::increment(), r4dvar_mod::increment(), rbl4dvar_mod::increment(), ini_lanczos_mod::ini_lanczos_tile(), mod_fourdvar::initialize_fourdvar(), inp_par_mod::inp_par(), normalization_mod::normalization_tile(), obs_initial_mod::obs_initial(), obs_read_mod::obs_read(), obs_write_mod::obs_write(), i4dvar_mod::posterior_analysis(), i4dvar_mod::posterior_analysis_initialize(), posterior_mod::posterior_eofs(), rbl4dvar_mod::posterior_error(), posterior_mod::posterior_tile(), cgradient_mod::precond(), normalization_mod::randomization_tile(), roms_kernel_mod::roms_run(), rp_def_ini_mod::rp_def_ini(), rp_wrt_ini_mod::rp_wrt_ini(), state_join_mod::state_join(), state_read_mod::state_read(), stats_modobs_mod::stats_modobs(), time_corr_mod::time_corr(), tl_def_his_mod::tl_def_his(), tl_def_ini_mod::tl_def_ini(), inner2state_mod::tl_inner2state_tile(), tl_wrt_his_mod::tl_wrt_his(), tl_wrt_ini_mod::tl_wrt_ini(), wrt_aug_imp_mod::wrt_aug_imp(), wrt_avg_mod::wrt_avg(), wrt_dai_mod::wrt_dai(), wrt_diags_mod::wrt_diags(), wrt_error_mod::wrt_error(), wrt_evolved_mod::wrt_evolved(), wrt_floats_mod::wrt_floats(), wrt_ini_mod::wrt_frc(), wrt_ini_mod::wrt_frc_ad(), wrt_gst_mod::wrt_gst(), wrt_hessian_mod::wrt_hessian(), wrt_his_mod::wrt_his(), wrt_impulse_mod::wrt_impulse(), wrt_ini_mod::wrt_ini(), wrt_quick_mod::wrt_quick(), wrt_rst_mod::wrt_rst(), wrt_state_mod::wrt_state(), wrt_station_mod::wrt_station(), and wrt_tides_mod::wrt_tides().

◆ isbp2d

integer mod_ncparam::isbp2d

Definition at line 527 of file mod_ncparam.F.

527 integer :: isBp2d ! 2D PSI-variables

Referenced by initialize_ncparam().

◆ isbp3d

integer mod_ncparam::isbp3d

Definition at line 531 of file mod_ncparam.F.

531 integer :: isBp3d ! 3D PSI-variables

Referenced by initialize_ncparam().

◆ isbr2d

integer mod_ncparam::isbr2d

Definition at line 528 of file mod_ncparam.F.

528 integer :: isBr2d ! 2D RHO-variables

Referenced by initialize_ncparam(), and step_floats_mod::step_floats_tile().

◆ isbr3d

integer mod_ncparam::isbr3d

Definition at line 532 of file mod_ncparam.F.

532 integer :: isBr3d ! 3D RHO-variables

Referenced by initialize_ncparam(), step_floats_mod::step_floats_tile(), and vwalk_floats_mod::vwalk_floats_tile().

◆ isbu2d

integer mod_ncparam::isbu2d

Definition at line 529 of file mod_ncparam.F.

529 integer :: isBu2d ! 2D U-variables

Referenced by ad_bc_2d_mod::ad_bc_u2d_tile(), bc_2d_mod::bc_u2d_tile(), and initialize_ncparam().

◆ isbu3d

integer mod_ncparam::isbu3d

Definition at line 533 of file mod_ncparam.F.

533 integer :: isBu3d ! 3D U-variables

Referenced by ad_bc_3d_mod::ad_bc_u3d_tile(), bc_3d_mod::bc_u3d_tile(), bc_4d_mod::bc_u4d_tile(), initialize_ncparam(), and mpdata_adiff_tile().

◆ isbv2d

integer mod_ncparam::isbv2d

Definition at line 530 of file mod_ncparam.F.

530 integer :: isBv2d ! 2D V-variables

Referenced by ad_bc_2d_mod::ad_bc_v2d_tile(), ad_bc_3d_mod::ad_bc_v3d_tile(), bc_2d_mod::bc_v2d_tile(), and initialize_ncparam().

◆ isbv3d

integer mod_ncparam::isbv3d

Definition at line 534 of file mod_ncparam.F.

534 integer :: isBv3d ! 3D V-variables

Referenced by ad_bc_3d_mod::ad_bc_v3d_tile(), bc_3d_mod::bc_v3d_tile(), bc_4d_mod::bc_v4d_tile(), initialize_ncparam(), and mpdata_adiff_tile().

◆ isbw3d

integer mod_ncparam::isbw3d

Definition at line 535 of file mod_ncparam.F.

535 integer :: isBw3d ! 3D W-variables

Referenced by initialize_ncparam(), step_floats_mod::step_floats_tile(), and vwalk_floats_mod::vwalk_floats_tile().

◆ isfsur

integer mod_ncparam::isfsur = 1

Definition at line 503 of file mod_ncparam.F.

503 integer :: isFsur = 1 ! free-surface

Referenced by ad_balance_mod::ad_balance_tile(), ad_convolution_mod::ad_convolution_tile(), ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_get_data(), ad_htobs_mod::ad_htobs_tile(), ad_ini_fields_mod::ad_ini_zeta_tile(), ad_misfit_mod::ad_misfit_tile(), ad_obc_adjust_mod::ad_obc_adjust_tile(), ad_ini_fields_mod::ad_out_zeta_tile(), ad_pack_tile(), ad_set_data_tile(), ad_set_depth_mod::ad_set_depth_bry_tile(), ad_u2dbc_mod::ad_u2dbc_tile(), ad_unpack_tile(), ad_v2dbc_mod::ad_v2dbc_tile(), ad_variability_mod::ad_variability_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), ad_zetabc_mod::ad_zetabc_tile(), adsen_force_mod::adsen_force_tile(), adsen_initial_mod::adsen_initial_tile(), mod_boundary::allocate_boundary(), analytical_mod::ana_fsobc_tile(), analytical_mod::ana_perturb_tile(), posterior_mod::analysis_error(), posterior_var_mod::analysis_var(), comp_jb0_mod::aug_oper_tile(), back_cost_mod::back_cost_tile(), i4dvar_mod::background_initialize(), checkadj(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), cost_grad_mod::cost_grad_tile(), mod_boundary::deallocate_boundary(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_mod_mod::def_mod_nf90(), def_mod_mod::def_mod_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), get_data(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), cgradient_mod::hessian(), r4dvar_mod::increment(), rbl4dvar_mod::increment(), ini_adjust_mod::ini_perturb_tile(), ini_fields_mod::ini_zeta_tile(), mod_boundary::initialize_boundary(), initialize_ncparam(), inp_par_mod::inp_par(), lanc_resid_mod::lanc_resid_tile(), ini_adjust_mod::load_adtotl_tile(), inp_decode_mod::load_lbc(), obc_adjust_mod::load_obc_tile(), ini_adjust_mod::load_tltoad_tile(), cgradient_mod::new_direction(), posterior_mod::new_direction(), normalization_mod::normalization_tile(), obc_adjust_mod::obc_adjust_tile(), obs_write_mod::obs_operator(), obs_read_mod::obs_read_nf90(), obs_read_mod::obs_read_pio(), obs_write_mod::obs_write(), obs_write_mod::obs_write_nf90(), obs_write_mod::obs_write_pio(), random_ic_mod::random_ic_tile(), normalization_mod::randomization_tile(), roms_kernel_mod::roms_run(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_ini_fields_mod::rp_ini_zeta_tile(), rp_obc_adjust_mod::rp_obc_adjust_tile(), rp_set_data_tile(), rp_set_depth_mod::rp_set_depth_bry_tile(), rp_u2dbc_mod::rp_u2dbc_tile(), rp_v2dbc_mod::rp_v2dbc_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), rp_zetabc_mod::rp_zetabc_tile(), set_data_tile(), set_depth_mod::set_depth_bry_tile(), set_tides_mod::set_tides_tile(), state_addition_mod::state_addition(), state_copy_mod::state_copy(), state_dotprod_mod::state_dotprod(), state_initialize_mod::state_initialize(), state_product_mod::state_product(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), state_scale_mod::state_scale(), sum_grad_mod::sum_grad_tile(), time_corr_mod::time_corr_nf90(), time_corr_mod::time_corr_pio(), tl_balance_mod::tl_balance_tile(), tl_convolution_mod::tl_convolution_tile(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_get_data(), ini_adjust_mod::tl_ini_perturb_tile(), tl_ini_fields_mod::tl_ini_zeta_tile(), cgradient_mod::tl_new_state(), posterior_mod::tl_new_vector(), tl_obc_adjust_mod::tl_obc_adjust_tile(), tl_pack_tile(), tl_set_data_tile(), tl_set_depth_mod::tl_set_depth_bry_tile(), tl_u2dbc_mod::tl_u2dbc_tile(), tl_unpack_tile(), tl_v2dbc_mod::tl_v2dbc_tile(), tl_variability_mod::tl_variability_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), tl_zetabc_mod::tl_zetabc_tile(), u2dbc_mod::u2dbc_tile(), v2dbc_mod::v2dbc_tile(), wpoints_tile(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_ini_mod::wrt_frc_ad_nf90(), wrt_ini_mod::wrt_frc_ad_pio(), wrt_ini_mod::wrt_frc_nf90(), wrt_ini_mod::wrt_frc_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_info_mod::wrt_info::wrt_info_nf90(), wrt_info_mod::wrt_info::wrt_info_pio(), wrt_state_mod::wrt_state_nf90(), wrt_state_mod::wrt_state_pio(), and zetabc_mod::zetabc_tile().

◆ ismtke

integer mod_ncparam::ismtke

Definition at line 512 of file mod_ncparam.F.

512 integer :: isMtke ! turbulent kinetic energy

Referenced by initialize_ncparam(), and tkebc_mod::tkebc_tile().

◆ isradial

◆ istsur

◆ istvar

integer, dimension(:), allocatable mod_ncparam::istvar

Definition at line 520 of file mod_ncparam.F.

520 integer, allocatable :: isTvar(:) ! tracers

Referenced by ad_balance_mod::ad_balance_tile(), ad_convolution_mod::ad_convolution_tile(), ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_get_data(), ad_htobs_mod::ad_htobs_tile(), ad_misfit_mod::ad_misfit_tile(), ad_obc_adjust_mod::ad_obc_adjust_tile(), ad_pack_tile(), ad_set_data_tile(), ad_t3dbc_mod::ad_t3dbc_tile(), ad_t3dmix4_mod::ad_t3dmix4_geo_tile(), ad_t3dmix4_mod::ad_t3dmix4_iso_tile(), ad_unpack_tile(), ad_variability_mod::ad_variability_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), adsen_force_mod::adsen_force_tile(), adsen_initial_mod::adsen_initial_tile(), mod_boundary::allocate_boundary(), allocate_ncparam(), analytical_mod::ana_perturb_tile(), analytical_mod::ana_tobc_tile(), posterior_mod::analysis_error(), posterior_var_mod::analysis_var(), comp_jb0_mod::aug_oper_tile(), back_cost_mod::back_cost_tile(), checkadj(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), cost_grad_mod::cost_grad_tile(), mod_boundary::deallocate_boundary(), deallocate_ncparam(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), get_data(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), cgradient_mod::hessian(), ini_adjust_mod::ini_perturb_tile(), mod_boundary::initialize_boundary(), initialize_ncparam(), inp_par_mod::inp_par(), lanc_resid_mod::lanc_resid_tile(), ini_adjust_mod::load_adtotl_tile(), inp_decode_mod::load_lbc(), obc_adjust_mod::load_obc_tile(), ini_adjust_mod::load_tltoad_tile(), mod_netcdf::netcdf_check_var(), cgradient_mod::new_direction(), posterior_mod::new_direction(), normalization_mod::normalization_tile(), obc_adjust_mod::obc_adjust_tile(), obs_write_mod::obs_operator(), obs_read_mod::obs_read_nf90(), obs_read_mod::obs_read_pio(), obs_write_mod::obs_write(), mod_pio_netcdf::pio_netcdf_check_var(), random_ic_mod::random_ic_tile(), normalization_mod::randomization_tile(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_obc_adjust_mod::rp_obc_adjust_tile(), rp_set_data_tile(), rp_t3dbc_mod::rp_t3dbc_tile(), rp_t3dmix4_mod::rp_t3dmix4_geo_tile(), rp_t3dmix4_mod::rp_t3dmix4_iso_tile(), rp_t3dmix4_mod::rp_t3dmix4_s_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), sed_bedload_tile(), set_data_tile(), state_addition_mod::state_addition(), state_copy_mod::state_copy(), state_dotprod_mod::state_dotprod(), state_initialize_mod::state_initialize(), state_product_mod::state_product(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), state_scale_mod::state_scale(), step_floats_mod::step_floats_tile(), sum_grad_mod::sum_grad_tile(), t3dbc_mod::t3dbc_tile(), t3dmix4_mod::t3dmix4_geo_tile(), t3dmix4_mod::t3dmix4_iso_tile(), t3dmix4_mod::t3dmix4_s_tile(), time_corr_mod::time_corr_nf90(), time_corr_mod::time_corr_pio(), tl_balance_mod::tl_balance_tile(), tl_convolution_mod::tl_convolution_tile(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_get_data(), ini_adjust_mod::tl_ini_perturb_tile(), cgradient_mod::tl_new_state(), posterior_mod::tl_new_vector(), tl_obc_adjust_mod::tl_obc_adjust_tile(), tl_pack_tile(), tl_set_data_tile(), tl_t3dbc_mod::tl_t3dbc_tile(), tl_t3dmix4_mod::tl_t3dmix4_geo_tile(), tl_t3dmix4_mod::tl_t3dmix4_iso_tile(), tl_t3dmix4_mod::tl_t3dmix4_s_tile(), tl_unpack_tile(), tl_variability_mod::tl_variability_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), wpoints_tile(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_ini_mod::wrt_frc_ad_nf90(), wrt_ini_mod::wrt_frc_ad_pio(), wrt_ini_mod::wrt_frc_nf90(), wrt_ini_mod::wrt_frc_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_info_mod::wrt_info::wrt_info_nf90(), wrt_info_mod::wrt_info::wrt_info_pio(), wrt_state_mod::wrt_state_nf90(), and wrt_state_mod::wrt_state_pio().

◆ isubar

integer mod_ncparam::isubar = 2

Definition at line 504 of file mod_ncparam.F.

504 integer :: isUbar = 2 ! 2D U-velocity

Referenced by ad_convolution_mod::ad_convolution_tile(), ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_extract_obs_mod::ad_extract_obs2d(), ad_get_data(), ad_htobs_mod::ad_htobs_tile(), ad_ini_fields_mod::ad_ini_fields_tile(), ad_misfit_mod::ad_misfit_tile(), ad_obc_adjust_mod::ad_obc2d_adjust_tile(), ad_obc_adjust_mod::ad_obc_adjust_tile(), ad_ini_fields_mod::ad_out_fields_tile(), ad_pack_tile(), ad_set_data_tile(), ad_step2d_mod::ad_step2d_tile(), ad_u2dbc_mod::ad_u2dbc_tile(), ad_unpack_tile(), ad_variability_mod::ad_variability_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), adsen_force_mod::adsen_force_tile(), adsen_initial_mod::adsen_initial_tile(), mod_boundary::allocate_boundary(), analytical_mod::ana_m2obc_tile(), analytical_mod::ana_perturb_tile(), posterior_mod::analysis_error(), posterior_var_mod::analysis_var(), comp_jb0_mod::aug_oper_tile(), back_cost_mod::back_cost_tile(), checkadj(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), cost_grad_mod::cost_grad_tile(), mod_boundary::deallocate_boundary(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), extract_obs_mod::extract_obs2d(), get_data(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), cgradient_mod::hessian(), ini_fields_mod::ini_fields_tile(), ini_adjust_mod::ini_perturb_tile(), mod_boundary::initialize_boundary(), initialize_ncparam(), inp_par_mod::inp_par(), lanc_resid_mod::lanc_resid_tile(), ini_adjust_mod::load_adtotl_tile(), obc_adjust_mod::load_obc_tile(), ini_adjust_mod::load_tltoad_tile(), cgradient_mod::new_direction(), posterior_mod::new_direction(), normalization_mod::normalization_tile(), obc_adjust_mod::obc_adjust_tile(), obs_write_mod::obs_operator(), obs_read_mod::obs_read_nf90(), obs_read_mod::obs_read_pio(), obs_write_mod::obs_write(), random_ic_mod::random_ic_tile(), normalization_mod::randomization_tile(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_ini_fields_mod::rp_ini_fields_tile(), rp_obc_adjust_mod::rp_obc2d_adjust_tile(), rp_obc_adjust_mod::rp_obc_adjust_tile(), rp_set_data_tile(), rp_step2d_mod::rp_step2d_tile(), rp_u2dbc_mod::rp_u2dbc_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), set_data_tile(), set_tides_mod::set_tides_tile(), state_addition_mod::state_addition(), state_copy_mod::state_copy(), state_dotprod_mod::state_dotprod(), state_initialize_mod::state_initialize(), state_product_mod::state_product(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), state_scale_mod::state_scale(), step2d_mod::step2d_tile(), step_floats_mod::step_floats_tile(), sum_grad_mod::sum_grad_tile(), time_corr_mod::time_corr_nf90(), time_corr_mod::time_corr_pio(), tl_convolution_mod::tl_convolution_tile(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_get_data(), tl_ini_fields_mod::tl_ini_fields_tile(), ini_adjust_mod::tl_ini_perturb_tile(), cgradient_mod::tl_new_state(), posterior_mod::tl_new_vector(), tl_obc_adjust_mod::tl_obc2d_adjust_tile(), tl_obc_adjust_mod::tl_obc_adjust_tile(), tl_pack_tile(), tl_set_data_tile(), tl_step2d_mod::tl_step2d_tile(), tl_u2dbc_mod::tl_u2dbc_tile(), tl_unpack_tile(), tl_variability_mod::tl_variability_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), u2dbc_mod::u2dbc_tile(), wpoints_tile(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_ini_mod::wrt_frc_ad_nf90(), wrt_ini_mod::wrt_frc_ad_pio(), wrt_ini_mod::wrt_frc_nf90(), wrt_ini_mod::wrt_frc_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_info_mod::wrt_info::wrt_info_nf90(), wrt_info_mod::wrt_info::wrt_info_pio(), wrt_state_mod::wrt_state_nf90(), and wrt_state_mod::wrt_state_pio().

◆ isustr

◆ isuvel

integer mod_ncparam::isuvel = 4

Definition at line 506 of file mod_ncparam.F.

506 integer :: isUvel = 4 ! 3D U-velocity

Referenced by ad_balance_mod::ad_balance_tile(), ad_convolution_mod::ad_convolution_tile(), ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_extract_obs_mod::ad_extract_obs3d(), ad_get_data(), ad_htobs_mod::ad_htobs_tile(), ad_misfit_mod::ad_misfit_tile(), ad_obc_adjust_mod::ad_obc_adjust_tile(), ad_pack_tile(), ad_set_data_tile(), ad_u3dbc_mod::ad_u3dbc_tile(), ad_unpack_tile(), ad_uv3dmix4_mod::ad_uv3dmix4_geo_tile(), ad_variability_mod::ad_variability_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), adsen_force_mod::adsen_force_tile(), adsen_initial_mod::adsen_initial_tile(), mod_boundary::allocate_boundary(), analytical_mod::ana_m3obc_tile(), analytical_mod::ana_perturb_tile(), posterior_mod::analysis_error(), posterior_var_mod::analysis_var(), comp_jb0_mod::aug_oper_tile(), back_cost_mod::back_cost_tile(), checkadj(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), cost_grad_mod::cost_grad_tile(), mod_boundary::deallocate_boundary(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), extract_obs_mod::extract_obs3d(), get_data(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), cgradient_mod::hessian(), ini_adjust_mod::ini_perturb_tile(), mod_boundary::initialize_boundary(), initialize_ncparam(), inp_par_mod::inp_par(), lanc_resid_mod::lanc_resid_tile(), ini_adjust_mod::load_adtotl_tile(), obc_adjust_mod::load_obc_tile(), ini_adjust_mod::load_tltoad_tile(), cgradient_mod::new_direction(), posterior_mod::new_direction(), normalization_mod::normalization_tile(), obc_adjust_mod::obc_adjust_tile(), obs_write_mod::obs_operator(), obs_read_mod::obs_read_nf90(), obs_read_mod::obs_read_pio(), obs_write_mod::obs_write(), random_ic_mod::random_ic_tile(), normalization_mod::randomization_tile(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_obc_adjust_mod::rp_obc_adjust_tile(), rp_set_data_tile(), rp_u3dbc_mod::rp_u3dbc_tile(), rp_uv3dmix4_mod::rp_uv3dmix4_geo_tile(), rp_uv3dmix4_mod::rp_uv3dmix4_s_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), set_data_tile(), state_addition_mod::state_addition(), state_copy_mod::state_copy(), state_dotprod_mod::state_dotprod(), state_initialize_mod::state_initialize(), state_product_mod::state_product(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), state_scale_mod::state_scale(), step_floats_mod::step_floats_tile(), sum_grad_mod::sum_grad_tile(), time_corr_mod::time_corr_nf90(), time_corr_mod::time_corr_pio(), tl_balance_mod::tl_balance_tile(), tl_convolution_mod::tl_convolution_tile(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_get_data(), ini_adjust_mod::tl_ini_perturb_tile(), cgradient_mod::tl_new_state(), posterior_mod::tl_new_vector(), tl_obc_adjust_mod::tl_obc_adjust_tile(), tl_pack_tile(), tl_set_data_tile(), tl_u3dbc_mod::tl_u3dbc_tile(), tl_unpack_tile(), tl_uv3dmix4_mod::tl_uv3dmix4_geo_tile(), tl_uv3dmix4_mod::tl_uv3dmix4_s_tile(), tl_variability_mod::tl_variability_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), u3dbc_mod::u3dbc_tile(), uv3dmix4_mod::uv3dmix4_geo_tile(), uv3dmix4_mod::uv3dmix4_s_tile(), wpoints_tile(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_ini_mod::wrt_frc_ad_nf90(), wrt_ini_mod::wrt_frc_ad_pio(), wrt_ini_mod::wrt_frc_nf90(), wrt_ini_mod::wrt_frc_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_info_mod::wrt_info::wrt_info_nf90(), wrt_info_mod::wrt_info::wrt_info_pio(), wrt_state_mod::wrt_state_nf90(), and wrt_state_mod::wrt_state_pio().

◆ isvbar

integer mod_ncparam::isvbar = 3

Definition at line 505 of file mod_ncparam.F.

505 integer :: isVbar = 3 ! 2D V-velocity

Referenced by ad_convolution_mod::ad_convolution_tile(), ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_extract_obs_mod::ad_extract_obs2d(), ad_get_data(), ad_htobs_mod::ad_htobs_tile(), ad_ini_fields_mod::ad_ini_fields_tile(), ad_misfit_mod::ad_misfit_tile(), ad_obc_adjust_mod::ad_obc2d_adjust_tile(), ad_obc_adjust_mod::ad_obc_adjust_tile(), ad_ini_fields_mod::ad_out_fields_tile(), ad_pack_tile(), ad_set_data_tile(), ad_step2d_mod::ad_step2d_tile(), ad_unpack_tile(), ad_v2dbc_mod::ad_v2dbc_tile(), ad_variability_mod::ad_variability_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), adsen_force_mod::adsen_force_tile(), adsen_initial_mod::adsen_initial_tile(), mod_boundary::allocate_boundary(), analytical_mod::ana_m2obc_tile(), analytical_mod::ana_perturb_tile(), posterior_mod::analysis_error(), posterior_var_mod::analysis_var(), comp_jb0_mod::aug_oper_tile(), back_cost_mod::back_cost_tile(), checkadj(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), cost_grad_mod::cost_grad_tile(), mod_boundary::deallocate_boundary(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), extract_obs_mod::extract_obs2d(), get_data(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), cgradient_mod::hessian(), ini_fields_mod::ini_fields_tile(), ini_adjust_mod::ini_perturb_tile(), mod_boundary::initialize_boundary(), initialize_ncparam(), inp_par_mod::inp_par(), lanc_resid_mod::lanc_resid_tile(), ini_adjust_mod::load_adtotl_tile(), obc_adjust_mod::load_obc_tile(), ini_adjust_mod::load_tltoad_tile(), cgradient_mod::new_direction(), posterior_mod::new_direction(), normalization_mod::normalization_tile(), obc_adjust_mod::obc_adjust_tile(), obs_write_mod::obs_operator(), obs_read_mod::obs_read_nf90(), obs_read_mod::obs_read_pio(), obs_write_mod::obs_write(), random_ic_mod::random_ic_tile(), normalization_mod::randomization_tile(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_ini_fields_mod::rp_ini_fields_tile(), rp_obc_adjust_mod::rp_obc2d_adjust_tile(), rp_obc_adjust_mod::rp_obc_adjust_tile(), rp_set_data_tile(), rp_step2d_mod::rp_step2d_tile(), rp_v2dbc_mod::rp_v2dbc_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), set_data_tile(), set_tides_mod::set_tides_tile(), state_addition_mod::state_addition(), state_copy_mod::state_copy(), state_dotprod_mod::state_dotprod(), state_initialize_mod::state_initialize(), state_product_mod::state_product(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), state_scale_mod::state_scale(), step2d_mod::step2d_tile(), step_floats_mod::step_floats_tile(), sum_grad_mod::sum_grad_tile(), time_corr_mod::time_corr_nf90(), time_corr_mod::time_corr_pio(), tl_convolution_mod::tl_convolution_tile(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_get_data(), tl_ini_fields_mod::tl_ini_fields_tile(), ini_adjust_mod::tl_ini_perturb_tile(), cgradient_mod::tl_new_state(), posterior_mod::tl_new_vector(), tl_obc_adjust_mod::tl_obc2d_adjust_tile(), tl_obc_adjust_mod::tl_obc_adjust_tile(), tl_pack_tile(), tl_set_data_tile(), tl_step2d_mod::tl_step2d_tile(), tl_unpack_tile(), tl_v2dbc_mod::tl_v2dbc_tile(), tl_variability_mod::tl_variability_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), v2dbc_mod::v2dbc_tile(), wpoints_tile(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_ini_mod::wrt_frc_ad_nf90(), wrt_ini_mod::wrt_frc_ad_pio(), wrt_ini_mod::wrt_frc_nf90(), wrt_ini_mod::wrt_frc_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_info_mod::wrt_info::wrt_info_nf90(), wrt_info_mod::wrt_info::wrt_info_pio(), wrt_state_mod::wrt_state_nf90(), and wrt_state_mod::wrt_state_pio().

◆ isvstr

◆ isvvel

integer mod_ncparam::isvvel = 5

Definition at line 507 of file mod_ncparam.F.

507 integer :: isVvel = 5 ! 3D V-velocity

Referenced by ad_balance_mod::ad_balance_tile(), ad_convolution_mod::ad_convolution_tile(), ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_extract_obs_mod::ad_extract_obs3d(), ad_get_data(), ad_htobs_mod::ad_htobs_tile(), ad_misfit_mod::ad_misfit_tile(), ad_obc_adjust_mod::ad_obc_adjust_tile(), ad_pack_tile(), ad_set_data_tile(), ad_unpack_tile(), ad_uv3dmix4_mod::ad_uv3dmix4_geo_tile(), ad_v3dbc_mod::ad_v3dbc_tile(), ad_variability_mod::ad_variability_tile(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), adsen_force_mod::adsen_force_tile(), adsen_initial_mod::adsen_initial_tile(), mod_boundary::allocate_boundary(), analytical_mod::ana_m3obc_tile(), analytical_mod::ana_perturb_tile(), posterior_mod::analysis_error(), posterior_var_mod::analysis_var(), comp_jb0_mod::aug_oper_tile(), back_cost_mod::back_cost_tile(), checkadj(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), cost_grad_mod::cost_grad_tile(), mod_boundary::deallocate_boundary(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), extract_obs_mod::extract_obs3d(), get_data(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), cgradient_mod::hessian(), ini_adjust_mod::ini_perturb_tile(), mod_boundary::initialize_boundary(), initialize_ncparam(), inp_par_mod::inp_par(), lanc_resid_mod::lanc_resid_tile(), ini_adjust_mod::load_adtotl_tile(), obc_adjust_mod::load_obc_tile(), ini_adjust_mod::load_tltoad_tile(), cgradient_mod::new_direction(), posterior_mod::new_direction(), normalization_mod::normalization_tile(), obc_adjust_mod::obc_adjust_tile(), obs_write_mod::obs_operator(), obs_read_mod::obs_read_nf90(), obs_read_mod::obs_read_pio(), obs_write_mod::obs_write(), random_ic_mod::random_ic_tile(), normalization_mod::randomization_tile(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_get_data(), rp_obc_adjust_mod::rp_obc_adjust_tile(), rp_set_data_tile(), rp_uv3dmix4_mod::rp_uv3dmix4_geo_tile(), rp_uv3dmix4_mod::rp_uv3dmix4_s_tile(), rp_v3dbc_mod::rp_v3dbc_tile(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), set_data_tile(), state_addition_mod::state_addition(), state_copy_mod::state_copy(), state_dotprod_mod::state_dotprod(), state_initialize_mod::state_initialize(), state_product_mod::state_product(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), state_scale_mod::state_scale(), step_floats_mod::step_floats_tile(), sum_grad_mod::sum_grad_tile(), time_corr_mod::time_corr_nf90(), time_corr_mod::time_corr_pio(), tl_balance_mod::tl_balance_tile(), tl_convolution_mod::tl_convolution_tile(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_get_data(), ini_adjust_mod::tl_ini_perturb_tile(), cgradient_mod::tl_new_state(), posterior_mod::tl_new_vector(), tl_obc_adjust_mod::tl_obc_adjust_tile(), tl_pack_tile(), tl_set_data_tile(), tl_unpack_tile(), tl_uv3dmix4_mod::tl_uv3dmix4_geo_tile(), tl_uv3dmix4_mod::tl_uv3dmix4_s_tile(), tl_v3dbc_mod::tl_v3dbc_tile(), tl_variability_mod::tl_variability_tile(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), uv3dmix4_mod::uv3dmix4_geo_tile(), uv3dmix4_mod::uv3dmix4_s_tile(), v3dbc_mod::v3dbc_tile(), wpoints_tile(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_ini_mod::wrt_frc_ad_nf90(), wrt_ini_mod::wrt_frc_ad_pio(), wrt_ini_mod::wrt_frc_nf90(), wrt_ini_mod::wrt_frc_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_info_mod::wrt_info::wrt_info_nf90(), wrt_info_mod::wrt_info::wrt_info_pio(), wrt_state_mod::wrt_state_nf90(), and wrt_state_mod::wrt_state_pio().

◆ iswvel

integer mod_ncparam::iswvel

Definition at line 508 of file mod_ncparam.F.

508 integer :: isWvel ! 3D W-velocity

Referenced by ad_get_data(), ad_main3d(), ad_set_data_tile(), and initialize_ncparam().

◆ lanafile

◆ last_varid

integer mod_ncparam::last_varid

Definition at line 442 of file mod_ncparam.F.

442 integer :: last_varid

Referenced by initialize_ncparam(), and inp_par_mod::inp_par().

◆ linfo

◆ maxlen

integer, parameter mod_ncparam::maxlen = 160

Definition at line 576 of file mod_ncparam.F.

576 integer, parameter :: MaxLen = 160 ! information string length

Referenced by mod_esmf_esm::def_fieldatt().

◆ mv

integer, parameter mod_ncparam::mv = 1400

Definition at line 104 of file mod_ncparam.F.

104 integer, parameter :: MV = 1400

Referenced by initialize_ncparam(), and inp_par_mod::inp_par().

◆ ndimid

integer, parameter mod_ncparam::ndimid = 33

Definition at line 110 of file mod_ncparam.F.

110 integer, parameter :: nDimID = 33

◆ nv

integer, parameter mod_ncparam::nv = 1400

Definition at line 105 of file mod_ncparam.F.

105 integer, parameter :: NV = 1400

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), allocate_ncparam(), bbl_output_mod::bbl_def_nf90(), bbl_output_mod::bbl_def_pio(), bbl_output_mod::bbl_def_station_nf90(), bbl_output_mod::bbl_def_station_pio(), check_multifile(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_dai_mod::def_dai_nf90(), def_dai_mod::def_dai_pio(), def_diags_mod::def_diags_nf90(), def_diags_mod::def_diags_pio(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_floats_mod::def_floats_nf90(), def_floats_mod::def_floats_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_impulse_mod::def_impulse_nf90(), def_impulse_mod::def_impulse_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_mod_mod::def_mod_nf90(), def_mod_mod::def_mod_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_rst_mod::def_rst_nf90(), def_rst_mod::def_rst_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), def_tides_mod::def_tides_nf90(), def_tides_mod::def_tides_pio(), edit_file_struct(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), initialize_ncparam(), inp_decode_mod::load_s1d::load_s1d1(), inp_decode_mod::load_s1d::load_s1d2(), obs_initial_mod::obs_initial_nf90(), obs_initial_mod::obs_initial_pio(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), sediment_output_mod::sediment_def_nf90(), sediment_output_mod::sediment_def_pio(), sediment_output_mod::sediment_def_station_nf90(), sediment_output_mod::sediment_def_station_pio(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), and tl_def_ini_mod::tl_def_ini_pio().

◆ nwaterr

integer, dimension(:), allocatable mod_ncparam::nwaterr

Definition at line 121 of file mod_ncparam.F.

121 integer, allocatable :: NwaterR(:) ! RHO water points

Referenced by ad_pack_tile(), ad_unpack_tile(), allocate_ncparam(), deallocate_ncparam(), tl_pack_tile(), tl_unpack_tile(), and wpoints_tile().

◆ nwateru

integer, dimension(:), allocatable mod_ncparam::nwateru

Definition at line 122 of file mod_ncparam.F.

122 integer, allocatable :: NwaterU(:) ! U water points

Referenced by ad_pack_tile(), ad_unpack_tile(), allocate_ncparam(), deallocate_ncparam(), tl_pack_tile(), tl_unpack_tile(), and wpoints_tile().

◆ nwaterv

integer, dimension(:), allocatable mod_ncparam::nwaterv

Definition at line 123 of file mod_ncparam.F.

123 integer, allocatable :: NwaterV(:) ! V water points

Referenced by ad_pack_tile(), ad_unpack_tile(), allocate_ncparam(), deallocate_ncparam(), tl_pack_tile(), tl_unpack_tile(), and wpoints_tile().

◆ nxyp

integer, dimension(:), allocatable mod_ncparam::nxyp

Definition at line 114 of file mod_ncparam.F.

114 integer, allocatable :: Nxyp(:) ! PSI water points

Referenced by allocate_ncparam(), deallocate_ncparam(), and wpoints_tile().

◆ nxyr

integer, dimension(:), allocatable mod_ncparam::nxyr

Definition at line 115 of file mod_ncparam.F.

115 integer, allocatable :: Nxyr(:) ! RHO water points

Referenced by allocate_ncparam(), deallocate_ncparam(), and wpoints_tile().

◆ nxyu

integer, dimension(:), allocatable mod_ncparam::nxyu

Definition at line 116 of file mod_ncparam.F.

116 integer, allocatable :: Nxyu(:) ! U water points

Referenced by allocate_ncparam(), deallocate_ncparam(), and wpoints_tile().

◆ nxyv

integer, dimension(:), allocatable mod_ncparam::nxyv

Definition at line 117 of file mod_ncparam.F.

117 integer, allocatable :: Nxyv(:) ! V water points

Referenced by allocate_ncparam(), deallocate_ncparam(), and wpoints_tile().

◆ out_lib

integer mod_ncparam::out_lib

Definition at line 99 of file mod_ncparam.F.

99 integer :: out_lib ! output NetCDF library

◆ qout

logical, dimension(:,:), allocatable mod_ncparam::qout

◆ rilb

integer, dimension(:), allocatable mod_ncparam::rilb

Definition at line 128 of file mod_ncparam.F.

128 integer, allocatable :: rILB(:)

Referenced by allocate_ncparam(), deallocate_ncparam(), tile_indices_mod::tile_obs_bounds(), and wpoints_tile().

◆ riub

integer, dimension(:), allocatable mod_ncparam::riub

Definition at line 129 of file mod_ncparam.F.

129 integer, allocatable :: rIUB(:)

Referenced by allocate_ncparam(), deallocate_ncparam(), tile_indices_mod::tile_obs_bounds(), and wpoints_tile().

◆ rjlb

integer, dimension(:), allocatable mod_ncparam::rjlb

Definition at line 130 of file mod_ncparam.F.

130 integer, allocatable :: rJLB(:)

Referenced by allocate_ncparam(), deallocate_ncparam(), tile_indices_mod::tile_obs_bounds(), and wpoints_tile().

◆ rjub

integer, dimension(:), allocatable mod_ncparam::rjub

Definition at line 131 of file mod_ncparam.F.

131 integer, allocatable :: rJUB(:)

Referenced by allocate_ncparam(), deallocate_ncparam(), tile_indices_mod::tile_obs_bounds(), and wpoints_tile().

◆ rxmax

◆ rxmin

◆ rymax

◆ rymin

◆ sout

logical, dimension(:,:), allocatable mod_ncparam::sout

◆ svn_rev

◆ svn_url

◆ tintrp

◆ tname

◆ uilb

integer, dimension(:), allocatable mod_ncparam::uilb

Definition at line 141 of file mod_ncparam.F.

141 integer, allocatable :: uILB(:)

Referenced by allocate_ncparam(), deallocate_ncparam(), tile_indices_mod::tile_obs_bounds(), and wpoints_tile().

◆ uiub

integer, dimension(:), allocatable mod_ncparam::uiub

Definition at line 142 of file mod_ncparam.F.

142 integer, allocatable :: uIUB(:)

Referenced by allocate_ncparam(), deallocate_ncparam(), tile_indices_mod::tile_obs_bounds(), and wpoints_tile().

◆ ujlb

integer, dimension(:), allocatable mod_ncparam::ujlb

Definition at line 143 of file mod_ncparam.F.

143 integer, allocatable :: uJLB(:)

Referenced by allocate_ncparam(), deallocate_ncparam(), tile_indices_mod::tile_obs_bounds(), and wpoints_tile().

◆ ujub

integer, dimension(:), allocatable mod_ncparam::ujub

Definition at line 144 of file mod_ncparam.F.

144 integer, allocatable :: uJUB(:)

Referenced by allocate_ncparam(), deallocate_ncparam(), tile_indices_mod::tile_obs_bounds(), and wpoints_tile().

◆ uxmax

◆ uxmin

◆ uymax

◆ uymin

◆ varnam

character (len=40 ), dimension(mv) mod_ncparam::varnam

Definition at line 587 of file mod_ncparam.F.

587 character (len=40 ) :: varnam(MV)

◆ version

character (len=5 ) mod_ncparam::version = '4.3 '

◆ vilb

integer, dimension(:), allocatable mod_ncparam::vilb

Definition at line 154 of file mod_ncparam.F.

154 integer, allocatable :: vILB(:)

Referenced by allocate_ncparam(), deallocate_ncparam(), tile_indices_mod::tile_obs_bounds(), and wpoints_tile().

◆ viub

integer, dimension(:), allocatable mod_ncparam::viub

Definition at line 155 of file mod_ncparam.F.

155 integer, allocatable :: vIUB(:)

Referenced by allocate_ncparam(), deallocate_ncparam(), tile_indices_mod::tile_obs_bounds(), and wpoints_tile().

◆ vjlb

integer, dimension(:), allocatable mod_ncparam::vjlb

Definition at line 156 of file mod_ncparam.F.

156 integer, allocatable :: vJLB(:)

Referenced by allocate_ncparam(), deallocate_ncparam(), tile_indices_mod::tile_obs_bounds(), and wpoints_tile().

◆ vjub

integer, dimension(:), allocatable mod_ncparam::vjub

Definition at line 157 of file mod_ncparam.F.

157 integer, allocatable :: vJUB(:)

Referenced by allocate_ncparam(), deallocate_ncparam(), tile_indices_mod::tile_obs_bounds(), and wpoints_tile().

◆ vname

character (len=maxlen), dimension(6,0:nv) mod_ncparam::vname

Definition at line 591 of file mod_ncparam.F.

591 character (len=MaxLen) :: Vname(6,0:NV)

Referenced by ad_def_his_mod::ad_def_his_nf90(), ad_def_his_mod::ad_def_his_pio(), ad_nesting_mod::ad_fine2coarse(), ad_nesting_mod::ad_get_composite(), ad_nesting_mod::ad_get_refine(), ad_pack_tile(), ad_nesting_mod::ad_put_composite(), ad_wrt_his_mod::ad_wrt_his_nf90(), ad_wrt_his_mod::ad_wrt_his_pio(), mod_sources::allocate_sources(), mod_tides::allocate_tides(), analytical_mod::ana_biology_tile(), analytical_mod::ana_nlminitial_tile(), r4dvar_mod::analysis(), rbl4dvar_mod::analysis_initialize(), i4dvar_mod::background_initialize(), bbl_output_mod::bbl_def_nf90(), bbl_output_mod::bbl_def_pio(), bbl_output_mod::bbl_def_station_nf90(), bbl_output_mod::bbl_def_station_pio(), bbl_output_mod::bbl_wrt_nf90(), bbl_output_mod::bbl_wrt_pio(), bbl_output_mod::bbl_wrt_station_nf90(), bbl_output_mod::bbl_wrt_station_pio(), checkvars_mod::checkvars::checkvars_nf90(), checkvars_mod::checkvars::checkvars_pio(), def_avg_mod::def_avg_nf90(), def_avg_mod::def_avg_pio(), def_dai_mod::def_dai_nf90(), def_dai_mod::def_dai_pio(), def_diags_mod::def_diags_nf90(), def_diags_mod::def_diags_pio(), def_error_mod::def_error_nf90(), def_error_mod::def_error_pio(), def_floats_mod::def_floats_nf90(), def_floats_mod::def_floats_pio(), def_hessian_mod::def_hessian_nf90(), def_hessian_mod::def_hessian_pio(), def_his_mod::def_his_nf90(), def_his_mod::def_his_pio(), def_impulse_mod::def_impulse_nf90(), def_impulse_mod::def_impulse_pio(), def_info_mod::def_info::def_info_nf90(), def_info_mod::def_info::def_info_pio(), def_ini_mod::def_ini_nf90(), def_ini_mod::def_ini_pio(), def_lanczos_mod::def_lanczos_nf90(), def_lanczos_mod::def_lanczos_pio(), def_mod_mod::def_mod_nf90(), def_mod_mod::def_mod_pio(), def_norm_mod::def_norm_nf90(), def_norm_mod::def_norm_pio(), def_quick_mod::def_quick_nf90(), def_quick_mod::def_quick_pio(), def_rst_mod::def_rst_nf90(), def_rst_mod::def_rst_pio(), def_state_mod::def_state_nf90(), def_state_mod::def_state_pio(), def_station_mod::def_station_nf90(), def_station_mod::def_station_pio(), def_tides_mod::def_tides_nf90(), def_tides_mod::def_tides_pio(), nesting_mod::fine2coarse(), get_2dfld_nf90(), get_2dfld_pio(), get_2dfldr_nf90(), get_2dfldr_pio(), get_3dfld_nf90(), get_3dfld_pio(), get_3dfldr_nf90(), get_3dfldr_pio(), nesting_mod::get_composite(), get_cycle_mod::get_cycle::get_cycle_nf90(), get_cycle_mod::get_cycle::get_cycle_pio(), get_grid_mod::get_grid_nf90(), get_grid_mod::get_grid_pio(), get_idata(), get_ngfld_nf90(), get_ngfld_pio(), get_ngfldr_nf90(), get_ngfldr_pio(), get_nudgcoef_mod::get_nudgcoef_nf90(), get_nudgcoef_mod::get_nudgcoef_pio(), nesting_mod::get_refine(), get_state_mod::get_state_nf90(), get_state_mod::get_state_pio(), get_wetdry_mod::get_wetdry_nf90(), get_wetdry_mod::get_wetdry_pio(), i4dvar_mod::increment(), r4dvar_mod::increment(), rbl4dvar_mod::increment(), ini_adjust_mod::ini_perturb_tile(), mod_fourdvar::initialize_fourdvar(), initialize_ncparam(), inp_par_mod::inp_par(), inquiry_mod::inquiry::inquiry_nf90(), inquiry_mod::inquiry::inquiry_pio(), lbc_mod::lbc_getatt::lbc_getatt_nf90(), lbc_mod::lbc_getatt::lbc_getatt_pio(), lbc_mod::lbc_putatt::lbc_putatt_nf90(), lbc_mod::lbc_putatt::lbc_putatt_pio(), lbc_mod::lbc_report(), metrics_mod::metrics_tile(), mod_netcdf::netcdf_check_var(), nf_fwrite2d_mod::nf_fwrite2d::nf90_fwrite2d(), nf_fwrite3d_mod::nf_fwrite3d::nf90_fwrite3d(), nf_fwrite4d_mod::nf_fwrite4d::nf90_fwrite4d(), normalization_mod::normalization_tile(), obs_initial_mod::obs_initial_nf90(), obs_initial_mod::obs_initial_pio(), obs_read_mod::obs_read_nf90(), obs_read_mod::obs_read_pio(), obs_write_mod::obs_write_nf90(), obs_write_mod::obs_write_pio(), nf_fwrite2d_mod::nf_fwrite2d::pio_fwrite2d(), nf_fwrite3d_mod::nf_fwrite3d::pio_fwrite3d(), nf_fwrite4d_mod::nf_fwrite4d::pio_fwrite4d(), mod_pio_netcdf::pio_netcdf_check_var(), i4dvar_mod::posterior_analysis_initialize(), nesting_mod::put_composite(), normalization_mod::randomization_tile(), roms_kernel_mod::roms_run(), rp_def_ini_mod::rp_def_ini_nf90(), rp_def_ini_mod::rp_def_ini_pio(), rp_wrt_ini_mod::rp_wrt_ini_nf90(), rp_wrt_ini_mod::rp_wrt_ini_pio(), sediment_output_mod::sediment_def_nf90(), sediment_output_mod::sediment_def_pio(), sediment_output_mod::sediment_def_station_nf90(), sediment_output_mod::sediment_def_station_pio(), sediment_output_mod::sediment_wrt_nf90(), sediment_output_mod::sediment_wrt_pio(), sediment_output_mod::sediment_wrt_station_nf90(), sediment_output_mod::sediment_wrt_station_pio(), set_2dfld_mod::set_2dfld_tile(), set_2dfldr_mod::set_2dfldr_tile(), set_3dfld_mod::set_3dfld_tile(), set_3dfldr_mod::set_3dfldr_tile(), set_ngfld(), set_ngfldr(), state_join_mod::state_join_nf90(), state_join_mod::state_join_pio(), state_read_mod::state_read_nf90(), state_read_mod::state_read_pio(), stats_modobs_mod::stats_modobs_nf90(), stats_modobs_mod::stats_modobs_pio(), tadv_mod::tadv_putatt::tadv_putatt_nf90(), tadv_mod::tadv_putatt::tadv_putatt_pio(), tadv_mod::tadv_report(), time_corr_mod::time_corr_nf90(), time_corr_mod::time_corr_pio(), tl_def_his_mod::tl_def_his_nf90(), tl_def_his_mod::tl_def_his_pio(), tl_def_ini_mod::tl_def_ini_nf90(), tl_def_ini_mod::tl_def_ini_pio(), tl_nesting_mod::tl_fine2coarse(), tl_nesting_mod::tl_get_composite(), tl_nesting_mod::tl_get_refine(), ini_adjust_mod::tl_ini_perturb_tile(), tl_nesting_mod::tl_put_composite(), tl_wrt_his_mod::tl_wrt_his_nf90(), tl_wrt_his_mod::tl_wrt_his_pio(), tl_wrt_ini_mod::tl_wrt_ini_nf90(), tl_wrt_ini_mod::tl_wrt_ini_pio(), wrt_aug_imp_mod::wrt_aug_imp_nf90(), wrt_aug_imp_mod::wrt_aug_imp_pio(), wrt_avg_mod::wrt_avg_nf90(), wrt_avg_mod::wrt_avg_pio(), wrt_dai_mod::wrt_dai_nf90(), wrt_dai_mod::wrt_dai_pio(), wrt_diags_mod::wrt_diags_nf90(), wrt_diags_mod::wrt_diags_pio(), wrt_error_mod::wrt_error_nf90(), wrt_error_mod::wrt_error_pio(), wrt_evolved_mod::wrt_evolved_nf90(), wrt_evolved_mod::wrt_evolved_pio(), wrt_floats_mod::wrt_floats_nf90(), wrt_floats_mod::wrt_floats_pio(), wrt_ini_mod::wrt_frc_ad_nf90(), wrt_ini_mod::wrt_frc_ad_pio(), wrt_ini_mod::wrt_frc_nf90(), wrt_ini_mod::wrt_frc_pio(), wrt_hessian_mod::wrt_hessian_nf90(), wrt_hessian_mod::wrt_hessian_pio(), wrt_his_mod::wrt_his_nf90(), wrt_his_mod::wrt_his_pio(), wrt_impulse_mod::wrt_impulse_nf90(), wrt_impulse_mod::wrt_impulse_pio(), wrt_info_mod::wrt_info::wrt_info_nf90(), wrt_info_mod::wrt_info::wrt_info_pio(), wrt_ini_mod::wrt_ini_nf90(), wrt_ini_mod::wrt_ini_pio(), normalization_mod::wrt_norm2d_nf90(), normalization_mod::wrt_norm2d_pio(), normalization_mod::wrt_norm3d_nf90(), normalization_mod::wrt_norm3d_pio(), wrt_quick_mod::wrt_quick_nf90(), wrt_quick_mod::wrt_quick_pio(), wrt_rst_mod::wrt_rst_nf90(), wrt_rst_mod::wrt_rst_pio(), wrt_state_mod::wrt_state_nf90(), wrt_state_mod::wrt_state_pio(), wrt_station_mod::wrt_station_nf90(), wrt_station_mod::wrt_station_pio(), wrt_tides_mod::wrt_tides_nf90(), and wrt_tides_mod::wrt_tides_pio().

◆ vtime

◆ vxmax

◆ vxmin

◆ vymax

◆ vymin